C 19 SEP 05 - MK  - INCLUDE MODEL CORE POTENTIAL LIBRARY
C
C*MODULE MCPLIB  *DECK LA5770
      SUBROUTINE LA5770(MMPMOD,NUCZ,MMPTYP,SHINFO,CDFCTR,NOSH,KTYP,KNG,
     2                  EX,C,ZCORE,NOAN0,NOAN1,AN0,ALPN0,AN1,
     3                  ALPN1,BPAR,ITYP,IERR)
C
C     --- MMPMOD: 0  READ VALENCE BASIS-SET
C     ---         1  READ MODEL-POTENTIAL-PARAMETERS
C     ---            AND CORE-SHELL BASIS-SET
C
C     --- NUCZ:    NUCLEAR CHARGE
C     --- MMPTYP:  1  NON-RELATIVISTIC   MOD.POT.
C     ---          2  QUASI-RELATIVISTIC MOD.POT.
C     ---          3  READ IN MOD.POT.FROM $MMP GROUP
C     ---          4  TYPE NOT SPECIFIED
C     ---    W*10**I  FOR I-TH SHELL (I>=1)
C     ---    W: 1,2,3,4,6  S,P,D,F,L - SHELL
C     --- CDFCTR(I) CODED DEFAULT CONTRACTION OF VALENCE-SHELL I
C     --- NOSH     NO.OF (VALENCE OR CORE) SHELLS
C     --- KTYP(I)  TYPE OF SHELL I
C     --- KNG(I)   NO.OF GTFS IN SHELL I
C     --- EX(J)    EXPONENT OF J-TH GTF
C     --- C(J)     CONTRACTION COEFF.OF J-TH GTF
C     --- ZCORE    CORE-CHARGE
C     --- NOAN0    NO.OF A-TERMS FOR N=0
C     --- NOAN1    NO.OF A-TERMS FOR N=1
C     --- AN0(I)   A-PARAMETERS FOR N=0
C     --- ALPN0(I) ALPHA-EXPONENTS FOR N=0
C     --- AN1(I)   A-PARAMETERS FOR N=1
C     --- ALPN1(I) ALPHA-EXPONENTS FOR N=1
C     --- BPAR(I)  B-PARAMETERS
C     --- IERR(I)  ERROR-STATUS   FOR MMPMOD=0:
C     ---          0  OK; 1  NOT MMP-ATOM; 2 MMPTYP WRONG
C
C
      IMPLICIT DOUBLE PRECISION (A-H,O-Z)
      DIMENSION AN0(*),ALPN0(*),AN1(*),ALPN1(*)
      DIMENSION BPAR(*),KNG(*),KTYP(*)
      DIMENSION C(*),EX(*)
      CHARACTER*20 CDFCTR(*),SHINFO
C
      DIMENSION ITYP(10)
      COMMON /IOFILE/ IR,IW,IP,IJK,IPK,IDAF,NAV,IODA(950)
C
      IZSAVE=NUCZ
      IERR=0
C
C     --- ITYP(I) IS THE TYPE (MMPTYP) OF THE I-TH BUILT-IN
C     --- MODEL-POTENTIAL FOR A GIVEN ATOM (IZSAVE)
C
      DO 40 I=1,10
         ITYP(I)=0
  40  CONTINUE

C
C ... ~/MCP/MCP_BASPAR/BASPARPREP/LANMCPALL.DATPAR
C
C     --- 
C
      IF(IZSAVE.EQ.57) THEN
        ITYP(1)=122
C     --- 
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : LA/QR             CONFIGURATION : S2P6F0D1        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 11.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =   -31.2659576 A.U.
C
C  ***     ORBITAL ENERGY (5S) = -1.82131 A.U. <REFERENCE = -1.82128>
C  ***     ORBITAL ENERGY (6S) =  -.17903 A.U. <REFERENCE =  -.17956>
C  ***     ORBITAL ENERGY (5P) = -1.05386 A.U. <REFERENCE = -1.05383>
C  ***     ORBITAL ENERGY (5D) =  -.23559 A.U. <REFERENCE =  -.23548>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 11.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.91730072D+04
           C( 1)=-0.74317445D-02
          EX( 2)= 0.10240376D+04
           C( 2)=-0.37458213D-01
          EX( 3)= 0.70494242D+02
           C( 3)= 0.18682681D+00
          EX( 4)= 0.12204519D+02
           C( 4)=-0.53248101D+00
          EX( 5)= 0.23282533D+01
           C( 5)= 0.10659847D+01
          EX( 6)= 0.41283811D+00
           C( 6)=-0.11233541D+01
          EX( 7)= 0.17867722D+00
           C( 7)=-0.14911935D+00
          EX( 8)= 0.64487130D-01
           C( 8)=-0.48393289D-01
          EX( 9)= 0.30652430D-01
           C( 9)= 0.33316155D-01
          EX(10)= 0.14839410D-01
           C(10)=-0.10765553D-01
          EX(11)= 0.91730072D+04
           C(11)=-0.22151652D-02
          EX(12)= 0.10240376D+04
           C(12)=-0.11165094D-01
          EX(13)= 0.70494242D+02
           C(13)= 0.55384664D-01
          EX(14)= 0.12204519D+02
           C(14)=-0.15994321D+00
          EX(15)= 0.23282533D+01
           C(15)= 0.35119197D+00
          EX(16)= 0.41283811D+00
           C(16)=-0.57885711D+00
          EX(17)= 0.17867722D+00
           C(17)=-0.20103526D+00
          EX(18)= 0.64487130D-01
           C(18)= 0.50209013D+00
          EX(19)= 0.30652430D-01
           C(19)= 0.62669955D+00
          EX(20)= 0.14839410D-01
           C(20)= 0.12198502D+00
          EX(21)= 0.77845788D+03
           C(21)= 0.14824937D-01
          EX(22)= 0.16338910D+03
           C(22)= 0.55358742D-01
          EX(23)= 0.18090681D+02
           C(23)=-0.22282356D+00
          EX(24)= 0.40444793D+01
           C(24)= 0.13706075D+00
          EX(25)= 0.27118619D+01
           C(25)= 0.39840896D+00
          EX(26)= 0.47185611D+00
           C(26)=-0.82386470D+00
          EX(27)= 0.17703870D+00
           C(27)=-0.29913667D+00
          EX(28)= 0.12215984D+03
           C(28)= 0.15770709D-01
          EX(29)= 0.31874135D+02
           C(29)= 0.60477279D-01
          EX(30)= 0.45128977D+01
           C(30)=-0.12988871D+00
          EX(31)= 0.24794571D+01
           C(31)=-0.11009036D+00
          EX(32)= 0.46651665D+00
           C(32)= 0.40482111D+00
          EX(33)= 0.17084156D+00
           C(33)= 0.53474838D+00
          EX(34)= 0.58754134D-01
           C(34)= 0.25411681D+00
          EX(35)= 0.38985868D+02
           C(35)=-0.34934295D-01
          EX(36)= 0.11432234D+02
           C(36)=-0.16652984D+00
          EX(37)= 0.40431895D+01
           C(37)=-0.35542436D+00
          EX(38)= 0.14555690D+01
           C(38)=-0.43376842D+00
          EX(39)= 0.49649649D+00
           C(39)=-0.33988848D+00
          EX(40)= 0.14772908D+00
           C(40)=-0.15334299D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 11.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.17448356D+01
          ALPN0( 1)= 0.98460097D+03
            AN0( 2)= 0.12585716D+01
          ALPN0( 2)= 0.51540082D+02
            AN0( 3)= 0.12441958D+01
          ALPN0( 3)= 0.35983052D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.86498636D+02
          ALPN1( 1)= 0.14485963D+04
            AN1( 2)= 0.57848691D+01
          ALPN1( 2)= 0.35017529D+02
            AN1( 3)= 0.15293115D+00
          ALPN1( 3)= 0.12852299D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.28808956D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.46617660D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.10256342D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.21701080D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.41779336D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.86685680D+02
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.16334752D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.63696108D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.83022080D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.11535539D+06
           C(  1) = 0.17690297D-01
          EX(  2) = 0.11025102D+05
           C(  2) = 0.11688855D+00
          EX(  3) = 0.20433153D+04
           C(  3) = 0.42682812D+00
          EX(  4) = 0.51090524D+03
           C(  4) = 0.56444705D+00
          EX(  5) = 0.86842808D+03
           C(  5) =-0.48682181D-02
          EX(  6) = 0.93231480D+02
           C(  6) = 0.34220302D-01
          EX(  7) = 0.40341220D+02
           C(  7) = 0.26690427D-01
          EX(  8) = 0.74892504D+02
           C(  8) = 0.78083860D-02
          EX(  9) = 0.12819239D+02
           C(  9) =-0.26286767D-01
          EX( 10) = 0.54775952D+01
           C( 10) =-0.71430391D-02
          EX( 11) = 0.26062558D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.99494392D+00
           C( 12) = 0.00000000D+00
          EX( 13) = 0.42088999D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.16853352D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.11535539D+06
           C( 15) = 0.67469141D-02
          EX( 16) = 0.11025102D+05
           C( 16) = 0.44580204D-01
          EX( 17) = 0.20433153D+04
           C( 17) = 0.16278827D+00
          EX( 18) = 0.51090524D+03
           C( 18) = 0.21527484D+00
          EX( 19) = 0.86842808D+03
           C( 19) = 0.89113116D-01
          EX( 20) = 0.93231480D+02
           C( 20) =-0.62640533D+00
          EX( 21) = 0.40341220D+02
           C( 21) =-0.48857037D+00
          EX( 22) = 0.74892504D+02
           C( 22) = 0.62443856D-02
          EX( 23) = 0.12819239D+02
           C( 23) =-0.21021592D-01
          EX( 24) = 0.54775952D+01
           C( 24) =-0.57123061D-02
          EX( 25) = 0.26062558D+01
           C( 25) = 0.51214553D-02
          EX( 26) = 0.99494392D+00
           C( 26) = 0.91304704D-03
          EX( 27) = 0.42088999D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.16853352D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.11535539D+06
           C( 29) = 0.30997660D-02
          EX( 30) = 0.11025102D+05
           C( 30) = 0.20481690D-01
          EX( 31) = 0.20433153D+04
           C( 31) = 0.74790568D-01
          EX( 32) = 0.51090524D+03
           C( 32) = 0.98904718D-01
          EX( 33) = 0.86842808D+03
           C( 33) = 0.48345408D-01
          EX( 34) = 0.93231480D+02
           C( 34) =-0.33983574D+00
          EX( 35) = 0.40341220D+02
           C( 35) =-0.26505789D+00
          EX( 36) = 0.74892504D+02
           C( 36) =-0.30372176D+00
          EX( 37) = 0.12819239D+02
           C( 37) = 0.10224729D+01
          EX( 38) = 0.54775952D+01
           C( 38) = 0.27784186D+00
          EX( 39) = 0.26062558D+01
           C( 39) =-0.46410679D-02
          EX( 40) = 0.99494392D+00
           C( 40) =-0.82740416D-03
          EX( 41) = 0.42088999D+00
           C( 41) = 0.14228698D-02
          EX( 42) = 0.16853352D+00
           C( 42) = 0.32190017D-03
          EX( 43) = 0.11535539D+06
           C( 43) = 0.15840705D-02
          EX( 44) = 0.11025102D+05
           C( 44) = 0.10466739D-01
          EX( 45) = 0.20433153D+04
           C( 45) = 0.38220153D-01
          EX( 46) = 0.51090524D+03
           C( 46) = 0.50543185D-01
          EX( 47) = 0.86842808D+03
           C( 47) = 0.14029960D-01
          EX( 48) = 0.93231480D+02
           C( 48) =-0.98621193D-01
          EX( 49) = 0.40341220D+02
           C( 49) =-0.76920472D-01
          EX( 50) = 0.74892504D+02
           C( 50) =-0.29925229D+00
          EX( 51) = 0.12819239D+02
           C( 51) = 0.10074265D+01
          EX( 52) = 0.54775952D+01
           C( 52) = 0.27375323D+00
          EX( 53) = 0.26062558D+01
           C( 53) =-0.12651076D+01
          EX( 54) = 0.99494392D+00
           C( 54) =-0.22554189D+00
          EX( 55) = 0.42088999D+00
           C( 55) = 0.62440094D-02
          EX( 56) = 0.16853352D+00
           C( 56) = 0.14126013D-02
          EX( 57) = 0.29068042D+04
           C( 57) = 0.24000935D-01
          EX( 58) = 0.60453303D+03
           C( 58) = 0.16534654D+00
          EX( 59) = 0.18200950D+03
           C( 59) = 0.48374990D+00
          EX( 60) = 0.63545923D+02
           C( 60) = 0.46209440D+00
          EX( 61) = 0.27424613D+02
           C( 61) = 0.28065476D-01
          EX( 62) = 0.10646285D+02
           C( 62) = 0.34664265D-01
          EX( 63) = 0.42766655D+01
           C( 63) =-0.10881350D-01
          EX( 64) = 0.17338985D+01
           C( 64) =-0.93476947D-02
          EX( 65) = 0.58439696D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.20783783D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.29068042D+04
           C( 67) = 0.12643986D-01
          EX( 68) = 0.60453303D+03
           C( 68) = 0.87106581D-01
          EX( 69) = 0.18200950D+03
           C( 69) = 0.25484536D+00
          EX( 70) = 0.63545923D+02
           C( 70) = 0.24343698D+00
          EX( 71) = 0.27424613D+02
           C( 71) =-0.51553598D+00
          EX( 72) = 0.10646285D+02
           C( 72) =-0.63674943D+00
          EX( 73) = 0.42766655D+01
           C( 73) =-0.28158527D-01
          EX( 74) = 0.17338985D+01
           C( 74) =-0.24189764D-01
          EX( 75) = 0.58439696D+00
           C( 75) = 0.64615646D-02
          EX( 76) = 0.20783783D+00
           C( 76) = 0.49703760D-02
          EX( 77) = 0.29068042D+04
           C( 77) = 0.59223634D-02
          EX( 78) = 0.60453303D+03
           C( 78) = 0.40800173D-01
          EX( 79) = 0.18200950D+03
           C( 79) = 0.11936796D+00
          EX( 80) = 0.63545923D+02
           C( 80) = 0.11402435D+00
          EX( 81) = 0.27424613D+02
           C( 81) =-0.35381115D+00
          EX( 82) = 0.10646285D+02
           C( 82) =-0.43699967D+00
          EX( 83) = 0.42766655D+01
           C( 83) = 0.67139569D+00
          EX( 84) = 0.17338985D+01
           C( 84) = 0.57676681D+00
          EX( 85) = 0.58439696D+00
           C( 85) = 0.12529813D-01
          EX( 86) = 0.20783783D+00
           C( 86) = 0.96382046D-02
          EX( 87) = 0.28543462D+03
           C( 87) = 0.42909640D-01
          EX( 88) = 0.78345689D+02
           C( 88) = 0.24930334D+00
          EX( 89) = 0.27317083D+02
           C( 89) = 0.54025900D+00
          EX( 90) = 0.10227668D+02
           C( 90) = 0.36544617D+00
          EX( 91) = 0.79777175D+01
           C( 91) = 0.75810273D-02
          EX( 92) = 0.30301887D+01
           C( 92) = 0.16553215D-01
          EX( 93) = 0.11156680D+01
           C( 93) = 0.81438043D-02
          EX( 94) = 0.28543462D+03
           C( 94) = 0.19454712D-01
          EX( 95) = 0.78345689D+02
           C( 95) = 0.11303112D+00
          EX( 96) = 0.27317083D+02
           C( 96) = 0.24494691D+00
          EX( 97) = 0.10227668D+02
           C( 97) = 0.16568888D+00
          EX( 98) = 0.79777175D+01
           C( 98) =-0.29633195D+00
          EX( 99) = 0.30301887D+01
           C( 99) =-0.64704246D+00
          EX(100) = 0.11156680D+01
           C(100) =-0.31833013D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.58) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : CE/QR             CONFIGURATION : S2P6F2D0        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 12.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =   -38.4753201 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -1.74005 A.U. <REFERENCE = -1.73946>
C  ***     ORBITAL ENERGY(6S) =  -.16849 A.U. <REFERENCE =  -.16897>
C  ***     ORBITAL ENERGY(5P) =  -.96806 A.U. <REFERENCE =  -.96850>
C  ***     ORBITAL ENERGY(4F) =  -.32393 A.U. <REFERENCE =  -.32402>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 12.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.96733650D+04
           C( 1)=-0.75191808D-02
          EX( 2)= 0.10718422D+04
           C( 2)=-0.37947717D-01
          EX( 3)= 0.73571719D+02
           C( 3)= 0.18294110D+00
          EX( 4)= 0.12822972D+02
           C( 4)=-0.51568463D+00
          EX( 5)= 0.24671687D+01
           C( 5)= 0.10175732D+01
          EX( 6)= 0.43756777D+00
           C( 6)=-0.97628759D+00
          EX( 7)= 0.19285309D+00
           C( 7)=-0.30808708D+00
          EX( 8)= 0.67828370D-01
           C( 8)= 0.12354949D-01
          EX( 9)= 0.32518320D-01
           C( 9)=-0.10157777D-01
          EX(10)= 0.15593050D-01
           C(10)= 0.32314323D-02
          EX(11)= 0.96733650D+04
           C(11)= 0.21190140D-02
          EX(12)= 0.10718422D+04
           C(12)= 0.10694216D-01
          EX(13)= 0.73571719D+02
           C(13)=-0.51124303D-01
          EX(14)= 0.12822972D+02
           C(14)= 0.14537441D+00
          EX(15)= 0.24671687D+01
           C(15)=-0.31042157D+00
          EX(16)= 0.43756777D+00
           C(16)= 0.43401719D+00
          EX(17)= 0.19285309D+00
           C(17)= 0.31333851D+00
          EX(18)= 0.67828370D-01
           C(18)=-0.37722438D+00
          EX(19)= 0.32518320D-01
           C(19)=-0.67326515D+00
          EX(20)= 0.15593050D-01
           C(20)=-0.20628091D+00
          EX(21)= 0.81137098D+03
           C(21)= 0.14577214D-01
          EX(22)= 0.17019885D+03
           C(22)= 0.51767401D-01
          EX(23)= 0.18986681D+02
           C(23)=-0.20542711D+00
          EX(24)= 0.40411766D+01
           C(24)= 0.13515943D+00
          EX(25)= 0.28041585D+01
           C(25)= 0.36868737D+00
          EX(26)= 0.49726185D+00
           C(26)=-0.75547180D+00
          EX(27)= 0.18562826D+00
           C(27)=-0.37375211D+00
          EX(28)= 0.12837930D+03
           C(28)=-0.22747214D-01
          EX(29)= 0.33569921D+02
           C(29)=-0.73867869D-01
          EX(30)= 0.47643658D+01
           C(30)= 0.13551096D+00
          EX(31)= 0.26276468D+01
           C(31)= 0.12010825D+00
          EX(32)= 0.50292237D+00
           C(32)=-0.40058197D+00
          EX(33)= 0.18482838D+00
           C(33)=-0.53925502D+00
          EX(34)= 0.63571893D-01
           C(34)=-0.24998502D+00
          EX(35)= 0.45454501D+02
           C(35)= 0.27397967D-01
          EX(36)= 0.13532247D+02
           C(36)= 0.15149850D+00
          EX(37)= 0.48733431D+01
           C(37)= 0.36373843D+00
          EX(38)= 0.17986493D+01
           C(38)= 0.42929435D+00
          EX(39)= 0.63371014D+00
           C(39)= 0.33831277D+00
          EX(40)= 0.19641943D+00
           C(40)= 0.14213969D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 12.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.15106617D+01
          ALPN0( 1)= 0.10232787D+04
            AN0( 2)= 0.11251757D+01
          ALPN0( 2)= 0.56582453D+02
            AN0( 3)= 0.11194052D+01
          ALPN0( 3)= 0.37648677D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.10743396D+03
          ALPN1( 1)= 0.15901037D+04
            AN1( 2)= 0.61042446D+01
          ALPN1( 2)= 0.38188875D+02
            AN1( 3)= 0.14021711D+00
          ALPN1( 3)= 0.12463797D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.29931960D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.48694610D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.10774112D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.22812820D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.43613976D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.91139960D+02
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.17190920D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.67352800D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.88263800D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.12304415D+06
           C(  1) = 0.17701826D-01
          EX(  2) = 0.11640659D+05
           C(  2) = 0.11637520D+00
          EX(  3) = 0.21422987D+04
           C(  3) = 0.42568900D+00
          EX(  4) = 0.53317742D+03
           C(  4) = 0.56622155D+00
          EX(  5) = 0.90971525D+03
           C(  5) =-0.48787495D-02
          EX(  6) = 0.97426755D+02
           C(  6) = 0.34514733D-01
          EX(  7) = 0.42198625D+02
           C(  7) = 0.27206051D-01
          EX(  8) = 0.78293817D+02
           C(  8) = 0.78730449D-02
          EX(  9) = 0.13406604D+02
           C(  9) =-0.26566925D-01
          EX( 10) = 0.56890843D+01
           C( 10) =-0.71252512D-02
          EX( 11) = 0.27620807D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.10634638D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.44450500D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.17825383D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.12304415D+06
           C( 15) = 0.67736772D-02
          EX( 16) = 0.11640659D+05
           C( 16) = 0.44531455D-01
          EX( 17) = 0.21422987D+04
           C( 17) = 0.16289167D+00
          EX( 18) = 0.53317742D+03
           C( 18) = 0.21666703D+00
          EX( 19) = 0.90971525D+03
           C( 19) = 0.88121997D-01
          EX( 20) = 0.97426755D+02
           C( 20) =-0.62341942D+00
          EX( 21) = 0.42198625D+02
           C( 21) =-0.49140697D+00
          EX( 22) = 0.78293817D+02
           C( 22) = 0.63329579D-02
          EX( 23) = 0.13406604D+02
           C( 23) =-0.21370032D-01
          EX( 24) = 0.56890843D+01
           C( 24) =-0.57314440D-02
          EX( 25) = 0.27620807D+01
           C( 25) = 0.51625107D-02
          EX( 26) = 0.10634638D+01
           C( 26) = 0.94252264D-03
          EX( 27) = 0.44450500D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.17825383D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.12304415D+06
           C( 29) = 0.31226702D-02
          EX( 30) = 0.11640659D+05
           C( 30) = 0.20529033D-01
          EX( 31) = 0.21422987D+04
           C( 31) = 0.75093176D-01
          EX( 32) = 0.53317742D+03
           C( 32) = 0.99883660D-01
          EX( 33) = 0.90971525D+03
           C( 33) = 0.47983087D-01
          EX( 34) = 0.97426755D+02
           C( 34) =-0.33945654D+00
          EX( 35) = 0.42198625D+02
           C( 35) =-0.26757478D+00
          EX( 36) = 0.78293817D+02
           C( 36) =-0.30454748D+00
          EX( 37) = 0.13406604D+02
           C( 37) = 0.10276698D+01
          EX( 38) = 0.56890843D+01
           C( 38) = 0.27562110D+00
          EX( 39) = 0.27620807D+01
           C( 39) =-0.63511722D-02
          EX( 40) = 0.10634638D+01
           C( 40) =-0.11595373D-02
          EX( 41) = 0.44450500D+00
           C( 41) = 0.18235804D-02
          EX( 42) = 0.17825383D+00
           C( 42) = 0.43000133D-03
          EX( 43) = 0.12304415D+06
           C( 43) = 0.16023615D-02
          EX( 44) = 0.11640659D+05
           C( 44) = 0.10534233D-01
          EX( 45) = 0.21422987D+04
           C( 45) = 0.38533181D-01
          EX( 46) = 0.53317742D+03
           C( 46) = 0.51254127D-01
          EX( 47) = 0.90971525D+03
           C( 47) = 0.13935879D-01
          EX( 48) = 0.97426755D+02
           C( 48) =-0.98589427D-01
          EX( 49) = 0.42198625D+02
           C( 49) =-0.77712581D-01
          EX( 50) = 0.78293817D+02
           C( 50) =-0.30222997D+00
          EX( 51) = 0.13406604D+02
           C( 51) = 0.10198495D+01
          EX( 52) = 0.56890843D+01
           C( 52) = 0.27352371D+00
          EX( 53) = 0.27620807D+01
           C( 53) =-0.12669810D+01
          EX( 54) = 0.10634638D+01
           C( 54) =-0.23131347D+00
          EX( 55) = 0.44450500D+00
           C( 55) = 0.56866838D-02
          EX( 56) = 0.17825383D+00
           C( 56) = 0.13409234D-02
          EX( 57) = 0.30423926D+04
           C( 57) = 0.23918425D-01
          EX( 58) = 0.63133029D+03
           C( 58) = 0.16480418D+00
          EX( 59) = 0.18987277D+03
           C( 59) = 0.48323004D+00
          EX( 60) = 0.66274040D+02
           C( 60) = 0.46295345D+00
          EX( 61) = 0.28673301D+02
           C( 61) = 0.28212619D-01
          EX( 62) = 0.11156564D+02
           C( 62) = 0.34757318D-01
          EX( 63) = 0.45170924D+01
           C( 63) =-0.10775690D-01
          EX( 64) = 0.18295301D+01
           C( 64) =-0.92140674D-02
          EX( 65) = 0.61682973D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.21789479D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.30423926D+04
           C( 67) = 0.12656439D-01
          EX( 68) = 0.63133029D+03
           C( 68) = 0.87206156D-01
          EX( 69) = 0.18987277D+03
           C( 69) = 0.25570124D+00
          EX( 70) = 0.66274040D+02
           C( 70) = 0.24497189D+00
          EX( 71) = 0.28673301D+02
           C( 71) =-0.51655378D+00
          EX( 72) = 0.11156564D+02
           C( 72) =-0.63638274D+00
          EX( 73) = 0.45170924D+01
           C( 73) =-0.28149994D-01
          EX( 74) = 0.18295301D+01
           C( 74) =-0.24070470D-01
          EX( 75) = 0.61682973D+00
           C( 75) = 0.62729124D-02
          EX( 76) = 0.21789479D+00
           C( 76) = 0.48852808D-02
          EX( 77) = 0.30423926D+04
           C( 77) = 0.59618563D-02
          EX( 78) = 0.63133029D+03
           C( 78) = 0.41078742D-01
          EX( 79) = 0.18987277D+03
           C( 79) = 0.12044890D+00
          EX( 80) = 0.66274040D+02
           C( 80) = 0.11539480D+00
          EX( 81) = 0.28673301D+02
           C( 81) =-0.35747801D+00
          EX( 82) = 0.11156564D+02
           C( 82) =-0.44040494D+00
          EX( 83) = 0.45170924D+01
           C( 83) = 0.67477466D+00
          EX( 84) = 0.18295301D+01
           C( 84) = 0.57698569D+00
          EX( 85) = 0.61682973D+00
           C( 85) = 0.12402693D-01
          EX( 86) = 0.21789479D+00
           C( 86) = 0.96590915D-02
          EX( 87) = 0.29945494D+03
           C( 87) = 0.42567817D-01
          EX( 88) = 0.82235059D+02
           C( 88) = 0.24834003D+00
          EX( 89) = 0.28716701D+02
           C( 89) = 0.54030944D+00
          EX( 90) = 0.10776795D+02
           C( 90) = 0.36551553D+00
          EX( 91) = 0.84479041D+01
           C( 91) = 0.76700169D-02
          EX( 92) = 0.32167519D+01
           C( 92) = 0.16672940D-01
          EX( 93) = 0.11844861D+01
           C( 93) = 0.81568342D-02
          EX( 94) = 0.29945494D+03
           C( 94) = 0.19504069D-01
          EX( 95) = 0.82235059D+02
           C( 95) = 0.11378645D+00
          EX( 96) = 0.28716701D+02
           C( 96) = 0.24756338D+00
          EX( 97) = 0.10776795D+02
           C( 97) = 0.16747489D+00
          EX( 98) = 0.84479041D+01
           C( 98) =-0.29815999D+00
          EX( 99) = 0.32167519D+01
           C( 99) =-0.64813466D+00
          EX(100) = 0.11844861D+01
           C(100) =-0.31708426D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.59) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : PR/QR             CONFIGURATION : S2P6F3D0        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 13.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =   -46.9707719 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -1.79603 A.U. <REFERENCE = -1.79560>
C  ***     ORBITAL ENERGY(6S) =  -.17081 A.U. <REFERENCE =  -.17130>
C  ***     ORBITAL ENERGY(5P) =  -.99359 A.U. <REFERENCE =  -.99384>
C  ***     ORBITAL ENERGY(4F) =  -.39369 A.U. <REFERENCE =  -.39394>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 13.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.10206168D+05
           C( 1)=-0.76185343D-02
          EX( 2)= 0.11219030D+04
           C( 2)=-0.38463266D-01
          EX( 3)= 0.76692797D+02
           C( 3)= 0.18416884D+00
          EX( 4)= 0.13466538D+02
           C( 4)=-0.51686570D+00
          EX( 5)= 0.25990757D+01
           C( 5)= 0.10122334D+01
          EX( 6)= 0.45845625D+00
           C( 6)=-0.96924545D+00
          EX( 7)= 0.20203430D+00
           C( 7)=-0.31217280D+00
          EX( 8)= 0.69103290D-01
           C( 8)= 0.11779327D-01
          EX( 9)= 0.33195970D-01
           C( 9)=-0.10135997D-01
          EX(10)= 0.15898335D-01
           C(10)= 0.32649474D-02
          EX(11)= 0.10206168D+05
           C(11)= 0.21187297D-02
          EX(12)= 0.11219030D+04
           C(12)= 0.10696711D-01
          EX(13)= 0.76692797D+02
           C(13)=-0.50777698D-01
          EX(14)= 0.13466538D+02
           C(14)= 0.14372396D+00
          EX(15)= 0.25990757D+01
           C(15)=-0.30427746D+00
          EX(16)= 0.45845625D+00
           C(16)= 0.42218721D+00
          EX(17)= 0.20203430D+00
           C(17)= 0.31145747D+00
          EX(18)= 0.69103290D-01
           C(18)=-0.37753063D+00
          EX(19)= 0.33195970D-01
           C(19)=-0.66691529D+00
          EX(20)= 0.15898335D-01
           C(20)=-0.20597232D+00
          EX(21)= 0.84707473D+03
           C(21)= 0.14559847D-01
          EX(22)= 0.17748793D+03
           C(22)= 0.51499176D-01
          EX(23)= 0.19842206D+02
           C(23)=-0.20490609D+00
          EX(24)= 0.46905042D+01
           C(24)= 0.74624714D-01
          EX(25)= 0.30615651D+01
           C(25)= 0.42421581D+00
          EX(26)= 0.51961433D+00
           C(26)=-0.75263602D+00
          EX(27)= 0.19302125D+00
           C(27)=-0.37543977D+00
          EX(28)= 0.13521934D+03
           C(28)=-0.24804840D-01
          EX(29)= 0.35452134D+02
           C(29)=-0.81311391D-01
          EX(30)= 0.49379340D+01
           C(30)= 0.16622238D+00
          EX(31)= 0.26022854D+01
           C(31)= 0.11898164D+00
          EX(32)= 0.58819603D+00
           C(32)=-0.39879319D+00
          EX(33)= 0.23389110D+00
           C(33)=-0.54342982D+00
          EX(34)= 0.88301383D-01
           C(34)=-0.22264507D+00
          EX(35)= 0.49815784D+02
           C(35)= 0.26994670D-01
          EX(36)= 0.14968060D+02
           C(36)= 0.14444506D+00
          EX(37)= 0.54443919D+01
           C(37)= 0.36046268D+00
          EX(38)= 0.20359799D+01
           C(38)= 0.43371227D+00
          EX(39)= 0.72918471D+00
           C(39)= 0.33559405D+00
          EX(40)= 0.23069370D+00
           C(40)= 0.13722749D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 13.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.14463806D+01
          ALPN0( 1)= 0.10472178D+04
            AN0( 2)= 0.10548650D+01
          ALPN0( 2)= 0.56565707D+02
            AN0( 3)= 0.98874620D+00
          ALPN0( 3)= 0.38246000D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.10380408D+03
          ALPN1( 1)= 0.16372614D+04
            AN1( 2)= 0.55206028D+01
          ALPN1( 2)= 0.35817725D+02
            AN1( 3)= 0.12880001D+00
          ALPN1( 3)= 0.12988063D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.31079600D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.50821380D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.11300660D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.23913000D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.45486440D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.95651800D+02
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.18029020D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.71049000D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.93308000D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.13120103D+06
           C(  1) = 0.17718390D-01
          EX(  2) = 0.12286761D+05
           C(  2) = 0.11587339D+00
          EX(  3) = 0.22451731D+04
           C(  3) = 0.42454222D+00
          EX(  4) = 0.55615073D+03
           C(  4) = 0.56799145D+00
          EX(  5) = 0.95221606D+03
           C(  5) =-0.48897102D-02
          EX(  6) = 0.10194516D+03
           C(  6) = 0.34652363D-01
          EX(  7) = 0.44335582D+02
           C(  7) = 0.27858164D-01
          EX(  8) = 0.81818643D+02
           C(  8) = 0.79228283D-02
          EX(  9) = 0.14016037D+02
           C(  9) =-0.26756468D-01
          EX( 10) = 0.59482919D+01
           C( 10) =-0.71213427D-02
          EX( 11) = 0.29242673D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.11387150D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.46705127D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.18727906D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.13120103D+06
           C( 15) = 0.68026750D-02
          EX( 16) = 0.12286761D+05
           C( 16) = 0.44487624D-01
          EX( 17) = 0.22451731D+04
           C( 17) = 0.16299578D+00
          EX( 18) = 0.55615073D+03
           C( 18) = 0.21807067D+00
          EX( 19) = 0.95221606D+03
           C( 19) = 0.87145463D-01
          EX( 20) = 0.10194516D+03
           C( 20) =-0.61758186D+00
          EX( 21) = 0.44335582D+02
           C( 21) =-0.49649416D+00
          EX( 22) = 0.81818643D+02
           C( 22) = 0.68130430D-02
          EX( 23) = 0.14016037D+02
           C( 23) =-0.23008572D-01
          EX( 24) = 0.59482919D+01
           C( 24) =-0.61238250D-02
          EX( 25) = 0.29242673D+01
           C( 25) = 0.59799594D-02
          EX( 26) = 0.11387150D+01
           C( 26) = 0.11318061D-02
          EX( 27) = 0.46705127D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.18727906D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.13120103D+06
           C( 29) = 0.31462461D-02
          EX( 30) = 0.12286761D+05
           C( 30) = 0.20575584D-01
          EX( 31) = 0.22451731D+04
           C( 31) = 0.75385760D-01
          EX( 32) = 0.55615073D+03
           C( 32) = 0.10085797D+00
          EX( 33) = 0.95221606D+03
           C( 33) = 0.47620944D-01
          EX( 34) = 0.10194516D+03
           C( 34) =-0.33747977D+00
          EX( 35) = 0.44335582D+02
           C( 35) =-0.27131098D+00
          EX( 36) = 0.81818643D+02
           C( 36) =-0.30496244D+00
          EX( 37) = 0.14016037D+02
           C( 37) = 0.10298996D+01
          EX( 38) = 0.59482919D+01
           C( 38) = 0.27411197D+00
          EX( 39) = 0.29242673D+01
           C( 39) =-0.64286123D-02
          EX( 40) = 0.11387150D+01
           C( 40) =-0.12167210D-02
          EX( 41) = 0.46705127D+00
           C( 41) = 0.17844377D-02
          EX( 42) = 0.18727906D+00
           C( 42) = 0.43561939D-03
          EX( 43) = 0.13120103D+06
           C( 43) = 0.16198361D-02
          EX( 44) = 0.12286761D+05
           C( 44) = 0.10593283D-01
          EX( 45) = 0.22451731D+04
           C( 45) = 0.38812152D-01
          EX( 46) = 0.55615073D+03
           C( 46) = 0.51926449D-01
          EX( 47) = 0.95221606D+03
           C( 47) = 0.13840308D-01
          EX( 48) = 0.10194516D+03
           C( 48) =-0.98083401D-01
          EX( 49) = 0.44335582D+02
           C( 49) =-0.78852439D-01
          EX( 50) = 0.81818643D+02
           C( 50) =-0.30468549D+00
          EX( 51) = 0.14016037D+02
           C( 51) = 0.10289643D+01
          EX( 52) = 0.59482919D+01
           C( 52) = 0.27386304D+00
          EX( 53) = 0.29242673D+01
           C( 53) =-0.12645427D+01
          EX( 54) = 0.11387150D+01
           C( 54) =-0.23933558D+00
          EX( 55) = 0.46705127D+00
           C( 55) = 0.50251455D-02
          EX( 56) = 0.18727906D+00
           C( 56) = 0.12267455D-02
          EX( 57) = 0.31824790D+04
           C( 57) = 0.23839331D-01
          EX( 58) = 0.65890826D+03
           C( 58) = 0.16427448D+00
          EX( 59) = 0.19794554D+03
           C( 59) = 0.48272055D+00
          EX( 60) = 0.69071192D+02
           C( 60) = 0.46380318D+00
          EX( 61) = 0.29954450D+02
           C( 61) = 0.28359172D-01
          EX( 62) = 0.11678285D+02
           C( 62) = 0.34848503D-01
          EX( 63) = 0.47630094D+01
           C( 63) =-0.10675375D-01
          EX( 64) = 0.19260050D+01
           C( 64) =-0.91013352D-02
          EX( 65) = 0.64779742D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.22728689D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.31824790D+04
           C( 67) = 0.12667883D-01
          EX( 68) = 0.65890826D+03
           C( 68) = 0.87293125D-01
          EX( 69) = 0.19794554D+03
           C( 69) = 0.25651085D+00
          EX( 70) = 0.69071192D+02
           C( 70) = 0.24645843D+00
          EX( 71) = 0.29954450D+02
           C( 71) =-0.51759344D+00
          EX( 72) = 0.11678285D+02
           C( 72) =-0.63603254D+00
          EX( 73) = 0.47630094D+01
           C( 73) =-0.28109009D-01
          EX( 74) = 0.19260050D+01
           C( 74) =-0.23964453D-01
          EX( 75) = 0.64779742D+00
           C( 75) = 0.61038601D-02
          EX( 76) = 0.22728689D+00
           C( 76) = 0.48132928D-02
          EX( 77) = 0.31824790D+04
           C( 77) = 0.59957624D-02
          EX( 78) = 0.65890826D+03
           C( 78) = 0.41316205D-01
          EX( 79) = 0.19794554D+03
           C( 79) = 0.12140767D+00
          EX( 80) = 0.69071192D+02
           C( 80) = 0.11664982D+00
          EX( 81) = 0.29954450D+02
           C( 81) =-0.36077976D+00
          EX( 82) = 0.11678285D+02
           C( 82) =-0.44333575D+00
          EX( 83) = 0.47630094D+01
           C( 83) = 0.67746959D+00
          EX( 84) = 0.19260050D+01
           C( 84) = 0.57757955D+00
          EX( 85) = 0.64779742D+00
           C( 85) = 0.12319860D-01
          EX( 86) = 0.22728689D+00
           C( 86) = 0.97150156D-02
          EX( 87) = 0.31380924D+03
           C( 87) = 0.42250358D-01
          EX( 88) = 0.86214124D+02
           C( 88) = 0.24745011D+00
          EX( 89) = 0.30148684D+02
           C( 89) = 0.54036769D+00
          EX( 90) = 0.11338129D+02
           C( 90) = 0.36556054D+00
          EX( 91) = 0.89243493D+01
           C( 91) = 0.77661177D-02
          EX( 92) = 0.34038539D+01
           C( 92) = 0.16801583D-01
          EX( 93) = 0.12527519D+01
           C( 93) = 0.81855401D-02
          EX( 94) = 0.31380924D+03
           C( 94) = 0.19532311D-01
          EX( 95) = 0.86214124D+02
           C( 95) = 0.11439602D+00
          EX( 96) = 0.30148684D+02
           C( 96) = 0.24981160D+00
          EX( 97) = 0.11338129D+02
           C( 97) = 0.16899838D+00
          EX( 98) = 0.89243493D+01
           C( 98) =-0.29995039D+00
          EX( 99) = 0.34038539D+01
           C( 99) =-0.64892672D+00
          EX(100) = 0.12527519D+01
           C(100) =-0.31614972D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.60) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : ND/QR             CONFIGURATION : S2P6F4D0        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 14.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =   -56.9387366 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -1.85151 A.U. <REFERENCE = -1.85160>
C  ***     ORBITAL ENERGY(6S) =  -.17332 A.U. <REFERENCE =  -.17360>
C  ***     ORBITAL ENERGY(5P) = -1.01873 A.U. <REFERENCE = -1.01860>
C  ***     ORBITAL ENERGY(4F) =  -.43464 A.U. <REFERENCE =  -.43490>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 14.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.10774953D+05
           C( 1)= 0.79715777D-02
          EX( 2)= 0.11742503D+04
           C( 2)= 0.40225062D-01
          EX( 3)= 0.79870457D+02
           C( 3)=-0.18874565D+00
          EX( 4)= 0.14126866D+02
           C( 4)= 0.52258070D+00
          EX( 5)= 0.27271712D+01
           C( 5)=-0.10127663D+01
          EX( 6)= 0.47604657D+00
           C( 6)= 0.99105491D+00
          EX( 7)= 0.20421900D+00
           C( 7)= 0.28733911D+00
          EX( 8)= 0.71771330D-01
           C( 8)=-0.49728336D-02
          EX( 9)= 0.33878850D-01
           C( 9)= 0.38855485D-02
          EX(10)= 0.16138730D-01
           C(10)=-0.11504812D-02
          EX(11)= 0.10774953D+05
           C(11)= 0.21942107D-02
          EX(12)= 0.11742503D+04
           C(12)= 0.11072120D-01
          EX(13)= 0.79870457D+02
           C(13)=-0.51488212D-01
          EX(14)= 0.14126866D+02
           C(14)= 0.14369527D+00
          EX(15)= 0.27271712D+01
           C(15)=-0.30075039D+00
          EX(16)= 0.47604657D+00
           C(16)= 0.42721562D+00
          EX(17)= 0.20421900D+00
           C(17)= 0.30111156D+00
          EX(18)= 0.71771330D-01
           C(18)=-0.37905732D+00
          EX(19)= 0.33878850D-01
           C(19)=-0.67111183D+00
          EX(20)= 0.16138730D-01
           C(20)=-0.20080896D+00
          EX(21)= 0.88314406D+03
           C(21)= 0.15460721D-01
          EX(22)= 0.18485002D+03
           C(22)= 0.53199326D-01
          EX(23)= 0.20746306D+02
           C(23)=-0.21010068D+00
          EX(24)= 0.50646335D+01
           C(24)= 0.75112333D-01
          EX(25)= 0.32411154D+01
           C(25)= 0.42409555D+00
          EX(26)= 0.54295013D+00
           C(26)=-0.74852321D+00
          EX(27)= 0.20067975D+00
           C(27)=-0.37764407D+00
          EX(28)= 0.14159618D+03
           C(28)=-0.24773269D-01
          EX(29)= 0.37192702D+02
           C(29)=-0.81582535D-01
          EX(30)= 0.52090058D+01
           C(30)= 0.16575331D+00
          EX(31)= 0.27606691D+01
           C(31)= 0.11805108D+00
          EX(32)= 0.61947512D+00
           C(32)=-0.39949645D+00
          EX(33)= 0.24521798D+00
           C(33)=-0.54321071D+00
          EX(34)= 0.92082205D-01
           C(34)=-0.22336727D+00
          EX(35)= 0.53698469D+02
           C(35)= 0.27445867D-01
          EX(36)= 0.16225829D+02
           C(36)= 0.14392735D+00
          EX(37)= 0.59334027D+01
           C(37)= 0.36238798D+00
          EX(38)= 0.22319003D+01
           C(38)= 0.43577785D+00
          EX(39)= 0.80380674D+00
           C(39)= 0.32983943D+00
          EX(40)= 0.25553617D+00
           C(40)= 0.13404214D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 14.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.13824945D+01
          ALPN0( 1)= 0.10677918D+04
            AN0( 2)= 0.99177239D+00
          ALPN0( 2)= 0.57243839D+02
            AN0( 3)= 0.88640113D+00
          ALPN0( 3)= 0.38576850D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.10161968D+03
          ALPN1( 1)= 0.16619549D+04
            AN1( 2)= 0.50908728D+01
          ALPN1( 2)= 0.34136698D+02
            AN1( 3)= 0.11416135D+00
          ALPN1( 3)= 0.13759865D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.32252440D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.53001380D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.11839100D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.25026800D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.47399460D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.10025100D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.18872600D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.74813200D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.98362000D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.13985273D+06
           C(  1) = 0.17740137D-01
          EX(  2) = 0.12964936D+05
           C(  2) = 0.11538387D+00
          EX(  3) = 0.23520904D+04
           C(  3) = 0.42338875D+00
          EX(  4) = 0.57984426D+03
           C(  4) = 0.56975635D+00
          EX(  5) = 0.99688602D+03
           C(  5) =-0.48979077D-02
          EX(  6) = 0.10644932D+03
           C(  6) = 0.34937992D-01
          EX(  7) = 0.46334766D+02
           C(  7) = 0.28415570D-01
          EX(  8) = 0.85434516D+02
           C(  8) = 0.79946616D-02
          EX(  9) = 0.14647715D+02
           C(  9) =-0.27006880D-01
          EX( 10) = 0.62128093D+01
           C( 10) =-0.71361022D-02
          EX( 11) = 0.30893640D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.12145295D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.48970559D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.19625982D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.13985273D+06
           C( 15) = 0.68335008D-02
          EX( 16) = 0.12964936D+05
           C( 16) = 0.44445870D-01
          EX( 17) = 0.23520904D+04
           C( 17) = 0.16308936D+00
          EX( 18) = 0.57984426D+03
           C( 18) = 0.21947016D+00
          EX( 19) = 0.99688602D+03
           C( 19) = 0.86116681D-01
          EX( 20) = 0.10644932D+03
           C( 20) =-0.61429167D+00
          EX( 21) = 0.46334766D+02
           C( 21) =-0.49961222D+00
          EX( 22) = 0.85434516D+02
           C( 22) = 0.69121661D-02
          EX( 23) = 0.14647715D+02
           C( 23) =-0.23350087D-01
          EX( 24) = 0.62128093D+01
           C( 24) =-0.61698576D-02
          EX( 25) = 0.30893640D+01
           C( 25) = 0.59936326D-02
          EX( 26) = 0.12145295D+01
           C( 26) = 0.11716069D-02
          EX( 27) = 0.48970559D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.19625982D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.13985273D+06
           C( 29) = 0.31702899D-02
          EX( 30) = 0.12964936D+05
           C( 30) = 0.20619929D-01
          EX( 31) = 0.23520904D+04
           C( 31) = 0.75662615D-01
          EX( 32) = 0.57984426D+03
           C( 32) = 0.10181956D+00
          EX( 33) = 0.99688602D+03
           C( 33) = 0.47215283D-01
          EX( 34) = 0.10644932D+03
           C( 34) =-0.33679834D+00
          EX( 35) = 0.46334766D+02
           C( 35) =-0.27392291D+00
          EX( 36) = 0.85434516D+02
           C( 36) =-0.30565224D+00
          EX( 37) = 0.14647715D+02
           C( 37) = 0.10325282D+01
          EX( 38) = 0.62128093D+01
           C( 38) = 0.27282776D+00
          EX( 39) = 0.30893640D+01
           C( 39) =-0.65602608D-02
          EX( 40) = 0.12145295D+01
           C( 40) =-0.12823687D-02
          EX( 41) = 0.48970559D+00
           C( 41) = 0.17601264D-02
          EX( 42) = 0.19625982D+00
           C( 42) = 0.44319647D-03
          EX( 43) = 0.13985273D+06
           C( 43) = 0.16368684D-02
          EX( 44) = 0.12964936D+05
           C( 44) = 0.10646379D-01
          EX( 45) = 0.23520904D+04
           C( 45) = 0.39065747D-01
          EX( 46) = 0.57984426D+03
           C( 46) = 0.52570971D-01
          EX( 47) = 0.99688602D+03
           C( 47) = 0.13730228D-01
          EX( 48) = 0.10644932D+03
           C( 48) =-0.97941125D-01
          EX( 49) = 0.46334766D+02
           C( 49) =-0.79656922D-01
          EX( 50) = 0.85434516D+02
           C( 50) =-0.30707200D+00
          EX( 51) = 0.14647715D+02
           C( 51) = 0.10373243D+01
          EX( 52) = 0.62128093D+01
           C( 52) = 0.27409505D+00
          EX( 53) = 0.30893640D+01
           C( 53) =-0.12620948D+01
          EX( 54) = 0.12145295D+01
           C( 54) =-0.24670829D+00
          EX( 55) = 0.48970559D+00
           C( 55) = 0.44562401D-02
          EX( 56) = 0.19625982D+00
           C( 56) = 0.11220728D-02
          EX( 57) = 0.33271994D+04
           C( 57) = 0.23763327D-01
          EX( 58) = 0.68728597D+03
           C( 58) = 0.16375551D+00
          EX( 59) = 0.20623189D+03
           C( 59) = 0.48221815D+00
          EX( 60) = 0.71938308D+02
           C( 60) = 0.46464695D+00
          EX( 61) = 0.31269551D+02
           C( 61) = 0.28503915D-01
          EX( 62) = 0.12212531D+02
           C( 62) = 0.34942191D-01
          EX( 63) = 0.50148203D+01
           C( 63) =-0.10581519D-01
          EX( 64) = 0.20241891D+01
           C( 64) =-0.90019769D-02
          EX( 65) = 0.67870985D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.23659257D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.33271994D+04
           C( 67) = 0.12678339D-01
          EX( 68) = 0.68728597D+03
           C( 68) = 0.87367732D-01
          EX( 69) = 0.20623189D+03
           C( 69) = 0.25727564D+00
          EX( 70) = 0.71938308D+02
           C( 70) = 0.24790097D+00
          EX( 71) = 0.31269551D+02
           C( 71) =-0.51859200D+00
          EX( 72) = 0.12212531D+02
           C( 72) =-0.63572812D+00
          EX( 73) = 0.50148203D+01
           C( 73) =-0.28063472D-01
          EX( 74) = 0.20241891D+01
           C( 74) =-0.23874335D-01
          EX( 75) = 0.67870985D+00
           C( 75) = 0.59536796D-02
          EX( 76) = 0.23659257D+00
           C( 76) = 0.47485502D-02
          EX( 77) = 0.33271994D+04
           C( 77) = 0.60261732D-02
          EX( 78) = 0.68728597D+03
           C( 78) = 0.41526977D-01
          EX( 79) = 0.20623189D+03
           C( 79) = 0.12228634D+00
          EX( 80) = 0.71938308D+02
           C( 80) = 0.11783043D+00
          EX( 81) = 0.31269551D+02
           C( 81) =-0.36381816D+00
          EX( 82) = 0.12212531D+02
           C( 82) =-0.44599500D+00
          EX( 83) = 0.50148203D+01
           C( 83) = 0.67979197D+00
          EX( 84) = 0.20241891D+01
           C( 84) = 0.57831695D+00
          EX( 85) = 0.67870985D+00
           C( 85) = 0.12252755D-01
          EX( 86) = 0.23659257D+00
           C( 86) = 0.97725823D-02
          EX( 87) = 0.32848366D+03
           C( 87) = 0.41958442D-01
          EX( 88) = 0.90278561D+02
           C( 88) = 0.24664080D+00
          EX( 89) = 0.31611286D+02
           C( 89) = 0.54044668D+00
          EX( 90) = 0.11911082D+02
           C( 90) = 0.36556278D+00
          EX( 91) = 0.94105947D+01
           C( 91) = 0.78575209D-02
          EX( 92) = 0.35939733D+01
           C( 92) = 0.16922170D-01
          EX( 93) = 0.13218297D+01
           C( 93) = 0.82158625D-02
          EX( 94) = 0.32848366D+03
           C( 94) = 0.19553154D-01
          EX( 95) = 0.90278561D+02
           C( 95) = 0.11493767D+00
          EX( 96) = 0.31611286D+02
           C( 96) = 0.25185484D+00
          EX( 97) = 0.11911082D+02
           C( 97) = 0.17035678D+00
          EX( 98) = 0.94105947D+01
           C( 98) =-0.30162897D+00
          EX( 99) = 0.35939733D+01
           C( 99) =-0.64959633D+00
          EX(100) = 0.13218297D+01
           C(100) =-0.31538474D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.61) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : PM/QR             CONFIGURATION : S2P6F5D0        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 15.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =   -68.3016065 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -1.90748 A.U. <REFERENCE = -1.90760>
C  ***     ORBITAL ENERGY(6S) =  -.17579 A.U. <REFERENCE =  -.17590>
C  ***     ORBITAL ENERGY(5P) = -1.04308 A.U. <REFERENCE = -1.04290>
C  ***     ORBITAL ENERGY(4F) =  -.46155 A.U. <REFERENCE =  -.46180>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 15.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.11352564D+05
           C( 1)= 0.84150081D-02
          EX( 2)= 0.12277937D+04
           C( 2)= 0.42440869D-01
          EX( 3)= 0.83183575D+02
           C( 3)=-0.19319438D+00
          EX( 4)= 0.14806057D+02
           C( 4)= 0.52770446D+00
          EX( 5)= 0.28644060D+01
           C( 5)=-0.10115154D+01
          EX( 6)= 0.49706859D+00
           C( 6)= 0.99249915D+00
          EX( 7)= 0.21256533D+00
           C( 7)= 0.28147312D+00
          EX( 8)= 0.74178870D-01
           C( 8)= 0.72291327D-03
          EX( 9)= 0.34932810D-01
           C( 9)=-0.96051172D-04
          EX(10)= 0.16566230D-01
           C(10)= 0.12986994D-03
          EX(11)= 0.11352564D+05
           C(11)= 0.22940329D-02
          EX(12)= 0.12277937D+04
           C(12)= 0.11569894D-01
          EX(13)= 0.83183575D+02
           C(13)=-0.52169624D-01
          EX(14)= 0.14806057D+02
           C(14)= 0.14355327D+00
          EX(15)= 0.28644060D+01
           C(15)=-0.29681899D+00
          EX(16)= 0.49706859D+00
           C(16)= 0.42152240D+00
          EX(17)= 0.21256533D+00
           C(17)= 0.29544258D+00
          EX(18)= 0.74178870D-01
           C(18)=-0.36841842D+00
          EX(19)= 0.34932810D-01
           C(19)=-0.67291652D+00
          EX(20)= 0.16566230D-01
           C(20)=-0.20422624D+00
          EX(21)= 0.92018231D+03
           C(21)= 0.16421578D-01
          EX(22)= 0.19239495D+03
           C(22)= 0.54296570D-01
          EX(23)= 0.21675098D+02
           C(23)=-0.21295189D+00
          EX(24)= 0.54072567D+01
           C(24)= 0.75098993D-01
          EX(25)= 0.34151932D+01
           C(25)= 0.42329618D+00
          EX(26)= 0.56652916D+00
           C(26)=-0.74516765D+00
          EX(27)= 0.20835592D+00
           C(27)=-0.37985444D+00
          EX(28)= 0.14810564D+03
           C(28)=-0.24554248D-01
          EX(29)= 0.38962434D+02
           C(29)=-0.81215855D-01
          EX(30)= 0.54920784D+01
           C(30)= 0.16292102D+00
          EX(31)= 0.29362943D+01
           C(31)= 0.11712574D+00
          EX(32)= 0.64677071D+00
           C(32)=-0.40003038D+00
          EX(33)= 0.25374246D+00
           C(33)=-0.54279945D+00
          EX(34)= 0.94307235D-01
           C(34)=-0.22575074D+00
          EX(35)= 0.57163726D+02
           C(35)= 0.27265696D-01
          EX(36)= 0.17342490D+02
           C(36)= 0.14249429D+00
          EX(37)= 0.63638373D+01
           C(37)= 0.36364378D+00
          EX(38)= 0.24009806D+01
           C(38)= 0.43886142D+00
          EX(39)= 0.86607655D+00
           C(39)= 0.32530912D+00
          EX(40)= 0.27523528D+00
           C(40)= 0.13212699D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 15.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.13290852D+01
          ALPN0( 1)= 0.10887098D+04
            AN0( 2)= 0.93024801D+00
          ALPN0( 2)= 0.57064575D+02
            AN0( 3)= 0.79416455D+00
          ALPN0( 3)= 0.38620271D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.10188211D+03
          ALPN1( 1)= 0.16716397D+04
            AN1( 2)= 0.46544808D+01
          ALPN1( 2)= 0.33172640D+02
            AN1( 3)= 0.10170855D+00
          ALPN1( 3)= 0.14506537D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.33450780D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.55235700D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.12389980D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.26157200D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.49353460D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.10494100D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.19723800D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.78647800D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.10343600D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.14902858D+06
           C(  1) = 0.17767065D-01
          EX(  2) = 0.13676889D+05
           C(  2) = 0.11490654D+00
          EX(  3) = 0.24632229D+04
           C(  3) = 0.42222782D+00
          EX(  4) = 0.60428233D+03
           C(  4) = 0.57151565D+00
          EX(  5) = 0.10433846D+04
           C(  5) =-0.49050311D-02
          EX(  6) = 0.11111333D+03
           C(  6) = 0.35220914D-01
          EX(  7) = 0.48404255D+02
           C(  7) = 0.28995292D-01
          EX(  8) = 0.89165896D+02
           C(  8) = 0.80675724D-02
          EX(  9) = 0.15297089D+02
           C(  9) =-0.27261835D-01
          EX( 10) = 0.64850423D+01
           C( 10) =-0.71561867D-02
          EX( 11) = 0.32591164D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.12926866D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.51253672D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.20521217D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.14902858D+06
           C( 15) = 0.68664190D-02
          EX( 16) = 0.13676889D+05
           C( 16) = 0.44407810D-01
          EX( 17) = 0.24632229D+04
           C( 17) = 0.16317794D+00
          EX( 18) = 0.60428233D+03
           C( 18) = 0.22087306D+00
          EX( 19) = 0.10433846D+04
           C( 19) = 0.85069398D-01
          EX( 20) = 0.11111333D+03
           C( 20) =-0.61084668D+00
          EX( 21) = 0.48404255D+02
           C( 21) =-0.50287388D+00
          EX( 22) = 0.89165896D+02
           C( 22) = 0.70161676D-02
          EX( 23) = 0.15297089D+02
           C( 23) =-0.23708942D-01
          EX( 24) = 0.64850423D+01
           C( 24) =-0.62235580D-02
          EX( 25) = 0.32591164D+01
           C( 25) = 0.60147308D-02
          EX( 26) = 0.12926866D+01
           C( 26) = 0.12139143D-02
          EX( 27) = 0.51253672D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.20521217D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.14902858D+06
           C( 29) = 0.31950053D-02
          EX( 30) = 0.13676889D+05
           C( 30) = 0.20663346D-01
          EX( 31) = 0.24632229D+04
           C( 31) = 0.75928136D-01
          EX( 32) = 0.60428233D+03
           C( 32) = 0.10277418D+00
          EX( 33) = 0.10433846D+04
           C( 33) = 0.46788112D-01
          EX( 34) = 0.11111333D+03
           C( 34) =-0.33596526D+00
          EX( 35) = 0.48404255D+02
           C( 35) =-0.27658029D+00
          EX( 36) = 0.89165896D+02
           C( 36) =-0.30626021D+00
          EX( 37) = 0.15297089D+02
           C( 37) = 0.10349105D+01
          EX( 38) = 0.64850423D+01
           C( 38) = 0.27166229D+00
          EX( 39) = 0.32591164D+01
           C( 39) =-0.66635870D-02
          EX( 40) = 0.12926866D+01
           C( 40) =-0.13448688D-02
          EX( 41) = 0.51253672D+00
           C( 41) = 0.17357656D-02
          EX( 42) = 0.20521217D+00
           C( 42) = 0.44935764D-03
          EX( 43) = 0.14902858D+06
           C( 43) = 0.16536581D-02
          EX( 44) = 0.13676889D+05
           C( 44) = 0.10694852D-01
          EX( 45) = 0.24632229D+04
           C( 45) = 0.39298581D-01
          EX( 46) = 0.60428233D+03
           C( 46) = 0.53193450D-01
          EX( 47) = 0.10433846D+04
           C( 47) = 0.13612831D-01
          EX( 48) = 0.11111333D+03
           C( 48) =-0.97747871D-01
          EX( 49) = 0.48404255D+02
           C( 49) =-0.80470031D-01
          EX( 50) = 0.89165896D+02
           C( 50) =-0.30923079D+00
          EX( 51) = 0.15297089D+02
           C( 51) = 0.10449486D+01
          EX( 52) = 0.64850423D+01
           C( 52) = 0.27429729D+00
          EX( 53) = 0.32591164D+01
           C( 53) =-0.12591935D+01
          EX( 54) = 0.12926866D+01
           C( 54) =-0.25413492D+00
          EX( 55) = 0.51253672D+00
           C( 55) = 0.39302760D-02
          EX( 56) = 0.20521217D+00
           C( 56) = 0.10174759D-02
          EX( 57) = 0.34766862D+04
           C( 57) = 0.23690294D-01
          EX( 58) = 0.71648105D+03
           C( 58) = 0.16324683D+00
          EX( 59) = 0.21473541D+03
           C( 59) = 0.48172232D+00
          EX( 60) = 0.74876348D+02
           C( 60) = 0.46548371D+00
          EX( 61) = 0.32619229D+02
           C( 61) = 0.28648048D-01
          EX( 62) = 0.12759576D+02
           C( 62) = 0.35040716D-01
          EX( 63) = 0.52726438D+01
           C( 63) =-0.10494942D-01
          EX( 64) = 0.21242054D+01
           C( 64) =-0.89145814D-02
          EX( 65) = 0.70969449D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.24584442D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.34766862D+04
           C( 67) = 0.12687907D-01
          EX( 68) = 0.71648105D+03
           C( 68) = 0.87430766D-01
          EX( 69) = 0.21473541D+03
           C( 69) = 0.25799797D+00
          EX( 70) = 0.74876348D+02
           C( 70) = 0.24930099D+00
          EX( 71) = 0.32619229D+02
           C( 71) =-0.51954012D+00
          EX( 72) = 0.12759576D+02
           C( 72) =-0.63547288D+00
          EX( 73) = 0.52726438D+01
           C( 73) =-0.28016700D-01
          EX( 74) = 0.21242054D+01
           C( 74) =-0.23797859D-01
          EX( 75) = 0.70969449D+00
           C( 75) = 0.58192112D-02
          EX( 76) = 0.24584442D+00
           C( 76) = 0.46903966D-02
          EX( 77) = 0.34766862D+04
           C( 77) = 0.60536524D-02
          EX( 78) = 0.71648105D+03
           C( 78) = 0.41714955D-01
          EX( 79) = 0.21473541D+03
           C( 79) = 0.12309596D+00
          EX( 80) = 0.74876348D+02
           C( 80) = 0.11894646D+00
          EX( 81) = 0.32619229D+02
           C( 81) =-0.36662298D+00
          EX( 82) = 0.12759576D+02
           C( 82) =-0.44843305D+00
          EX( 83) = 0.52726438D+01
           C( 83) = 0.68181863D+00
          EX( 84) = 0.21242054D+01
           C( 84) = 0.57914827D+00
          EX( 85) = 0.70969449D+00
           C( 85) = 0.12197508D-01
          EX( 86) = 0.24584442D+00
           C( 86) = 0.98314271D-02
          EX( 87) = 0.34348006D+03
           C( 87) = 0.41689764D-01
          EX( 88) = 0.94428571D+02
           C( 88) = 0.24590487D+00
          EX( 89) = 0.33104506D+02
           C( 89) = 0.54054476D+00
          EX( 90) = 0.12495658D+02
           C( 90) = 0.36552669D+00
          EX( 91) = 0.99070191D+01
           C( 91) = 0.79435869D-02
          EX( 92) = 0.37873667D+01
           C( 92) = 0.17033692D-01
          EX( 93) = 0.13918295D+01
           C( 93) = 0.82459041D-02
          EX( 94) = 0.34348006D+03
           C( 94) = 0.19568938D-01
          EX( 95) = 0.94428571D+02
           C( 95) = 0.11542634D+00
          EX( 96) = 0.33104506D+02
           C( 96) = 0.25372862D+00
          EX( 97) = 0.12495658D+02
           C( 97) = 0.17157614D+00
          EX( 98) = 0.99070191D+01
           C( 98) =-0.30320752D+00
          EX( 99) = 0.37873667D+01
           C( 99) =-0.65017773D+00
          EX(100) = 0.13918295D+01
           C(100) =-0.31474700D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.62) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : SM/QR             CONFIGURATION : S2P6F6D0        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 16.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =   -81.3518597 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -1.96150 A.U. <REFERENCE = -1.96180>
C  ***     ORBITAL ENERGY(6S) =  -.17818 A.U. <REFERENCE =  -.17810>
C  ***     ORBITAL ENERGY(5P) = -1.06561 A.U. <REFERENCE = -1.06540>
C  ***     ORBITAL ENERGY(4F) =  -.49240 A.U. <REFERENCE =  -.49280>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 16.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.11973126D+05
           C( 1)= 0.87347628D-02
          EX( 2)= 0.12839104D+04
           C( 2)= 0.44061509D-01
          EX( 3)= 0.86584731D+02
           C( 3)=-0.19710050D+00
          EX( 4)= 0.15506020D+02
           C( 4)= 0.53273868D+00
          EX( 5)= 0.30035655D+01
           C( 5)=-0.10096508D+01
          EX( 6)= 0.51787712D+00
           C( 6)= 0.99361567D+00
          EX( 7)= 0.22074337D+00
           C( 7)= 0.27577239D+00
          EX( 8)= 0.76509290D-01
           C( 8)= 0.62280042D-02
          EX( 9)= 0.35913180D-01
           C( 9)=-0.39539573D-02
          EX(10)= 0.16949450D-01
           C(10)= 0.13706093D-02
          EX(11)= 0.11973126D+05
           C(11)= 0.23606932D-02
          EX(12)= 0.12839104D+04
           C(12)= 0.11908246D-01
          EX(13)= 0.86584731D+02
           C(13)=-0.52747901D-01
          EX(14)= 0.15506020D+02
           C(14)= 0.14354871D+00
          EX(15)= 0.30035655D+01
           C(15)=-0.29309723D+00
          EX(16)= 0.51787712D+00
           C(16)= 0.41637554D+00
          EX(17)= 0.22074337D+00
           C(17)= 0.29004744D+00
          EX(18)= 0.76509290D-01
           C(18)=-0.35965022D+00
          EX(19)= 0.35913180D-01
           C(19)=-0.67482214D+00
          EX(20)= 0.16949450D-01
           C(20)=-0.20616264D+00
          EX(21)= 0.95752463D+03
           C(21)= 0.17025189D-01
          EX(22)= 0.20000568D+03
           C(22)= 0.55438228D-01
          EX(23)= 0.22659035D+02
           C(23)=-0.21634605D+00
          EX(24)= 0.53678683D+01
           C(24)= 0.10525983D+00
          EX(25)= 0.35297263D+01
           C(25)= 0.39180888D+00
          EX(26)= 0.59067674D+00
           C(26)=-0.74022071D+00
          EX(27)= 0.21609513D+00
           C(27)=-0.38399267D+00
          EX(28)= 0.15471960D+03
           C(28)=-0.24194139D-01
          EX(29)= 0.40765687D+02
           C(29)=-0.80321527D-01
          EX(30)= 0.57879172D+01
           C(30)= 0.15840106D+00
          EX(31)= 0.31246805D+01
           C(31)= 0.11615270D+00
          EX(32)= 0.67105902D+00
           C(32)=-0.39961244D+00
          EX(33)= 0.26024257D+00
           C(33)=-0.54257716D+00
          EX(34)= 0.95507912D-01
           C(34)=-0.22970622D+00
          EX(35)= 0.60787174D+02
           C(35)= 0.28625569D-01
          EX(36)= 0.18511922D+02
           C(36)= 0.14825447D+00
          EX(37)= 0.68157169D+01
           C(37)= 0.36375645D+00
          EX(38)= 0.25794183D+01
           C(38)= 0.43951514D+00
          EX(39)= 0.93249302D+00
           C(39)= 0.32014138D+00
          EX(40)= 0.29658831D+00
           C(40)= 0.12988134D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 16.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.12940574D+01
          ALPN0( 1)= 0.10928455D+04
            AN0( 2)= 0.87387777D+00
          ALPN0( 2)= 0.56865589D+02
            AN0( 3)= 0.71419243D+00
          ALPN0( 3)= 0.39179688D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.99983102D+02
          ALPN1( 1)= 0.17153240D+04
            AN1( 2)= 0.42620460D+01
          ALPN1( 2)= 0.29976958D+02
            AN1( 3)= 0.92039777D-01
          ALPN1( 3)= 0.15210177D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.34674816D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.57524040D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.12952280D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.27294000D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.51347540D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.10971000D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.20572800D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.82540200D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.10843800D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.15875634D+06
           C(  1) = 0.17799491D-01
          EX(  2) = 0.14424172D+05
           C(  2) = 0.11444297D+00
          EX(  3) = 0.25787148D+04
           C(  3) = 0.42106242D+00
          EX(  4) = 0.62947859D+03
           C(  4) = 0.57326692D+00
          EX(  5) = 0.10918040D+04
           C(  5) =-0.49108385D-02
          EX(  6) = 0.11594393D+03
           C(  6) = 0.35499223D-01
          EX(  7) = 0.50545920D+02
           C(  7) = 0.29596383D-01
          EX(  8) = 0.93014393D+02
           C(  8) = 0.81402241D-02
          EX(  9) = 0.15964942D+02
           C(  9) =-0.27518144D-01
          EX( 10) = 0.67658145D+01
           C( 10) =-0.71815908D-02
          EX( 11) = 0.34336048D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.13734100D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.53507560D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.21392827D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.15875634D+06
           C( 15) = 0.69015733D-02
          EX( 16) = 0.14424172D+05
           C( 16) = 0.44374108D-01
          EX( 17) = 0.25787148D+04
           C( 17) = 0.16326270D+00
          EX( 18) = 0.62947859D+03
           C( 18) = 0.22227847D+00
          EX( 19) = 0.10918040D+04
           C( 19) = 0.84005082D-01
          EX( 20) = 0.11594393D+03
           C( 20) =-0.60725174D+00
          EX( 21) = 0.50545920D+02
           C( 21) =-0.50627741D+00
          EX( 22) = 0.93014393D+02
           C( 22) = 0.71233786D-02
          EX( 23) = 0.15964942D+02
           C( 23) =-0.24080682D-01
          EX( 24) = 0.67658145D+01
           C( 24) =-0.62844941D-02
          EX( 25) = 0.34336048D+01
           C( 25) = 0.60400467D-02
          EX( 26) = 0.13734100D+01
           C( 26) = 0.12593679D-02
          EX( 27) = 0.53507560D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.21392827D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.15875634D+06
           C( 29) = 0.32203938D-02
          EX( 30) = 0.14424172D+05
           C( 30) = 0.20705728D-01
          EX( 31) = 0.25787148D+04
           C( 31) = 0.76181211D-01
          EX( 32) = 0.62947859D+03
           C( 32) = 0.10371899D+00
          EX( 33) = 0.10918040D+04
           C( 33) = 0.46343319D-01
          EX( 34) = 0.11594393D+03
           C( 34) =-0.33500427D+00
          EX( 35) = 0.50545920D+02
           C( 35) =-0.27929948D+00
          EX( 36) = 0.93014393D+02
           C( 36) =-0.30676552D+00
          EX( 37) = 0.15964942D+02
           C( 37) = 0.10370252D+01
          EX( 38) = 0.67658145D+01
           C( 38) = 0.27063928D+00
          EX( 39) = 0.34336048D+01
           C( 39) =-0.67253717D-02
          EX( 40) = 0.13734100D+01
           C( 40) =-0.14022601D-02
          EX( 41) = 0.53507560D+00
           C( 41) = 0.17101688D-02
          EX( 42) = 0.21392827D+00
           C( 42) = 0.45392846D-03
          EX( 43) = 0.15875634D+06
           C( 43) = 0.16701459D-02
          EX( 44) = 0.14424172D+05
           C( 44) = 0.10738310D-01
          EX( 45) = 0.25787148D+04
           C( 45) = 0.39508754D-01
          EX( 46) = 0.62947859D+03
           C( 46) = 0.53790270D-01
          EX( 47) = 0.10918040D+04
           C( 47) = 0.13491044D-01
          EX( 48) = 0.11594393D+03
           C( 48) =-0.97523391D-01
          EX( 49) = 0.50545920D+02
           C( 49) =-0.81307121D-01
          EX( 50) = 0.93014393D+02
           C( 50) =-0.31112630D+00
          EX( 51) = 0.15964942D+02
           C( 51) = 0.10517669D+01
          EX( 52) = 0.67658145D+01
           C( 52) = 0.27448652D+00
          EX( 53) = 0.34336048D+01
           C( 53) =-0.12556004D+01
          EX( 54) = 0.13734100D+01
           C( 54) =-0.26179643D+00
          EX( 55) = 0.53507560D+00
           C( 55) = 0.34290725D-02
          EX( 56) = 0.21392827D+00
           C( 56) = 0.91017546D-03
          EX( 57) = 0.36310725D+04
           C( 57) = 0.23620168D-01
          EX( 58) = 0.74651147D+03
           C( 58) = 0.16274809D+00
          EX( 59) = 0.22345982D+03
           C( 59) = 0.48123283D+00
          EX( 60) = 0.77886110D+02
           C( 60) = 0.46631597D+00
          EX( 61) = 0.34003909D+02
           C( 61) = 0.28789906D-01
          EX( 62) = 0.13319282D+02
           C( 62) = 0.35140995D-01
          EX( 63) = 0.55361497D+01
           C( 63) =-0.10413989D-01
          EX( 64) = 0.22255413D+01
           C( 64) =-0.88373156D-02
          EX( 65) = 0.74013849D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.25478573D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.36310725D+04
           C( 67) = 0.12696690D-01
          EX( 68) = 0.74651147D+03
           C( 68) = 0.87482958D-01
          EX( 69) = 0.22345982D+03
           C( 69) = 0.25867997D+00
          EX( 70) = 0.77886110D+02
           C( 70) = 0.25066162D+00
          EX( 71) = 0.34003909D+02
           C( 71) =-0.52045061D+00
          EX( 72) = 0.13319282D+02
           C( 72) =-0.63526267D+00
          EX( 73) = 0.55361497D+01
           C( 73) =-0.27964420D-01
          EX( 74) = 0.22255413D+01
           C( 74) =-0.23730619D-01
          EX( 75) = 0.74013849D+00
           C( 75) = 0.56982650D-02
          EX( 76) = 0.25478573D+00
           C( 76) = 0.46405343D-02
          EX( 77) = 0.36310725D+04
           C( 77) = 0.60779633D-02
          EX( 78) = 0.74651147D+03
           C( 78) = 0.41878489D-01
          EX( 79) = 0.22345982D+03
           C( 79) = 0.12383127D+00
          EX( 80) = 0.77886110D+02
           C( 80) = 0.11999285D+00
          EX( 81) = 0.34003909D+02
           C( 81) =-0.36918023D+00
          EX( 82) = 0.13319282D+02
           C( 82) =-0.45062185D+00
          EX( 83) = 0.55361497D+01
           C( 83) = 0.68356119D+00
          EX( 84) = 0.22255413D+01
           C( 84) = 0.58007032D+00
          EX( 85) = 0.74013849D+00
           C( 85) = 0.12146266D-01
          EX( 86) = 0.25478573D+00
           C( 86) = 0.98916357D-02
          EX( 87) = 0.35878354D+03
           C( 87) = 0.41446093D-01
          EX( 88) = 0.98659582D+02
           C( 88) = 0.24525302D+00
          EX( 89) = 0.34626488D+02
           C( 89) = 0.54067471D+00
          EX( 90) = 0.13090923D+02
           C( 90) = 0.36543137D+00
          EX( 91) = 0.10412478D+02
           C( 91) = 0.80232181D-02
          EX( 92) = 0.39831708D+01
           C( 92) = 0.17131627D-01
          EX( 93) = 0.14622299D+01
           C( 93) = 0.82749701D-02
          EX( 94) = 0.35878354D+03
           C( 94) = 0.19579245D-01
          EX( 95) = 0.98659582D+02
           C( 95) = 0.11585818D+00
          EX( 96) = 0.34626488D+02
           C( 96) = 0.25541616D+00
          EX( 97) = 0.13090923D+02
           C( 97) = 0.17263075D+00
          EX( 98) = 0.10412478D+02
           C( 98) =-0.30471004D+00
          EX( 99) = 0.39831708D+01
           C( 99) =-0.65063402D+00
          EX(100) = 0.14622299D+01
           C(100) =-0.31427121D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.63) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : EU/QR             CONFIGURATION : S2P6F7D0        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 17.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =   -95.7678556 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -2.01410 A.U. <REFERENCE = -2.01409>
C  ***     ORBITAL ENERGY(6S) =  -.18032 A.U. <REFERENCE =  -.18027>
C  ***     ORBITAL ENERGY(5P) = -1.08608 A.U. <REFERENCE = -1.08601>
C  ***     ORBITAL ENERGY(4F) =  -.52922 A.U. <REFERENCE =  -.52954>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 17.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.12627037D+05
           C( 1)=-0.89867893D-02
          EX( 2)= 0.13422660D+04
           C( 2)=-0.45338686D-01
          EX( 3)= 0.90081474D+02
           C( 3)= 0.19879755D+00
          EX( 4)= 0.16226817D+02
           C( 4)=-0.53239498D+00
          EX( 5)= 0.31446917D+01
           C( 5)= 0.10030162D+01
          EX( 6)= 0.53843574D+00
           C( 6)=-0.98885787D+00
          EX( 7)= 0.22873507D+00
           C( 7)=-0.27787308D+00
          EX( 8)= 0.79004716D-01
           C( 8)=-0.59742614D-02
          EX( 9)= 0.36968829D-01
           C( 9)= 0.37097124D-02
          EX(10)= 0.17358711D-01
           C(10)=-0.12873326D-02
          EX(11)= 0.12627037D+05
           C(11)= 0.24066570D-02
          EX(12)= 0.13422660D+04
           C(12)= 0.12141674D-01
          EX(13)= 0.90081474D+02
           C(13)=-0.52693425D-01
          EX(14)= 0.16226817D+02
           C(14)= 0.14202301D+00
          EX(15)= 0.31446917D+01
           C(15)=-0.28796535D+00
          EX(16)= 0.53843574D+00
           C(16)= 0.40851118D+00
          EX(17)= 0.22873507D+00
           C(17)= 0.28902048D+00
          EX(18)= 0.79004716D-01
           C(18)=-0.35055026D+00
          EX(19)= 0.36968829D-01
           C(19)=-0.67579485D+00
          EX(20)= 0.17358711D-01
           C(20)=-0.21125566D+00
          EX(21)= 0.99662375D+03
           C(21)= 0.17415173D-01
          EX(22)= 0.20792415D+03
           C(22)= 0.55342460D-01
          EX(23)= 0.23639895D+02
           C(23)=-0.21476308D+00
          EX(24)= 0.56388619D+01
           C(24)= 0.10154218D+00
          EX(25)= 0.36953754D+01
           C(25)= 0.39136726D+00
          EX(26)= 0.61364054D+00
           C(26)=-0.73738032D+00
          EX(27)= 0.22331801D+00
           C(27)=-0.38674718D+00
          EX(28)= 0.16147560D+03
           C(28)=-0.23559499D-01
          EX(29)= 0.42605849D+02
           C(29)=-0.78481183D-01
          EX(30)= 0.61043180D+01
           C(30)= 0.15066644D+00
          EX(31)= 0.33352077D+01
           C(31)= 0.11513039D+00
          EX(32)= 0.68882936D+00
           C(32)=-0.39765248D+00
          EX(33)= 0.26271139D+00
           C(33)=-0.54266737D+00
          EX(34)= 0.94783326D-01
           C(34)=-0.23642900D+00
          EX(35)= 0.64593547D+02
           C(35)= 0.27419062D-01
          EX(36)= 0.19742666D+02
           C(36)= 0.14376315D+00
          EX(37)= 0.72927763D+01
           C(37)= 0.36142723D+00
          EX(38)= 0.27691288D+01
           C(38)= 0.44340936D+00
          EX(39)= 0.10040560D+01
           C(39)= 0.31953623D+00
          EX(40)= 0.32006722D+00
           C(40)= 0.12930613D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 17.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.12614390D+01
          ALPN0( 1)= 0.11159842D+04
            AN0( 2)= 0.82468264D+00
          ALPN0( 2)= 0.56844661D+02
            AN0( 3)= 0.64899472D+00
          ALPN0( 3)= 0.39353536D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.98323002D+02
          ALPN1( 1)= 0.17424212D+04
            AN1( 2)= 0.39550452D+01
          ALPN1( 2)= 0.30327867D+02
            AN1( 3)= 0.81928636D-01
          ALPN1( 3)= 0.15698782D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.35924866D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.59867140D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.13526080D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.28437200D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.53381820D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.11455740D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.21418600D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.86489000D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.11336000D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.16907149D+06
           C(  1) = 0.17837141D-01
          EX(  2) = 0.15208888D+05
           C(  2) = 0.11399178D+00
          EX(  3) = 0.26987832D+04
           C(  3) = 0.41988939D+00
          EX(  4) = 0.65546606D+03
           C(  4) = 0.57501226D+00
          EX(  5) = 0.11422377D+04
           C(  5) =-0.49155830D-02
          EX(  6) = 0.12094781D+03
           C(  6) = 0.35774647D-01
          EX(  7) = 0.52762560D+02
           C(  7) = 0.30221506D-01
          EX(  8) = 0.96984790D+02
           C(  8) = 0.82138736D-02
          EX(  9) = 0.16651258D+02
           C(  9) =-0.27779411D-01
          EX( 10) = 0.70549292D+01
           C( 10) =-0.72120125D-02
          EX( 11) = 0.36129220D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.14566112D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.55728638D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.22239762D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.16907149D+06
           C( 15) = 0.69388776D-02
          EX( 16) = 0.15208888D+05
           C( 16) = 0.44344270D-01
          EX( 17) = 0.26987832D+04
           C( 17) = 0.16334238D+00
          EX( 18) = 0.65546606D+03
           C( 18) = 0.22368717D+00
          EX( 19) = 0.11422377D+04
           C( 19) = 0.82923837D-01
          EX( 20) = 0.12094781D+03
           C( 20) =-0.60350339D+00
          EX( 21) = 0.52762560D+02
           C( 21) =-0.50982421D+00
          EX( 22) = 0.96984790D+02
           C( 22) = 0.72348494D-02
          EX( 23) = 0.16651258D+02
           C( 23) =-0.24468340D-01
          EX( 24) = 0.70549292D+01
           C( 24) =-0.63524016D-02
          EX( 25) = 0.36129220D+01
           C( 25) = 0.60706461D-02
          EX( 26) = 0.14566112D+01
           C( 26) = 0.13081137D-02
          EX( 27) = 0.55728638D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.22239762D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.16907149D+06
           C( 29) = 0.32465044D-02
          EX( 30) = 0.15208888D+05
           C( 30) = 0.20747429D-01
          EX( 31) = 0.26987832D+04
           C( 31) = 0.76423273D-01
          EX( 32) = 0.65546606D+03
           C( 32) = 0.10465690D+00
          EX( 33) = 0.11422377D+04
           C( 33) = 0.45879530D-01
          EX( 34) = 0.12094781D+03
           C( 34) =-0.33390220D+00
          EX( 35) = 0.52762560D+02
           C( 35) =-0.28207203D+00
          EX( 36) = 0.96984790D+02
           C( 36) =-0.30718755D+00
          EX( 37) = 0.16651258D+02
           C( 37) = 0.10389117D+01
          EX( 38) = 0.70549292D+01
           C( 38) = 0.26971932D+00
          EX( 39) = 0.36129220D+01
           C( 39) =-0.67529711D-02
          EX( 40) = 0.14566112D+01
           C( 40) =-0.14551423D-02
          EX( 41) = 0.55728638D+00
           C( 41) = 0.16839349D-02
          EX( 42) = 0.22239762D+00
           C( 42) = 0.45718540D-03
          EX( 43) = 0.16907149D+06
           C( 43) = 0.16864065D-02
          EX( 44) = 0.15208888D+05
           C( 44) = 0.10777314D-01
          EX( 45) = 0.26987832D+04
           C( 45) = 0.39698299D-01
          EX( 46) = 0.65546606D+03
           C( 46) = 0.54364339D-01
          EX( 47) = 0.11422377D+04
           C( 47) = 0.13363216D-01
          EX( 48) = 0.12094781D+03
           C( 48) =-0.97254861D-01
          EX( 49) = 0.52762560D+02
           C( 49) =-0.82158416D-01
          EX( 50) = 0.96984790D+02
           C( 50) =-0.31279075D+00
          EX( 51) = 0.16651258D+02
           C( 51) = 0.10578617D+01
          EX( 52) = 0.70549292D+01
           C( 52) = 0.27463909D+00
          EX( 53) = 0.36129220D+01
           C( 53) =-0.12513990D+01
          EX( 54) = 0.14566112D+01
           C( 54) =-0.26965369D+00
          EX( 55) = 0.55728638D+00
           C( 55) = 0.29550187D-02
          EX( 56) = 0.22239762D+00
           C( 56) = 0.80228243D-03
          EX( 57) = 0.37904965D+04
           C( 57) = 0.23552894D-01
          EX( 58) = 0.77739524D+03
           C( 58) = 0.16225915D+00
          EX( 59) = 0.23240869D+03
           C( 59) = 0.48074973D+00
          EX( 60) = 0.80968549D+02
           C( 60) = 0.46714199D+00
          EX( 61) = 0.35424077D+02
           C( 61) = 0.28930899D-01
          EX( 62) = 0.13891765D+02
           C( 62) = 0.35244805D-01
          EX( 63) = 0.58053311D+01
           C( 63) =-0.10339395D-01
          EX( 64) = 0.23281505D+01
           C( 64) =-0.87698158D-02
          EX( 65) = 0.76997461D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.26339304D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.37904965D+04
           C( 67) = 0.12704792D-01
          EX( 68) = 0.77739524D+03
           C( 68) = 0.87525068D-01
          EX( 69) = 0.23240869D+03
           C( 69) = 0.25932376D+00
          EX( 70) = 0.80968549D+02
           C( 70) = 0.25198354D+00
          EX( 71) = 0.35424077D+02
           C( 71) =-0.52132235D+00
          EX( 72) = 0.13891765D+02
           C( 72) =-0.63509622D+00
          EX( 73) = 0.58053311D+01
           C( 73) =-0.27907509D-01
          EX( 74) = 0.23281505D+01
           C( 74) =-0.23670991D-01
          EX( 75) = 0.76997461D+00
           C( 75) = 0.55890611D-02
          EX( 76) = 0.26339304D+00
           C( 76) = 0.45981745D-02
          EX( 77) = 0.37904965D+04
           C( 77) = 0.60994034D-02
          EX( 78) = 0.77739524D+03
           C( 78) = 0.42019636D-01
          EX( 79) = 0.23240869D+03
           C( 79) = 0.12449793D+00
          EX( 80) = 0.80968549D+02
           C( 80) = 0.12097399D+00
          EX( 81) = 0.35424077D+02
           C( 81) =-0.37150639D+00
          EX( 82) = 0.13891765D+02
           C( 82) =-0.45258429D+00
          EX( 83) = 0.58053311D+01
           C( 83) = 0.68505676D+00
          EX( 84) = 0.23281505D+01
           C( 84) = 0.58106127D+00
          EX( 85) = 0.76997461D+00
           C( 85) = 0.12097116D-01
          EX( 86) = 0.26339304D+00
           C( 86) = 0.99524137D-02
          EX( 87) = 0.37439840D+03
           C( 87) = 0.41224648D-01
          EX( 88) = 0.10297250D+03
           C( 88) = 0.24467544D+00
          EX( 89) = 0.36177504D+02
           C( 89) = 0.54083123D+00
          EX( 90) = 0.13696941D+02
           C( 90) = 0.36528703D+00
          EX( 91) = 0.10926920D+02
           C( 91) = 0.80972844D-02
          EX( 92) = 0.41813233D+01
           C( 92) = 0.17217847D-01
          EX( 93) = 0.15329924D+01
           C( 93) = 0.83035918D-02
          EX( 94) = 0.37439840D+03
           C( 94) = 0.19584600D-01
          EX( 95) = 0.10297250D+03
           C( 95) = 0.11623801D+00
          EX( 96) = 0.36177504D+02
           C( 96) = 0.25693278D+00
          EX( 97) = 0.13696941D+02
           C( 97) = 0.17353697D+00
          EX( 98) = 0.10926920D+02
           C( 98) =-0.30614291D+00
          EX( 99) = 0.41813233D+01
           C( 99) =-0.65097400D+00
          EX(100) = 0.15329924D+01
           C(100) =-0.31394300D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.64) THEN
        ITYP(1)=122
C     --- 
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : GD/QR             CONFIGURATION : S2P6F8D0        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 18.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =  -111.9170497 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -2.07639 A.U. <REFERENCE = -2.07661>
C  ***     ORBITAL ENERGY(6S) =  -.18290 A.U. <REFERENCE =  -.18271>
C  ***     ORBITAL ENERGY(5P) = -1.11341 A.U. <REFERENCE = -1.11317>
C  ***     ORBITAL ENERGY(4F) =  -.50959 A.U. <REFERENCE =  -.50962>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 18.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.13314896D+05
           C( 1)=-0.93411226D-02
          EX( 2)= 0.14028422D+04
           C( 2)=-0.47126819D-01
          EX( 3)= 0.93688112D+02
           C( 3)= 0.20292869D+00
          EX( 4)= 0.16962547D+02
           C( 4)=-0.53803786D+00
          EX( 5)= 0.32934834D+01
           C( 5)= 0.10039350D+01
          EX( 6)= 0.56189556D+00
           C( 6)=-0.99126008D+00
          EX( 7)= 0.23804475D+00
           C( 7)=-0.27209825D+00
          EX( 8)= 0.81327688D-01
           C( 8)=-0.11344851D-01
          EX( 9)= 0.37974530D-01
           C( 9)= 0.74837697D-02
          EX(10)= 0.17760273D-01
           C(10)=-0.24982545D-02
          EX(11)= 0.13314896D+05
           C(11)= 0.24781851D-02
          EX(12)= 0.14028422D+04
           C(12)= 0.12502671D-01
          EX(13)= 0.93688112D+02
           C(13)=-0.53267002D-01
          EX(14)= 0.16962547D+02
           C(14)= 0.14207427D+00
          EX(15)= 0.32934834D+01
           C(15)=-0.28505474D+00
          EX(16)= 0.56189556D+00
           C(16)= 0.40410752D+00
          EX(17)= 0.23804475D+00
           C(17)= 0.28295141D+00
          EX(18)= 0.81327688D-01
           C(18)=-0.34394044D+00
          EX(19)= 0.37974530D-01
           C(19)=-0.67601764D+00
          EX(20)= 0.17760273D-01
           C(20)=-0.21238240D+00
          EX(21)= 0.10367100D+04
           C(21)= 0.18019998D-01
          EX(22)= 0.21602935D+03
           C(22)= 0.56342491D-01
          EX(23)= 0.24648635D+02
           C(23)=-0.21797033D+00
          EX(24)= 0.58904314D+01
           C(24)= 0.11120406D+00
          EX(25)= 0.38668558D+01
           C(25)= 0.38258445D+00
          EX(26)= 0.63961426D+00
           C(26)=-0.73479223D+00
          EX(27)= 0.23175942D+00
           C(27)=-0.38821277D+00
          EX(28)= 0.16835614D+03
           C(28)=-0.22596906D-01
          EX(29)= 0.44479963D+02
           C(29)=-0.75497861D-01
          EX(30)= 0.64499109D+01
           C(30)= 0.13909556D+00
          EX(31)= 0.35744259D+01
           C(31)= 0.11410106D+00
          EX(32)= 0.69822425D+00
           C(32)=-0.39354907D+00
          EX(33)= 0.26014356D+00
           C(33)=-0.54321083D+00
          EX(34)= 0.91736210D-01
           C(34)=-0.24703454D+00
          EX(35)= 0.66960542D+02
           C(35)= 0.28812653D-01
          EX(36)= 0.20480120D+02
           C(36)= 0.15034991D+00
          EX(37)= 0.75616398D+01
           C(37)= 0.36705519D+00
          EX(38)= 0.28601836D+01
           C(38)= 0.44255672D+00
          EX(39)= 0.10284024D+01
           C(39)= 0.31342930D+00
          EX(40)= 0.32341085D+00
           C(40)= 0.12825088D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 18.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.12339944D+01
          ALPN0( 1)= 0.11346324D+04
            AN0( 2)= 0.77836190D+00
          ALPN0( 2)= 0.56709084D+02
            AN0( 3)= 0.59400076D+00
          ALPN0( 3)= 0.39656396D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.96178000D+02
          ALPN1( 1)= 0.17817333D+04
            AN1( 2)= 0.37460980D+01
          ALPN1( 2)= 0.29673714D+02
            AN1( 3)= 0.71888343D-01
          ALPN1( 3)= 0.16368487D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.37202051D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.62274536D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.14121054D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.29683868D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.55464872D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.11957708D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.22334220D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.90585800D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.11885460D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.18000399D+06
           C(  1) = 0.17880452D-01
          EX(  2) = 0.16032742D+05
           C(  2) = 0.11355486D+00
          EX(  3) = 0.28235884D+04
           C(  3) = 0.41871140D+00
          EX(  4) = 0.68226302D+03
           C(  4) = 0.57674798D+00
          EX(  5) = 0.11947910D+04
           C(  5) =-0.49190644D-02
          EX(  6) = 0.12613422D+03
           C(  6) = 0.36044612D-01
          EX(  7) = 0.55057262D+02
           C(  7) = 0.30871854D-01
          EX(  8) = 0.10107920D+03
           C(  8) = 0.82879000D-02
          EX(  9) = 0.17355515D+02
           C(  9) =-0.28046388D-01
          EX( 10) = 0.73508828D+01
           C( 10) =-0.72458672D-02
          EX( 11) = 0.37980201D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.15415020D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.58281695D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.23233859D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.18000399D+06
           C( 15) = 0.69785014D-02
          EX( 16) = 0.16032742D+05
           C( 16) = 0.44318942D-01
          EX( 17) = 0.28235884D+04
           C( 17) = 0.16341746D+00
          EX( 18) = 0.68226302D+03
           C( 18) = 0.22509702D+00
          EX( 19) = 0.11947910D+04
           C( 19) = 0.81825722D-01
          EX( 20) = 0.12613422D+03
           C( 20) =-0.59958077D+00
          EX( 21) = 0.55057262D+02
           C( 21) =-0.51353500D+00
          EX( 22) = 0.10107920D+03
           C( 22) = 0.73520867D-02
          EX( 23) = 0.17355515D+02
           C( 23) =-0.24879580D-01
          EX( 24) = 0.73508828D+01
           C( 24) =-0.64277132D-02
          EX( 25) = 0.37980201D+01
           C( 25) = 0.61161287D-02
          EX( 26) = 0.15415020D+01
           C( 26) = 0.13540704D-02
          EX( 27) = 0.58281695D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.23233859D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.18000399D+06
           C( 29) = 0.32734527D-02
          EX( 30) = 0.16032742D+05
           C( 30) = 0.20788985D-01
          EX( 31) = 0.28235884D+04
           C( 31) = 0.76655330D-01
          EX( 32) = 0.68226302D+03
           C( 32) = 0.10558778D+00
          EX( 33) = 0.11947910D+04
           C( 33) = 0.45397567D-01
          EX( 34) = 0.12613422D+03
           C( 34) =-0.33265222D+00
          EX( 35) = 0.55057262D+02
           C( 35) =-0.28491334D+00
          EX( 36) = 0.10107920D+03
           C( 36) =-0.30752842D+00
          EX( 37) = 0.17355515D+02
           C( 37) = 0.10406811D+01
          EX( 38) = 0.73508828D+01
           C( 38) = 0.26886306D+00
          EX( 39) = 0.37980201D+01
           C( 39) =-0.68254957D-02
          EX( 40) = 0.15415020D+01
           C( 40) =-0.15111196D-02
          EX( 41) = 0.58281695D+00
           C( 41) = 0.16611441D-02
          EX( 42) = 0.23233859D+00
           C( 42) = 0.46157704D-03
          EX( 43) = 0.18000399D+06
           C( 43) = 0.17034304D-02
          EX( 44) = 0.16032742D+05
           C( 44) = 0.10818116D-01
          EX( 45) = 0.28235884D+04
           C( 45) = 0.39889692D-01
          EX( 46) = 0.68226302D+03
           C( 46) = 0.54945483D-01
          EX( 47) = 0.11947910D+04
           C( 47) = 0.13231997D-01
          EX( 48) = 0.12613422D+03
           C( 48) =-0.96957913D-01
          EX( 49) = 0.55057262D+02
           C( 49) =-0.83043494D-01
          EX( 50) = 0.10107920D+03
           C( 50) =-0.31445706D+00
          EX( 51) = 0.17355515D+02
           C( 51) = 0.10641278D+01
          EX( 52) = 0.73508828D+01
           C( 52) = 0.27492056D+00
          EX( 53) = 0.37980201D+01
           C( 53) =-0.12485615D+01
          EX( 54) = 0.15415020D+01
           C( 54) =-0.27642326D+00
          EX( 55) = 0.58281695D+00
           C( 55) = 0.25666073D-02
          EX( 56) = 0.23233859D+00
           C( 56) = 0.71317531D-03
          EX( 57) = 0.39551679D+04
           C( 57) = 0.23487622D-01
          EX( 58) = 0.80916471D+03
           C( 58) = 0.16177485D+00
          EX( 59) = 0.24158976D+03
           C( 59) = 0.48026374D+00
          EX( 60) = 0.84125680D+02
           C( 60) = 0.46797122D+00
          EX( 61) = 0.36861150D+02
           C( 61) = 0.29112685D-01
          EX( 62) = 0.14462633D+02
           C( 62) = 0.35344636D-01
          EX( 63) = 0.60816036D+01
           C( 63) =-0.10296172D-01
          EX( 64) = 0.24350006D+01
           C( 64) =-0.87114057D-02
          EX( 65) = 0.80361461D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.27344080D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.39551679D+04
           C( 67) = 0.12711655D-01
          EX( 68) = 0.80916471D+03
           C( 68) = 0.87553613D-01
          EX( 69) = 0.24158976D+03
           C( 69) = 0.25992189D+00
          EX( 70) = 0.84125680D+02
           C( 70) = 0.25326911D+00
          EX( 71) = 0.36861150D+02
           C( 71) =-0.52278543D+00
          EX( 72) = 0.14462633D+02
           C( 72) =-0.63469448D+00
          EX( 73) = 0.60816036D+01
           C( 73) =-0.27525430D-01
          EX( 74) = 0.24350006D+01
           C( 74) =-0.23288772D-01
          EX( 75) = 0.80361461D+00
           C( 75) = 0.51118489D-02
          EX( 76) = 0.27344080D+00
           C( 76) = 0.42346267D-02
          EX( 77) = 0.39551679D+04
           C( 77) = 0.61219045D-02
          EX( 78) = 0.80916471D+03
           C( 78) = 0.42165621D-01
          EX( 79) = 0.24158976D+03
           C( 79) = 0.12517779D+00
          EX( 80) = 0.84125680D+02
           C( 80) = 0.12197383D+00
          EX( 81) = 0.36861150D+02
           C( 81) =-0.37437220D+00
          EX( 82) = 0.14462633D+02
           C( 82) =-0.45451145D+00
          EX( 83) = 0.60816036D+01
           C( 83) = 0.68732878D+00
          EX( 84) = 0.24350006D+01
           C( 84) = 0.58153653D+00
          EX( 85) = 0.80361461D+00
           C( 85) = 0.12062937D-01
          EX( 86) = 0.27344080D+00
           C( 86) = 0.99928686D-02
          EX( 87) = 0.39045339D+03
           C( 87) = 0.40997481D-01
          EX( 88) = 0.10740396D+03
           C( 88) = 0.24404676D+00
          EX( 89) = 0.37771529D+02
           C( 89) = 0.54091644D+00
          EX( 90) = 0.14320530D+02
           C( 90) = 0.36526751D+00
          EX( 91) = 0.11459586D+02
           C( 91) = 0.81740906D-02
          EX( 92) = 0.43885295D+01
           C( 92) = 0.17324370D-01
          EX( 93) = 0.16079491D+01
           C( 93) = 0.83325392D-02
          EX( 94) = 0.39045339D+03
           C( 94) = 0.19595600D-01
          EX( 95) = 0.10740396D+03
           C( 95) = 0.11664723D+00
          EX( 96) = 0.37771529D+02
           C( 96) = 0.25854229D+00
          EX( 97) = 0.14320530D+02
           C( 97) = 0.17458721D+00
          EX( 98) = 0.11459586D+02
           C( 98) =-0.30742185D+00
          EX( 99) = 0.43885295D+01
           C( 99) =-0.65155751D+00
          EX(100) = 0.16079491D+01
           C(100) =-0.31338099D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.65) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : TB/QR             CONFIGURATION : S2P6F9D0        *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 19.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =  -129.5351049 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -2.13671 A.U. <REFERENCE = -2.13714>
C  ***     ORBITAL ENERGY(6S) =  -.18526 A.U. <REFERENCE =  -.18505>
C  ***     ORBITAL ENERGY(5P) = -1.13843 A.U. <REFERENCE = -1.13830>
C  ***     ORBITAL ENERGY(4F) =  -.50440 A.U. <REFERENCE =  -.50453>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 19.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.14040213D+05
           C( 1)=-0.95341420D-02
          EX( 2)= 0.14658652D+04
           C( 2)=-0.48098335D-01
          EX( 3)= 0.97395281D+02
           C( 3)= 0.20462466D+00
          EX( 4)= 0.17719958D+02
           C( 4)=-0.53911963D+00
          EX( 5)= 0.34444914D+01
           C( 5)= 0.10005353D+01
          EX( 6)= 0.58511320D+00
           C( 6)=-0.98854724D+00
          EX( 7)= 0.24716467D+00
           C( 7)=-0.27288515D+00
          EX( 8)= 0.38979220D-01
           C( 8)= 0.79157191D-02
          EX( 9)= 0.83678080D-01
           C( 9)=-0.12022149D-01
          EX(10)= 0.18156590D-01
           C(10)=-0.26329112D-02
          EX(11)= 0.14040213D+05
           C(11)= 0.25053068D-02
          EX(12)= 0.14658652D+04
           C(12)= 0.12638902D-01
          EX(13)= 0.97395281D+02
           C(13)=-0.53184054D-01
          EX(14)= 0.17719958D+02
           C(14)= 0.14092454D+00
          EX(15)= 0.34444914D+01
           C(15)=-0.28103649D+00
          EX(16)= 0.58511320D+00
           C(16)= 0.39765358D+00
          EX(17)= 0.24716467D+00
           C(17)= 0.28050476D+00
          EX(18)= 0.38979220D-01
           C(18)=-0.67520591D+00
          EX(19)= 0.83678080D-01
           C(19)=-0.33849580D+00
          EX(20)= 0.18156590D-01
           C(20)=-0.21501939D+00
          EX(21)= 0.10785509D+04
           C(21)= 0.18322203D-01
          EX(22)= 0.22444132D+03
           C(22)= 0.56881882D-01
          EX(23)= 0.25657576D+02
           C(23)=-0.21923680D+00
          EX(24)= 0.63721272D+01
           C(24)= 0.95893961D-01
          EX(25)= 0.40772169D+01
           C(25)= 0.39779046D+00
          EX(26)= 0.66471936D+00
           C(26)=-0.73266925D+00
          EX(27)= 0.23979377D+00
           C(27)=-0.38983798D+00
          EX(28)= 0.17540890D+03
           C(28)=-0.21371738D-01
          EX(29)= 0.46403412D+02
           C(29)=-0.71610373D-01
          EX(30)= 0.68368377D+01
           C(30)= 0.12449263D+00
          EX(31)= 0.38472635D+01
           C(31)= 0.11311498D+00
          EX(32)= 0.70052920D+00
           C(32)=-0.38731822D+00
          EX(33)= 0.25338654D+00
           C(33)=-0.54423485D+00
          EX(34)= 0.86889508D-01
           C(34)=-0.26147300D+00
          EX(35)= 0.69743188D+02
           C(35)= 0.29011917D-01
          EX(36)= 0.21358518D+02
           C(36)= 0.15011165D+00
          EX(37)= 0.78886058D+01
           C(37)= 0.36893337D+00
          EX(38)= 0.29777596D+01
           C(38)= 0.44442397D+00
          EX(39)= 0.10650977D+01
           C(39)= 0.31088225D+00
          EX(40)= 0.33193086D+00
           C(40)= 0.12819445D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 19.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.12110686D+01
          ALPN0( 1)= 0.11624451D+04
            AN0( 2)= 0.73514227D+00
          ALPN0( 2)= 0.56199241D+02
            AN0( 3)= 0.54639441D+00
          ALPN0( 3)= 0.39802371D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.94091638D+02
          ALPN1( 1)= 0.18333086D+04
            AN1( 2)= 0.36160230D+01
          ALPN1( 2)= 0.30788407D+02
            AN1( 3)= 0.63417107D-01
          ALPN1( 3)= 0.16989326D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.38505950D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.64738820D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.14728160D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.30898200D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.57588680D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.12467740D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.30898200D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.94739400D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.12426360D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.19159064D+06
           C(  1) = 0.17929381D-01
          EX(  2) = 0.16897877D+05
           C(  2) = 0.11313198D+00
          EX(  3) = 0.29533401D+04
           C(  3) = 0.41752827D+00
          EX(  4) = 0.70989649D+03
           C(  4) = 0.57847424D+00
          EX(  5) = 0.12495735D+04
           C(  5) =-0.49212968D-02
          EX(  6) = 0.13151155D+03
           C(  6) = 0.36309181D-01
          EX(  7) = 0.57433067D+02
           C(  7) = 0.31547904D-01
          EX(  8) = 0.10530280D+03
           C(  8) = 0.83623419D-02
          EX(  9) = 0.18078991D+02
           C(  9) =-0.28317150D-01
          EX( 10) = 0.76555383D+01
           C( 10) =-0.72840297D-02
          EX( 11) = 0.39882149D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.16290247D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.60805767D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.24205228D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.19159064D+06
           C( 15) = 0.70204867D-02
          EX( 16) = 0.16897877D+05
           C( 16) = 0.44298328D-01
          EX( 17) = 0.29533401D+04
           C( 17) = 0.16348873D+00
          EX( 18) = 0.70989649D+03
           C( 18) = 0.22650926D+00
          EX( 19) = 0.12495735D+04
           C( 19) = 0.80712113D-01
          EX( 20) = 0.13151155D+03
           C( 20) =-0.59549157D+00
          EX( 21) = 0.57433067D+02
           C( 21) =-0.51740388D+00
          EX( 22) = 0.10530280D+03
           C( 22) = 0.74735430D-02
          EX( 23) = 0.18078991D+02
           C( 23) =-0.25307438D-01
          EX( 24) = 0.76555383D+01
           C( 24) =-0.65098403D-02
          EX( 25) = 0.39882149D+01
           C( 25) = 0.61662917D-02
          EX( 26) = 0.16290247D+01
           C( 26) = 0.14034992D-02
          EX( 27) = 0.60805767D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.24205228D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.19159064D+06
           C( 29) = 0.33012485D-02
          EX( 30) = 0.16897877D+05
           C( 30) = 0.20830434D-01
          EX( 31) = 0.29533401D+04
           C( 31) = 0.76877420D-01
          EX( 32) = 0.70989649D+03
           C( 32) = 0.10651161D+00
          EX( 33) = 0.12495735D+04
           C( 33) = 0.44898860D-01
          EX( 34) = 0.13151155D+03
           C( 34) =-0.33126246D+00
          EX( 35) = 0.57433067D+02
           C( 35) =-0.28782352D+00
          EX( 36) = 0.10530280D+03
           C( 36) =-0.30778545D+00
          EX( 37) = 0.18078991D+02
           C( 37) = 0.10422448D+01
          EX( 38) = 0.76555383D+01
           C( 38) = 0.26809696D+00
          EX( 39) = 0.39882149D+01
           C( 39) =-0.68659757D-02
          EX( 40) = 0.16290247D+01
           C( 40) =-0.15627531D-02
          EX( 41) = 0.60805767D+00
           C( 41) = 0.16377042D-02
          EX( 42) = 0.24205228D+00
           C( 42) = 0.46483766D-03
          EX( 43) = 0.19159064D+06
           C( 43) = 0.17203451D-02
          EX( 44) = 0.16897877D+05
           C( 44) = 0.10855147D-01
          EX( 45) = 0.29533401D+04
           C( 45) = 0.40062325D-01
          EX( 46) = 0.70989649D+03
           C( 46) = 0.55505280D-01
          EX( 47) = 0.12495735D+04
           C( 47) = 0.13095893D-01
          EX( 48) = 0.13151155D+03
           C( 48) =-0.96621112D-01
          EX( 49) = 0.57433067D+02
           C( 49) =-0.83951042D-01
          EX( 50) = 0.10530280D+03
           C( 50) =-0.31590446D+00
          EX( 51) = 0.18078991D+02
           C( 51) = 0.10697380D+01
          EX( 52) = 0.76555383D+01
           C( 52) = 0.27516903D+00
          EX( 53) = 0.39882149D+01
           C( 53) =-0.12451300D+01
          EX( 54) = 0.16290247D+01
           C( 54) =-0.28340193D+00
          EX( 55) = 0.60805767D+00
           C( 55) = 0.21907017D-02
          EX( 56) = 0.24205228D+00
           C( 56) = 0.62179763D-03
          EX( 57) = 0.41251708D+04
           C( 57) = 0.23425094D-01
          EX( 58) = 0.84182643D+03
           C( 58) = 0.16129990D+00
          EX( 59) = 0.25100315D+03
           C( 59) = 0.47978370D+00
          EX( 60) = 0.87357349D+02
           C( 60) = 0.46879439D+00
          EX( 61) = 0.38356963D+02
           C( 61) = 0.29249415D-01
          EX( 62) = 0.15064099D+02
           C( 62) = 0.35466675D-01
          EX( 63) = 0.63651334D+01
           C( 63) =-0.10231541D-01
          EX( 64) = 0.25441028D+01
           C( 64) =-0.86544061D-02
          EX( 65) = 0.83679086D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.28318343D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.41251708D+04
           C( 67) = 0.12718411D-01
          EX( 68) = 0.84182643D+03
           C( 68) = 0.87576105D-01
          EX( 69) = 0.25100315D+03
           C( 69) = 0.26049357D+00
          EX( 70) = 0.87357349D+02
           C( 70) = 0.25452704D+00
          EX( 71) = 0.38356963D+02
           C( 71) =-0.52342683D+00
          EX( 72) = 0.15064099D+02
           C( 72) =-0.63468652D+00
          EX( 73) = 0.63651334D+01
           C( 73) =-0.27512091D-01
          EX( 74) = 0.25441028D+01
           C( 74) =-0.23271255D-01
          EX( 75) = 0.83679086D+00
           C( 75) = 0.50350400D-02
          EX( 76) = 0.28318343D+00
           C( 76) = 0.42021945D-02
          EX( 77) = 0.41251708D+04
           C( 77) = 0.61420765D-02
          EX( 78) = 0.84182643D+03
           C( 78) = 0.42292951D-01
          EX( 79) = 0.25100315D+03
           C( 79) = 0.12579964D+00
          EX( 80) = 0.87357349D+02
           C( 80) = 0.12291823D+00
          EX( 81) = 0.38356963D+02
           C( 81) =-0.37646087D+00
          EX( 82) = 0.15064099D+02
           C( 82) =-0.45648146D+00
          EX( 83) = 0.63651334D+01
           C( 83) = 0.68862446D+00
          EX( 84) = 0.25441028D+01
           C( 84) = 0.58247682D+00
          EX( 85) = 0.83679086D+00
           C( 85) = 0.12045102D-01
          EX( 86) = 0.28318343D+00
           C( 86) = 0.10052723D-01
          EX( 87) = 0.40682815D+03
           C( 87) = 0.40790378D-01
          EX( 88) = 0.11191906D+03
           C( 88) = 0.24348617D+00
          EX( 89) = 0.39395072D+02
           C( 89) = 0.54102850D+00
          EX( 90) = 0.14955045D+02
           C( 90) = 0.36519958D+00
          EX( 91) = 0.12001383D+02
           C( 91) = 0.82457311D-02
          EX( 92) = 0.45981432D+01
           C( 92) = 0.17419005D-01
          EX( 93) = 0.16832719D+01
           C( 93) = 0.83609543D-02
          EX( 94) = 0.40682815D+03
           C( 94) = 0.19602027D-01
          EX( 95) = 0.11191906D+03
           C( 95) = 0.11700854D+00
          EX( 96) = 0.39395072D+02
           C( 96) = 0.25999404D+00
          EX( 97) = 0.14955045D+02
           C( 97) = 0.17549855D+00
          EX( 98) = 0.12001383D+02
           C( 98) =-0.30865109D+00
          EX( 99) = 0.45981432D+01
           C( 99) =-0.65202159D+00
          EX(100) = 0.16832719D+01
           C(100) =-0.31296408D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.66) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : DY/QR             CONFIGURATION : S2P6F10D0       *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 20.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =  -148.6857846 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -2.19693 A.U. <REFERENCE = -2.19677>
C  ***     ORBITAL ENERGY(6S) =  -.18696 A.U. <REFERENCE =  -.18732>
C  ***     ORBITAL ENERGY(5P) = -1.16238 A.U. <REFERENCE = -1.16215>
C  ***     ORBITAL ENERGY(4F) =  -.50541 A.U. <REFERENCE =  -.50587>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 20.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.14808636D+05
           C( 1)=-0.88511977D-02
          EX( 2)= 0.15315430D+04
           C( 2)=-0.44655925D-01
          EX( 3)= 0.10120588D+03
           C( 3)= 0.19799293D+00
          EX( 4)= 0.18498947D+02
           C( 4)=-0.52675378D+00
          EX( 5)= 0.35983336D+01
           C( 5)= 0.98305927D+00
          EX( 6)= 0.60838176D+00
           C( 6)=-0.96307582D+00
          EX( 7)= 0.25623422D+00
           C( 7)=-0.30358458D+00
          EX( 8)= 0.86056050D-01
           C( 8)= 0.78759881D-02
          EX( 9)= 0.39988630D-01
           C( 9)=-0.63474124D-02
          EX(10)= 0.18551380D-01
           C(10)= 0.19731663D-02
          EX(11)= 0.14808636D+05
           C(11)=-0.23036722D-02
          EX(12)= 0.15315430D+04
           C(12)=-0.11622451D-01
          EX(13)= 0.10120588D+03
           C(13)= 0.50881244D-01
          EX(14)= 0.18498947D+02
           C(14)=-0.13610574D+00
          EX(15)= 0.35983336D+01
           C(15)= 0.27262563D+00
          EX(16)= 0.60838176D+00
           C(16)=-0.37978437D+00
          EX(17)= 0.25623422D+00
           C(17)=-0.29347718D+00
          EX(18)= 0.86056050D-01
           C(18)= 0.33775494D+00
          EX(19)= 0.39988630D-01
           C(19)= 0.66867608D+00
          EX(20)= 0.18551380D-01
           C(20)= 0.22413882D+00
          EX(21)= 0.11206671D+04
           C(21)= 0.16034500D-01
          EX(22)= 0.23290847D+03
           C(22)= 0.53745142D-01
          EX(23)= 0.26727719D+02
           C(23)=-0.20656337D+00
          EX(24)= 0.64891293D+01
           C(24)= 0.84063883D-01
          EX(25)= 0.42295081D+01
           C(25)= 0.39512241D+00
          EX(26)= 0.69042582D+00
           C(26)=-0.73094259D+00
          EX(27)= 0.24790352D+00
           C(27)=-0.39472040D+00
          EX(28)= 0.18261839D+03
           C(28)=-0.20528592D-01
          EX(29)= 0.48364314D+02
           C(29)=-0.68989723D-01
          EX(30)= 0.72258179D+01
           C(30)= 0.11385443D+00
          EX(31)= 0.41184251D+01
           C(31)= 0.11295855D+00
          EX(32)= 0.71068301D+00
           C(32)=-0.38363036D+00
          EX(33)= 0.25101416D+00
           C(33)=-0.54477452D+00
          EX(34)= 0.84065792D-01
           C(34)=-0.27240862D+00
          EX(35)= 0.72733968D+02
           C(35)= 0.29655723D-01
          EX(36)= 0.22307484D+02
           C(36)= 0.16509140D+00
          EX(37)= 0.82444736D+01
           C(37)= 0.36589165D+00
          EX(38)= 0.31082662D+01
           C(38)= 0.43800363D+00
          EX(39)= 0.11076613D+01
           C(39)= 0.31348400D+00
          EX(40)= 0.34283902D+00
           C(40)= 0.12836158D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 20.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.11047207D+01
          ALPN0( 1)= 0.80354640D+03
            AN0( 2)= 0.74971457D+00
          ALPN0( 2)= 0.57052541D+02
            AN0( 3)= 0.49390053D+00
          ALPN0( 3)= 0.45082243D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.97654727D+02
          ALPN1( 1)= 0.26229456D+04
            AN1( 2)= 0.28146784D+01
          ALPN1( 2)= 0.23751711D+02
            AN1( 3)= 0.85546765D-01
          ALPN1( 3)= 0.17104375D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.39836998D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.67261820D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.15348520D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.32147800D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.59754240D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.12986760D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.24163800D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.98958000D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.12964440D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.20572609D+06
           C(  1) = 0.17837400D-01
          EX(  2) = 0.17966727D+05
           C(  2) = 0.11177176D+00
          EX(  3) = 0.31149508D+04
           C(  3) = 0.41377679D+00
          EX(  4) = 0.74459391D+03
           C(  4) = 0.58217718D+00
          EX(  5) = 0.13118863D+04
           C(  5) =-0.51428316D-02
          EX(  6) = 0.13624783D+03
           C(  6) = 0.38696016D-01
          EX(  7) = 0.59546438D+02
           C(  7) = 0.33469843D-01
          EX(  8) = 0.10970590D+03
           C(  8) = 0.97075544D-02
          EX(  9) = 0.18811693D+02
           C(  9) =-0.32953665D-01
          EX( 10) = 0.79473353D+01
           C( 10) =-0.84008810D-02
          EX( 11) = 0.41807066D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.17160144D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.63340905D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.25176034D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.20572609D+06
           C( 15) = 0.70060571D-02
          EX( 16) = 0.17966727D+05
           C( 16) = 0.43900982D-01
          EX( 17) = 0.31149508D+04
           C( 17) = 0.16252053D+00
          EX( 18) = 0.74459391D+03
           C( 18) = 0.22866374D+00
          EX( 19) = 0.13118863D+04
           C( 19) = 0.79243159D-01
          EX( 20) = 0.13624783D+03
           C( 20) =-0.59624635D+00
          EX( 21) = 0.59546438D+02
           C( 21) =-0.51571902D+00
          EX( 22) = 0.10970590D+03
           C( 22) = 0.74207545D-02
          EX( 23) = 0.18811693D+02
           C( 23) =-0.25190799D-01
          EX( 24) = 0.79473353D+01
           C( 24) =-0.64218929D-02
          EX( 25) = 0.41807066D+01
           C( 25) = 0.60360343D-02
          EX( 26) = 0.17160144D+01
           C( 26) = 0.14055178D-02
          EX( 27) = 0.63340905D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.25176034D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.20572609D+06
           C( 29) = 0.33020408D-02
          EX( 30) = 0.17966727D+05
           C( 30) = 0.20691072D-01
          EX( 31) = 0.31149508D+04
           C( 31) = 0.76597924D-01
          EX( 32) = 0.74459391D+03
           C( 32) = 0.10777203D+00
          EX( 33) = 0.13118863D+04
           C( 33) = 0.44207546D-01
          EX( 34) = 0.13624783D+03
           C( 34) =-0.33262919D+00
          EX( 35) = 0.59546438D+02
           C( 35) =-0.28770525D+00
          EX( 36) = 0.10970590D+03
           C( 36) =-0.30787442D+00
          EX( 37) = 0.18811693D+02
           C( 37) = 0.10451232D+01
          EX( 38) = 0.79473353D+01
           C( 38) = 0.26643335D+00
          EX( 39) = 0.41807066D+01
           C( 39) =-0.71410613D-02
          EX( 40) = 0.17160144D+01
           C( 40) =-0.16628283D-02
          EX( 41) = 0.63340905D+00
           C( 41) = 0.16440727D-02
          EX( 42) = 0.25176034D+00
           C( 42) = 0.47629509D-03
          EX( 43) = 0.20572609D+06
           C( 43) = 0.17230612D-02
          EX( 44) = 0.17966727D+05
           C( 44) = 0.10796954D-01
          EX( 45) = 0.31149508D+04
           C( 45) = 0.39970103D-01
          EX( 46) = 0.74459391D+03
           C( 46) = 0.56237281D-01
          EX( 47) = 0.13118863D+04
           C( 47) = 0.12904878D-01
          EX( 48) = 0.13624783D+03
           C( 48) =-0.97099696D-01
          EX( 49) = 0.59546438D+02
           C( 49) =-0.83985688D-01
          EX( 50) = 0.10970590D+03
           C( 50) =-0.31692239D+00
          EX( 51) = 0.18811693D+02
           C( 51) = 0.10758378D+01
          EX( 52) = 0.79473353D+01
           C( 52) = 0.27426344D+00
          EX( 53) = 0.41807066D+01
           C( 53) =-0.12424859D+01
          EX( 54) = 0.17160144D+01
           C( 54) =-0.28931844D+00
          EX( 55) = 0.63340905D+00
           C( 55) = 0.18823263D-02
          EX( 56) = 0.25176034D+00
           C( 56) = 0.54531822D-03
          EX( 57) = 0.43006734D+04
           C( 57) = 0.23365118D-01
          EX( 58) = 0.87540347D+03
           C( 58) = 0.16083326D+00
          EX( 59) = 0.26065376D+03
           C( 59) = 0.47930807D+00
          EX( 60) = 0.90664797D+02
           C( 60) = 0.46961358D+00
          EX( 61) = 0.39890585D+02
           C( 61) = 0.29385026D-01
          EX( 62) = 0.15679288D+02
           C( 62) = 0.35593010D-01
          EX( 63) = 0.66548299D+01
           C( 63) =-0.10171980D-01
          EX( 64) = 0.26548956D+01
           C( 64) =-0.86040379D-02
          EX( 65) = 0.86977409D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.29274206D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.43006734D+04
           C( 67) = 0.12724711D-01
          EX( 68) = 0.87540347D+03
           C( 68) = 0.87590257D-01
          EX( 69) = 0.26065376D+03
           C( 69) = 0.26103256D+00
          EX( 70) = 0.90664797D+02
           C( 70) = 0.25575292D+00
          EX( 71) = 0.39890585D+02
           C( 71) =-0.52401956D+00
          EX( 72) = 0.15679288D+02
           C( 72) =-0.63472578D+00
          EX( 73) = 0.66548299D+01
           C( 73) =-0.27497555D-01
          EX( 74) = 0.26548956D+01
           C( 74) =-0.23258992D-01
          EX( 75) = 0.86977409D+00
           C( 75) = 0.49649569D-02
          EX( 76) = 0.29274206D+00
           C( 76) = 0.41745019D-02
          EX( 77) = 0.43006734D+04
           C( 77) = 0.61602875D-02
          EX( 78) = 0.87540347D+03
           C( 78) = 0.42404198D-01
          EX( 79) = 0.26065376D+03
           C( 79) = 0.12637109D+00
          EX( 80) = 0.90664797D+02
           C( 80) = 0.12381511D+00
          EX( 81) = 0.39890585D+02
           C( 81) =-0.37837001D+00
          EX( 82) = 0.15679288D+02
           C( 82) =-0.45830579D+00
          EX( 83) = 0.66548299D+01
           C( 83) = 0.68976399D+00
          EX( 84) = 0.26548956D+01
           C( 84) = 0.58344151D+00
          EX( 85) = 0.86977409D+00
           C( 85) = 0.12027249D-01
          EX( 86) = 0.29274206D+00
           C( 86) = 0.10112429D-01
          EX( 87) = 0.42353831D+03
           C( 87) = 0.40599146D-01
          EX( 88) = 0.11652193D+03
           C( 88) = 0.24297641D+00
          EX( 89) = 0.41049632D+02
           C( 89) = 0.54115586D+00
          EX( 90) = 0.15601175D+02
           C( 90) = 0.36510440D+00
          EX( 91) = 0.12553219D+02
           C( 91) = 0.83133382D-02
          EX( 92) = 0.48107964D+01
           C( 92) = 0.17505555D-01
          EX( 93) = 0.17593108D+01
           C( 93) = 0.83889246D-02
          EX( 94) = 0.42353831D+03
           C( 94) = 0.19605354D-01
          EX( 95) = 0.11652193D+03
           C( 95) = 0.11733348D+00
          EX( 96) = 0.41049632D+02
           C( 96) = 0.26132453D+00
          EX( 97) = 0.15601175D+02
           C( 97) = 0.17630915D+00
          EX( 98) = 0.12553219D+02
           C( 98) =-0.30982715D+00
          EX( 99) = 0.48107964D+01
           C( 99) =-0.65240896D+00
          EX(100) = 0.17593108D+01
           C(100) =-0.31264415D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.67) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : HO/QR             CONFIGURATION : S2P6F11D0       *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 21.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =  -170.5484978 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -2.25745 A.U. <REFERENCE = -2.25747>
C  ***     ORBITAL ENERGY(6S) =  -.18958 A.U. <REFERENCE =  -.18960>
C  ***     ORBITAL ENERGY(5P) = -1.18608 A.U. <REFERENCE = -1.18606>
C  ***     ORBITAL ENERGY(4F) =  -.50458 A.U. <REFERENCE =  -.50454>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 21.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.15612523D+05
           C( 1)=-0.87880096D-02
          EX( 2)= 0.15996800D+04
           C( 2)=-0.44321447D-01
          EX( 3)= 0.10512688D+03
           C( 3)= 0.20090605D+00
          EX( 4)= 0.19298943D+02
           C( 4)=-0.53484624D+00
          EX( 5)= 0.37560088D+01
           C( 5)= 0.98805980D+00
          EX( 6)= 0.63221139D+00
           C( 6)=-0.97512452D+00
          EX( 7)= 0.26549549D+00
           C( 7)=-0.28512616D+00
          EX( 8)= 0.88430420D-01
           C( 8)=-0.58831787D-02
          EX( 9)= 0.40993510D-01
           C( 9)= 0.34235936D-02
          EX(10)= 0.18943770D-01
           C(10)=-0.11727718D-02
          EX(11)= 0.15612523D+05
           C(11)=-0.22637592D-02
          EX(12)= 0.15996800D+04
           C(12)=-0.11417043D-01
          EX(13)= 0.10512688D+03
           C(13)= 0.51127165D-01
          EX(14)= 0.19298943D+02
           C(14)=-0.13688468D+00
          EX(15)= 0.37560088D+01
           C(15)= 0.27133799D+00
          EX(16)= 0.63221139D+00
           C(16)=-0.38048989D+00
          EX(17)= 0.26549549D+00
           C(17)=-0.28231149D+00
          EX(18)= 0.88430420D-01
           C(18)= 0.32977449D+00
          EX(19)= 0.40993510D-01
           C(19)= 0.67141290D+00
          EX(20)= 0.18943770D-01
           C(20)= 0.22309012D+00
          EX(21)= 0.11644946D+04
           C(21)= 0.15068066D-01
          EX(22)= 0.24167646D+03
           C(22)= 0.54995137D-01
          EX(23)= 0.27801660D+02
           C(23)=-0.21483906D+00
          EX(24)= 0.68118088D+01
           C(24)= 0.96946570D-01
          EX(25)= 0.44182566D+01
           C(25)= 0.38412406D+00
          EX(26)= 0.71615827D+00
           C(26)=-0.72870053D+00
          EX(27)= 0.25598616D+00
           C(27)=-0.39494311D+00
          EX(28)= 0.18997525D+03
           C(28)=-0.19868326D-01
          EX(29)= 0.50363925D+02
           C(29)=-0.66963494D-01
          EX(30)= 0.76247704D+01
           C(30)= 0.10501601D+00
          EX(31)= 0.43944388D+01
           C(31)= 0.11330649D+00
          EX(32)= 0.72434497D+00
           C(32)=-0.38118674D+00
          EX(33)= 0.25054421D+00
           C(33)=-0.54511305D+00
          EX(34)= 0.82108188D-01
           C(34)=-0.28160862D+00
          EX(35)= 0.75708581D+02
           C(35)= 0.35155999D-01
          EX(36)= 0.23248900D+02
           C(36)= 0.16503288D+00
          EX(37)= 0.85958138D+01
           C(37)= 0.36738741D+00
          EX(38)= 0.32358868D+01
           C(38)= 0.44277418D+00
          EX(39)= 0.11485404D+01
           C(39)= 0.30625257D+00
          EX(40)= 0.35289775D+00
           C(40)= 0.12728884D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 21.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.10049187D+01
          ALPN0( 1)= 0.85285295D+03
            AN0( 2)= 0.65895811D+00
          ALPN0( 2)= 0.55854660D+02
            AN0( 3)= 0.46151823D+00
          ALPN0( 3)= 0.43847052D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.11648935D+03
          ALPN1( 1)= 0.30731687D+04
            AN1( 2)= 0.42186021D+01
          ALPN1( 2)= 0.32449213D+02
            AN1( 3)= 0.80594768D-01
          ALPN1( 3)= 0.19343986D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.41195694D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.69845960D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.15983980D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.33425400D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.61963220D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.13516360D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.25096200D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.10325620D+03
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.13510000D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.21883717D+06
           C(  1) = 0.17899490D-01
          EX(  2) = 0.18928760D+05
           C(  2) = 0.11139158D+00
          EX(  3) = 0.32563047D+04
           C(  3) = 0.41260612D+00
          EX(  4) = 0.77419345D+03
           C(  4) = 0.58383854D+00
          EX(  5) = 0.13718418D+04
           C(  5) =-0.51394350D-02
          EX(  6) = 0.14198922D+03
           C(  6) = 0.38945895D-01
          EX(  7) = 0.62080806D+02
           C(  7) = 0.34211534D-01
          EX(  8) = 0.11420220D+03
           C(  8) = 0.97817705D-02
          EX(  9) = 0.19573963D+02
           C(  9) =-0.33234821D-01
          EX( 10) = 0.82683622D+01
           C( 10) =-0.84427985D-02
          EX( 11) = 0.43816509D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.18085080D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.65935160D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.26162679D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.21883717D+06
           C( 15) = 0.70533740D-02
          EX( 16) = 0.18928760D+05
           C( 16) = 0.43894350D-01
          EX( 17) = 0.32563047D+04
           C( 17) = 0.16258928D+00
          EX( 18) = 0.77419345D+03
           C( 18) = 0.23006417D+00
          EX( 19) = 0.13718418D+04
           C( 19) = 0.78100357D-01
          EX( 20) = 0.14198922D+03
           C( 20) =-0.59183320D+00
          EX( 21) = 0.62080806D+02
           C( 21) =-0.51988847D+00
          EX( 22) = 0.11420220D+03
           C( 22) = 0.75514574D-02
          EX( 23) = 0.19573963D+02
           C( 23) =-0.25657046D-01
          EX( 24) = 0.82683622D+01
           C( 24) =-0.65177806D-02
          EX( 25) = 0.43816509D+01
           C( 25) = 0.61012588D-02
          EX( 26) = 0.18085080D+01
           C( 26) = 0.14590993D-02
          EX( 27) = 0.65935160D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.26162679D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.21883717D+06
           C( 29) = 0.33318138D-02
          EX( 30) = 0.18928760D+05
           C( 30) = 0.20734446D-01
          EX( 31) = 0.32563047D+04
           C( 31) = 0.76802564D-01
          EX( 32) = 0.77419345D+03
           C( 32) = 0.10867579D+00
          EX( 33) = 0.13718418D+04
           C( 33) = 0.43677437D-01
          EX( 34) = 0.14198922D+03
           C( 34) =-0.33098129D+00
          EX( 35) = 0.62080806D+02
           C( 35) =-0.29074638D+00
          EX( 36) = 0.11420220D+03
           C( 36) =-0.30796503D+00
          EX( 37) = 0.19573963D+02
           C( 37) = 0.10463507D+01
          EX( 38) = 0.82683622D+01
           C( 38) = 0.26580942D+00
          EX( 39) = 0.43816509D+01
           C( 39) =-0.71497172D-02
          EX( 40) = 0.18085080D+01
           C( 40) =-0.17098353D-02
          EX( 41) = 0.65935160D+00
           C( 41) = 0.16202634D-02
          EX( 42) = 0.26162679D+00
           C( 42) = 0.47839727D-03
          EX( 43) = 0.21883717D+06
           C( 43) = 0.17403094D-02
          EX( 44) = 0.18928760D+05
           C( 44) = 0.10830242D-01
          EX( 45) = 0.32563047D+04
           C( 45) = 0.40116356D-01
          EX( 46) = 0.77419345D+03
           C( 46) = 0.56764728D-01
          EX( 47) = 0.13718418D+04
           C( 47) = 0.12760793D-01
          EX( 48) = 0.14198922D+03
           C( 48) =-0.96699447D-01
          EX( 49) = 0.62080806D+02
           C( 49) =-0.84944420D-01
          EX( 50) = 0.11420220D+03
           C( 50) =-0.31803504D+00
          EX( 51) = 0.19573963D+02
           C( 51) = 0.10805648D+01
          EX( 52) = 0.82683622D+01
           C( 52) = 0.27450101D+00
          EX( 53) = 0.43816509D+01
           C( 53) =-0.12386634D+01
          EX( 54) = 0.18085080D+01
           C( 54) =-0.29622298D+00
          EX( 55) = 0.65935160D+00
           C( 55) = 0.15473130D-02
          EX( 56) = 0.26162679D+00
           C( 56) = 0.45685802D-03
          EX( 57) = 0.45316663D+04
           C( 57) = 0.22923565D-01
          EX( 58) = 0.91987552D+03
           C( 58) = 0.15809100D+00
          EX( 59) = 0.27353854D+03
           C( 59) = 0.47506554D+00
          EX( 60) = 0.95132266D+02
           C( 60) = 0.47435658D+00
          EX( 61) = 0.41545332D+02
           C( 61) = 0.31283945D-01
          EX( 62) = 0.16338460D+02
           C( 62) = 0.38221579D-01
          EX( 63) = 0.69596684D+01
           C( 63) =-0.11981358D-01
          EX( 64) = 0.27703400D+01
           C( 64) =-0.10165723D-01
          EX( 65) = 0.90332657D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.30241874D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.45316663D+04
           C( 67) = 0.12521910D-01
          EX( 68) = 0.91987552D+03
           C( 68) = 0.86356604D-01
          EX( 69) = 0.27353854D+03
           C( 69) = 0.25950274D+00
          EX( 70) = 0.95132266D+02
           C( 70) = 0.25911547D+00
          EX( 71) = 0.41545332D+02
           C( 71) =-0.52111625D+00
          EX( 72) = 0.16338460D+02
           C( 72) =-0.63668075D+00
          EX( 73) = 0.69596684D+01
           C( 73) =-0.27607174D-01
          EX( 74) = 0.27703400D+01
           C( 74) =-0.23423629D-01
          EX( 75) = 0.90332657D+00
           C( 75) = 0.49389821D-02
          EX( 76) = 0.30241874D+00
           C( 76) = 0.41823186D-02
          EX( 77) = 0.45316663D+04
           C( 77) = 0.60764919D-02
          EX( 78) = 0.91987552D+03
           C( 78) = 0.41906163D-01
          EX( 79) = 0.27353854D+03
           C( 79) = 0.12592858D+00
          EX( 80) = 0.95132266D+02
           C( 80) = 0.12574065D+00
          EX( 81) = 0.41545332D+02
           C( 81) =-0.37797854D+00
          EX( 82) = 0.16338460D+02
           C( 82) =-0.46180034D+00
          EX( 83) = 0.69596684D+01
           C( 83) = 0.68995050D+00
          EX( 84) = 0.27703400D+01
           C( 84) = 0.58539656D+00
          EX( 85) = 0.90332657D+00
           C( 85) = 0.12048864D-01
          EX( 86) = 0.30241874D+00
           C( 86) = 0.10202950D-01
          EX( 87) = 0.44060836D+03
           C( 87) = 0.40418649D-01
          EX( 88) = 0.12121925D+03
           C( 88) = 0.24249553D+00
          EX( 89) = 0.42737678D+02
           C( 89) = 0.54128282D+00
          EX( 90) = 0.16260099D+02
           C( 90) = 0.36500993D+00
          EX( 91) = 0.13116641D+02
           C( 91) = 0.83784353D-02
          EX( 92) = 0.50275836D+01
           C( 92) = 0.17589296D-01
          EX( 93) = 0.18366853D+01
           C( 93) = 0.84167233D-02
          EX( 94) = 0.44060836D+03
           C( 94) = 0.19607313D-01
          EX( 95) = 0.12121925D+03
           C( 95) = 0.11763595D+00
          EX( 96) = 0.42737678D+02
           C( 96) = 0.26257933D+00
          EX( 97) = 0.16260099D+02
           C( 97) = 0.17706837D+00
          EX( 98) = 0.13116641D+02
           C( 98) =-0.31094089D+00
          EX( 99) = 0.50275836D+01
           C( 99) =-0.65277477D+00
          EX(100) = 0.18366853D+01
           C(100) =-0.31236184D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.68) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : ER/QR             CONFIGURATION : S2P6F12D0       *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 22.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =  -194.0886226 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -2.31768 A.U. <REFERENCE = -2.31938>
C  ***     ORBITAL ENERGY(6S) =  -.19184 A.U. <REFERENCE =  -.19188>
C  ***     ORBITAL ENERGY(5P) = -1.21168 A.U. <REFERENCE = -1.21010>
C  ***     ORBITAL ENERGY(4F) =  -.50110 A.U. <REFERENCE =  -.50087>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 22.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.16464502D+05
           C( 1)=-0.91020611D-02
          EX( 2)= 0.16707038D+04
           C( 2)=-0.45893628D-01
          EX( 3)= 0.10915900D+03
           C( 3)= 0.20371144D+00
          EX( 4)= 0.20120443D+02
           C( 4)=-0.53714974D+00
          EX( 5)= 0.39176765D+01
           C( 5)= 0.98547713D+00
          EX( 6)= 0.65664407D+00
           C( 6)=-0.97313230D+00
          EX( 7)= 0.27496646D+00
           C( 7)=-0.28492048D+00
          EX( 8)= 0.90710700D-01
           C( 8)=-0.72554318D-02
          EX( 9)= 0.41948380D-01
           C( 9)= 0.43687731D-02
          EX(10)= 0.19317260D-01
           C(10)=-0.14748014D-02
          EX(11)= 0.16464502D+05
           C(11)=-0.23255613D-02
          EX(12)= 0.16707038D+04
           C(12)=-0.11725745D-01
          EX(13)= 0.10915900D+03
           C(13)= 0.51388911D-01
          EX(14)= 0.20120443D+02
           C(14)=-0.13620350D+00
          EX(15)= 0.39176765D+01
           C(15)= 0.26788280D+00
          EX(16)= 0.65664407D+00
           C(16)=-0.37499405D+00
          EX(17)= 0.27496646D+00
           C(17)=-0.27939044D+00
          EX(18)= 0.90710700D-01
           C(18)= 0.32529575D+00
          EX(19)= 0.41948380D-01
           C(19)= 0.67078670D+00
          EX(20)= 0.19317260D-01
           C(20)= 0.22467011D+00
          EX(21)= 0.12086404D+04
           C(21)=-0.15723994D-01
          EX(22)= 0.25050418D+03
           C(22)=-0.55830361D-01
          EX(23)= 0.28937346D+02
           C(23)= 0.21618644D+00
          EX(24)= 0.68217800D+01
           C(24)=-0.12098629D+00
          EX(25)= 0.45529107D+01
           C(25)=-0.35990733D+00
          EX(26)= 0.74285807D+00
           C(26)= 0.72694370D+00
          EX(27)= 0.26431835D+00
           C(27)= 0.39612384D+00
          EX(28)= 0.19749716D+03
           C(28)=-0.19257246D-01
          EX(29)= 0.52406415D+02
           C(29)=-0.65090617D-01
          EX(30)= 0.80450774D+01
           C(30)= 0.96484613D-01
          EX(31)= 0.46852107D+01
           C(31)= 0.11401727D+00
          EX(32)= 0.73851125D+00
           C(32)=-0.37912851D+00
          EX(33)= 0.25017723D+00
           C(33)=-0.54538409D+00
          EX(34)= 0.80198567D-01
           C(34)=-0.29064454D+00
          EX(35)= 0.78571739D+02
           C(35)= 0.35305765D-01
          EX(36)= 0.24154252D+02
           C(36)= 0.16696681D+00
          EX(37)= 0.89322115D+01
           C(37)= 0.37074260D+00
          EX(38)= 0.33566884D+01
           C(38)= 0.44278378D+00
          EX(39)= 0.11863893D+01
           C(39)= 0.30286427D+00
          EX(40)= 0.36176864D+00
           C(40)= 0.12638296D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 22.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.99051741D+00
          ALPN0( 1)= 0.86366404D+03
            AN0( 2)= 0.62753680D+00
          ALPN0( 2)= 0.55693668D+02
            AN0( 3)= 0.43253338D+00
          ALPN0( 3)= 0.43962582D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.11448621D+03
          ALPN1( 1)= 0.31067685D+04
            AN1( 2)= 0.39666019D+01
          ALPN1( 2)= 0.33017684D+02
            AN1( 3)= 0.68399099D-01
          ALPN1( 3)= 0.19620239D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.42582440D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.72492520D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.16634920D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.34733000D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.64215960D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.14056740D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.26045000D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.10763500D+03
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.14063780D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.23272364D+06
           C(  1) = 0.17967580D-01
          EX(  2) = 0.19939190D+05
           C(  2) = 0.11102700D+00
          EX(  3) = 0.34032882D+04
           C(  3) = 0.41143276D+00
          EX(  4) = 0.80471137D+03
           C(  4) = 0.58548760D+00
          EX(  5) = 0.14344257D+04
           C(  5) =-0.51345329D-02
          EX(  6) = 0.14795095D+03
           C(  6) = 0.39185379D-01
          EX(  7) = 0.64706754D+02
           C(  7) = 0.34982932D-01
          EX(  8) = 0.11883995D+03
           C(  8) = 0.98555290D-02
          EX(  9) = 0.20356434D+02
           C(  9) =-0.33518656D-01
          EX( 10) = 0.85982857D+01
           C( 10) =-0.84882995D-02
          EX( 11) = 0.45883830D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.19035962D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.68599194D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.27172903D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.23272364D+06
           C( 15) = 0.71032718D-02
          EX( 16) = 0.19939190D+05
           C( 16) = 0.43893219D-01
          EX( 17) = 0.34032882D+04
           C( 17) = 0.16265511D+00
          EX( 18) = 0.80471137D+03
           C( 18) = 0.23146564D+00
          EX( 19) = 0.14344257D+04
           C( 19) = 0.76945035D-01
          EX( 20) = 0.14795095D+03
           C( 20) =-0.58722389D+00
          EX( 21) = 0.64706754D+02
           C( 21) =-0.52424689D+00
          EX( 22) = 0.11883995D+03
           C( 22) = 0.76871590D-02
          EX( 23) = 0.20356434D+02
           C( 23) =-0.26144028D-01
          EX( 24) = 0.85982857D+01
           C( 24) =-0.66207412D-02
          EX( 25) = 0.45883830D+01
           C( 25) = 0.61735429D-02
          EX( 26) = 0.19035962D+01
           C( 26) = 0.15148949D-02
          EX( 27) = 0.68599194D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.27172903D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.23272364D+06
           C( 29) = 0.33625965D-02
          EX( 30) = 0.19939190D+05
           C( 30) = 0.20778479D-01
          EX( 31) = 0.34032882D+04
           C( 31) = 0.76998814D-01
          EX( 32) = 0.80471137D+03
           C( 32) = 0.10957282D+00
          EX( 33) = 0.14344257D+04
           C( 33) = 0.43133716D-01
          EX( 34) = 0.14795095D+03
           C( 34) =-0.32918497D+00
          EX( 35) = 0.64706754D+02
           C( 35) =-0.29388144D+00
          EX( 36) = 0.11883995D+03
           C( 36) =-0.30797551D+00
          EX( 37) = 0.20356434D+02
           C( 37) = 0.10474247D+01
          EX( 38) = 0.85982857D+01
           C( 38) = 0.26525094D+00
          EX( 39) = 0.45883830D+01
           C( 39) =-0.71494935D-02
          EX( 40) = 0.19035962D+01
           C( 40) =-0.17543785D-02
          EX( 41) = 0.68599194D+00
           C( 41) = 0.15968231D-02
          EX( 42) = 0.27172903D+00
           C( 42) = 0.48012152D-03
          EX( 43) = 0.23272364D+06
           C( 43) = 0.17578502D-02
          EX( 44) = 0.19939190D+05
           C( 44) = 0.10862277D-01
          EX( 45) = 0.34032882D+04
           C( 45) = 0.40252340D-01
          EX( 46) = 0.80471137D+03
           C( 46) = 0.57280918D-01
          EX( 47) = 0.14344257D+04
           C( 47) = 0.12613565D-01
          EX( 48) = 0.14795095D+03
           C( 48) =-0.96263356D-01
          EX( 49) = 0.64706754D+02
           C( 49) =-0.85939565D-01
          EX( 50) = 0.11883995D+03
           C( 50) =-0.31901233D+00
          EX( 51) = 0.20356434D+02
           C( 51) = 0.10849610D+01
          EX( 52) = 0.85982857D+01
           C( 52) = 0.27475665D+00
          EX( 53) = 0.45883830D+01
           C( 53) =-0.12348126D+01
          EX( 54) = 0.19035962D+01
           C( 54) =-0.30300449D+00
          EX( 55) = 0.68599194D+00
           C( 55) = 0.12339444D-02
          EX( 56) = 0.27172903D+00
           C( 56) = 0.37101370D-03
          EX( 57) = 0.47202344D+04
           C( 57) = 0.22874090D-01
          EX( 58) = 0.95562904D+03
           C( 58) = 0.15767176D+00
          EX( 59) = 0.28375467D+03
           C( 59) = 0.47463453D+00
          EX( 60) = 0.98621143D+02
           C( 60) = 0.47511363D+00
          EX( 61) = 0.43142976D+02
           C( 61) = 0.31431181D-01
          EX( 62) = 0.16969807D+02
           C( 62) = 0.38322804D-01
          EX( 63) = 0.72619103D+01
           C( 63) =-0.11919336D-01
          EX( 64) = 0.28851621D+01
           C( 64) =-0.10102817D-01
          EX( 65) = 0.93732344D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.31218349D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.47202344D+04
           C( 67) = 0.12529774D-01
          EX( 68) = 0.95562904D+03
           C( 68) = 0.86368095D-01
          EX( 69) = 0.28375467D+03
           C( 69) = 0.25999126D+00
          EX( 70) = 0.98621143D+02
           C( 70) = 0.26025369D+00
          EX( 71) = 0.43142976D+02
           C( 71) =-0.52211074D+00
          EX( 72) = 0.16969807D+02
           C( 72) =-0.63658910D+00
          EX( 73) = 0.72619103D+01
           C( 73) =-0.27359338D-01
          EX( 74) = 0.28851621D+01
           C( 74) =-0.23189745D-01
          EX( 75) = 0.93732344D+00
           C( 75) = 0.46318304D-02
          EX( 76) = 0.31218349D+00
           C( 76) = 0.39469432D-02
          EX( 77) = 0.47202344D+04
           C( 77) = 0.60933307D-02
          EX( 78) = 0.95562904D+03
           C( 78) = 0.42001504D-01
          EX( 79) = 0.28375467D+03
           C( 79) = 0.12643585D+00
          EX( 80) = 0.98621143D+02
           C( 80) = 0.12656348D+00
          EX( 81) = 0.43142976D+02
           C( 81) =-0.38000529D+00
          EX( 82) = 0.16969807D+02
           C( 82) =-0.46332551D+00
          EX( 83) = 0.72619103D+01
           C( 83) = 0.69142853D+00
          EX( 84) = 0.28851621D+01
           C( 84) = 0.58605408D+00
          EX( 85) = 0.93732344D+00
           C( 85) = 0.12026471D-01
          EX( 86) = 0.31218349D+00
           C( 86) = 0.10248173D-01
          EX( 87) = 0.45804328D+03
           C( 87) = 0.40247868D-01
          EX( 88) = 0.12601211D+03
           C( 88) = 0.24204010D+00
          EX( 89) = 0.44459530D+02
           C( 89) = 0.54140863D+00
          EX( 90) = 0.16931918D+02
           C( 90) = 0.36491842D+00
          EX( 91) = 0.13691806D+02
           C( 91) = 0.84410719D-02
          EX( 92) = 0.52485909D+01
           C( 92) = 0.17670262D-01
          EX( 93) = 0.19154359D+01
           C( 93) = 0.84441955D-02
          EX( 94) = 0.45804328D+03
           C( 94) = 0.19608170D-01
          EX( 95) = 0.12601211D+03
           C( 95) = 0.11791838D+00
          EX( 96) = 0.44459530D+02
           C( 96) = 0.26376633D+00
          EX( 97) = 0.16931918D+02
           C( 97) = 0.17778289D+00
          EX( 98) = 0.13691806D+02
           C( 98) =-0.31199640D+00
          EX( 99) = 0.52485909D+01
           C( 99) =-0.65312298D+00
          EX(100) = 0.19154359D+01
           C(100) =-0.31211184D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.69) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : TM/QR             CONFIGURATION : S2P6F13D0       *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 23.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =  -219.3795200 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -2.38072 A.U. <REFERENCE = -2.38102>
C  ***     ORBITAL ENERGY(6S) =  -.19414 A.U. <REFERENCE =  -.19413>
C  ***     ORBITAL ENERGY(5P) = -1.23438 A.U. <REFERENCE = -1.23323>
C  ***     ORBITAL ENERGY(4F) =  -.50066 A.U. <REFERENCE =  -.50076>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 23.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.17370577D+05
           C( 1)=-0.94273433D-02
          EX( 2)= 0.17448804D+04
           C( 2)=-0.47531598D-01
          EX( 3)= 0.11330209D+03
           C( 3)= 0.20547461D+00
          EX( 4)= 0.20964853D+02
           C( 4)=-0.53769765D+00
          EX( 5)= 0.40827833D+01
           C( 5)= 0.97991031D+00
          EX( 6)= 0.68132734D+00
           C( 6)=-0.96832778D+00
          EX( 7)= 0.28448047D+00
           C( 7)=-0.28868818D+00
          EX( 8)= 0.93441340D-01
           C( 8)=-0.52979966D-02
          EX( 9)= 0.43120680D-01
           C( 9)= 0.28603469D-02
          EX(10)= 0.19767690D-01
           C(10)=-0.97962716D-03
          EX(11)= 0.17370577D+05
           C(11)=-0.23925785D-02
          EX(12)= 0.17448804D+04
           C(12)=-0.12063110D-01
          EX(13)= 0.11330209D+03
           C(13)= 0.51453952D-01
          EX(14)= 0.20964853D+02
           C(14)=-0.13526086D+00
          EX(15)= 0.40827833D+01
           C(15)= 0.26403669D+00
          EX(16)= 0.68132734D+00
           C(16)=-0.36923136D+00
          EX(17)= 0.28448047D+00
           C(17)=-0.27821735D+00
          EX(18)= 0.93441340D-01
           C(18)= 0.31901534D+00
          EX(19)= 0.43120680D-01
           C(19)= 0.66995633D+00
          EX(20)= 0.19767690D-01
           C(20)= 0.22942463D+00
          EX(21)= 0.36356733D+04
           C(21)= 0.44205640D-02
          EX(22)= 0.74102116D+03
           C(22)= 0.20338174D-01
          EX(23)= 0.22224831D+03
           C(23)= 0.49584990D-01
          EX(24)= 0.31307422D+02
           C(24)=-0.20879063D+00
          EX(25)= 0.52252444D+01
           C(25)= 0.46114504D+00
          EX(26)= 0.75290275D+00
           C(26)=-0.73355974D+00
          EX(27)= 0.26695948D+00
           C(27)=-0.38310700D+00
          EX(28)= 0.20517718D+03
           C(28)=-0.18559439D-01
          EX(29)= 0.54491646D+02
           C(29)=-0.62906589D-01
          EX(30)= 0.85086653D+01
           C(30)= 0.86661785D-01
          EX(31)= 0.50057927D+01
           C(31)= 0.11505696D+00
          EX(32)= 0.74950850D+00
           C(32)=-0.37654137D+00
          EX(33)= 0.24781853D+00
           C(33)=-0.54570450D+00
          EX(34)= 0.77450772D-01
           C(34)=-0.30145561D+00
          EX(35)= 0.81759576D+02
           C(35)= 0.35937418D-01
          EX(36)= 0.25162610D+02
           C(36)= 0.17026989D+00
          EX(37)= 0.93082035D+01
           C(37)= 0.37039768D+00
          EX(38)= 0.34935860D+01
           C(38)= 0.44283636D+00
          EX(39)= 0.12305726D+01
           C(39)= 0.30184141D+00
          EX(40)= 0.37278759D+00
           C(40)= 0.12642229D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 23.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.97346835D+00
          ALPN0( 1)= 0.98161140D+03
            AN0( 2)= 0.59803555D+00
          ALPN0( 2)= 0.50377634D+02
            AN0( 3)= 0.40076014D+00
          ALPN0( 3)= 0.45192520D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.11946871D+03
          ALPN1( 1)= 0.32823648D+04
            AN1( 2)= 0.35228658D+01
          ALPN1( 2)= 0.32633695D+02
            AN1( 3)= 0.67882185D-01
          ALPN1( 3)= 0.20204744D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.43997560D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.75201680D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.17300540D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.36061520D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.66511760D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.14606848D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.27001740D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.11208310D+03
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.14617324D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.24743476D+06
           C(  1) = 0.18041448D-01
          EX(  2) = 0.21000970D+05
           C(  2) = 0.11067674D+00
          EX(  3) = 0.35561943D+04
           C(  3) = 0.41025407D+00
          EX(  4) = 0.83619151D+03
           C(  4) = 0.58712541D+00
          EX(  5) = 0.14997816D+04
           C(  5) =-0.51284134D-02
          EX(  6) = 0.15414308D+03
           C(  6) = 0.39417039D-01
          EX(  7) = 0.67427758D+02
           C(  7) = 0.35787266D-01
          EX(  8) = 0.12362438D+03
           C(  8) = 0.99296779D-02
          EX(  9) = 0.21159596D+02
           C(  9) =-0.33808380D-01
          EX( 10) = 0.89374284D+01
           C( 10) =-0.85381262D-02
          EX( 11) = 0.48009464D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.20013693D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.71293801D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.28189167D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.24743476D+06
           C( 15) = 0.71556937D-02
          EX( 16) = 0.21000970D+05
           C( 16) = 0.43897188D-01
          EX( 17) = 0.35561943D+04
           C( 17) = 0.16271712D+00
          EX( 18) = 0.83619151D+03
           C( 18) = 0.23286875D+00
          EX( 19) = 0.14997816D+04
           C( 19) = 0.75776883D-01
          EX( 20) = 0.15414308D+03
           C( 20) =-0.58242190D+00
          EX( 21) = 0.67427758D+02
           C( 21) =-0.52878879D+00
          EX( 22) = 0.12362438D+03
           C( 22) = 0.78278847D-02
          EX( 23) = 0.21159596D+02
           C( 23) =-0.26652234D-01
          EX( 24) = 0.89374284D+01
           C( 24) =-0.67308797D-02
          EX( 25) = 0.48009464D+01
           C( 25) = 0.62523076D-02
          EX( 26) = 0.20013693D+01
           C( 26) = 0.15737252D-02
          EX( 27) = 0.71293801D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.28189167D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.24743476D+06
           C( 29) = 0.33943720D-02
          EX( 30) = 0.21000970D+05
           C( 30) = 0.20823053D-01
          EX( 31) = 0.35561943D+04
           C( 31) = 0.77186428D-01
          EX( 32) = 0.83619151D+03
           C( 32) = 0.11046353D+00
          EX( 33) = 0.14997816D+04
           C( 33) = 0.42576693D-01
          EX( 34) = 0.15414308D+03
           C( 34) =-0.32724489D+00
          EX( 35) = 0.67427758D+02
           C( 35) =-0.29711011D+00
          EX( 36) = 0.12362438D+03
           C( 36) =-0.30790388D+00
          EX( 37) = 0.21159596D+02
           C( 37) = 0.10483453D+01
          EX( 38) = 0.89374284D+01
           C( 38) = 0.26475402D+00
          EX( 39) = 0.48009464D+01
           C( 39) =-0.71347404D-02
          EX( 40) = 0.20013693D+01
           C( 40) =-0.17958363D-02
          EX( 41) = 0.71293801D+00
           C( 41) = 0.15733562D-02
          EX( 42) = 0.28189167D+00
           C( 42) = 0.48141520D-03
          EX( 43) = 0.24743476D+06
           C( 43) = 0.17756008D-02
          EX( 44) = 0.21000970D+05
           C( 44) = 0.10892568D-01
          EX( 45) = 0.35561943D+04
           C( 45) = 0.40376328D-01
          EX( 46) = 0.83619151D+03
           C( 46) = 0.57783627D-01
          EX( 47) = 0.14997816D+04
           C( 47) = 0.12463234D-01
          EX( 48) = 0.15414308D+03
           C( 48) =-0.95792551D-01
          EX( 49) = 0.67427758D+02
           C( 49) =-0.86971363D-01
          EX( 50) = 0.12362438D+03
           C( 50) =-0.31983465D+00
          EX( 51) = 0.21159596D+02
           C( 51) = 0.10889669D+01
          EX( 52) = 0.89374284D+01
           C( 52) = 0.27501280D+00
          EX( 53) = 0.48009464D+01
           C( 53) =-0.12307594D+01
          EX( 54) = 0.20013693D+01
           C( 54) =-0.30978597D+00
          EX( 55) = 0.71293801D+00
           C( 55) = 0.93578061D-03
          EX( 56) = 0.28189167D+00
           C( 56) = 0.28632995D-03
          EX( 57) = 0.49148382D+04
           C( 57) = 0.22826856D-01
          EX( 58) = 0.99236850D+03
           C( 58) = 0.15725933D+00
          EX( 59) = 0.29422228D+03
           C( 59) = 0.47420620D+00
          EX( 60) = 0.10218930D+03
           C( 60) = 0.47586778D+00
          EX( 61) = 0.44798106D+02
           C( 61) = 0.31545900D-01
          EX( 62) = 0.17629418D+02
           C( 62) = 0.38444153D-01
          EX( 63) = 0.75719046D+01
           C( 63) =-0.11843019D-01
          EX( 64) = 0.30026665D+01
           C( 64) =-0.10042006D-01
          EX( 65) = 0.97146344D+00
           C( 65) = 0.00000000D+00
          EX( 66) = 0.32187720D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.49148382D+04
           C( 67) = 0.12537604D-01
          EX( 68) = 0.99236850D+03
           C( 68) = 0.86374366D-01
          EX( 69) = 0.29422228D+03
           C( 69) = 0.26045678D+00
          EX( 70) = 0.10218930D+03
           C( 70) = 0.26136940D+00
          EX( 71) = 0.44798106D+02
           C( 71) =-0.52252066D+00
          EX( 72) = 0.17629418D+02
           C( 72) =-0.63678211D+00
          EX( 73) = 0.75719046D+01
           C( 73) =-0.27362581D-01
          EX( 74) = 0.30026665D+01
           C( 74) =-0.23201449D-01
          EX( 75) = 0.97146344D+00
           C( 75) = 0.45844149D-02
          EX( 76) = 0.32187720D+00
           C( 76) = 0.39318754D-02
          EX( 77) = 0.49148382D+04
           C( 77) = 0.61089986D-02
          EX( 78) = 0.99236850D+03
           C( 78) = 0.42086263D-01
          EX( 79) = 0.29422228D+03
           C( 79) = 0.12690863D+00
          EX( 80) = 0.10218930D+03
           C( 80) = 0.12735331D+00
          EX( 81) = 0.44798106D+02
           C( 81) =-0.38150179D+00
          EX( 82) = 0.17629418D+02
           C( 82) =-0.46492614D+00
          EX( 83) = 0.75719046D+01
           C( 83) = 0.69227311D+00
          EX( 84) = 0.30026665D+01
           C( 84) = 0.58699651D+00
          EX( 85) = 0.97146344D+00
           C( 85) = 0.12015990D-01
          EX( 86) = 0.32187720D+00
           C( 86) = 0.10305650D-01
          EX( 87) = 0.47583066D+03
           C( 87) = 0.40088749D-01
          EX( 88) = 0.13089654D+03
           C( 88) = 0.24162041D+00
          EX( 89) = 0.46213564D+02
           C( 89) = 0.54154309D+00
          EX( 90) = 0.17615813D+02
           C( 90) = 0.36481233D+00
          EX( 91) = 0.14277665D+02
           C( 91) = 0.85006597D-02
          EX( 92) = 0.54730121D+01
           C( 92) = 0.17745725D-01
          EX( 93) = 0.19950882D+01
           C( 93) = 0.84713603D-02
          EX( 94) = 0.47583066D+03
           C( 94) = 0.19607225D-01
          EX( 95) = 0.13089654D+03
           C( 95) = 0.11817544D+00
          EX( 96) = 0.46213564D+02
           C( 96) = 0.26486626D+00
          EX( 97) = 0.17615813D+02
           C( 97) = 0.17842805D+00
          EX( 98) = 0.14277665D+02
           C( 98) =-0.31300588D+00
          EX( 99) = 0.54730121D+01
           C( 99) =-0.65342179D+00
          EX(100) = 0.19950882D+01
           C(100) =-0.31192704D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.70) THEN
C       ITYP(1)=22 == QR SP
        ITYP(1)=22
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C***************************************************************
C  TITLE   : YB/QR             CONFIGURATION : S2P6F14D0       *
C  VALENCE : (5S6S/5P/5D/4F)   BASIS SET     : (10/ 7/ 7/ 6)   *
C  EFFECTIVE CORE CHARGE : 24.000000                           *
C***************************************************************
C
C  ***     TOTAL ENERGY         =  -248.0675940 A.U.
C
C  ***     ORBITAL ENERGY(5S) = -2.44185 A.U. <REFERENCE = -2.44199>
C  ***     ORBITAL ENERGY(6S) =  -.19665 A.U. <REFERENCE =  -.19632>
C  ***     ORBITAL ENERGY(5P) = -1.25527 A.U. <REFERENCE = -1.25513>
C  ***     ORBITAL ENERGY(4F) =  -.50520 A.U. <REFERENCE =  -.50518>
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 24.0D+00
          SHINFO='5S6S/5P/5D/4F'
          NOSH= 5
          CDFCTR(1)='A'
          CDFCTR(2)='91'
          CDFCTR(3)='61'
          CDFCTR(4)='61'
          CDFCTR(5)='51'
             KNG(1)=10
            KTYP(1)= 1
             KNG(2)=10
            KTYP(2)= 1
             KNG(3)= 7
            KTYP(3)= 2
             KNG(4)= 7
            KTYP(4)= 3
             KNG(5)= 6
            KTYP(5)= 4
          EX( 1)= 0.18322332D+05
           C( 1)= 0.95366526D-02
          EX( 2)= 0.18219585D+04
           C( 2)= 0.48064372D-01
          EX( 3)= 0.11756399D+03
           C( 3)=-0.20967232D+00
          EX( 4)= 0.21832500D+02
           C( 4)= 0.54584625D+00
          EX( 5)= 0.42512491D+01
           C( 5)=-0.98582011D+00
          EX( 6)= 0.70613134D+00
           C( 6)= 0.97899412D+00
          EX( 7)= 0.29396552D+00
           C( 7)= 0.27207858D+00
          EX( 8)= 0.95867261D-01
           C( 8)= 0.17363421D-01
          EX( 9)= 0.44129281D-01
           C( 9)=-0.11486097D-01
          EX(10)= 0.20154830D-01
           C(10)= 0.37609859D-02
          EX(11)= 0.18322332D+05
           C(11)= 0.23988631D-02
          EX(12)= 0.18219585D+04
           C(12)= 0.12090180D-01
          EX(13)= 0.11756399D+03
           C(13)=-0.52059570D-01
          EX(14)= 0.21832500D+02
           C(14)= 0.13614782D+00
          EX(15)= 0.42512491D+01
           C(15)=-0.26322914D+00
          EX(16)= 0.70613134D+00
           C(16)= 0.36989292D+00
          EX(17)= 0.29396552D+00
           C(17)= 0.26805842D+00
          EX(18)= 0.95867261D-01
           C(18)=-0.31176292D+00
          EX(19)= 0.44129281D-01
           C(19)=-0.67258826D+00
          EX(20)= 0.20154830D-01
           C(20)=-0.22850496D+00
          EX(21)= 0.37754140D+04
           C(21)= 0.43185167D-02
          EX(22)= 0.76777043D+03
           C(22)= 0.20195525D-01
          EX(23)= 0.23010780D+03
           C(23)= 0.51288682D-01
          EX(24)= 0.32520971D+02
           C(24)=-0.21314233D+00
          EX(25)= 0.54360478D+01
           C(25)= 0.46348885D+00
          EX(26)= 0.77867017D+00
           C(26)=-0.73281991D+00
          EX(27)= 0.27486303D+00
           C(27)=-0.38311525D+00
          EX(28)= 0.21314224D+03
           C(28)=-0.17135036D-01
          EX(29)= 0.56631122D+02
           C(29)=-0.58302542D-01
          EX(30)= 0.91856574D+01
           C(30)= 0.66668146D-01
          EX(31)= 0.54782958D+01
           C(31)= 0.11764109D+00
          EX(32)= 0.73725193D+00
           C(32)=-0.37088023D+00
          EX(33)= 0.23130286D+00
           C(33)=-0.54608759D+00
          EX(34)= 0.68453339D-01
           C(34)=-0.32556721D+00
          EX(35)= 0.85045816D+02
           C(35)= 0.38728925D-01
          EX(36)= 0.26206363D+02
           C(36)= 0.16928675D+00
          EX(37)= 0.96997743D+01
           C(37)= 0.37687374D+00
          EX(38)= 0.36379631D+01
           C(38)= 0.44287727D+00
          EX(39)= 0.12784012D+01
           C(39)= 0.29580131D+00
          EX(40)= 0.38540959D+00
           C(40)= 0.12441674D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE - 24.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.94222193D+00
          ALPN0( 1)= 0.10645824D+04
            AN0( 2)= 0.56570149D+00
          ALPN0( 2)= 0.44565541D+02
            AN0( 3)= 0.39951846D+00
          ALPN0( 3)= 0.46173511D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.11869578D+03
          ALPN1( 1)= 0.36309855D+04
            AN1( 2)= 0.38070811D+01
          ALPN1( 2)= 0.42167453D+02
            AN1( 3)= 0.63395886D-01
          ALPN1( 3)= 0.22719278D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     =  9
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.45441440D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.77974300D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.17980824D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.37409240D+02
          KTYP( 5) =  2
           KNG( 5) = 10
          BPAR( 5) = 0.68850542D+03
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.15166432D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.27963740D+02
          KTYP( 8) =  3
           KNG( 8) =  7
          BPAR( 8) = 0.11659690D+03
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.15168076D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.26301364D+06
           C(  1) = 0.18121434D-01
          EX(  2) = 0.22116642D+05
           C(  2) = 0.11034209D+00
          EX(  3) = 0.37152609D+04
           C(  3) = 0.40907161D+00
          EX(  4) = 0.86866106D+03
           C(  4) = 0.58874973D+00
          EX(  5) = 0.15680612D+04
           C(  5) =-0.51209737D-02
          EX(  6) = 0.16057903D+03
           C(  6) = 0.39638791D-01
          EX(  7) = 0.70248152D+02
           C(  7) = 0.36625613D-01
          EX(  8) = 0.12856035D+03
           C(  8) = 0.10003815D-01
          EX(  9) = 0.21983990D+02
           C(  9) =-0.34102792D-01
          EX( 10) = 0.92861912D+01
           C( 10) =-0.85919538D-02
          EX( 11) = 0.50195099D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.21018692D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.74002714D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.29203028D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.26301364D+06
           C( 15) = 0.72108027D-02
          EX( 16) = 0.22116642D+05
           C( 16) = 0.43906847D-01
          EX( 17) = 0.37152609D+04
           C( 17) = 0.16277600D+00
          EX( 18) = 0.86866106D+03
           C( 18) = 0.23427275D+00
          EX( 19) = 0.15680612D+04
           C( 19) = 0.74597143D-01
          EX( 20) = 0.16057903D+03
           C( 20) =-0.57741763D+00
          EX( 21) = 0.70248152D+02
           C( 21) =-0.53352474D+00
          EX( 22) = 0.12856035D+03
           C( 22) = 0.79737237D-02
          EX( 23) = 0.21983990D+02
           C( 23) =-0.27182255D-01
          EX( 24) = 0.92861912D+01
           C( 24) =-0.68483742D-02
          EX( 25) = 0.50195099D+01
           C( 25) = 0.63374366D-02
          EX( 26) = 0.21018692D+01
           C( 26) = 0.16357978D-02
          EX( 27) = 0.74002714D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.29203028D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.26301364D+06
           C( 29) = 0.34272312D-02
          EX( 30) = 0.22116642D+05
           C( 30) = 0.20868539D-01
          EX( 31) = 0.37152609D+04
           C( 31) = 0.77366005D-01
          EX( 32) = 0.86866106D+03
           C( 32) = 0.11134778D+00
          EX( 33) = 0.15680612D+04
           C( 33) = 0.42007522D-01
          EX( 34) = 0.16057903D+03
           C( 34) =-0.32515835D+00
          EX( 35) = 0.70248152D+02
           C( 35) =-0.30044115D+00
          EX( 36) = 0.12856035D+03
           C( 36) =-0.30775053D+00
          EX( 37) = 0.21983990D+02
           C( 37) = 0.10491150D+01
          EX( 38) = 0.92861912D+01
           C( 38) = 0.26431700D+00
          EX( 39) = 0.50195099D+01
           C( 39) =-0.71037344D-02
          EX( 40) = 0.21018692D+01
           C( 40) =-0.18335920D-02
          EX( 41) = 0.74002714D+00
           C( 41) = 0.15496585D-02
          EX( 42) = 0.29203028D+00
           C( 42) = 0.48215418D-03
          EX( 43) = 0.26301364D+06
           C( 43) = 0.17936150D-02
          EX( 44) = 0.22116642D+05
           C( 44) = 0.10921389D-01
          EX( 45) = 0.37152609D+04
           C( 45) = 0.40488902D-01
          EX( 46) = 0.86866106D+03
           C( 46) = 0.58273001D-01
          EX( 47) = 0.15680612D+04
           C( 47) = 0.12310205D-01
          EX( 48) = 0.16057903D+03
           C( 48) =-0.95286884D-01
          EX( 49) = 0.70248152D+02
           C( 49) =-0.88043569D-01
          EX( 50) = 0.12856035D+03
           C( 50) =-0.32050517D+00
          EX( 51) = 0.21983990D+02
           C( 51) = 0.10925953D+01
          EX( 52) = 0.92861912D+01
           C( 52) = 0.27527155D+00
          EX( 53) = 0.50195099D+01
           C( 53) =-0.12264977D+01
          EX( 54) = 0.21018692D+01
           C( 54) =-0.31657944D+00
          EX( 55) = 0.74002714D+00
           C( 55) = 0.65058250D-03
          EX( 56) = 0.29203028D+00
           C( 56) = 0.20241948D-03
          EX( 57) = 0.51156947D+04
           C( 57) = 0.22781568D-01
          EX( 58) = 0.10301246D+04
           C( 58) = 0.15685206D+00
          EX( 59) = 0.30494820D+03
           C( 59) = 0.47377804D+00
          EX( 60) = 0.10583857D+03
           C( 60) = 0.47662277D+00
          EX( 61) = 0.46494190D+02
           C( 61) = 0.31660653D-01
          EX( 62) = 0.18303763D+02
           C( 62) = 0.38571998D-01
          EX( 63) = 0.78884024D+01
           C( 63) =-0.11772609D-01
          EX( 64) = 0.31219968D+01
           C( 64) =-0.99872424D-02
          EX( 65) = 0.10054134D+01
           C( 65) = 0.00000000D+00
          EX( 66) = 0.33138066D+00
           C( 66) = 0.00000000D+00
          EX( 67) = 0.51156947D+04
           C( 67) = 0.12545077D-01
          EX( 68) = 0.10301246D+04
           C( 68) = 0.86373383D-01
          EX( 69) = 0.30494820D+03
           C( 69) = 0.26089433D+00
          EX( 70) = 0.10583857D+03
           C( 70) = 0.26246082D+00
          EX( 71) = 0.46494190D+02
           C( 71) =-0.52287969D+00
          EX( 72) = 0.18303763D+02
           C( 72) =-0.63702142D+00
          EX( 73) = 0.78884024D+01
           C( 73) =-0.27366226D-01
          EX( 74) = 0.31219968D+01
           C( 74) =-0.23216021D-01
          EX( 75) = 0.10054134D+01
           C( 75) = 0.45406635D-02
          EX( 76) = 0.33138066D+00
           C( 76) = 0.39197369D-02
          EX( 77) = 0.51156947D+04
           C( 77) = 0.61233475D-02
          EX( 78) = 0.10301246D+04
           C( 78) = 0.42159507D-01
          EX( 79) = 0.30494820D+03
           C( 79) = 0.12734451D+00
          EX( 80) = 0.10583857D+03
           C( 80) = 0.12810913D+00
          EX( 81) = 0.46494190D+02
           C( 81) =-0.38286017D+00
          EX( 82) = 0.18303763D+02
           C( 82) =-0.46643641D+00
          EX( 83) = 0.78884024D+01
           C( 83) = 0.69303234D+00
          EX( 84) = 0.31219968D+01
           C( 84) = 0.58793101D+00
          EX( 85) = 0.10054134D+01
           C( 85) = 0.12003345D-01
          EX( 86) = 0.33138066D+00
           C( 86) = 0.10361912D-01
          EX( 87) = 0.49397407D+03
           C( 87) = 0.39940410D-01
          EX( 88) = 0.13587323D+03
           C( 88) = 0.24123362D+00
          EX( 89) = 0.47999970D+02
           C( 89) = 0.54168514D+00
          EX( 90) = 0.18311796D+02
           C( 90) = 0.36469427D+00
          EX( 91) = 0.14873954D+02
           C( 91) = 0.85575144D-02
          EX( 92) = 0.57006567D+01
           C( 92) = 0.17815806D-01
          EX( 93) = 0.20755271D+01
           C( 93) = 0.84982620D-02
          EX( 94) = 0.49397407D+03
           C( 94) = 0.19604331D-01
          EX( 95) = 0.13587323D+03
           C( 95) = 0.11840700D+00
          EX( 96) = 0.47999970D+02
           C( 96) = 0.26588047D+00
          EX( 97) = 0.18311796D+02
           C( 97) = 0.17900636D+00
          EX( 98) = 0.14873954D+02
           C( 98) =-0.31397841D+00
          EX( 99) = 0.57006567D+01
           C( 99) =-0.65366863D+00
          EX(100) = 0.20755271D+01
           C(100) =-0.31180442D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C--   IF (MODE.EQ.0) THEN
C--      IERR=1
C--      RETURN
C--   END IF
C
      WRITE(IW,9999) IZSAVE
      CALL ABRT
      STOP
 9999 FORMAT(/1X,'*** NO MOD-POT AVAILABLE FOR ATOM A=',I4)
      END
