C 19 SEP 05 - MK  - INCLUDE MODEL CORE POTENTIAL LIBRARY
C
C*MODULE MCPLIB  *DECK MG5586
      SUBROUTINE MG5586(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
      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 ... ../TOOLS_MCP/MG5586:CS-RN.MPPAR
C
C     --- 
C
      IF(IZSAVE.EQ.55) THEN
        ITYP(1)=122
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : CS/QR             CONFIGURATION : P06S01       *
C   VALENCE : (6S/5P)           BASIS SET     : ( 8/ 6)      *
C          EFFECTIVE CORE CHARGE :  7.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =  -11.648862 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =    -.1254   A.U.
C  ***     ORBITAL ENERGY( 5P ) =    -.6809   A.U.
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE -  7.0D+00
          SHINFO='6S/5P'
          NOSH= 2
          CDFCTR(1)='71'
          CDFCTR(2)='6'
             KNG(1)= 8
            KTYP(1)= 1
             KNG(2)= 6
            KTYP(2)= 2
          EX( 1)= 0.15324037D+04
           C( 1)=-0.18608902D-02
          EX( 2)= 0.58233045D+02
           C( 2)= 0.20313151D-01
          EX( 3)= 0.11559202D+02
           C( 3)=-0.71529743D-01
          EX( 4)= 0.20094691D+01
           C( 4)= 0.19371228D+00
          EX( 5)= 0.37263519D+00
           C( 5)=-0.24480240D+00
          EX( 6)= 0.15665548D+00
           C( 6)=-0.31589529D+00
          EX( 7)= 0.28831300D-01
           C( 7)= 0.69949152D+00
          EX( 8)= 0.12963700D-01
           C( 8)= 0.47151174D+00
          EX( 9)= 0.69981442D+03
           C( 9)=-0.13155575D-01
          EX(10)= 0.14766223D+03
           C(10)=-0.55790368D-01
          EX(11)= 0.16782919D+02
           C(11)= 0.20525418D+00
          EX(12)= 0.26370256D+01
           C(12)=-0.46684512D+00
          EX(13)= 0.37939371D+00
           C(13)= 0.77484211D+00
          EX(14)= 0.13710230D+00
           C(14)= 0.33707304D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE -  7.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.10558234D+01
          ALPN0( 1)= 0.44183728D+03
            AN0( 2)= 0.24911338D+01
          ALPN0( 2)= 0.10352185D+02
            AN0( 3)= 0.12884510D+01
          ALPN0( 3)= 0.16922405D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.11203790D+03
          ALPN1( 1)= 0.86549325D+03
            AN1( 2)= 0.13647016D+02
          ALPN1( 2)= 0.92805957D+02
            AN1( 3)= 0.19327248D+00
          ALPN1( 3)= 0.52955076D+00
C         --- CORE-SHELL INFORMATION 
          NOSH     = 10
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.26629400D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.42540200D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.91676600D+02
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.18672820D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.26188600D+01
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.38153600D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.77165600D+02
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.13824140D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.55734200D+02
          KTYP(10) =  3
           KNG(10) =  7
          BPAR(10) = 0.65089600D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.10091760D+06
           C(  1) = 0.17742443D-01
          EX(  2) = 0.98441004D+04
           C(  2) = 0.11837078D+00
          EX(  3) = 0.18494375D+04
           C(  3) = 0.43041243D+00
          EX(  4) = 0.46663444D+03
           C(  4) = 0.55958545D+00
          EX(  5) = 0.78864456D+03
           C(  5) =-0.47550094D-02
          EX(  6) = 0.85489118D+02
           C(  6) = 0.32830323D-01
          EX(  7) = 0.36861221D+02
           C(  7) = 0.25316089D-01
          EX(  8) = 0.71832149D+02
           C(  8) = 0.73413865D-02
          EX(  9) = 0.10395844D+02
           C(  9) =-0.30701212D-01
          EX( 10) = 0.12330373D+02
           C( 10) = 0.00000000D+00
          EX( 11) = 0.19504794D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.21726644D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.34392831D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.14435666D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.10091760D+06
           C( 15) = 0.67238111D-02
          EX( 16) = 0.98441004D+04
           C( 16) = 0.44858692D-01
          EX( 17) = 0.18494375D+04
           C( 17) = 0.16311237D+00
          EX( 18) = 0.46663444D+03
           C( 18) = 0.21206476D+00
          EX( 19) = 0.78864456D+03
           C( 19) = 0.91219696D-01
          EX( 20) = 0.85489118D+02
           C( 20) =-0.62981412D+00
          EX( 21) = 0.36861221D+02
           C( 21) =-0.48566169D+00
          EX( 22) = 0.71832149D+02
           C( 22) = 0.53351726D-02
          EX( 23) = 0.10395844D+02
           C( 23) =-0.22311353D-01
          EX( 24) = 0.12330373D+02
           C( 24) =-0.12369042D-02
          EX( 25) = 0.19504794D+01
           C( 25) = 0.35512842D-02
          EX( 26) = 0.21726644D+01
           C( 26) = 0.00000000D+00
          EX( 27) = 0.34392831D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.14435666D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.10091760D+06
           C( 29) = 0.30892980D-02
          EX( 30) = 0.98441004D+04
           C( 30) = 0.20610613D-01
          EX( 31) = 0.18494375D+04
           C( 31) = 0.74943022D-01
          EX( 32) = 0.46663444D+03
           C( 32) = 0.97434510D-01
          EX( 33) = 0.78864456D+03
           C( 33) = 0.47980064D-01
          EX( 34) = 0.85489118D+02
           C( 34) =-0.33127189D+00
          EX( 35) = 0.36861221D+02
           C( 35) =-0.25545008D+00
          EX( 36) = 0.71832149D+02
           C( 36) =-0.29222977D+00
          EX( 37) = 0.10395844D+02
           C( 37) = 0.12220864D+01
          EX( 38) = 0.12330373D+02
           C( 38) =-0.30432525D-01
          EX( 39) = 0.19504794D+01
           C( 39) = 0.87375034D-01
          EX( 40) = 0.21726644D+01
           C( 40) = 0.90183103D-02
          EX( 41) = 0.34392831D+00
           C( 41) =-0.20541878D-01
          EX( 42) = 0.14435666D+00
           C( 42) =-0.65921772D-02
          EX( 43) = 0.10091760D+06
           C( 43) = 0.13912206D-02
          EX( 44) = 0.98441004D+04
           C( 44) = 0.92816911D-02
          EX( 45) = 0.18494375D+04
           C( 45) = 0.33749504D-01
          EX( 46) = 0.46663444D+03
           C( 46) = 0.43878221D-01
          EX( 47) = 0.78864456D+03
           C( 47) = 0.26270420D-01
          EX( 48) = 0.85489118D+02
           C( 48) =-0.18138058D+00
          EX( 49) = 0.36861221D+02
           C( 49) =-0.13986603D+00
          EX( 50) = 0.71832149D+02
           C( 50) =-0.15653147D+00
          EX( 51) = 0.10395844D+02
           C( 51) = 0.65460468D+00
          EX( 52) = 0.12330373D+02
           C( 52) = 0.44431629D+00
          EX( 53) = 0.19504794D+01
           C( 53) =-0.12756796D+01
          EX( 54) = 0.21726644D+01
           C( 54) = 0.16600825D-01
          EX( 55) = 0.34392831D+00
           C( 55) =-0.37813306D-01
          EX( 56) = 0.14435666D+00
           C( 56) =-0.12134821D-01
          EX( 57) = 0.10091760D+06
           C( 57) = 0.53511542D-03
          EX( 58) = 0.98441004D+04
           C( 58) = 0.35700852D-02
          EX( 59) = 0.18494375D+04
           C( 59) = 0.12981320D-01
          EX( 60) = 0.46663444D+03
           C( 60) = 0.16877203D-01
          EX( 61) = 0.78864456D+03
           C( 61) = 0.91318881D-02
          EX( 62) = 0.85489118D+02
           C( 62) =-0.63049893D-01
          EX( 63) = 0.36861221D+02
           C( 63) =-0.48618976D-01
          EX( 64) = 0.71832149D+02
           C( 64) =-0.71670495D-01
          EX( 65) = 0.10395844D+02
           C( 65) = 0.29972147D+00
          EX( 66) = 0.12330373D+02
           C( 66) = 0.18871650D+00
          EX( 67) = 0.19504794D+01
           C( 67) =-0.54182526D+00
          EX( 68) = 0.21726644D+01
           C( 68) =-0.41859739D+00
          EX( 69) = 0.34392831D+00
           C( 69) = 0.95347977D+00
          EX( 70) = 0.14435666D+00
           C( 70) = 0.30598505D+00
          EX( 71) = 0.26220675D+04
           C( 71) = 0.24548771D-01
          EX( 72) = 0.54767115D+03
           C( 72) = 0.16866645D+00
          EX( 73) = 0.16513208D+03
           C( 73) = 0.48857980D+00
          EX( 74) = 0.57497297D+02
           C( 74) = 0.45778324D+00
          EX( 75) = 0.24885322D+02
           C( 75) = 0.25353618D-01
          EX( 76) = 0.95665241D+01
           C( 76) = 0.30452004D-01
          EX( 77) = 0.37567524D+01
           C( 77) =-0.91877444D-02
          EX( 78) = 0.15029272D+01
           C( 78) =-0.77394246D-02
          EX( 79) = 0.48095376D+00
           C( 79) = 0.00000000D+00
          EX( 80) = 0.16330001D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.26220675D+04
           C( 81) = 0.12819752D-01
          EX( 82) = 0.54767115D+03
           C( 82) = 0.88080260D-01
          EX( 83) = 0.16513208D+03
           C( 83) = 0.25514402D+00
          EX( 84) = 0.57497297D+02
           C( 84) = 0.23906157D+00
          EX( 85) = 0.24885322D+02
           C( 85) =-0.52430363D+00
          EX( 86) = 0.95665241D+01
           C( 86) =-0.62973641D+00
          EX( 87) = 0.37567524D+01
           C( 87) =-0.28690320D-01
          EX( 88) = 0.15029272D+01
           C( 88) =-0.24167691D-01
          EX( 89) = 0.48095376D+00
           C( 89) = 0.74948657D-02
          EX( 90) = 0.16330001D+00
           C( 90) = 0.62174861D-02
          EX( 91) = 0.26220675D+04
           C( 91) = 0.58843597D-02
          EX( 92) = 0.54767115D+03
           C( 92) = 0.40429481D-01
          EX( 93) = 0.16513208D+03
           C( 93) = 0.11711296D+00
          EX( 94) = 0.57497297D+02
           C( 94) = 0.10973100D+00
          EX( 95) = 0.24885322D+02
           C( 95) =-0.34958124D+00
          EX( 96) = 0.95665241D+01
           C( 96) =-0.41987890D+00
          EX( 97) = 0.37567524D+01
           C( 97) = 0.67349133D+00
          EX( 98) = 0.15029272D+01
           C( 98) = 0.56732481D+00
          EX( 99) = 0.48095376D+00
           C( 99) = 0.11497657D-01
          EX(100) = 0.16330001D+00
           C(100) = 0.95380657D-02
          EX(101) = 0.25752968D+03
           C(101) = 0.43973359D-01
          EX(102) = 0.70586635D+02
           C(102) = 0.25279855D+00
          EX(103) = 0.24519807D+02
           C(103) = 0.54125536D+00
          EX(104) = 0.91231654D+01
           C(104) = 0.36328175D+00
          EX(105) = 0.69529557D+01
           C(105) = 0.74260772D-02
          EX(106) = 0.25912088D+01
           C(106) = 0.16004558D-01
          EX(107) = 0.93437754D+00
           C(107) = 0.79072095D-02
          EX(108) = 0.25752968D+03
           C(108) = 0.19192044D-01
          EX(109) = 0.70586635D+02
           C(109) = 0.11033318D+00
          EX(110) = 0.24519807D+02
           C(110) = 0.23622931D+00
          EX(111) = 0.91231654D+01
           C(111) = 0.15855325D+00
          EX(112) = 0.69529557D+01
           C(112) =-0.29883214D+00
          EX(113) = 0.25912088D+01
           C(113) =-0.64403807D+00
          EX(114) = 0.93437754D+00
           C(114) =-0.31819335D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.56) THEN
        ITYP(1)=122
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : BA/QR             CONFIGURATION : P06S02       *
C   VALENCE : (6S/5P)           BASIS SET     : ( 8/ 6)      *
C          EFFECTIVE CORE CHARGE :  8.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =  -15.352081 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =    -.1629   A.U.
C  ***     ORBITAL ENERGY( 5P ) =    -.9000   A.U.
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE -  8.0D+00
          SHINFO='6S/5P'
          NOSH= 2
          CDFCTR(1)='71'
          CDFCTR(2)='6'
             KNG(1)= 8
            KTYP(1)= 1
             KNG(2)= 6
            KTYP(2)= 2
          EX( 1)= 0.16070960D+04
           C( 1)= 0.23526319D-02
          EX( 2)= 0.60809898D+02
           C( 2)=-0.27634069D-01
          EX( 3)= 0.12148853D+02
           C( 3)= 0.10012477D+00
          EX( 4)= 0.21502619D+01
           C( 4)=-0.28065766D+00
          EX( 5)= 0.44226399D+00
           C( 5)= 0.32297338D+00
          EX( 6)= 0.23023930D+00
           C( 6)= 0.37135674D+00
          EX( 7)= 0.43643550D-01
           C( 7)=-0.76860242D+00
          EX( 8)= 0.18511220D-01
           C( 8)=-0.43216302D+00
          EX( 9)= 0.73247573D+03
           C( 9)= 0.10254894D-01
          EX(10)= 0.15438342D+03
           C(10)= 0.48731474D-01
          EX(11)= 0.17599648D+02
           C(11)=-0.19609210D+00
          EX(12)= 0.28275716D+01
           C(12)= 0.48322287D+00
          EX(13)= 0.43119323D+00
           C(13)=-0.80295273D+00
          EX(14)= 0.16188473D+00
           C(14)=-0.31416101D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE -  8.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.86982340D+00
          ALPN0( 1)= 0.42397416D+03
            AN0( 2)= 0.20126360D+01
          ALPN0( 2)= 0.10331374D+02
            AN0( 3)= 0.10813670D+01
          ALPN0( 3)= 0.17047687D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.10000443D+03
          ALPN1( 1)= 0.84797787D+03
            AN1( 2)= 0.11635396D+02
          ALPN1( 2)= 0.93253436D+02
            AN1( 3)= 0.17202862D+00
          ALPN1( 3)= 0.52955000D+00
C         --- CORE-SHELL INFORMATION 
          NOSH     = 10
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.27709938D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.44585300D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.97419600D+02
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.20530020D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.32083200D+01
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.39977920D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.82237060D+02
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.15415380D+02
          KTYP( 9) =  3
           KNG( 9) =  7
          BPAR( 9) = 0.60029060D+02
          KTYP(10) =  3
           KNG(10) =  7
          BPAR(10) = 0.77185200D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.10770888D+06
           C(  1) = 0.17745581D-01
          EX(  2) = 0.10399607D+05
           C(  2) = 0.11784552D+00
          EX(  3) = 0.19404781D+04
           C(  3) = 0.42933049D+00
          EX(  4) = 0.48742102D+03
           C(  4) = 0.56133721D+00
          EX(  5) = 0.82660347D+03
           C(  5) =-0.47654258D-02
          EX(  6) = 0.89430741D+02
           C(  6) = 0.33093242D-01
          EX(  7) = 0.38602050D+02
           C(  7) = 0.25785808D-01
          EX(  8) = 0.75054925D+02
           C(  8) = 0.74183486D-02
          EX(  9) = 0.10924494D+02
           C(  9) =-0.30903926D-01
          EX( 10) = 0.12937635D+02
           C( 10) = 0.00000000D+00
          EX( 11) = 0.20912228D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.23287149D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.39111759D+00
           C( 13) = 0.00000000D+00
          EX( 14) = 0.17036963D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.10770888D+06
           C( 15) = 0.67470711D-02
          EX( 16) = 0.10399607D+05
           C( 16) = 0.44806201D-01
          EX( 17) = 0.19404781D+04
           C( 17) = 0.16323632D+00
          EX( 18) = 0.48742102D+03
           C( 18) = 0.21342677D+00
          EX( 19) = 0.82660347D+03
           C( 19) = 0.90270075D-01
          EX( 20) = 0.89430741D+02
           C( 20) =-0.62687565D+00
          EX( 21) = 0.38602050D+02
           C( 21) =-0.48845307D+00
          EX( 22) = 0.75054925D+02
           C( 22) = 0.54389045D-02
          EX( 23) = 0.10924494D+02
           C( 23) =-0.22657806D-01
          EX( 24) = 0.12937635D+02
           C( 24) =-0.12421244D-02
          EX( 25) = 0.20912228D+01
           C( 25) = 0.35655542D-02
          EX( 26) = 0.23287149D+01
           C( 26) = 0.00000000D+00
          EX( 27) = 0.39111759D+00
           C( 27) = 0.00000000D+00
          EX( 28) = 0.17036963D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.10770888D+06
           C( 29) = 0.31108602D-02
          EX( 30) = 0.10399607D+05
           C( 30) = 0.20658717D-01
          EX( 31) = 0.19404781D+04
           C( 31) = 0.75263082D-01
          EX( 32) = 0.48742102D+03
           C( 32) = 0.98404304D-01
          EX( 33) = 0.82660347D+03
           C( 33) = 0.47682574D-01
          EX( 34) = 0.89430741D+02
           C( 34) =-0.33112905D+00
          EX( 35) = 0.38602050D+02
           C( 35) =-0.25801130D+00
          EX( 36) = 0.75054925D+02
           C( 36) =-0.29362483D+00
          EX( 37) = 0.10924494D+02
           C( 37) = 0.12232048D+01
          EX( 38) = 0.12937635D+02
           C( 38) =-0.30841354D-01
          EX( 39) = 0.20912228D+01
           C( 39) = 0.88531007D-01
          EX( 40) = 0.23287149D+01
           C( 40) = 0.91398345D-02
          EX( 41) = 0.39111759D+00
           C( 41) =-0.20394943D-01
          EX( 42) = 0.17036963D+00
           C( 42) =-0.57086916D-02
          EX( 43) = 0.10770888D+06
           C( 43) = 0.14171813D-02
          EX( 44) = 0.10399607D+05
           C( 44) = 0.94112705D-02
          EX( 45) = 0.19404781D+04
           C( 45) = 0.34286797D-01
          EX( 46) = 0.48742102D+03
           C( 46) = 0.44828997D-01
          EX( 47) = 0.82660347D+03
           C( 47) = 0.26224525D-01
          EX( 48) = 0.89430741D+02
           C( 48) =-0.18211480D+00
          EX( 49) = 0.38602050D+02
           C( 49) =-0.14190140D+00
          EX( 50) = 0.75054925D+02
           C( 50) =-0.16073710D+00
          EX( 51) = 0.10924494D+02
           C( 51) = 0.66961096D+00
          EX( 52) = 0.12937635D+02
           C( 52) = 0.44726840D+00
          EX( 53) = 0.20912228D+01
           C( 53) =-0.12838970D+01
          EX( 54) = 0.23287149D+01
           C( 54) = 0.18064279D-01
          EX( 55) = 0.39111759D+00
           C( 55) =-0.40309258D-01
          EX( 56) = 0.17036963D+00
           C( 56) =-0.11282852D-01
          EX( 57) = 0.10770888D+06
           C( 57) = 0.57074873D-03
          EX( 58) = 0.10399607D+05
           C( 58) = 0.37902495D-02
          EX( 59) = 0.19404781D+04
           C( 59) = 0.13808499D-01
          EX( 60) = 0.48742102D+03
           C( 60) = 0.18054213D-01
          EX( 61) = 0.82660347D+03
           C( 61) = 0.95414987D-02
          EX( 62) = 0.89430741D+02
           C( 62) =-0.66260423D-01
          EX( 63) = 0.38602050D+02
           C( 63) =-0.51629228D-01
          EX( 64) = 0.75054925D+02
           C( 64) =-0.77159226D-01
          EX( 65) = 0.10924494D+02
           C( 65) = 0.32143583D+00
          EX( 66) = 0.12937635D+02
           C( 66) = 0.20153446D+00
          EX( 67) = 0.20912228D+01
           C( 67) =-0.57851056D+00
          EX( 68) = 0.23287149D+01
           C( 68) =-0.44988889D+00
          EX( 69) = 0.39111759D+00
           C( 69) = 0.10038977D+01
          EX( 70) = 0.17036963D+00
           C( 70) = 0.28099819D+00
          EX( 71) = 0.27539348D+04
           C( 71) = 0.24382465D-01
          EX( 72) = 0.57398196D+03
           C( 72) = 0.16765863D+00
          EX( 73) = 0.17293089D+03
           C( 73) = 0.48721972D+00
          EX( 74) = 0.60340445D+02
           C( 74) = 0.45772768D+00
          EX( 75) = 0.26133931D+02
           C( 75) = 0.27147636D-01
          EX( 76) = 0.10118326D+02
           C( 76) = 0.33252566D-01
          EX( 77) = 0.40324457D+01
           C( 77) =-0.10490816D-01
          EX( 78) = 0.16332203D+01
           C( 78) =-0.90129259D-02
          EX( 79) = 0.54787174D+00
           C( 79) = 0.00000000D+00
          EX( 80) = 0.19586950D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.27539348D+04
           C( 81) = 0.12784094D-01
          EX( 82) = 0.57398196D+03
           C( 82) = 0.87905949D-01
          EX( 83) = 0.17293089D+03
           C( 83) = 0.25545664D+00
          EX( 84) = 0.60340445D+02
           C( 84) = 0.23999353D+00
          EX( 85) = 0.26133931D+02
           C( 85) =-0.51809688D+00
          EX( 86) = 0.10118326D+02
           C( 86) =-0.63460594D+00
          EX( 87) = 0.40324457D+01
           C( 87) =-0.28169430D-01
          EX( 88) = 0.16332203D+01
           C( 88) =-0.24201072D-01
          EX( 89) = 0.54787174D+00
           C( 89) = 0.71400491D-02
          EX( 90) = 0.19586950D+00
           C( 90) = 0.54420362D-02
          EX( 91) = 0.27539348D+04
           C( 91) = 0.59445702D-02
          EX( 92) = 0.57398196D+03
           C( 92) = 0.40876037D-01
          EX( 93) = 0.17293089D+03
           C( 93) = 0.11878667D+00
          EX( 94) = 0.60340445D+02
           C( 94) = 0.11159636D+00
          EX( 95) = 0.26133931D+02
           C( 95) =-0.35178381D+00
          EX( 96) = 0.10118326D+02
           C( 96) =-0.43089257D+00
          EX( 97) = 0.40324457D+01
           C( 97) = 0.66939074D+00
          EX( 98) = 0.16332203D+01
           C( 98) = 0.57509054D+00
          EX( 99) = 0.54787174D+00
           C( 99) = 0.12480442D-01
          EX(100) = 0.19586950D+00
           C(100) = 0.95124017D-02
          EX(101) = 0.27125250D+03
           C(101) = 0.43426539D-01
          EX(102) = 0.74400129D+02
           C(102) = 0.25100979D+00
          EX(103) = 0.25891870D+02
           C(103) = 0.54082175D+00
          EX(104) = 0.96650315D+01
           C(104) = 0.36430558D+00
          EX(105) = 0.75103406D+01
           C(105) = 0.73878867D-02
          EX(106) = 0.28416905D+01
           C(106) = 0.16197783D-01
          EX(107) = 0.10441396D+01
           C(107) = 0.80394159D-02
          EX(108) = 0.27125250D+03
           C(108) = 0.19428623D-01
          EX(109) = 0.74400129D+02
           C(109) = 0.11229940D+00
          EX(110) = 0.25891870D+02
           C(110) = 0.24195854D+00
          EX(111) = 0.96650315D+01
           C(111) = 0.16298687D+00
          EX(112) = 0.75103406D+01
           C(112) =-0.29441913D+00
          EX(113) = 0.28416905D+01
           C(113) =-0.64550762D+00
          EX(114) = 0.10441396D+01
           C(114) =-0.32038361D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.81) THEN
        ITYP(1)=121
        ITYP(2)=122
C ---
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : TL/QR             CONFIGURATION : S2P1D10      *
C   VALENCE : (6S/6P/5D)        BASIS SET     : ( 9/ 8/ 7)   *
C          EFFECTIVE CORE CHARGE : 13.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -50.88683106 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =  -.448674 A.U. <REFERENCE =  -.448970>
C  ***     ORBITAL ENERGY( 6P ) =  -.185893 A.U. <REFERENCE =  -.185834>
C  ***     ORBITAL ENERGY( 5D ) =  -.842538 A.U. <REFERENCE =  -.842766>
C
C  ***     ORBITAL ENERGY DEV. =    .00058     DENSITY DEV. =    .01736
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 13.0D+00
          SHINFO='6S/6P/5D'
          NOSH= 3
          CDFCTR(1)='81'
          CDFCTR(2)='71'
          CDFCTR(3)='7'
             KNG(1)= 9
            KTYP(1)= 1
             KNG(2)= 8
            KTYP(2)= 2
             KNG(3)= 7
            KTYP(3)= 3
          EX( 1)= 0.49862962D+04
           C( 1)= 0.14602038D-01
          EX( 2)= 0.15458440D+03
           C( 2)=-0.74777062D-01
          EX( 3)= 0.34497777D+02
           C( 3)= 0.20372842D+00
          EX( 4)= 0.66309535D+01
           C( 4)=-0.44783018D+00
          EX( 5)= 0.16780191D+01
           C( 5)= 0.44818122D+00
          EX( 6)= 0.86195116D+00
           C( 6)= 0.41591142D+00
          EX( 7)= 0.24500891D+00
           C( 7)=-0.44962984D+00
          EX( 8)= 0.11426343D+00
           C( 8)=-0.60174493D+00
          EX( 9)= 0.49152594D-01
           C( 9)=-0.21301939D+00
          EX(10)= 0.56348106D+03
           C(10)= 0.10416085D-01
          EX(11)= 0.42422571D+02
           C(11)=-0.44753275D-01
          EX(12)= 0.89975694D+01
           C(12)= 0.11873252D+00
          EX(13)= 0.16260951D+01
           C(13)=-0.20137946D+00
          EX(14)= 0.85976666D+00
           C(14)=-0.80737105D-01
          EX(15)= 0.18465448D+00
           C(15)= 0.35643888D+00
          EX(16)= 0.71097354D-01
           C(16)= 0.54681188D+00
          EX(17)= 0.27899269D-01
           C(17)= 0.24207633D+00
          EX(18)= 0.31358598D+03
           C(18)= 0.25339010D-01
          EX(19)= 0.84045282D+02
           C(19)= 0.10560821D+00
          EX(20)= 0.14102816D+02
           C(20)=-0.10409944D+00
          EX(21)= 0.87992682D+01
           C(21)=-0.22598258D+00
          EX(22)= 0.16654697D+01
           C(22)= 0.49602270D+00
          EX(23)= 0.65292509D+00
           C(23)= 0.49727494D+00
          EX(24)= 0.23268302D+00
           C(24)= 0.17429536D+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.28177997D+01
          ALPN0( 1)= 0.32982444D+03
            AN0( 2)= 0.13062039D+01
          ALPN0( 2)= 0.62145745D+01
            AN0( 3)= 0.55079420D+00
          ALPN0( 3)= 0.31819967D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.50930228D+03
          ALPN1( 1)= 0.65622513D+04
            AN1( 2)= 0.19127963D+02
          ALPN1( 2)= 0.69032562D+02
            AN1( 3)= 0.22006997D+00
          ALPN1( 3)= 0.10524769D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     = 12
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.63465857D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.11418426D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.27765398D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.64771280D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.11261664D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.98603038D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.23193078D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.49474620D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.68953568D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.18255623D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.30828020D+02
          KTYP(12) =  4
           KNG(12) =  5
          BPAR(12) = 0.10206321D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.50367128D+06
           C(  1) = 0.19578312D-01
          EX(  2) = 0.38564869D+05
           C(  2) = 0.10866269D+00
          EX(  3) = 0.59043813D+04
           C(  3) = 0.39910825D+00
          EX(  4) = 0.12892488D+04
           C(  4) = 0.60323737D+00
          EX(  5) = 0.25363570D+04
           C(  5) =-0.47961719D-02
          EX(  6) = 0.25583200D+03
           C(  6) = 0.38650441D-01
          EX(  7) = 0.11049033D+03
           C(  7) = 0.47581627D-01
          EX(  8) = 0.19429043D+03
           C(  8) = 0.10043808D-01
          EX(  9) = 0.32445882D+02
           C(  9) =-0.35398347D-01
          EX( 10) = 0.13272266D+02
           C( 10) =-0.89192084D-02
          EX( 11) = 0.78670139D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.34105517D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.14893702D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.59946286D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.50367128D+06
           C( 15) = 0.80761275D-02
          EX( 16) = 0.38564869D+05
           C( 16) = 0.44823767D-01
          EX( 17) = 0.59043813D+04
           C( 17) = 0.16463366D+00
          EX( 18) = 0.12892488D+04
           C( 18) = 0.24883769D+00
          EX( 19) = 0.25363570D+04
           C( 19) = 0.61611198D-01
          EX( 20) = 0.25583200D+03
           C( 20) =-0.49650013D+00
          EX( 21) = 0.11049033D+03
           C( 21) =-0.61122935D+00
          EX( 22) = 0.19429043D+03
           C( 22) = 0.10782981D-01
          EX( 23) = 0.32445882D+02
           C( 23) =-0.38003484D-01
          EX( 24) = 0.13272266D+02
           C( 24) =-0.95756166D-02
          EX( 25) = 0.78670139D+01
           C( 25) = 0.10123486D-01
          EX( 26) = 0.34105517D+01
           C( 26) = 0.24600035D-02
          EX( 27) = 0.14893702D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.59946286D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.50367128D+06
           C( 29) = 0.39021046D-02
          EX( 30) = 0.38564869D+05
           C( 30) = 0.21657289D-01
          EX( 31) = 0.59043813D+04
           C( 31) = 0.79545270D-01
          EX( 32) = 0.12892488D+04
           C( 32) = 0.12022973D+00
          EX( 33) = 0.25363570D+04
           C( 33) = 0.35458117D-01
          EX( 34) = 0.25583200D+03
           C( 34) =-0.28574285D+00
          EX( 35) = 0.11049033D+03
           C( 35) =-0.35177114D+00
          EX( 36) = 0.19429043D+03
           C( 36) =-0.29994049D+00
          EX( 37) = 0.32445882D+02
           C( 37) = 0.10571086D+01
          EX( 38) = 0.13272266D+02
           C( 38) = 0.26635630D+00
          EX( 39) = 0.78670139D+01
           C( 39) =-0.19008478D-01
          EX( 40) = 0.34105517D+01
           C( 40) =-0.46190537D-02
          EX( 41) = 0.14893702D+01
           C( 41) = 0.33662588D-02
          EX( 42) = 0.59946286D+00
           C( 42) = 0.80006171D-03
          EX( 43) = 0.50367128D+06
           C( 43) = 0.20858253D-02
          EX( 44) = 0.38564869D+05
           C( 44) = 0.11576656D-01
          EX( 45) = 0.59043813D+04
           C( 45) = 0.42520012D-01
          EX( 46) = 0.12892488D+04
           C( 46) = 0.64267426D-01
          EX( 47) = 0.25363570D+04
           C( 47) = 0.10717249D-01
          EX( 48) = 0.25583200D+03
           C( 48) =-0.86366043D-01
          EX( 49) = 0.11049033D+03
           C( 49) =-0.10632315D+00
          EX( 50) = 0.19429043D+03
           C( 50) =-0.32971395D+00
          EX( 51) = 0.32445882D+02
           C( 51) = 0.11620421D+01
          EX( 52) = 0.13272266D+02
           C( 52) = 0.29279605D+00
          EX( 53) = 0.78670139D+01
           C( 53) =-0.12922175D+01
          EX( 54) = 0.34105517D+01
           C( 54) =-0.31400841D+00
          EX( 55) = 0.14893702D+01
           C( 55) = 0.18340612D-02
          EX( 56) = 0.59946286D+00
           C( 56) = 0.43590295D-03
          EX( 57) = 0.50367128D+06
           C( 57) = 0.95219535D-03
          EX( 58) = 0.38564869D+05
           C( 58) = 0.52848327D-02
          EX( 59) = 0.59043813D+04
           C( 59) = 0.19410715D-01
          EX( 60) = 0.12892488D+04
           C( 60) = 0.29338577D-01
          EX( 61) = 0.25363570D+04
           C( 61) = 0.31023555D-02
          EX( 62) = 0.25583200D+03
           C( 62) =-0.25000649D-01
          EX( 63) = 0.11049033D+03
           C( 63) =-0.30777697D-01
          EX( 64) = 0.19429043D+03
           C( 64) =-0.18016253D+00
          EX( 65) = 0.32445882D+02
           C( 65) = 0.63496391D+00
          EX( 66) = 0.13272266D+02
           C( 66) = 0.15998983D+00
          EX( 67) = 0.78670139D+01
           C( 67) =-0.11947574D+01
          EX( 68) = 0.34105517D+01
           C( 68) =-0.29032562D+00
          EX( 69) = 0.14893702D+01
           C( 69) = 0.11877200D+01
          EX( 70) = 0.59946286D+00
           C( 70) = 0.28228646D+00
          EX( 71) = 0.77311134D+04
           C( 71) = 0.22671751D-01
          EX( 72) = 0.15075063D+04
           C( 72) = 0.15429492D+00
          EX( 73) = 0.43766971D+03
           C( 73) = 0.47205594D+00
          EX( 74) = 0.15021225D+03
           C( 74) = 0.48162052D+00
          EX( 75) = 0.68406855D+02
           C( 75) = 0.31631581D-01
          EX( 76) = 0.27197512D+02
           C( 76) = 0.39594888D-01
          EX( 77) = 0.12210305D+02
           C( 77) =-0.10259115D-01
          EX( 78) = 0.50951061D+01
           C( 78) =-0.90790699D-02
          EX( 79) = 0.19591239D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.71582421D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.77311134D+04
           C( 81) = 0.12769436D-01
          EX( 82) = 0.15075063D+04
           C( 82) = 0.86903707D-01
          EX( 83) = 0.43766971D+03
           C( 83) = 0.26587660D+00
          EX( 84) = 0.15021225D+03
           C( 84) = 0.27126368D+00
          EX( 85) = 0.68406855D+02
           C( 85) =-0.51481853D+00
          EX( 86) = 0.27197512D+02
           C( 86) =-0.64442501D+00
          EX( 87) = 0.12210305D+02
           C( 87) =-0.32516554D-01
          EX( 88) = 0.50951061D+01
           C( 88) =-0.28776367D-01
          EX( 89) = 0.19591239D+01
           C( 89) = 0.80049600D-02
          EX( 90) = 0.71582421D+00
           C( 90) = 0.52609240D-02
          EX( 91) = 0.77311134D+04
           C( 91) = 0.65190479D-02
          EX( 92) = 0.15075063D+04
           C( 92) = 0.44366050D-01
          EX( 93) = 0.43766971D+03
           C( 93) = 0.13573523D+00
          EX( 94) = 0.15021225D+03
           C( 94) = 0.13848543D+00
          EX( 95) = 0.68406855D+02
           C( 95) =-0.40044835D+00
          EX( 96) = 0.27197512D+02
           C( 96) =-0.50126194D+00
          EX( 97) = 0.12210305D+02
           C( 97) = 0.68628691D+00
          EX( 98) = 0.50951061D+01
           C( 98) = 0.60734739D+00
          EX( 99) = 0.19591239D+01
           C( 99) = 0.14724717D-01
          EX(100) = 0.71582421D+00
           C(100) = 0.96772021D-02
          EX(101) = 0.77311134D+04
           C(101) = 0.26971494D-02
          EX(102) = 0.15075063D+04
           C(102) = 0.18355728D-01
          EX(103) = 0.43766971D+03
           C(103) = 0.56158230D-01
          EX(104) = 0.15021225D+03
           C(104) = 0.57296082D-01
          EX(105) = 0.68406855D+02
           C(105) =-0.18152644D+00
          EX(106) = 0.27197512D+02
           C(106) =-0.22722605D+00
          EX(107) = 0.12210305D+02
           C(107) = 0.44992096D+00
          EX(108) = 0.50951061D+01
           C(108) = 0.39816923D+00
          EX(109) = 0.19591239D+01
           C(109) =-0.76754897D+00
          EX(110) = 0.71582421D+00
           C(110) =-0.50443935D+00
          EX(111) = 0.74810429D+03
           C(111) = 0.35871564D-01
          EX(112) = 0.20536768D+03
           C(112) = 0.22423450D+00
          EX(113) = 0.73053378D+02
           C(113) = 0.53048047D+00
          EX(114) = 0.28298216D+02
           C(114) = 0.38264176D+00
          EX(115) = 0.24980187D+02
           C(115) = 0.98351617D-02
          EX(116) = 0.10291723D+02
           C(116) = 0.24179781D-01
          EX(117) = 0.41695952D+01
           C(117) = 0.14117658D-01
          EX(118) = 0.25282115D+01
           C(118) =-0.30034285D-02
          EX(119) = 0.90974970D+00
           C(119) =-0.49927842D-02
          EX(120) = 0.29823315D+00
           C(120) =-0.23737007D-02
          EX(121) = 0.74810429D+03
           C(121) = 0.19212765D-01
          EX(122) = 0.20536768D+03
           C(122) = 0.12009973D+00
          EX(123) = 0.73053378D+02
           C(123) = 0.28412469D+00
          EX(124) = 0.28298216D+02
           C(124) = 0.20494245D+00
          EX(125) = 0.24980187D+02
           C(125) =-0.25840863D+00
          EX(126) = 0.10291723D+02
           C(126) =-0.63529852D+00
          EX(127) = 0.41695952D+01
           C(127) =-0.37092676D+00
          EX(128) = 0.25282115D+01
           C(128) =-0.58027818D-02
          EX(129) = 0.90974970D+00
           C(129) =-0.96463214D-02
          EX(130) = 0.29823315D+00
           C(130) =-0.45861145D-02
          EX(131) = 0.12729940D+03
           C(131) = 0.42117756D-01
          EX(132) = 0.39991409D+02
           C(132) = 0.21737660D+00
          EX(133) = 0.15112317D+02
           C(133) = 0.45272662D+00
          EX(134) = 0.58606378D+01
           C(134) = 0.44535318D+00
          EX(135) = 0.21061954D+01
           C(135) = 0.16687681D+00
          RETURN
          END IF
C ---
        ELSE IF (MMPTYP.EQ.121) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : TL/QR             CONFIGURATION : S02P01       *
C   VALENCE : (6S/6P)           BASIS SET     : ( 7/ 5)      *
C          EFFECTIVE CORE CHARGE :  3.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -1.933830 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =    -.4490   A.U.
C  ***     ORBITAL ENERGY( 6P ) =    -.1854   A.U.
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE -  3.0D+00
          SHINFO='6S/6P'
          NOSH= 2
          CDFCTR(1)='61'
          CDFCTR(2)='41'
             KNG(1)= 7
            KTYP(1)= 1
             KNG(2)= 5
            KTYP(2)= 2
          EX( 1)= 0.18042470D+03
           C( 1)=-0.20633145D-01
          EX( 2)= 0.31998200D+02
           C( 2)= 0.98619270D-01
          EX( 3)= 0.68240820D+01
           C( 3)=-0.26224690D+00
          EX( 4)= 0.18015198D+01
           C( 4)=-0.10269242D+00
          EX( 5)= 0.10762894D+01
           C( 5)= 0.81958016D+00
          EX( 6)= 0.17280333D+00
           C( 6)=-0.88749299D+00
          EX( 7)= 0.64015090D-01
           C( 7)=-0.35978515D+00
          EX( 8)= 0.45729584D+02
           C( 8)=-0.19650896D-01
          EX( 9)= 0.89909510D+01
           C( 9)= 0.78919026D-01
          EX(10)= 0.14281500D+01
           C(10)=-0.23307331D+00
          EX(11)= 0.13574690D+00
           C(11)= 0.60933666D+00
          EX(12)= 0.41048120D-01
           C(12)= 0.50713524D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE -  3.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.74241900D+01
          ALPN0( 1)= 0.49572300D+03
            AN0( 2)= 0.70641400D+01
          ALPN0( 2)= 0.59409700D+01
            AN0( 3)= 0.34751600D+01
          ALPN0( 3)= 0.19013900D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.11069640D+04
          ALPN1( 1)= 0.42618300D+05
            AN1( 2)= 0.11699400D+03
          ALPN1( 2)= 0.13599400D+03
            AN1( 3)= 0.17519700D+01
          ALPN1( 3)= 0.65308000D+00
C         --- CORE-SHELL INFORMATION 
          NOSH     = 13
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.57119274D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.10276596D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.24988860D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.58294260D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.10135476D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.88742700D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.20873700D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.44527140D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.62057880D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.16430094D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.27745308D+02
          KTYP(12) =  3
           KNG(12) = 10
          BPAR(12) = 0.15169624D+01
          KTYP(13) =  4
           KNG(13) =  4
          BPAR(13) = 0.91858910D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.50367128D+06
           C(  1) = 0.19578312D-01
          EX(  2) = 0.38564869D+05
           C(  2) = 0.10866269D+00
          EX(  3) = 0.59043813D+04
           C(  3) = 0.39910825D+00
          EX(  4) = 0.12892488D+04
           C(  4) = 0.60323737D+00
          EX(  5) = 0.25363570D+04
           C(  5) =-0.47961719D-02
          EX(  6) = 0.25583200D+03
           C(  6) = 0.38650441D-01
          EX(  7) = 0.11049033D+03
           C(  7) = 0.47581627D-01
          EX(  8) = 0.19429043D+03
           C(  8) = 0.10043808D-01
          EX(  9) = 0.32445882D+02
           C(  9) =-0.35398347D-01
          EX( 10) = 0.13272266D+02
           C( 10) =-0.89192084D-02
          EX( 11) = 0.78670139D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.34105517D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.14893702D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.59946286D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.50367128D+06
           C( 15) = 0.80761275D-02
          EX( 16) = 0.38564869D+05
           C( 16) = 0.44823767D-01
          EX( 17) = 0.59043813D+04
           C( 17) = 0.16463366D+00
          EX( 18) = 0.12892488D+04
           C( 18) = 0.24883769D+00
          EX( 19) = 0.25363570D+04
           C( 19) = 0.61611198D-01
          EX( 20) = 0.25583200D+03
           C( 20) =-0.49650013D+00
          EX( 21) = 0.11049033D+03
           C( 21) =-0.61122935D+00
          EX( 22) = 0.19429043D+03
           C( 22) = 0.10782981D-01
          EX( 23) = 0.32445882D+02
           C( 23) =-0.38003484D-01
          EX( 24) = 0.13272266D+02
           C( 24) =-0.95756166D-02
          EX( 25) = 0.78670139D+01
           C( 25) = 0.10123486D-01
          EX( 26) = 0.34105517D+01
           C( 26) = 0.24600035D-02
          EX( 27) = 0.14893702D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.59946286D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.50367128D+06
           C( 29) = 0.39021045D-02
          EX( 30) = 0.38564869D+05
           C( 30) = 0.21657289D-01
          EX( 31) = 0.59043813D+04
           C( 31) = 0.79545269D-01
          EX( 32) = 0.12892488D+04
           C( 32) = 0.12022973D+00
          EX( 33) = 0.25363570D+04
           C( 33) = 0.35458116D-01
          EX( 34) = 0.25583200D+03
           C( 34) =-0.28574284D+00
          EX( 35) = 0.11049033D+03
           C( 35) =-0.35177113D+00
          EX( 36) = 0.19429043D+03
           C( 36) =-0.29994048D+00
          EX( 37) = 0.32445882D+02
           C( 37) = 0.10571086D+01
          EX( 38) = 0.13272266D+02
           C( 38) = 0.26635630D+00
          EX( 39) = 0.78670139D+01
           C( 39) =-0.19008478D-01
          EX( 40) = 0.34105517D+01
           C( 40) =-0.46190536D-02
          EX( 41) = 0.14893702D+01
           C( 41) = 0.33662587D-02
          EX( 42) = 0.59946286D+00
           C( 42) = 0.80006170D-03
          EX( 43) = 0.50367128D+06
           C( 43) = 0.20858253D-02
          EX( 44) = 0.38564869D+05
           C( 44) = 0.11576656D-01
          EX( 45) = 0.59043813D+04
           C( 45) = 0.42520012D-01
          EX( 46) = 0.12892488D+04
           C( 46) = 0.64267427D-01
          EX( 47) = 0.25363570D+04
           C( 47) = 0.10717249D-01
          EX( 48) = 0.25583200D+03
           C( 48) =-0.86366044D-01
          EX( 49) = 0.11049033D+03
           C( 49) =-0.10632315D+00
          EX( 50) = 0.19429043D+03
           C( 50) =-0.32971395D+00
          EX( 51) = 0.32445882D+02
           C( 51) = 0.11620421D+01
          EX( 52) = 0.13272266D+02
           C( 52) = 0.29279605D+00
          EX( 53) = 0.78670139D+01
           C( 53) =-0.12922175D+01
          EX( 54) = 0.34105517D+01
           C( 54) =-0.31400841D+00
          EX( 55) = 0.14893702D+01
           C( 55) = 0.18340612D-02
          EX( 56) = 0.59946286D+00
           C( 56) = 0.43590295D-03
          EX( 57) = 0.50367128D+06
           C( 57) = 0.95219536D-03
          EX( 58) = 0.38564869D+05
           C( 58) = 0.52848327D-02
          EX( 59) = 0.59043813D+04
           C( 59) = 0.19410715D-01
          EX( 60) = 0.12892488D+04
           C( 60) = 0.29338577D-01
          EX( 61) = 0.25363570D+04
           C( 61) = 0.31023555D-02
          EX( 62) = 0.25583200D+03
           C( 62) =-0.25000649D-01
          EX( 63) = 0.11049033D+03
           C( 63) =-0.30777697D-01
          EX( 64) = 0.19429043D+03
           C( 64) =-0.18016253D+00
          EX( 65) = 0.32445882D+02
           C( 65) = 0.63496392D+00
          EX( 66) = 0.13272266D+02
           C( 66) = 0.15998983D+00
          EX( 67) = 0.78670139D+01
           C( 67) =-0.11947574D+01
          EX( 68) = 0.34105517D+01
           C( 68) =-0.29032562D+00
          EX( 69) = 0.14893702D+01
           C( 69) = 0.11877200D+01
          EX( 70) = 0.59946286D+00
           C( 70) = 0.28228646D+00
          EX( 71) = 0.77311134D+04
           C( 71) = 0.22671751D-01
          EX( 72) = 0.15075063D+04
           C( 72) = 0.15429492D+00
          EX( 73) = 0.43766971D+03
           C( 73) = 0.47205594D+00
          EX( 74) = 0.15021225D+03
           C( 74) = 0.48162052D+00
          EX( 75) = 0.68406855D+02
           C( 75) = 0.31631581D-01
          EX( 76) = 0.27197512D+02
           C( 76) = 0.39594888D-01
          EX( 77) = 0.12210305D+02
           C( 77) =-0.10259115D-01
          EX( 78) = 0.50951061D+01
           C( 78) =-0.90790699D-02
          EX( 79) = 0.19591239D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.71582421D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.77311134D+04
           C( 81) = 0.12769436D-01
          EX( 82) = 0.15075063D+04
           C( 82) = 0.86903707D-01
          EX( 83) = 0.43766971D+03
           C( 83) = 0.26587660D+00
          EX( 84) = 0.15021225D+03
           C( 84) = 0.27126368D+00
          EX( 85) = 0.68406855D+02
           C( 85) =-0.51481853D+00
          EX( 86) = 0.27197512D+02
           C( 86) =-0.64442501D+00
          EX( 87) = 0.12210305D+02
           C( 87) =-0.32516554D-01
          EX( 88) = 0.50951061D+01
           C( 88) =-0.28776367D-01
          EX( 89) = 0.19591239D+01
           C( 89) = 0.80049600D-02
          EX( 90) = 0.71582421D+00
           C( 90) = 0.52609240D-02
          EX( 91) = 0.77311134D+04
           C( 91) = 0.65190479D-02
          EX( 92) = 0.15075063D+04
           C( 92) = 0.44366050D-01
          EX( 93) = 0.43766971D+03
           C( 93) = 0.13573523D+00
          EX( 94) = 0.15021225D+03
           C( 94) = 0.13848543D+00
          EX( 95) = 0.68406855D+02
           C( 95) =-0.40044835D+00
          EX( 96) = 0.27197512D+02
           C( 96) =-0.50126194D+00
          EX( 97) = 0.12210305D+02
           C( 97) = 0.68628691D+00
          EX( 98) = 0.50951061D+01
           C( 98) = 0.60734739D+00
          EX( 99) = 0.19591239D+01
           C( 99) = 0.14724717D-01
          EX(100) = 0.71582421D+00
           C(100) = 0.96772020D-02
          EX(101) = 0.77311134D+04
           C(101) = 0.26971494D-02
          EX(102) = 0.15075063D+04
           C(102) = 0.18355728D-01
          EX(103) = 0.43766971D+03
           C(103) = 0.56158230D-01
          EX(104) = 0.15021225D+03
           C(104) = 0.57296082D-01
          EX(105) = 0.68406855D+02
           C(105) =-0.18152644D+00
          EX(106) = 0.27197512D+02
           C(106) =-0.22722605D+00
          EX(107) = 0.12210305D+02
           C(107) = 0.44992096D+00
          EX(108) = 0.50951061D+01
           C(108) = 0.39816923D+00
          EX(109) = 0.19591239D+01
           C(109) =-0.76754897D+00
          EX(110) = 0.71582421D+00
           C(110) =-0.50443935D+00
          EX(111) = 0.74810429D+03
           C(111) = 0.35871564D-01
          EX(112) = 0.20536768D+03
           C(112) = 0.22423450D+00
          EX(113) = 0.73053378D+02
           C(113) = 0.53048047D+00
          EX(114) = 0.28298216D+02
           C(114) = 0.38264176D+00
          EX(115) = 0.24980187D+02
           C(115) = 0.98351617D-02
          EX(116) = 0.10291723D+02
           C(116) = 0.24179781D-01
          EX(117) = 0.41695952D+01
           C(117) = 0.14117658D-01
          EX(118) = 0.25282115D+01
           C(118) =-0.30034285D-02
          EX(119) = 0.90974970D+00
           C(119) =-0.49927842D-02
          EX(120) = 0.29823315D+00
           C(120) =-0.23737007D-02
          EX(121) = 0.74810429D+03
           C(121) = 0.19212765D-01
          EX(122) = 0.20536768D+03
           C(122) = 0.12009973D+00
          EX(123) = 0.73053378D+02
           C(123) = 0.28412469D+00
          EX(124) = 0.28298216D+02
           C(124) = 0.20494245D+00
          EX(125) = 0.24980187D+02
           C(125) =-0.25840863D+00
          EX(126) = 0.10291723D+02
           C(126) =-0.63529852D+00
          EX(127) = 0.41695952D+01
           C(127) =-0.37092676D+00
          EX(128) = 0.25282115D+01
           C(128) =-0.58027818D-02
          EX(129) = 0.90974970D+00
           C(129) =-0.96463215D-02
          EX(130) = 0.29823315D+00
           C(130) =-0.45861145D-02
          EX(131) = 0.74810429D+03
           C(131) = 0.62634032D-02
          EX(132) = 0.20536768D+03
           C(132) = 0.39152770D-01
          EX(133) = 0.73053378D+02
           C(133) = 0.92625264D-01
          EX(134) = 0.28298216D+02
           C(134) = 0.66811685D-01
          EX(135) = 0.24980187D+02
           C(135) =-0.10398987D+00
          EX(136) = 0.10291723D+02
           C(136) =-0.25565947D+00
          EX(137) = 0.41695952D+01
           C(137) =-0.14926989D+00
          EX(138) = 0.25282115D+01
           C(138) = 0.37025307D+00
          EX(139) = 0.90974970D+00
           C(139) = 0.61549448D+00
          EX(140) = 0.29823315D+00
           C(140) = 0.29262224D+00
          EX(141) = 0.85916517D+02
           C(141) = 0.90910240D-01
          EX(142) = 0.25638657D+02
           C(142) = 0.37520195D+00
          EX(143) = 0.88011423D+01
           C(143) = 0.55500986D+00
          EX(144) = 0.28907985D+01
           C(144) = 0.29346807D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.82) THEN
        ITYP(1)=121
        ITYP(2)=122
C ---
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : PB/QR             CONFIGURATION : S2P2D10      *
C   VALENCE : (6S/6P/5D)        BASIS SET     : ( 9/ 8/ 7)   *
C          EFFECTIVE CORE CHARGE : 14.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -60.77564733 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =  -.563262 A.U. <REFERENCE =  -.563481>
C  ***     ORBITAL ENERGY( 6P ) =  -.251522 A.U. <REFERENCE =  -.251189>
C  ***     ORBITAL ENERGY( 5D ) = -1.075211 A.U. <REFERENCE = -1.075288>
C
C  ***     ORBITAL ENERGY DEV. =    .00063     DENSITY DEV. =    .01726
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 14.0D+00
          SHINFO='6S/6P/5D'
          NOSH= 3
          CDFCTR(1)='81'
          CDFCTR(2)='71'
          CDFCTR(3)='7'
             KNG(1)= 9
            KTYP(1)= 1
             KNG(2)= 8
            KTYP(2)= 2
             KNG(3)= 7
            KTYP(3)= 3
          EX( 1)= 0.52182535D+04
           C( 1)= 0.19191303D-01
          EX( 2)= 0.15991536D+03
           C( 2)=-0.86418890D-01
          EX( 3)= 0.35720899D+02
           C( 3)= 0.22863322D+00
          EX( 4)= 0.69038554D+01
           C( 4)=-0.49044723D+00
          EX( 5)= 0.18098902D+01
           C( 5)= 0.45437425D+00
          EX( 6)= 0.97030586D+00
           C( 6)= 0.47215473D+00
          EX( 7)= 0.26251959D+00
           C( 7)=-0.53593782D+00
          EX( 8)= 0.12580445D+00
           C( 8)=-0.56694738D+00
          EX( 9)= 0.56502225D-01
           C( 9)=-0.17699664D+00
          EX(10)= 0.58221444D+03
           C(10)= 0.13458091D-01
          EX(11)= 0.43742866D+02
           C(11)=-0.56442780D-01
          EX(12)= 0.93804188D+01
           C(12)= 0.14574758D+00
          EX(13)= 0.16890951D+01
           C(13)=-0.25798771D+00
          EX(14)= 0.84801315D+00
           C(14)=-0.88152553D-01
          EX(15)= 0.22514210D+00
           C(15)= 0.39420407D+00
          EX(16)= 0.92170945D-01
           C(16)= 0.54719108D+00
          EX(17)= 0.37505205D-01
           C(17)= 0.20585533D+00
          EX(18)= 0.32397353D+03
           C(18)= 0.27470209D-01
          EX(19)= 0.86873838D+02
           C(19)= 0.11884049D+00
          EX(20)= 0.14674774D+02
           C(20)=-0.12188661D+00
          EX(21)= 0.92098057D+01
           C(21)=-0.22690564D+00
          EX(22)= 0.17842047D+01
           C(22)= 0.50246896D+00
          EX(23)= 0.72224252D+00
           C(23)= 0.49116934D+00
          EX(24)= 0.26678258D+00
           C(24)= 0.16060479D+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.23182268D+01
          ALPN0( 1)= 0.33459419D+03
            AN0( 2)= 0.12606397D+01
          ALPN0( 2)= 0.75541560D+01
            AN0( 3)= 0.53871613D+00
          ALPN0( 3)= 0.32011534D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.49297687D+03
          ALPN1( 1)= 0.51175772D+04
            AN1( 2)= 0.17332241D+02
          ALPN1( 2)= 0.65831861D+02
            AN1( 3)= 0.19191764D+00
          ALPN1( 3)= 0.11191476D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     = 12
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.65312544D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.11802097D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.28850414D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.68169460D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.12310360D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.10166531D+04
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.24070348D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.52183100D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.76878416D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.18978712D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.32912140D+02
          KTYP(12) =  4
           KNG(12) =  5
          BPAR(12) = 0.11670822D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.53414413D+06
           C(  1) = 0.19744724D-01
          EX(  2) = 0.40591373D+05
           C(  2) = 0.10855196D+00
          EX(  3) = 0.61603313D+04
           C(  3) = 0.39797996D+00
          EX(  4) = 0.13359775D+04
           C(  4) = 0.60462083D+00
          EX(  5) = 0.26527561D+04
           C(  5) =-0.47718491D-02
          EX(  6) = 0.26701416D+03
           C(  6) = 0.38611092D-01
          EX(  7) = 0.11496889D+03
           C(  7) = 0.48917744D-01
          EX(  8) = 0.20149495D+03
           C(  8) = 0.10083605D-01
          EX(  9) = 0.33564517D+02
           C(  9) =-0.35668877D-01
          EX( 10) = 0.13740567D+02
           C( 10) =-0.90110493D-02
          EX( 11) = 0.81773799D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.35505983D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.15781730D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.64467664D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.53414413D+06
           C( 15) = 0.81714238D-02
          EX( 16) = 0.40591373D+05
           C( 16) = 0.44924615D-01
          EX( 17) = 0.61603313D+04
           C( 17) = 0.16470541D+00
          EX( 18) = 0.13359775D+04
           C( 18) = 0.25022447D+00
          EX( 19) = 0.26527561D+04
           C( 19) = 0.60373237D-01
          EX( 20) = 0.26701416D+03
           C( 20) =-0.48850593D+00
          EX( 21) = 0.11496889D+03
           C( 21) =-0.61890527D+00
          EX( 22) = 0.20149495D+03
           C( 22) = 0.11011825D-01
          EX( 23) = 0.33564517D+02
           C( 23) =-0.38952282D-01
          EX( 24) = 0.13740567D+02
           C( 24) =-0.98405378D-02
          EX( 25) = 0.81773799D+01
           C( 25) = 0.10427235D-01
          EX( 26) = 0.35505983D+01
           C( 26) = 0.25169782D-02
          EX( 27) = 0.15781730D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.64467664D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.53414413D+06
           C( 29) = 0.39524887D-02
          EX( 30) = 0.40591373D+05
           C( 30) = 0.21729877D-01
          EX( 31) = 0.61603313D+04
           C( 31) = 0.79667425D-01
          EX( 32) = 0.13359775D+04
           C( 32) = 0.12103269D+00
          EX( 33) = 0.26527561D+04
           C( 33) = 0.34824293D-01
          EX( 34) = 0.26701416D+03
           C( 34) =-0.28177840D+00
          EX( 35) = 0.11496889D+03
           C( 35) =-0.35699491D+00
          EX( 36) = 0.20149495D+03
           C( 36) =-0.29865255D+00
          EX( 37) = 0.33564517D+02
           C( 37) = 0.10564278D+01
          EX( 38) = 0.13740567D+02
           C( 38) = 0.26688598D+00
          EX( 39) = 0.81773799D+01
           C( 39) =-0.19272448D-01
          EX( 40) = 0.35505983D+01
           C( 40) =-0.46520801D-02
          EX( 41) = 0.15781730D+01
           C( 41) = 0.33395762D-02
          EX( 42) = 0.64467664D+00
           C( 42) = 0.77059078D-03
          EX( 43) = 0.53414413D+06
           C( 43) = 0.21163688D-02
          EX( 44) = 0.40591373D+05
           C( 44) = 0.11635311D-01
          EX( 45) = 0.61603313D+04
           C( 45) = 0.42658099D-01
          EX( 46) = 0.13359775D+04
           C( 46) = 0.64807220D-01
          EX( 47) = 0.26527561D+04
           C( 47) = 0.10573427D-01
          EX( 48) = 0.26701416D+03
           C( 48) =-0.85554167D-01
          EX( 49) = 0.11496889D+03
           C( 49) =-0.10839157D+00
          EX( 50) = 0.20149495D+03
           C( 50) =-0.32992733D+00
          EX( 51) = 0.33564517D+02
           C( 51) = 0.11670565D+01
          EX( 52) = 0.13740567D+02
           C( 52) = 0.29483418D+00
          EX( 53) = 0.81773799D+01
           C( 53) =-0.12981155D+01
          EX( 54) = 0.35505983D+01
           C( 54) =-0.31334563D+00
          EX( 55) = 0.15781730D+01
           C( 55) = 0.20735233D-02
          EX( 56) = 0.64467664D+00
           C( 56) = 0.47845531D-03
          EX( 57) = 0.53414413D+06
           C( 57) = 0.97786731D-03
          EX( 58) = 0.40591373D+05
           C( 58) = 0.53760904D-02
          EX( 59) = 0.61603313D+04
           C( 59) = 0.19710156D-01
          EX( 60) = 0.13359775D+04
           C( 60) = 0.29944148D-01
          EX( 61) = 0.26527561D+04
           C( 61) = 0.30863860D-02
          EX( 62) = 0.26701416D+03
           C( 62) =-0.24973283D-01
          EX( 63) = 0.11496889D+03
           C( 63) =-0.31639525D-01
          EX( 64) = 0.20149495D+03
           C( 64) =-0.18291753D+00
          EX( 65) = 0.33564517D+02
           C( 65) = 0.64703678D+00
          EX( 66) = 0.13740567D+02
           C( 66) = 0.16346128D+00
          EX( 67) = 0.81773799D+01
           C( 67) =-0.12219600D+01
          EX( 68) = 0.35505983D+01
           C( 68) =-0.29496282D+00
          EX( 69) = 0.15781730D+01
           C( 69) = 0.12058393D+01
          EX( 70) = 0.64467664D+00
           C( 70) = 0.27824149D+00
          EX( 71) = 0.80219981D+04
           C( 71) = 0.22643506D-01
          EX( 72) = 0.15593227D+04
           C( 72) = 0.15391339D+00
          EX( 73) = 0.45183660D+03
           C( 73) = 0.47157352D+00
          EX( 74) = 0.15490290D+03
           C( 74) = 0.48240372D+00
          EX( 75) = 0.70817147D+02
           C( 75) = 0.31635889D-01
          EX( 76) = 0.28210503D+02
           C( 76) = 0.39948875D-01
          EX( 77) = 0.12677880D+02
           C( 77) =-0.10155072D-01
          EX( 78) = 0.53162241D+01
           C( 78) =-0.90554207D-02
          EX( 79) = 0.20787848D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.77554489D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.80219981D+04
           C( 81) = 0.12775722D-01
          EX( 82) = 0.15593227D+04
           C( 82) = 0.86839677D-01
          EX( 83) = 0.45183660D+03
           C( 83) = 0.26606711D+00
          EX( 84) = 0.15490290D+03
           C( 84) = 0.27217763D+00
          EX( 85) = 0.70817147D+02
           C( 85) =-0.51172578D+00
          EX( 86) = 0.28210503D+02
           C( 86) =-0.64619230D+00
          EX( 87) = 0.12677880D+02
           C( 87) =-0.33878415D-01
          EX( 88) = 0.53162241D+01
           C( 88) =-0.30209859D-01
          EX( 89) = 0.20787848D+01
           C( 89) = 0.90578672D-02
          EX( 90) = 0.77554489D+00
           C( 90) = 0.58987824D-02
          EX( 91) = 0.80219981D+04
           C( 91) = 0.65485847D-02
          EX( 92) = 0.15593227D+04
           C( 92) = 0.44512317D-01
          EX( 93) = 0.45183660D+03
           C( 93) = 0.13638078D+00
          EX( 94) = 0.15490290D+03
           C( 94) = 0.13951292D+00
          EX( 95) = 0.70817147D+02
           C( 95) =-0.40020626D+00
          EX( 96) = 0.28210503D+02
           C( 96) =-0.50536874D+00
          EX( 97) = 0.12677880D+02
           C( 97) = 0.68390644D+00
          EX( 98) = 0.53162241D+01
           C( 98) = 0.60984899D+00
          EX( 99) = 0.20787848D+01
           C( 99) = 0.15067227D-01
          EX(100) = 0.77554489D+00
           C(100) = 0.98122761D-02
          EX(101) = 0.80219981D+04
           C(101) = 0.27587398D-02
          EX(102) = 0.15593227D+04
           C(102) = 0.18751823D-01
          EX(103) = 0.45183660D+03
           C(103) = 0.57453498D-01
          EX(104) = 0.15490290D+03
           C(104) = 0.58772980D-01
          EX(105) = 0.70817147D+02
           C(105) =-0.18502767D+00
          EX(106) = 0.28210503D+02
           C(106) =-0.23364752D+00
          EX(107) = 0.12677880D+02
           C(107) = 0.45978059D+00
          EX(108) = 0.53162241D+01
           C(108) = 0.40999281D+00
          EX(109) = 0.20787848D+01
           C(109) =-0.77426316D+00
          EX(110) = 0.77554489D+00
           C(110) =-0.50422575D+00
          EX(111) = 0.77390876D+03
           C(111) = 0.35620562D-01
          EX(112) = 0.21236873D+03
           C(112) = 0.22315166D+00
          EX(113) = 0.75568226D+02
           C(113) = 0.52976513D+00
          EX(114) = 0.29299839D+02
           C(114) = 0.38376922D+00
          EX(115) = 0.26068784D+02
           C(115) = 0.98179371D-02
          EX(116) = 0.10798968D+02
           C(116) = 0.24502471D-01
          EX(117) = 0.44016874D+01
           C(117) = 0.14522829D-01
          EX(118) = 0.27356081D+01
           C(118) =-0.29458678D-02
          EX(119) = 0.10145627D+01
           C(119) =-0.49395983D-02
          EX(120) = 0.34590339D+00
           C(120) =-0.22352829D-02
          EX(121) = 0.77390876D+03
           C(121) = 0.19214310D-01
          EX(122) = 0.21236873D+03
           C(122) = 0.12037163D+00
          EX(123) = 0.75568226D+02
           C(123) = 0.28576393D+00
          EX(124) = 0.29299839D+02
           C(124) = 0.20701136D+00
          EX(125) = 0.26068784D+02
           C(125) =-0.25403140D+00
          EX(126) = 0.10798968D+02
           C(126) =-0.63398217D+00
          EX(127) = 0.44016874D+01
           C(127) =-0.37576679D+00
          EX(128) = 0.27356081D+01
           C(128) =-0.60755777D-02
          EX(129) = 0.10145627D+01
           C(129) =-0.10187460D-01
          EX(130) = 0.34590339D+00
           C(130) =-0.46100623D-02
          EX(131) = 0.13238094D+03
           C(131) = 0.42014473D-01
          EX(132) = 0.41785148D+02
           C(132) = 0.21670052D+00
          EX(133) = 0.15885221D+02
           C(133) = 0.45220376D+00
          EX(134) = 0.62164651D+01
           C(134) = 0.44441088D+00
          EX(135) = 0.22657900D+01
           C(135) = 0.16417017D+00
          RETURN
          END IF
C ---
        ELSE IF (MMPTYP.EQ.121) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : PB/QR             CONFIGURATION : S02P02       *
C   VALENCE : (6S/6P)           BASIS SET     : ( 7/ 5)      *
C          EFFECTIVE CORE CHARGE :  4.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -3.380756 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =    -.5635   A.U.
C  ***     ORBITAL ENERGY( 6P ) =    -.2511   A.U.
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE -  4.0D+00
          SHINFO='6S/6P'
          NOSH= 2
          CDFCTR(1)='61'
          CDFCTR(2)='41'
             KNG(1)= 7
            KTYP(1)= 1
             KNG(2)= 5
            KTYP(2)= 2
          EX( 1)= 0.18687131D+03
           C( 1)=-0.29097036D-01
          EX( 2)= 0.33084425D+02
           C( 2)= 0.13919323D+00
          EX( 3)= 0.71937958D+01
           C( 3)=-0.37075296D+00
          EX( 4)= 0.18076936D+01
           C( 4)= 0.90011052D-01
          EX( 5)= 0.11421535D+01
           C( 5)= 0.73933790D+00
          EX( 6)= 0.20121198D+00
           C( 6)=-0.91129678D+00
          EX( 7)= 0.76203590D-01
           C( 7)=-0.34798206D+00
          EX( 8)= 0.47210318D+02
           C( 8)=-0.27404544D-01
          EX( 9)= 0.93507806D+01
           C( 9)= 0.10835462D+00
          EX(10)= 0.15196692D+01
           C(10)=-0.30080382D+00
          EX(11)= 0.16691152D+00
           C(11)= 0.66401540D+00
          EX(12)= 0.54444860D-01
           C(12)= 0.44781591D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE -  4.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.57834424D+01
          ALPN0( 1)= 0.48696521D+03
            AN0( 2)= 0.62081584D+01
          ALPN0( 2)= 0.67876352D+01
            AN0( 3)= 0.25434780D+01
          ALPN0( 3)= 0.18350356D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.12249579D+04
          ALPN1( 1)= 0.45180239D+05
            AN1( 2)= 0.54880484D+02
          ALPN1( 2)= 0.11413960D+03
            AN1( 3)= 0.13632231D+01
          ALPN1( 3)= 0.77459969D+00
C         --- CORE-SHELL INFORMATION 
          NOSH     = 13
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.55515637D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.10031797D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.24522789D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.57943820D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.10463772D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.86415359D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.20459772D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.44355601D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.65346640D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.16131902D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.27975319D+02
          KTYP(12) =  3
           KNG(12) = 10
          BPAR(12) = 0.18279726D+01
          KTYP(13) =  4
           KNG(13) =  4
          BPAR(13) = 0.99204086D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.53414413D+06
           C(  1) = 0.19744724D-01
          EX(  2) = 0.40591373D+05
           C(  2) = 0.10855196D+00
          EX(  3) = 0.61603313D+04
           C(  3) = 0.39797996D+00
          EX(  4) = 0.13359775D+04
           C(  4) = 0.60462083D+00
          EX(  5) = 0.26527561D+04
           C(  5) =-0.47718491D-02
          EX(  6) = 0.26701416D+03
           C(  6) = 0.38611092D-01
          EX(  7) = 0.11496889D+03
           C(  7) = 0.48917744D-01
          EX(  8) = 0.20149495D+03
           C(  8) = 0.10083605D-01
          EX(  9) = 0.33564517D+02
           C(  9) =-0.35668877D-01
          EX( 10) = 0.13740567D+02
           C( 10) =-0.90110493D-02
          EX( 11) = 0.81773799D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.35505983D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.15781730D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.64467664D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.53414413D+06
           C( 15) = 0.81714238D-02
          EX( 16) = 0.40591373D+05
           C( 16) = 0.44924615D-01
          EX( 17) = 0.61603313D+04
           C( 17) = 0.16470541D+00
          EX( 18) = 0.13359775D+04
           C( 18) = 0.25022447D+00
          EX( 19) = 0.26527561D+04
           C( 19) = 0.60373237D-01
          EX( 20) = 0.26701416D+03
           C( 20) =-0.48850593D+00
          EX( 21) = 0.11496889D+03
           C( 21) =-0.61890527D+00
          EX( 22) = 0.20149495D+03
           C( 22) = 0.11011825D-01
          EX( 23) = 0.33564517D+02
           C( 23) =-0.38952282D-01
          EX( 24) = 0.13740567D+02
           C( 24) =-0.98405377D-02
          EX( 25) = 0.81773799D+01
           C( 25) = 0.10427235D-01
          EX( 26) = 0.35505983D+01
           C( 26) = 0.25169782D-02
          EX( 27) = 0.15781730D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.64467664D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.53414413D+06
           C( 29) = 0.39524887D-02
          EX( 30) = 0.40591373D+05
           C( 30) = 0.21729877D-01
          EX( 31) = 0.61603313D+04
           C( 31) = 0.79667425D-01
          EX( 32) = 0.13359775D+04
           C( 32) = 0.12103269D+00
          EX( 33) = 0.26527561D+04
           C( 33) = 0.34824293D-01
          EX( 34) = 0.26701416D+03
           C( 34) =-0.28177840D+00
          EX( 35) = 0.11496889D+03
           C( 35) =-0.35699491D+00
          EX( 36) = 0.20149495D+03
           C( 36) =-0.29865255D+00
          EX( 37) = 0.33564517D+02
           C( 37) = 0.10564278D+01
          EX( 38) = 0.13740567D+02
           C( 38) = 0.26688598D+00
          EX( 39) = 0.81773799D+01
           C( 39) =-0.19272448D-01
          EX( 40) = 0.35505983D+01
           C( 40) =-0.46520801D-02
          EX( 41) = 0.15781730D+01
           C( 41) = 0.33395762D-02
          EX( 42) = 0.64467664D+00
           C( 42) = 0.77059078D-03
          EX( 43) = 0.53414413D+06
           C( 43) = 0.21163688D-02
          EX( 44) = 0.40591373D+05
           C( 44) = 0.11635311D-01
          EX( 45) = 0.61603313D+04
           C( 45) = 0.42658098D-01
          EX( 46) = 0.13359775D+04
           C( 46) = 0.64807219D-01
          EX( 47) = 0.26527561D+04
           C( 47) = 0.10573427D-01
          EX( 48) = 0.26701416D+03
           C( 48) =-0.85554166D-01
          EX( 49) = 0.11496889D+03
           C( 49) =-0.10839157D+00
          EX( 50) = 0.20149495D+03
           C( 50) =-0.32992733D+00
          EX( 51) = 0.33564517D+02
           C( 51) = 0.11670565D+01
          EX( 52) = 0.13740567D+02
           C( 52) = 0.29483418D+00
          EX( 53) = 0.81773799D+01
           C( 53) =-0.12981155D+01
          EX( 54) = 0.35505983D+01
           C( 54) =-0.31334563D+00
          EX( 55) = 0.15781730D+01
           C( 55) = 0.20735233D-02
          EX( 56) = 0.64467664D+00
           C( 56) = 0.47845530D-03
          EX( 57) = 0.53414413D+06
           C( 57) = 0.97786730D-03
          EX( 58) = 0.40591373D+05
           C( 58) = 0.53760903D-02
          EX( 59) = 0.61603313D+04
           C( 59) = 0.19710156D-01
          EX( 60) = 0.13359775D+04
           C( 60) = 0.29944148D-01
          EX( 61) = 0.26527561D+04
           C( 61) = 0.30863860D-02
          EX( 62) = 0.26701416D+03
           C( 62) =-0.24973283D-01
          EX( 63) = 0.11496889D+03
           C( 63) =-0.31639525D-01
          EX( 64) = 0.20149495D+03
           C( 64) =-0.18291753D+00
          EX( 65) = 0.33564517D+02
           C( 65) = 0.64703677D+00
          EX( 66) = 0.13740567D+02
           C( 66) = 0.16346128D+00
          EX( 67) = 0.81773799D+01
           C( 67) =-0.12219600D+01
          EX( 68) = 0.35505983D+01
           C( 68) =-0.29496282D+00
          EX( 69) = 0.15781730D+01
           C( 69) = 0.12058393D+01
          EX( 70) = 0.64467664D+00
           C( 70) = 0.27824149D+00
          EX( 71) = 0.80219981D+04
           C( 71) = 0.22643506D-01
          EX( 72) = 0.15593227D+04
           C( 72) = 0.15391339D+00
          EX( 73) = 0.45183660D+03
           C( 73) = 0.47157352D+00
          EX( 74) = 0.15490290D+03
           C( 74) = 0.48240372D+00
          EX( 75) = 0.70817147D+02
           C( 75) = 0.31635889D-01
          EX( 76) = 0.28210503D+02
           C( 76) = 0.39948875D-01
          EX( 77) = 0.12677880D+02
           C( 77) =-0.10155072D-01
          EX( 78) = 0.53162241D+01
           C( 78) =-0.90554206D-02
          EX( 79) = 0.20787848D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.77554489D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.80219981D+04
           C( 81) = 0.12775722D-01
          EX( 82) = 0.15593227D+04
           C( 82) = 0.86839677D-01
          EX( 83) = 0.45183660D+03
           C( 83) = 0.26606711D+00
          EX( 84) = 0.15490290D+03
           C( 84) = 0.27217763D+00
          EX( 85) = 0.70817147D+02
           C( 85) =-0.51172578D+00
          EX( 86) = 0.28210503D+02
           C( 86) =-0.64619230D+00
          EX( 87) = 0.12677880D+02
           C( 87) =-0.33878415D-01
          EX( 88) = 0.53162241D+01
           C( 88) =-0.30209859D-01
          EX( 89) = 0.20787848D+01
           C( 89) = 0.90578672D-02
          EX( 90) = 0.77554489D+00
           C( 90) = 0.58987824D-02
          EX( 91) = 0.80219981D+04
           C( 91) = 0.65485847D-02
          EX( 92) = 0.15593227D+04
           C( 92) = 0.44512317D-01
          EX( 93) = 0.45183660D+03
           C( 93) = 0.13638078D+00
          EX( 94) = 0.15490290D+03
           C( 94) = 0.13951292D+00
          EX( 95) = 0.70817147D+02
           C( 95) =-0.40020626D+00
          EX( 96) = 0.28210503D+02
           C( 96) =-0.50536874D+00
          EX( 97) = 0.12677880D+02
           C( 97) = 0.68390644D+00
          EX( 98) = 0.53162241D+01
           C( 98) = 0.60984899D+00
          EX( 99) = 0.20787848D+01
           C( 99) = 0.15067227D-01
          EX(100) = 0.77554489D+00
           C(100) = 0.98122761D-02
          EX(101) = 0.80219981D+04
           C(101) = 0.27587398D-02
          EX(102) = 0.15593227D+04
           C(102) = 0.18751823D-01
          EX(103) = 0.45183660D+03
           C(103) = 0.57453498D-01
          EX(104) = 0.15490290D+03
           C(104) = 0.58772980D-01
          EX(105) = 0.70817147D+02
           C(105) =-0.18502767D+00
          EX(106) = 0.28210503D+02
           C(106) =-0.23364752D+00
          EX(107) = 0.12677880D+02
           C(107) = 0.45978059D+00
          EX(108) = 0.53162241D+01
           C(108) = 0.40999281D+00
          EX(109) = 0.20787848D+01
           C(109) =-0.77426316D+00
          EX(110) = 0.77554489D+00
           C(110) =-0.50422575D+00
          EX(111) = 0.77390876D+03
           C(111) = 0.35620562D-01
          EX(112) = 0.21236873D+03
           C(112) = 0.22315166D+00
          EX(113) = 0.75568226D+02
           C(113) = 0.52976513D+00
          EX(114) = 0.29299839D+02
           C(114) = 0.38376922D+00
          EX(115) = 0.26068784D+02
           C(115) = 0.98179371D-02
          EX(116) = 0.10798968D+02
           C(116) = 0.24502471D-01
          EX(117) = 0.44016874D+01
           C(117) = 0.14522829D-01
          EX(118) = 0.27356081D+01
           C(118) =-0.29458678D-02
          EX(119) = 0.10145627D+01
           C(119) =-0.49395983D-02
          EX(120) = 0.34590339D+00
           C(120) =-0.22352829D-02
          EX(121) = 0.77390876D+03
           C(121) = 0.19214310D-01
          EX(122) = 0.21236873D+03
           C(122) = 0.12037163D+00
          EX(123) = 0.75568226D+02
           C(123) = 0.28576393D+00
          EX(124) = 0.29299839D+02
           C(124) = 0.20701136D+00
          EX(125) = 0.26068784D+02
           C(125) =-0.25403140D+00
          EX(126) = 0.10798968D+02
           C(126) =-0.63398217D+00
          EX(127) = 0.44016874D+01
           C(127) =-0.37576679D+00
          EX(128) = 0.27356081D+01
           C(128) =-0.60755777D-02
          EX(129) = 0.10145627D+01
           C(129) =-0.10187460D-01
          EX(130) = 0.34590339D+00
           C(130) =-0.46100623D-02
          EX(131) = 0.77390876D+03
           C(131) = 0.65605459D-02
          EX(132) = 0.21236873D+03
           C(132) = 0.41099765D-01
          EX(133) = 0.75568226D+02
           C(133) = 0.97571410D-01
          EX(134) = 0.29299839D+02
           C(134) = 0.70682085D-01
          EX(135) = 0.26068784D+02
           C(135) =-0.10780090D+00
          EX(136) = 0.10798968D+02
           C(136) =-0.26903702D+00
          EX(137) = 0.44016874D+01
           C(137) =-0.15946060D+00
          EX(138) = 0.27356081D+01
           C(138) = 0.37092719D+00
          EX(139) = 0.10145627D+01
           C(139) = 0.62196656D+00
          EX(140) = 0.34590339D+00
           C(140) = 0.28145431D+00
          EX(141) = 0.90569415D+02
           C(141) = 0.88916060D-01
          EX(142) = 0.27124350D+02
           C(142) = 0.37168172D+00
          EX(143) = 0.93725776D+01
           C(143) = 0.55604015D+00
          EX(144) = 0.31137544D+01
           C(144) = 0.29369121D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.83) THEN
        ITYP(1)=121
        ITYP(2)=122
C ---
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : BI/QR             CONFIGURATION : S2P3D10      *
C   VALENCE : (6S/6P/5D)        BASIS SET     : ( 9/ 8/ 7)   *
C          EFFECTIVE CORE CHARGE : 15.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -71.76782970 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =  -.678765 A.U. <REFERENCE =  -.678993>
C  ***     ORBITAL ENERGY( 6P ) =  -.318501 A.U. <REFERENCE =  -.317110>
C  ***     ORBITAL ENERGY( 5D ) = -1.311068 A.U. <REFERENCE = -1.311217>
C
C  ***     ORBITAL ENERGY DEV. =    .00177     DENSITY DEV. =    .01601
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 15.0D+00
          SHINFO='6S/6P/5D'
          NOSH= 3
          CDFCTR(1)='81'
          CDFCTR(2)='71'
          CDFCTR(3)='7'
             KNG(1)= 9
            KTYP(1)= 1
             KNG(2)= 8
            KTYP(2)= 2
             KNG(3)= 7
            KTYP(3)= 3
          EX( 1)= 0.54623556D+04
           C( 1)= 0.21805430D-01
          EX( 2)= 0.16540150D+03
           C( 2)=-0.94604322D-01
          EX( 3)= 0.36977106D+02
           C( 3)= 0.24891401D+00
          EX( 4)= 0.71892336D+01
           C( 4)=-0.53007349D+00
          EX( 5)= 0.19032417D+01
           C( 5)= 0.50251429D+00
          EX( 6)= 0.10203835D+01
           C( 6)= 0.50422527D+00
          EX( 7)= 0.31750516D+00
           C( 7)=-0.50770143D+00
          EX( 8)= 0.15418828D+00
           C( 8)=-0.61438587D+00
          EX( 9)= 0.68812049D-01
           C( 9)=-0.19592007D+00
          EX(10)= 0.60109977D+03
           C(10)= 0.16346888D-01
          EX(11)= 0.45195831D+02
           C(11)=-0.67285630D-01
          EX(12)= 0.97074724D+01
           C(12)= 0.17242106D+00
          EX(13)= 0.19440737D+01
           C(13)=-0.22227685D+00
          EX(14)= 0.11873132D+01
           C(14)=-0.16494327D+00
          EX(15)= 0.24255119D+00
           C(15)= 0.47426079D+00
          EX(16)= 0.10345334D+00
           C(16)= 0.50916687D+00
          EX(17)= 0.44115135D-01
           C(17)= 0.15442702D+00
          EX(18)= 0.33489629D+03
           C(18)=-0.28088472D-01
          EX(19)= 0.89788765D+02
           C(19)=-0.12894395D+00
          EX(20)= 0.14963270D+02
           C(20)= 0.14948539D+00
          EX(21)= 0.94008471D+01
           C(21)= 0.21585541D+00
          EX(22)= 0.19070705D+01
           C(22)=-0.51314762D+00
          EX(23)= 0.78945303D+00
           C(23)=-0.48522582D+00
          EX(24)= 0.29804339D+00
           C(24)=-0.14734203D+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.20582242D+01
          ALPN0( 1)= 0.35325227D+03
            AN0( 2)= 0.12419106D+01
          ALPN0( 2)= 0.87885390D+01
            AN0( 3)= 0.50132821D+00
          ALPN0( 3)= 0.31309333D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.47402126D+03
          ALPN1( 1)= 0.47703445D+04
            AN1( 2)= 0.14923593D+02
          ALPN1( 2)= 0.60029685D+02
            AN1( 3)= 0.16038798D+00
          ALPN1( 3)= 0.11568670D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     = 12
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.67196090D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.12195256D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.29965082D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.71673200D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.13385447D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.10478370D+04
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.24967610D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.54966000D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.84933852D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.19717268D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.35053900D+02
          KTYP(12) =  4
           KNG(12) =  5
          BPAR(12) = 0.13188045D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.56640290D+06
           C(  1) = 0.19919783D-01
          EX(  2) = 0.42728246D+05
           C(  2) = 0.10846272D+00
          EX(  3) = 0.64276281D+04
           C(  3) = 0.39685626D+00
          EX(  4) = 0.13843019D+04
           C(  4) = 0.60598095D+00
          EX(  5) = 0.27746292D+04
           C(  5) =-0.47474006D-02
          EX(  6) = 0.27876541D+03
           C(  6) = 0.38552489D-01
          EX(  7) = 0.11961999D+03
           C(  7) = 0.50303147D-01
          EX(  8) = 0.20894839D+03
           C(  8) = 0.10120589D-01
          EX(  9) = 0.34714071D+02
           C(  9) =-0.35940345D-01
          EX( 10) = 0.14224318D+02
           C( 10) =-0.91066909D-02
          EX( 11) = 0.84974413D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.36943748D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.16700830D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.69057676D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.56640290D+06
           C( 15) = 0.82703700D-02
          EX( 16) = 0.42728246D+05
           C( 16) = 0.45031956D-01
          EX( 17) = 0.64276281D+04
           C( 17) = 0.16476826D+00
          EX( 18) = 0.13843019D+04
           C( 18) = 0.25159343D+00
          EX( 19) = 0.27746292D+04
           C( 19) = 0.59149585D-01
          EX( 20) = 0.27876541D+03
           C( 20) =-0.48033945D+00
          EX( 21) = 0.11961999D+03
           C( 21) =-0.62674516D+00
          EX( 22) = 0.20894839D+03
           C( 22) = 0.11244164D-01
          EX( 23) = 0.34714071D+02
           C( 23) =-0.39930401D-01
          EX( 24) = 0.14224318D+02
           C( 24) =-0.10117705D-01
          EX( 25) = 0.84974413D+01
           C( 25) = 0.10743355D-01
          EX( 26) = 0.36943748D+01
           C( 26) = 0.25767740D-02
          EX( 27) = 0.16700830D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.69057676D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.56640290D+06
           C( 29) = 0.40044752D-02
          EX( 30) = 0.42728246D+05
           C( 30) = 0.21804267D-01
          EX( 31) = 0.64276281D+04
           C( 31) = 0.79780039D-01
          EX( 32) = 0.13843019D+04
           C( 32) = 0.12182039D+00
          EX( 33) = 0.27746292D+04
           C( 33) = 0.34197884D-01
          EX( 34) = 0.27876541D+03
           C( 34) =-0.27771273D+00
          EX( 35) = 0.11961999D+03
           C( 35) =-0.36235855D+00
          EX( 36) = 0.20894839D+03
           C( 36) =-0.29725668D+00
          EX( 37) = 0.34714071D+02
           C( 37) = 0.10556213D+01
          EX( 38) = 0.14224318D+02
           C( 38) = 0.26747702D+00
          EX( 39) = 0.84974413D+01
           C( 39) =-0.19519669D-01
          EX( 40) = 0.36943748D+01
           C( 40) =-0.46817567D-02
          EX( 41) = 0.16700830D+01
           C( 41) = 0.33187268D-02
          EX( 42) = 0.69057676D+00
           C( 42) = 0.73930676D-03
          EX( 43) = 0.56640290D+06
           C( 43) = 0.21478020D-02
          EX( 44) = 0.42728246D+05
           C( 44) = 0.11694728D-01
          EX( 45) = 0.64276281D+04
           C( 45) = 0.42790057D-01
          EX( 46) = 0.13843019D+04
           C( 46) = 0.65338417D-01
          EX( 47) = 0.27746292D+04
           C( 47) = 0.10433502D-01
          EX( 48) = 0.27876541D+03
           C( 48) =-0.84727949D-01
          EX( 49) = 0.11961999D+03
           C( 49) =-0.11055271D+00
          EX( 50) = 0.20894839D+03
           C( 50) =-0.32999803D+00
          EX( 51) = 0.34714071D+02
           C( 51) = 0.11718926D+01
          EX( 52) = 0.14224318D+02
           C( 52) = 0.29693828D+00
          EX( 53) = 0.84974413D+01
           C( 53) =-0.13039550D+01
          EX( 54) = 0.36943748D+01
           C( 54) =-0.31275121D+00
          EX( 55) = 0.16700830D+01
           C( 55) = 0.23548788D-02
          EX( 56) = 0.69057676D+00
           C( 56) = 0.52459209D-03
          EX( 57) = 0.56640290D+06
           C( 57) = 0.10040630D-02
          EX( 58) = 0.42728246D+05
           C( 58) = 0.54670978D-02
          EX( 59) = 0.64276281D+04
           C( 59) = 0.20003666D-01
          EX( 60) = 0.13843019D+04
           C( 60) = 0.30544662D-01
          EX( 61) = 0.27746292D+04
           C( 61) = 0.30714926D-02
          EX( 62) = 0.27876541D+03
           C( 62) =-0.24942848D-01
          EX( 63) = 0.11961999D+03
           C( 63) =-0.32545336D-01
          EX( 64) = 0.20894839D+03
           C( 64) =-0.18556863D+00
          EX( 65) = 0.34714071D+02
           C( 65) = 0.65899338D+00
          EX( 66) = 0.14224318D+02
           C( 66) = 0.16697806D+00
          EX( 67) = 0.84974413D+01
           C( 67) =-0.12492028D+01
          EX( 68) = 0.36943748D+01
           C( 68) =-0.29961900D+00
          EX( 69) = 0.16700830D+01
           C( 69) = 0.12254329D+01
          EX( 70) = 0.69057676D+00
           C( 70) = 0.27298747D+00
          EX( 71) = 0.83232266D+04
           C( 71) = 0.22612805D-01
          EX( 72) = 0.16127427D+04
           C( 72) = 0.15351147D+00
          EX( 73) = 0.46639121D+03
           C( 73) = 0.47105688D+00
          EX( 74) = 0.15970005D+03
           C( 74) = 0.48327807D+00
          EX( 75) = 0.73164884D+02
           C( 75) = 0.31754204D-01
          EX( 76) = 0.29143820D+02
           C( 76) = 0.40223830D-01
          EX( 77) = 0.13142588D+02
           C( 77) =-0.10129545D-01
          EX( 78) = 0.55346879D+01
           C( 78) =-0.90333373D-02
          EX( 79) = 0.21996218D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.83634684D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.83232266D+04
           C( 81) = 0.12779145D-01
          EX( 82) = 0.16127427D+04
           C( 82) = 0.86753735D-01
          EX( 83) = 0.46639121D+03
           C( 83) = 0.26620776D+00
          EX( 84) = 0.15970005D+03
           C( 84) = 0.27311431D+00
          EX( 85) = 0.73164884D+02
           C( 85) =-0.51090386D+00
          EX( 86) = 0.29143820D+02
           C( 86) =-0.64717445D+00
          EX( 87) = 0.13142588D+02
           C( 87) =-0.34053666D-01
          EX( 88) = 0.55346879D+01
           C( 88) =-0.30368418D-01
          EX( 89) = 0.21996218D+01
           C( 89) = 0.89330018D-02
          EX( 90) = 0.83634684D+00
           C( 90) = 0.57298595D-02
          EX( 91) = 0.83232266D+04
           C( 91) = 0.65761579D-02
          EX( 92) = 0.16127427D+04
           C( 92) = 0.44643539D-01
          EX( 93) = 0.46639121D+03
           C( 93) = 0.13699072D+00
          EX( 94) = 0.15970005D+03
           C( 94) = 0.14054484D+00
          EX( 95) = 0.73164884D+02
           C( 95) =-0.40169306D+00
          EX( 96) = 0.29143820D+02
           C( 96) =-0.50883446D+00
          EX( 97) = 0.13142588D+02
           C( 97) = 0.68465823D+00
          EX( 98) = 0.55346879D+01
           C( 98) = 0.61056533D+00
          EX( 99) = 0.21996218D+01
           C( 99) = 0.15317265D-01
          EX(100) = 0.83634684D+00
           C(100) = 0.98248916D-02
          EX(101) = 0.83232266D+04
           C(101) = 0.28189217D-02
          EX(102) = 0.16127427D+04
           C(102) = 0.19136803D-01
          EX(103) = 0.46639121D+03
           C(103) = 0.58722146D-01
          EX(104) = 0.15970005D+03
           C(104) = 0.60245645D-01
          EX(105) = 0.73164884D+02
           C(105) =-0.18927286D+00
          EX(106) = 0.29143820D+02
           C(106) =-0.23975658D+00
          EX(107) = 0.13142588D+02
           C(107) = 0.47136729D+00
          EX(108) = 0.55346879D+01
           C(108) = 0.42035649D+00
          EX(109) = 0.21996218D+01
           C(109) =-0.78298693D+00
          EX(110) = 0.83634684D+00
           C(110) =-0.50222816D+00
          EX(111) = 0.80168379D+03
           C(111) = 0.35258969D-01
          EX(112) = 0.21991023D+03
           C(112) = 0.22151696D+00
          EX(113) = 0.78284208D+02
           C(113) = 0.52848242D+00
          EX(114) = 0.30390396D+02
           C(114) = 0.38565530D+00
          EX(115) = 0.27155124D+02
           C(115) = 0.99753824D-02
          EX(116) = 0.11305291D+02
           C(116) = 0.25193197D-01
          EX(117) = 0.46361590D+01
           C(117) = 0.15127904D-01
          EX(118) = 0.29389735D+01
           C(118) =-0.31296620D-02
          EX(119) = 0.11173934D+01
           C(119) =-0.52657309D-02
          EX(120) = 0.39205968D+00
           C(120) =-0.22777127D-02
          EX(121) = 0.80168379D+03
           C(121) = 0.19150524D-01
          EX(122) = 0.21991023D+03
           C(122) = 0.12031452D+00
          EX(123) = 0.78284208D+02
           C(123) = 0.28703945D+00
          EX(124) = 0.30390396D+02
           C(124) = 0.20946447D+00
          EX(125) = 0.27155124D+02
           C(125) =-0.25044624D+00
          EX(126) = 0.11305291D+02
           C(126) =-0.63251122D+00
          EX(127) = 0.46361590D+01
           C(127) =-0.37980764D+00
          EX(128) = 0.29389735D+01
           C(128) =-0.63431221D-02
          EX(129) = 0.11173934D+01
           C(129) =-0.10672454D-01
          EX(130) = 0.39205968D+00
           C(130) =-0.46164122D-02
          EX(131) = 0.13644528D+03
           C(131) = 0.42543826D-01
          EX(132) = 0.43287788D+02
           C(132) = 0.21788683D+00
          EX(133) = 0.16562581D+02
           C(133) = 0.45255070D+00
          EX(134) = 0.65429361D+01
           C(134) = 0.44183621D+00
          EX(135) = 0.24188534D+01
           C(135) = 0.16013341D+00
          RETURN
          END IF
C ---
        ELSE IF (MMPTYP.EQ.121) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : BI/QR             CONFIGURATION : S02P03       *
C   VALENCE : (6S/6P)           BASIS SET     : ( 7/ 5)      *
C          EFFECTIVE CORE CHARGE :  5.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -5.355169 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =    -.6790   A.U.
C  ***     ORBITAL ENERGY( 6P ) =    -.3171   A.U.
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE -  5.0D+00
          SHINFO='6S/6P'
          NOSH= 2
          CDFCTR(1)='61'
          CDFCTR(2)='41'
             KNG(1)= 7
            KTYP(1)= 1
             KNG(2)= 5
            KTYP(2)= 2
          EX( 1)= 0.19350000D+03
           C( 1)= 0.34544964D-01
          EX( 2)= 0.34776300D+02
           C( 2)=-0.14894077D+00
          EX( 3)= 0.74261800D+01
           C( 3)= 0.39105204D+00
          EX( 4)= 0.20036890D+01
           C( 4)=-0.56213023D-01
          EX( 5)= 0.12576000D+01
           C( 5)=-0.81423384D+00
          EX( 6)= 0.22969200D+00
           C( 6)= 0.92660026D+00
          EX( 7)= 0.88680700D-01
           C( 7)= 0.35141463D+00
          EX( 8)= 0.48787260D+02
           C( 8)=-0.29806212D-01
          EX( 9)= 0.96962710D+01
           C( 9)= 0.11485843D+00
          EX(10)= 0.16202820D+01
           C(10)=-0.32840135D+00
          EX(11)= 0.19693800D+00
           C(11)= 0.69203588D+00
          EX(12)= 0.67299500D-01
           C(12)= 0.42064155D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE -  5.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.65075336D+01
          ALPN0( 1)= 0.26903509D+03
            AN0( 2)= 0.45209472D+01
          ALPN0( 2)= 0.71663233D+01
            AN0( 3)= 0.18356246D+01
          ALPN0( 3)= 0.18493508D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.17938082D+04
          ALPN1( 1)= 0.16132777D+05
            AN1( 2)= 0.53461668D+02
          ALPN1( 2)= 0.91106617D+02
            AN1( 3)= 0.10652122D+01
          ALPN1( 3)= 0.84093933D+00
C         --- CORE-SHELL INFORMATION 
          NOSH     = 13
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.50397150D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.91464300D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.22473750D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.53754900D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.10039065D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.78587850D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.18725700D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.41224500D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.63700050D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.14787975D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.26290500D+02
          KTYP(12) =  3
           KNG(12) = 10
          BPAR(12) = 0.19668071D+01
          KTYP(13) =  4
           KNG(13) =  4
          BPAR(13) = 0.98912136D+01
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.56640290D+06
           C(  1) = 0.19919783D-01
          EX(  2) = 0.42728246D+05
           C(  2) = 0.10846272D+00
          EX(  3) = 0.64276281D+04
           C(  3) = 0.39685626D+00
          EX(  4) = 0.13843019D+04
           C(  4) = 0.60598095D+00
          EX(  5) = 0.27746292D+04
           C(  5) =-0.47474006D-02
          EX(  6) = 0.27876541D+03
           C(  6) = 0.38552489D-01
          EX(  7) = 0.11961999D+03
           C(  7) = 0.50303147D-01
          EX(  8) = 0.20894839D+03
           C(  8) = 0.10120589D-01
          EX(  9) = 0.34714071D+02
           C(  9) =-0.35940345D-01
          EX( 10) = 0.14224318D+02
           C( 10) =-0.91066909D-02
          EX( 11) = 0.84974413D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.36943748D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.16700830D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.69057676D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.56640290D+06
           C( 15) = 0.82703700D-02
          EX( 16) = 0.42728246D+05
           C( 16) = 0.45031956D-01
          EX( 17) = 0.64276281D+04
           C( 17) = 0.16476826D+00
          EX( 18) = 0.13843019D+04
           C( 18) = 0.25159343D+00
          EX( 19) = 0.27746292D+04
           C( 19) = 0.59149585D-01
          EX( 20) = 0.27876541D+03
           C( 20) =-0.48033945D+00
          EX( 21) = 0.11961999D+03
           C( 21) =-0.62674516D+00
          EX( 22) = 0.20894839D+03
           C( 22) = 0.11244164D-01
          EX( 23) = 0.34714071D+02
           C( 23) =-0.39930401D-01
          EX( 24) = 0.14224318D+02
           C( 24) =-0.10117705D-01
          EX( 25) = 0.84974413D+01
           C( 25) = 0.10743355D-01
          EX( 26) = 0.36943748D+01
           C( 26) = 0.25767740D-02
          EX( 27) = 0.16700830D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.69057676D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.56640290D+06
           C( 29) = 0.40044754D-02
          EX( 30) = 0.42728246D+05
           C( 30) = 0.21804268D-01
          EX( 31) = 0.64276281D+04
           C( 31) = 0.79780042D-01
          EX( 32) = 0.13843019D+04
           C( 32) = 0.12182039D+00
          EX( 33) = 0.27746292D+04
           C( 33) = 0.34197885D-01
          EX( 34) = 0.27876541D+03
           C( 34) =-0.27771274D+00
          EX( 35) = 0.11961999D+03
           C( 35) =-0.36235856D+00
          EX( 36) = 0.20894839D+03
           C( 36) =-0.29725669D+00
          EX( 37) = 0.34714071D+02
           C( 37) = 0.10556213D+01
          EX( 38) = 0.14224318D+02
           C( 38) = 0.26747703D+00
          EX( 39) = 0.84974413D+01
           C( 39) =-0.19519670D-01
          EX( 40) = 0.36943748D+01
           C( 40) =-0.46817569D-02
          EX( 41) = 0.16700830D+01
           C( 41) = 0.33187269D-02
          EX( 42) = 0.69057676D+00
           C( 42) = 0.73930679D-03
          EX( 43) = 0.56640290D+06
           C( 43) = 0.21478020D-02
          EX( 44) = 0.42728246D+05
           C( 44) = 0.11694728D-01
          EX( 45) = 0.64276281D+04
           C( 45) = 0.42790057D-01
          EX( 46) = 0.13843019D+04
           C( 46) = 0.65338417D-01
          EX( 47) = 0.27746292D+04
           C( 47) = 0.10433502D-01
          EX( 48) = 0.27876541D+03
           C( 48) =-0.84727948D-01
          EX( 49) = 0.11961999D+03
           C( 49) =-0.11055271D+00
          EX( 50) = 0.20894839D+03
           C( 50) =-0.32999803D+00
          EX( 51) = 0.34714071D+02
           C( 51) = 0.11718926D+01
          EX( 52) = 0.14224318D+02
           C( 52) = 0.29693828D+00
          EX( 53) = 0.84974413D+01
           C( 53) =-0.13039550D+01
          EX( 54) = 0.36943748D+01
           C( 54) =-0.31275121D+00
          EX( 55) = 0.16700830D+01
           C( 55) = 0.23548788D-02
          EX( 56) = 0.69057676D+00
           C( 56) = 0.52459209D-03
          EX( 57) = 0.56640290D+06
           C( 57) = 0.10040630D-02
          EX( 58) = 0.42728246D+05
           C( 58) = 0.54670978D-02
          EX( 59) = 0.64276281D+04
           C( 59) = 0.20003666D-01
          EX( 60) = 0.13843019D+04
           C( 60) = 0.30544662D-01
          EX( 61) = 0.27746292D+04
           C( 61) = 0.30714926D-02
          EX( 62) = 0.27876541D+03
           C( 62) =-0.24942848D-01
          EX( 63) = 0.11961999D+03
           C( 63) =-0.32545336D-01
          EX( 64) = 0.20894839D+03
           C( 64) =-0.18556863D+00
          EX( 65) = 0.34714071D+02
           C( 65) = 0.65899338D+00
          EX( 66) = 0.14224318D+02
           C( 66) = 0.16697806D+00
          EX( 67) = 0.84974413D+01
           C( 67) =-0.12492028D+01
          EX( 68) = 0.36943748D+01
           C( 68) =-0.29961900D+00
          EX( 69) = 0.16700830D+01
           C( 69) = 0.12254329D+01
          EX( 70) = 0.69057676D+00
           C( 70) = 0.27298747D+00
          EX( 71) = 0.83232266D+04
           C( 71) = 0.22612805D-01
          EX( 72) = 0.16127427D+04
           C( 72) = 0.15351147D+00
          EX( 73) = 0.46639121D+03
           C( 73) = 0.47105688D+00
          EX( 74) = 0.15970005D+03
           C( 74) = 0.48327807D+00
          EX( 75) = 0.73164884D+02
           C( 75) = 0.31754204D-01
          EX( 76) = 0.29143820D+02
           C( 76) = 0.40223830D-01
          EX( 77) = 0.13142588D+02
           C( 77) =-0.10129545D-01
          EX( 78) = 0.55346879D+01
           C( 78) =-0.90333374D-02
          EX( 79) = 0.21996218D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.83634684D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.83232266D+04
           C( 81) = 0.12779145D-01
          EX( 82) = 0.16127427D+04
           C( 82) = 0.86753735D-01
          EX( 83) = 0.46639121D+03
           C( 83) = 0.26620776D+00
          EX( 84) = 0.15970005D+03
           C( 84) = 0.27311431D+00
          EX( 85) = 0.73164884D+02
           C( 85) =-0.51090386D+00
          EX( 86) = 0.29143820D+02
           C( 86) =-0.64717445D+00
          EX( 87) = 0.13142588D+02
           C( 87) =-0.34053666D-01
          EX( 88) = 0.55346879D+01
           C( 88) =-0.30368418D-01
          EX( 89) = 0.21996218D+01
           C( 89) = 0.89330018D-02
          EX( 90) = 0.83634684D+00
           C( 90) = 0.57298595D-02
          EX( 91) = 0.83232266D+04
           C( 91) = 0.65761579D-02
          EX( 92) = 0.16127427D+04
           C( 92) = 0.44643539D-01
          EX( 93) = 0.46639121D+03
           C( 93) = 0.13699072D+00
          EX( 94) = 0.15970005D+03
           C( 94) = 0.14054484D+00
          EX( 95) = 0.73164884D+02
           C( 95) =-0.40169306D+00
          EX( 96) = 0.29143820D+02
           C( 96) =-0.50883446D+00
          EX( 97) = 0.13142588D+02
           C( 97) = 0.68465823D+00
          EX( 98) = 0.55346879D+01
           C( 98) = 0.61056533D+00
          EX( 99) = 0.21996218D+01
           C( 99) = 0.15317265D-01
          EX(100) = 0.83634684D+00
           C(100) = 0.98248916D-02
          EX(101) = 0.83232266D+04
           C(101) = 0.28189217D-02
          EX(102) = 0.16127427D+04
           C(102) = 0.19136803D-01
          EX(103) = 0.46639121D+03
           C(103) = 0.58722146D-01
          EX(104) = 0.15970005D+03
           C(104) = 0.60245645D-01
          EX(105) = 0.73164884D+02
           C(105) =-0.18927286D+00
          EX(106) = 0.29143820D+02
           C(106) =-0.23975658D+00
          EX(107) = 0.13142588D+02
           C(107) = 0.47136729D+00
          EX(108) = 0.55346879D+01
           C(108) = 0.42035649D+00
          EX(109) = 0.21996218D+01
           C(109) =-0.78298693D+00
          EX(110) = 0.83634684D+00
           C(110) =-0.50222816D+00
          EX(111) = 0.80168379D+03
           C(111) = 0.35258969D-01
          EX(112) = 0.21991023D+03
           C(112) = 0.22151696D+00
          EX(113) = 0.78284208D+02
           C(113) = 0.52848242D+00
          EX(114) = 0.30390396D+02
           C(114) = 0.38565530D+00
          EX(115) = 0.27155124D+02
           C(115) = 0.99753824D-02
          EX(116) = 0.11305291D+02
           C(116) = 0.25193197D-01
          EX(117) = 0.46361590D+01
           C(117) = 0.15127904D-01
          EX(118) = 0.29389735D+01
           C(118) =-0.31296620D-02
          EX(119) = 0.11173934D+01
           C(119) =-0.52657309D-02
          EX(120) = 0.39205968D+00
           C(120) =-0.22777127D-02
          EX(121) = 0.80168379D+03
           C(121) = 0.19150524D-01
          EX(122) = 0.21991023D+03
           C(122) = 0.12031452D+00
          EX(123) = 0.78284208D+02
           C(123) = 0.28703945D+00
          EX(124) = 0.30390396D+02
           C(124) = 0.20946447D+00
          EX(125) = 0.27155124D+02
           C(125) =-0.25044624D+00
          EX(126) = 0.11305291D+02
           C(126) =-0.63251122D+00
          EX(127) = 0.46361590D+01
           C(127) =-0.37980764D+00
          EX(128) = 0.29389735D+01
           C(128) =-0.63431221D-02
          EX(129) = 0.11173934D+01
           C(129) =-0.10672454D-01
          EX(130) = 0.39205968D+00
           C(130) =-0.46164122D-02
          EX(131) = 0.80168379D+03
           C(131) = 0.68052327D-02
          EX(132) = 0.21991023D+03
           C(132) = 0.42754354D-01
          EX(133) = 0.78284208D+02
           C(133) = 0.10200088D+00
          EX(134) = 0.30390396D+02
           C(134) = 0.74434225D-01
          EX(135) = 0.27155124D+02
           C(135) =-0.11131785D+00
          EX(136) = 0.11305291D+02
           C(136) =-0.28113734D+00
          EX(137) = 0.46361590D+01
           C(137) =-0.16881615D+00
          EX(138) = 0.29389735D+01
           C(138) = 0.37320350D+00
          EX(139) = 0.11173934D+01
           C(139) = 0.62792379D+00
          EX(140) = 0.39205968D+00
           C(140) = 0.27161092D+00
          EX(141) = 0.95313818D+02
           C(141) = 0.87023631D-01
          EX(142) = 0.28640758D+02
           C(142) = 0.36817240D+00
          EX(143) = 0.99571594D+01
           C(143) = 0.55671653D+00
          EX(144) = 0.33431752D+01
           C(144) = 0.29385946D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.84) THEN
        ITYP(1)=121
        ITYP(2)=122
C ---
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : PO/QR             CONFIGURATION : S2P4D10      *
C   VALENCE : (6S/6P/5D)        BASIS SET     : ( 9/ 8/ 7)   *
C          EFFECTIVE CORE CHARGE : 16.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -83.92175643 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =  -.808011 A.U. <REFERENCE =  -.808357>
C  ***     ORBITAL ENERGY( 6P ) =  -.339634 A.U. <REFERENCE =  -.339232>
C  ***     ORBITAL ENERGY( 5D ) = -1.568740 A.U. <REFERENCE = -1.568523>
C
C  ***     ORBITAL ENERGY DEV. =    .00097     DENSITY DEV. =    .01817
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 16.0D+00
          SHINFO='6S/6P/5D'
          NOSH= 3
          CDFCTR(1)='81'
          CDFCTR(2)='71'
          CDFCTR(3)='7'
             KNG(1)= 9
            KTYP(1)= 1
             KNG(2)= 8
            KTYP(2)= 2
             KNG(3)= 7
            KTYP(3)= 3
          EX( 1)= 0.57191870D+04
           C( 1)= 0.26499522D-01
          EX( 2)= 0.17104691D+03
           C( 2)=-0.10673102D+00
          EX( 3)= 0.38271982D+02
           C( 3)= 0.27499337D+00
          EX( 4)= 0.74810531D+01
           C( 4)=-0.57235646D+00
          EX( 5)= 0.20157962D+01
           C( 5)= 0.54115720D+00
          EX( 6)= 0.10981134D+01
           C( 6)= 0.52576867D+00
          EX( 7)= 0.35592614D+00
           C( 7)=-0.51972619D+00
          EX( 8)= 0.17367042D+00
           C( 8)=-0.63882404D+00
          EX( 9)= 0.77454881D-01
           C( 9)=-0.17931224D+00
          EX(10)= 0.62092876D+03
           C(10)= 0.18813266D-01
          EX(11)= 0.46529699D+02
           C(11)=-0.76687736D-01
          EX(12)= 0.10142100D+02
           C(12)= 0.18976905D+00
          EX(13)= 0.19082081D+01
           C(13)=-0.31502691D+00
          EX(14)= 0.10788346D+01
           C(14)=-0.10900720D+00
          EX(15)= 0.28884904D+00
           C(15)= 0.46286706D+00
          EX(16)= 0.12202467D+00
           C(16)= 0.52438105D+00
          EX(17)= 0.50670611D-01
           C(17)= 0.16694364D+00
          EX(18)= 0.34597725D+03
           C(18)=-0.31851230D-01
          EX(19)= 0.92798413D+02
           C(19)=-0.15138881D+00
          EX(20)= 0.15292868D+02
           C(20)= 0.19904440D+00
          EX(21)= 0.96750396D+01
           C(21)= 0.19124470D+00
          EX(22)= 0.20293446D+01
           C(22)=-0.52252406D+00
          EX(23)= 0.85662020D+00
           C(23)=-0.47192548D+00
          EX(24)= 0.32932396D+00
           C(24)=-0.13954710D+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.17462047D+01
          ALPN0( 1)= 0.37619234D+03
            AN0( 2)= 0.12093189D+01
          ALPN0( 2)= 0.10392358D+02
            AN0( 3)= 0.49981116D+00
          ALPN0( 3)= 0.31113080D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.47698253D+03
          ALPN1( 1)= 0.46121833D+04
            AN1( 2)= 0.13872112D+02
          ALPN1( 2)= 0.55438225D+02
            AN1( 3)= 0.96893153D-01
          ALPN1( 3)= 0.10992379D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     = 12
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.69117656D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.12598424D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.31113778D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.75320160D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.14522737D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.10796279D+04
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.25888636D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.57858900D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.93477268D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.20474861D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.37288558D+02
          KTYP(12) =  4
           KNG(12) =  5
          BPAR(12) = 0.14793043D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.60053586D+06
           C(  1) = 0.20103103D-01
          EX(  2) = 0.44980412D+05
           C(  2) = 0.10839260D+00
          EX(  3) = 0.67065956D+04
           C(  3) = 0.39573314D+00
          EX(  4) = 0.14342329D+04
           C(  4) = 0.60731687D+00
          EX(  5) = 0.29027069D+04
           C(  5) =-0.47214107D-02
          EX(  6) = 0.29115991D+03
           C(  6) = 0.38469767D-01
          EX(  7) = 0.12445999D+03
           C(  7) = 0.51747515D-01
          EX(  8) = 0.21666027D+03
           C(  8) = 0.10155253D-01
          EX(  9) = 0.35894767D+02
           C(  9) =-0.36212820D-01
          EX( 10) = 0.14723672D+02
           C( 10) =-0.92056217D-02
          EX( 11) = 0.88274119D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.38421298D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.17655586D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.73742728D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.60053586D+06
           C( 15) = 0.83736776D-02
          EX( 16) = 0.44980412D+05
           C( 16) = 0.45149484D-01
          EX( 17) = 0.67065956D+04
           C( 17) = 0.16483733D+00
          EX( 18) = 0.14342329D+04
           C( 18) = 0.25296969D+00
          EX( 19) = 0.29027069D+04
           C( 19) = 0.57920806D-01
          EX( 20) = 0.29115991D+03
           C( 20) =-0.47193520D+00
          EX( 21) = 0.12445999D+03
           C( 21) =-0.63482251D+00
          EX( 22) = 0.21666027D+03
           C( 22) = 0.11482995D-01
          EX( 23) = 0.35894767D+02
           C( 23) =-0.40947441D-01
          EX( 24) = 0.14723672D+02
           C( 24) =-0.10409204D-01
          EX( 25) = 0.88274119D+01
           C( 25) = 0.11075365D-01
          EX( 26) = 0.38421298D+01
           C( 26) = 0.26404335D-02
          EX( 27) = 0.17655586D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.73742728D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.60053586D+06
           C( 29) = 0.40586248D-02
          EX( 30) = 0.44980412D+05
           C( 30) = 0.21883434D-01
          EX( 31) = 0.67065956D+04
           C( 31) = 0.79894749D-01
          EX( 32) = 0.14342329D+04
           C( 32) = 0.12261148D+00
          EX( 33) = 0.29027069D+04
           C( 33) = 0.33566228D-01
          EX( 34) = 0.29115991D+03
           C( 34) =-0.27349558D+00
          EX( 35) = 0.12445999D+03
           C( 35) =-0.36789193D+00
          EX( 36) = 0.21666027D+03
           C( 36) =-0.29576989D+00
          EX( 37) = 0.35894767D+02
           C( 37) = 0.10546917D+01
          EX( 38) = 0.14723672D+02
           C( 38) = 0.26811204D+00
          EX( 39) = 0.88274119D+01
           C( 39) =-0.19749790D-01
          EX( 40) = 0.38421298D+01
           C( 40) =-0.47084684D-02
          EX( 41) = 0.17655586D+01
           C( 41) = 0.33015226D-02
          EX( 42) = 0.73742728D+00
           C( 42) = 0.70852229D-03
          EX( 43) = 0.60053586D+06
           C( 43) = 0.21802113D-02
          EX( 44) = 0.44980412D+05
           C( 44) = 0.11755339D-01
          EX( 45) = 0.67065956D+04
           C( 45) = 0.42917844D-01
          EX( 46) = 0.14342329D+04
           C( 46) = 0.65864413D-01
          EX( 47) = 0.29027069D+04
           C( 47) = 0.10292305D-01
          EX( 48) = 0.29115991D+03
           C( 48) =-0.83861077D-01
          EX( 49) = 0.12445999D+03
           C( 49) =-0.11280553D+00
          EX( 50) = 0.21666027D+03
           C( 50) =-0.32994278D+00
          EX( 51) = 0.35894767D+02
           C( 51) = 0.11765496D+01
          EX( 52) = 0.14723672D+02
           C( 52) = 0.29908938D+00
          EX( 53) = 0.88274119D+01
           C( 53) =-0.13097066D+01
          EX( 54) = 0.38421298D+01
           C( 54) =-0.31224189D+00
          EX( 55) = 0.17655586D+01
           C( 55) = 0.26731756D-02
          EX( 56) = 0.73742728D+00
           C( 56) = 0.57367608D-03
          EX( 57) = 0.60053586D+06
           C( 57) = 0.10307400D-02
          EX( 58) = 0.44980412D+05
           C( 58) = 0.55575795D-02
          EX( 59) = 0.67065956D+04
           C( 59) = 0.20290299D-01
          EX( 60) = 0.14342329D+04
           C( 60) = 0.31138763D-01
          EX( 61) = 0.29027069D+04
           C( 61) = 0.30556561D-02
          EX( 62) = 0.29115991D+03
           C( 62) =-0.24897301D-01
          EX( 63) = 0.12445999D+03
           C( 63) =-0.33490544D-01
          EX( 64) = 0.21666027D+03
           C( 64) =-0.18810663D+00
          EX( 65) = 0.35894767D+02
           C( 65) = 0.67077319D+00
          EX( 66) = 0.14723672D+02
           C( 66) = 0.17051653D+00
          EX( 67) = 0.88274119D+01
           C( 67) =-0.12763442D+01
          EX( 68) = 0.38421298D+01
           C( 68) =-0.30428812D+00
          EX( 69) = 0.17655586D+01
           C( 69) = 0.12456542D+01
          EX( 70) = 0.73742728D+00
           C( 70) = 0.26732324D+00
          EX( 71) = 0.86334429D+04
           C( 71) = 0.22586519D-01
          EX( 72) = 0.16674934D+04
           C( 72) = 0.15312951D+00
          EX( 73) = 0.48125748D+03
           C( 73) = 0.47055968D+00
          EX( 74) = 0.16459368D+03
           C( 74) = 0.48410252D+00
          EX( 75) = 0.75572884D+02
           C( 75) = 0.31878155D-01
          EX( 76) = 0.30102946D+02
           C( 76) = 0.40520082D-01
          EX( 77) = 0.13618986D+02
           C( 77) =-0.10111742D-01
          EX( 78) = 0.57593389D+01
           C( 78) =-0.90200355D-02
          EX( 79) = 0.23233572D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.89857720D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.86334429D+04
           C( 81) = 0.12784447D-01
          EX( 82) = 0.16674934D+04
           C( 82) = 0.86674544D-01
          EX( 83) = 0.48125748D+03
           C( 83) = 0.26634674D+00
          EX( 84) = 0.16459368D+03
           C( 84) = 0.27401227D+00
          EX( 85) = 0.75572884D+02
           C( 85) =-0.50995635D+00
          EX( 86) = 0.30102946D+02
           C( 86) =-0.64820167D+00
          EX( 87) = 0.13618986D+02
           C( 87) =-0.34281165D-01
          EX( 88) = 0.57593389D+01
           C( 88) =-0.30580024D-01
          EX( 89) = 0.23233572D+01
           C( 89) = 0.88596675D-02
          EX( 90) = 0.89857720D+00
           C( 90) = 0.55847247D-02
          EX( 91) = 0.86334429D+04
           C( 91) = 0.66043380D-02
          EX( 92) = 0.16674934D+04
           C( 92) = 0.44775341D-01
          EX( 93) = 0.48125748D+03
           C( 93) = 0.13759248D+00
          EX( 94) = 0.16459368D+03
           C( 94) = 0.14155244D+00
          EX( 95) = 0.75572884D+02
           C( 95) =-0.40304897D+00
          EX( 96) = 0.30102946D+02
           C( 96) =-0.51231250D+00
          EX( 97) = 0.13618986D+02
           C( 97) = 0.68530554D+00
          EX( 98) = 0.57593389D+01
           C( 98) = 0.61131703D+00
          EX( 99) = 0.23233572D+01
           C( 99) = 0.15594515D-01
          EX(100) = 0.89857720D+00
           C(100) = 0.98300617D-02
          EX(101) = 0.86334429D+04
           C(101) = 0.28781849D-02
          EX(102) = 0.16674934D+04
           C(102) = 0.19513191D-01
          EX(103) = 0.48125748D+03
           C(103) = 0.59963104D-01
          EX(104) = 0.16459368D+03
           C(104) = 0.61688860D-01
          EX(105) = 0.75572884D+02
           C(105) =-0.19337863D+00
          EX(106) = 0.30102946D+02
           C(106) =-0.24580212D+00
          EX(107) = 0.13618986D+02
           C(107) = 0.48269860D+00
          EX(108) = 0.57593389D+01
           C(108) = 0.43058439D+00
          EX(109) = 0.23233572D+01
           C(109) =-0.79256656D+00
          EX(110) = 0.89857720D+00
           C(110) =-0.49959732D+00
          EX(111) = 0.82863676D+03
           C(111) = 0.35024359D-01
          EX(112) = 0.22720325D+03
           C(112) = 0.22048860D+00
          EX(113) = 0.80901084D+02
           C(113) = 0.52778769D+00
          EX(114) = 0.31433270D+02
           C(114) = 0.38673643D+00
          EX(115) = 0.28288740D+02
           C(115) = 0.99575234D-02
          EX(116) = 0.11834660D+02
           C(116) = 0.25501488D-01
          EX(117) = 0.48784315D+01
           C(117) = 0.15513883D-01
          EX(118) = 0.31428098D+01
           C(118) =-0.31028028D-02
          EX(119) = 0.12211993D+01
           C(119) =-0.52247899D-02
          EX(120) = 0.43903441D+00
           C(120) =-0.21706728D-02
          EX(121) = 0.82863676D+03
           C(121) = 0.19151564D-01
          EX(122) = 0.22720325D+03
           C(122) = 0.12056470D+00
          EX(123) = 0.80901084D+02
           C(123) = 0.28859800D+00
          EX(124) = 0.31433270D+02
           C(124) = 0.21147018D+00
          EX(125) = 0.28288740D+02
           C(125) =-0.24655331D+00
          EX(126) = 0.11834660D+02
           C(126) =-0.63142972D+00
          EX(127) = 0.48784315D+01
           C(127) =-0.38413159D+00
          EX(128) = 0.31428098D+01
           C(128) =-0.66016369D-02
          EX(129) = 0.12211993D+01
           C(129) =-0.11116454D-01
          EX(130) = 0.43903441D+00
           C(130) =-0.46184030D-02
          EX(131) = 0.13898147D+03
           C(131) = 0.44059799D-01
          EX(132) = 0.44275678D+02
           C(132) = 0.22245177D+00
          EX(133) = 0.17046140D+02
           C(133) = 0.45473985D+00
          EX(134) = 0.68033650D+01
           C(134) = 0.43604277D+00
          EX(135) = 0.25540456D+01
           C(135) = 0.15349353D+00
          RETURN
          END IF
C ---
        ELSE IF (MMPTYP.EQ.121) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : PO/QR             CONFIGURATION : S02P04       *
C   VALENCE : (6S/6P)           BASIS SET     : ( 7/ 5)      *
C          EFFECTIVE CORE CHARGE :  6.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -7.764794 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =    -.8083   A.U.
C  ***     ORBITAL ENERGY( 6P ) =    -.3392   A.U.
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE -  6.0D+00
          SHINFO='6S/6P'
          NOSH= 2
          CDFCTR(1)='61'
          CDFCTR(2)='41'
             KNG(1)= 7
            KTYP(1)= 1
             KNG(2)= 5
            KTYP(2)= 2
          EX( 1)= 0.20029997D+03
           C( 1)= 0.47849803D-01
          EX( 2)= 0.35368439D+02
           C( 2)=-0.20442041D+00
          EX( 3)= 0.78178408D+01
           C( 3)= 0.50416912D+00
          EX( 4)= 0.20634524D+01
           C( 4)=-0.16231057D+00
          EX( 5)= 0.13665355D+01
           C( 5)=-0.78298339D+00
          EX( 6)= 0.25798337D+00
           C( 6)= 0.88282622D+00
          EX( 7)= 0.10041529D+00
           C( 7)= 0.39328611D+00
          EX( 8)= 0.50532189D+02
           C( 8)=-0.34270190D-01
          EX( 9)= 0.10003239D+02
           C( 9)= 0.13399617D+00
          EX(10)= 0.17429591D+01
           C(10)=-0.35014222D+00
          EX(11)= 0.22704885D+00
           C(11)= 0.66682436D+00
          EX(12)= 0.75938260D-01
           C(12)= 0.45474955D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE -  6.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.46231207D+01
          ALPN0( 1)= 0.39425861D+03
            AN0( 2)= 0.42472843D+01
          ALPN0( 2)= 0.80026907D+01
            AN0( 3)= 0.18445427D+01
          ALPN0( 3)= 0.16875690D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.26233154D+04
          ALPN1( 1)= 0.12282522D+05
            AN1( 2)= 0.29719891D+02
          ALPN1( 2)= 0.75314262D+02
            AN1( 3)= 0.22570475D+00
          ALPN1( 3)= 0.56040551D+00
C         --- CORE-SHELL INFORMATION 
          NOSH     = 13
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.51838635D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.94488150D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.23335455D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.56490000D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.10892025D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.80972115D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.19416450D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.43394250D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.70107600D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.15356169D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.27966510D+02
          KTYP(12) =  3
           KNG(12) = 10
          BPAR(12) = 0.23527640D+01
          KTYP(13) =  4
           KNG(13) =  4
          BPAR(13) = 0.11094965D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.60053586D+06
           C(  1) = 0.20103103D-01
          EX(  2) = 0.44980412D+05
           C(  2) = 0.10839260D+00
          EX(  3) = 0.67065956D+04
           C(  3) = 0.39573314D+00
          EX(  4) = 0.14342329D+04
           C(  4) = 0.60731687D+00
          EX(  5) = 0.29027069D+04
           C(  5) =-0.47214107D-02
          EX(  6) = 0.29115991D+03
           C(  6) = 0.38469767D-01
          EX(  7) = 0.12445999D+03
           C(  7) = 0.51747515D-01
          EX(  8) = 0.21666027D+03
           C(  8) = 0.10155253D-01
          EX(  9) = 0.35894767D+02
           C(  9) =-0.36212820D-01
          EX( 10) = 0.14723672D+02
           C( 10) =-0.92056217D-02
          EX( 11) = 0.88274119D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.38421298D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.17655586D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.73742728D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.60053586D+06
           C( 15) = 0.83736776D-02
          EX( 16) = 0.44980412D+05
           C( 16) = 0.45149484D-01
          EX( 17) = 0.67065956D+04
           C( 17) = 0.16483733D+00
          EX( 18) = 0.14342329D+04
           C( 18) = 0.25296969D+00
          EX( 19) = 0.29027069D+04
           C( 19) = 0.57920806D-01
          EX( 20) = 0.29115991D+03
           C( 20) =-0.47193520D+00
          EX( 21) = 0.12445999D+03
           C( 21) =-0.63482251D+00
          EX( 22) = 0.21666027D+03
           C( 22) = 0.11482995D-01
          EX( 23) = 0.35894767D+02
           C( 23) =-0.40947441D-01
          EX( 24) = 0.14723672D+02
           C( 24) =-0.10409204D-01
          EX( 25) = 0.88274119D+01
           C( 25) = 0.11075365D-01
          EX( 26) = 0.38421298D+01
           C( 26) = 0.26404335D-02
          EX( 27) = 0.17655586D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.73742728D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.60053586D+06
           C( 29) = 0.40586248D-02
          EX( 30) = 0.44980412D+05
           C( 30) = 0.21883434D-01
          EX( 31) = 0.67065956D+04
           C( 31) = 0.79894748D-01
          EX( 32) = 0.14342329D+04
           C( 32) = 0.12261148D+00
          EX( 33) = 0.29027069D+04
           C( 33) = 0.33566228D-01
          EX( 34) = 0.29115991D+03
           C( 34) =-0.27349558D+00
          EX( 35) = 0.12445999D+03
           C( 35) =-0.36789193D+00
          EX( 36) = 0.21666027D+03
           C( 36) =-0.29576989D+00
          EX( 37) = 0.35894767D+02
           C( 37) = 0.10546917D+01
          EX( 38) = 0.14723672D+02
           C( 38) = 0.26811204D+00
          EX( 39) = 0.88274119D+01
           C( 39) =-0.19749790D-01
          EX( 40) = 0.38421298D+01
           C( 40) =-0.47084684D-02
          EX( 41) = 0.17655586D+01
           C( 41) = 0.33015226D-02
          EX( 42) = 0.73742728D+00
           C( 42) = 0.70852228D-03
          EX( 43) = 0.60053586D+06
           C( 43) = 0.21802113D-02
          EX( 44) = 0.44980412D+05
           C( 44) = 0.11755339D-01
          EX( 45) = 0.67065956D+04
           C( 45) = 0.42917845D-01
          EX( 46) = 0.14342329D+04
           C( 46) = 0.65864414D-01
          EX( 47) = 0.29027069D+04
           C( 47) = 0.10292305D-01
          EX( 48) = 0.29115991D+03
           C( 48) =-0.83861079D-01
          EX( 49) = 0.12445999D+03
           C( 49) =-0.11280553D+00
          EX( 50) = 0.21666027D+03
           C( 50) =-0.32994279D+00
          EX( 51) = 0.35894767D+02
           C( 51) = 0.11765496D+01
          EX( 52) = 0.14723672D+02
           C( 52) = 0.29908939D+00
          EX( 53) = 0.88274119D+01
           C( 53) =-0.13097066D+01
          EX( 54) = 0.38421298D+01
           C( 54) =-0.31224190D+00
          EX( 55) = 0.17655586D+01
           C( 55) = 0.26731757D-02
          EX( 56) = 0.73742728D+00
           C( 56) = 0.57367609D-03
          EX( 57) = 0.60053586D+06
           C( 57) = 0.10307400D-02
          EX( 58) = 0.44980412D+05
           C( 58) = 0.55575796D-02
          EX( 59) = 0.67065956D+04
           C( 59) = 0.20290299D-01
          EX( 60) = 0.14342329D+04
           C( 60) = 0.31138764D-01
          EX( 61) = 0.29027069D+04
           C( 61) = 0.30556562D-02
          EX( 62) = 0.29115991D+03
           C( 62) =-0.24897301D-01
          EX( 63) = 0.12445999D+03
           C( 63) =-0.33490545D-01
          EX( 64) = 0.21666027D+03
           C( 64) =-0.18810663D+00
          EX( 65) = 0.35894767D+02
           C( 65) = 0.67077320D+00
          EX( 66) = 0.14723672D+02
           C( 66) = 0.17051653D+00
          EX( 67) = 0.88274119D+01
           C( 67) =-0.12763442D+01
          EX( 68) = 0.38421298D+01
           C( 68) =-0.30428813D+00
          EX( 69) = 0.17655586D+01
           C( 69) = 0.12456542D+01
          EX( 70) = 0.73742728D+00
           C( 70) = 0.26732324D+00
          EX( 71) = 0.86334429D+04
           C( 71) = 0.22586519D-01
          EX( 72) = 0.16674934D+04
           C( 72) = 0.15312951D+00
          EX( 73) = 0.48125748D+03
           C( 73) = 0.47055968D+00
          EX( 74) = 0.16459368D+03
           C( 74) = 0.48410252D+00
          EX( 75) = 0.75572884D+02
           C( 75) = 0.31878155D-01
          EX( 76) = 0.30102946D+02
           C( 76) = 0.40520082D-01
          EX( 77) = 0.13618986D+02
           C( 77) =-0.10111742D-01
          EX( 78) = 0.57593389D+01
           C( 78) =-0.90200354D-02
          EX( 79) = 0.23233572D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.89857720D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.86334429D+04
           C( 81) = 0.12784447D-01
          EX( 82) = 0.16674934D+04
           C( 82) = 0.86674544D-01
          EX( 83) = 0.48125748D+03
           C( 83) = 0.26634674D+00
          EX( 84) = 0.16459368D+03
           C( 84) = 0.27401227D+00
          EX( 85) = 0.75572884D+02
           C( 85) =-0.50995635D+00
          EX( 86) = 0.30102946D+02
           C( 86) =-0.64820167D+00
          EX( 87) = 0.13618986D+02
           C( 87) =-0.34281165D-01
          EX( 88) = 0.57593389D+01
           C( 88) =-0.30580024D-01
          EX( 89) = 0.23233572D+01
           C( 89) = 0.88596675D-02
          EX( 90) = 0.89857720D+00
           C( 90) = 0.55847247D-02
          EX( 91) = 0.86334429D+04
           C( 91) = 0.66043380D-02
          EX( 92) = 0.16674934D+04
           C( 92) = 0.44775341D-01
          EX( 93) = 0.48125748D+03
           C( 93) = 0.13759248D+00
          EX( 94) = 0.16459368D+03
           C( 94) = 0.14155244D+00
          EX( 95) = 0.75572884D+02
           C( 95) =-0.40304897D+00
          EX( 96) = 0.30102946D+02
           C( 96) =-0.51231250D+00
          EX( 97) = 0.13618986D+02
           C( 97) = 0.68530554D+00
          EX( 98) = 0.57593389D+01
           C( 98) = 0.61131703D+00
          EX( 99) = 0.23233572D+01
           C( 99) = 0.15594515D-01
          EX(100) = 0.89857720D+00
           C(100) = 0.98300617D-02
          EX(101) = 0.86334429D+04
           C(101) = 0.28781849D-02
          EX(102) = 0.16674934D+04
           C(102) = 0.19513191D-01
          EX(103) = 0.48125748D+03
           C(103) = 0.59963104D-01
          EX(104) = 0.16459368D+03
           C(104) = 0.61688860D-01
          EX(105) = 0.75572884D+02
           C(105) =-0.19337863D+00
          EX(106) = 0.30102946D+02
           C(106) =-0.24580212D+00
          EX(107) = 0.13618986D+02
           C(107) = 0.48269860D+00
          EX(108) = 0.57593389D+01
           C(108) = 0.43058439D+00
          EX(109) = 0.23233572D+01
           C(109) =-0.79256656D+00
          EX(110) = 0.89857720D+00
           C(110) =-0.49959732D+00
          EX(111) = 0.82863676D+03
           C(111) = 0.35024359D-01
          EX(112) = 0.22720325D+03
           C(112) = 0.22048860D+00
          EX(113) = 0.80901084D+02
           C(113) = 0.52778769D+00
          EX(114) = 0.31433270D+02
           C(114) = 0.38673643D+00
          EX(115) = 0.28288740D+02
           C(115) = 0.99575234D-02
          EX(116) = 0.11834660D+02
           C(116) = 0.25501488D-01
          EX(117) = 0.48784315D+01
           C(117) = 0.15513883D-01
          EX(118) = 0.31428098D+01
           C(118) =-0.31028028D-02
          EX(119) = 0.12211993D+01
           C(119) =-0.52247899D-02
          EX(120) = 0.43903441D+00
           C(120) =-0.21706728D-02
          EX(121) = 0.82863676D+03
           C(121) = 0.19151564D-01
          EX(122) = 0.22720325D+03
           C(122) = 0.12056470D+00
          EX(123) = 0.80901084D+02
           C(123) = 0.28859800D+00
          EX(124) = 0.31433270D+02
           C(124) = 0.21147018D+00
          EX(125) = 0.28288740D+02
           C(125) =-0.24655331D+00
          EX(126) = 0.11834660D+02
           C(126) =-0.63142972D+00
          EX(127) = 0.48784315D+01
           C(127) =-0.38413159D+00
          EX(128) = 0.31428098D+01
           C(128) =-0.66016369D-02
          EX(129) = 0.12211993D+01
           C(129) =-0.11116454D-01
          EX(130) = 0.43903441D+00
           C(130) =-0.46184030D-02
          EX(131) = 0.82863676D+03
           C(131) = 0.70512108D-02
          EX(132) = 0.22720325D+03
           C(132) = 0.44389437D-01
          EX(133) = 0.80901084D+02
           C(133) = 0.10625582D+00
          EX(134) = 0.31433270D+02
           C(134) = 0.77858956D-01
          EX(135) = 0.28288740D+02
           C(135) =-0.11422149D+00
          EX(136) = 0.11834660D+02
           C(136) =-0.29252432D+00
          EX(137) = 0.48784315D+01
           C(137) =-0.17795778D+00
          EX(138) = 0.31428098D+01
           C(138) = 0.37604597D+00
          EX(139) = 0.12211993D+01
           C(139) = 0.63322141D+00
          EX(140) = 0.43903441D+00
           C(140) = 0.26307594D+00
          EX(141) = 0.10014708D+03
           C(141) = 0.85303974D-01
          EX(142) = 0.30186885D+02
           C(142) = 0.36501349D+00
          EX(143) = 0.10554408D+02
           C(143) = 0.55756158D+00
          EX(144) = 0.35787779D+01
           C(144) = 0.29419482D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.85) THEN
        ITYP(1)=121
        ITYP(2)=122
C ---
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : AT/QR             CONFIGURATION : S2P5D10      *
C   VALENCE : (6S/6P/5D)        BASIS SET     : ( 9/ 8/ 7)   *
C          EFFECTIVE CORE CHARGE : 17.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =   -97.18882130 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =  -.938857 A.U. <REFERENCE =  -.939257>
C  ***     ORBITAL ENERGY( 6P ) =  -.378560 A.U. <REFERENCE =  -.378526>
C  ***     ORBITAL ENERGY( 5D ) = -1.829864 A.U. <REFERENCE = -1.828910>
C
C  ***     ORBITAL ENERGY DEV. =    .00139     DENSITY DEV. =    .01884
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 17.0D+00
          SHINFO='6S/6P/5D'
          NOSH= 3
          CDFCTR(1)='81'
          CDFCTR(2)='71'
          CDFCTR(3)='7'
             KNG(1)= 9
            KTYP(1)= 1
             KNG(2)= 8
            KTYP(2)= 2
             KNG(3)= 7
            KTYP(3)= 3
          EX( 1)= 0.59901747D+04
           C( 1)=-0.27928329D-01
          EX( 2)= 0.17679162D+03
           C( 2)= 0.11426897D+00
          EX( 3)= 0.39643358D+02
           C( 3)=-0.29558670D+00
          EX( 4)= 0.77565428D+01
           C( 4)= 0.62128283D+00
          EX( 5)= 0.22377038D+01
           C( 5)=-0.50637013D+00
          EX( 6)= 0.12712095D+01
           C( 6)=-0.59964812D+00
          EX( 7)= 0.36477874D+00
           C( 7)= 0.60084353D+00
          EX( 8)= 0.17984324D+00
           C( 8)= 0.59053266D+00
          EX( 9)= 0.82315455D-01
           C( 9)= 0.14050383D+00
          EX(10)= 0.64123815D+03
           C(10)= 0.21882226D-01
          EX(11)= 0.47895842D+02
           C(11)=-0.87448073D-01
          EX(12)= 0.10580362D+02
           C(12)= 0.21189293D+00
          EX(13)= 0.19389755D+01
           C(13)=-0.39546347D+00
          EX(14)= 0.90279796D+00
           C(14)=-0.74535157D-01
          EX(15)= 0.34053158D+00
           C(15)= 0.46231024D+00
          EX(16)= 0.14297829D+00
           C(16)= 0.53939404D+00
          EX(17)= 0.58712912D-01
           C(17)= 0.17029411D+00
          EX(18)= 0.35727673D+03
           C(18)= 0.32264962D-01
          EX(19)= 0.95856737D+02
           C(19)= 0.16061542D+00
          EX(20)= 0.15630881D+02
           C(20)=-0.23693505D+00
          EX(21)= 0.99328167D+01
           C(21)=-0.16990166D+00
          EX(22)= 0.21543050D+01
           C(22)= 0.52786768D+00
          EX(23)= 0.92420437D+00
           C(23)= 0.46940654D+00
          EX(24)= 0.35987064D+00
           C(24)= 0.12680473D+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.18058833D+01
          ALPN0( 1)= 0.39261221D+03
            AN0( 2)= 0.10913543D+01
          ALPN0( 2)= 0.11252260D+02
            AN0( 3)= 0.47532818D+00
          ALPN0( 3)= 0.37008682D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.44209107D+03
          ALPN1( 1)= 0.47015056D+04
            AN1( 2)= 0.12293017D+02
          ALPN1( 2)= 0.45298433D+02
            AN1( 3)= 0.12991142D+00
          ALPN1( 3)= 0.13245354D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     = 12
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.71078476D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.13011571D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.32293212D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.79072780D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.15685012D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.11119884D+04
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.26829584D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.60822760D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.10213783D+02
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.21247517D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.39576586D+02
          KTYP(12) =  4
           KNG(12) =  5
          BPAR(12) = 0.16446274D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.63666271D+06
           C(  1) = 0.20295197D-01
          EX(  2) = 0.47355860D+05
           C(  2) = 0.10834300D+00
          EX(  3) = 0.69980038D+04
           C(  3) = 0.39461250D+00
          EX(  4) = 0.14858694D+04
           C(  4) = 0.60862745D+00
          EX(  5) = 0.30372146D+04
           C(  5) =-0.46947619D-02
          EX(  6) = 0.30424312D+03
           C(  6) = 0.38365738D-01
          EX(  7) = 0.12949597D+03
           C(  7) = 0.53252977D-01
          EX(  8) = 0.22464639D+03
           C(  8) = 0.10183741D-01
          EX(  9) = 0.37111202D+02
           C(  9) =-0.36482993D-01
          EX( 10) = 0.15244625D+02
           C( 10) =-0.93113179D-02
          EX( 11) = 0.91672180D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.39933457D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.18645782D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.78509064D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.63666271D+06
           C( 15) = 0.84812923D-02
          EX( 16) = 0.47355860D+05
           C( 16) = 0.45276168D-01
          EX( 17) = 0.69980038D+04
           C( 17) = 0.16490720D+00
          EX( 18) = 0.14858694D+04
           C( 18) = 0.25434331D+00
          EX( 19) = 0.30372146D+04
           C( 19) = 0.56695771D-01
          EX( 20) = 0.30424312D+03
           C( 20) =-0.46331958D+00
          EX( 21) = 0.12949597D+03
           C( 21) =-0.64310367D+00
          EX( 22) = 0.22464639D+03
           C( 22) = 0.11722996D-01
          EX( 23) = 0.37111202D+02
           C( 23) =-0.41997334D-01
          EX( 24) = 0.15244625D+02
           C( 24) =-0.10718707D-01
          EX( 25) = 0.91672180D+01
           C( 25) = 0.11421719D-01
          EX( 26) = 0.39933457D+01
           C( 26) = 0.27069773D-02
          EX( 27) = 0.18645782D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.78509064D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.63666271D+06
           C( 29) = 0.41147725D-02
          EX( 30) = 0.47355860D+05
           C( 30) = 0.21966126D-01
          EX( 31) = 0.69980038D+04
           C( 31) = 0.80006157D-01
          EX( 32) = 0.14858694D+04
           C( 32) = 0.12339686D+00
          EX( 33) = 0.30372146D+04
           C( 33) = 0.32942869D-01
          EX( 34) = 0.30424312D+03
           C( 34) =-0.26921013D+00
          EX( 35) = 0.12949597D+03
           C( 35) =-0.37367302D+00
          EX( 36) = 0.22464639D+03
           C( 36) =-0.29407685D+00
          EX( 37) = 0.37111202D+02
           C( 37) = 0.10535228D+01
          EX( 38) = 0.15244625D+02
           C( 38) = 0.26888380D+00
          EX( 39) = 0.91672180D+01
           C( 39) =-0.19913212D-01
          EX( 40) = 0.39933457D+01
           C( 40) =-0.47194832D-02
          EX( 41) = 0.18645782D+01
           C( 41) = 0.32819889D-02
          EX( 42) = 0.78509064D+00
           C( 42) = 0.67746528D-03
          EX( 43) = 0.63666271D+06
           C( 43) = 0.22134927D-02
          EX( 44) = 0.47355860D+05
           C( 44) = 0.11816414D-01
          EX( 45) = 0.69980038D+04
           C( 45) = 0.43038355D-01
          EX( 46) = 0.14858694D+04
           C( 46) = 0.66379866D-01
          EX( 47) = 0.30372146D+04
           C( 47) = 0.10160011D-01
          EX( 48) = 0.30424312D+03
           C( 48) =-0.83027923D-01
          EX( 49) = 0.12949597D+03
           C( 49) =-0.11524563D+00
          EX( 50) = 0.22464639D+03
           C( 50) =-0.32962403D+00
          EX( 51) = 0.37111202D+02
           C( 51) = 0.11808696D+01
          EX( 52) = 0.15244625D+02
           C( 52) = 0.30138571D+00
          EX( 53) = 0.91672180D+01
           C( 53) =-0.13153645D+01
          EX( 54) = 0.39933457D+01
           C( 54) =-0.31174483D+00
          EX( 55) = 0.18645782D+01
           C( 55) = 0.30373802D-02
          EX( 56) = 0.78509064D+00
           C( 56) = 0.62697334D-03
          EX( 57) = 0.63666271D+06
           C( 57) = 0.10577763D-02
          EX( 58) = 0.47355860D+05
           C( 58) = 0.56467881D-02
          EX( 59) = 0.69980038D+04
           C( 59) = 0.20567024D-01
          EX( 60) = 0.14858694D+04
           C( 60) = 0.31721384D-01
          EX( 61) = 0.30372146D+04
           C( 61) = 0.30443456D-02
          EX( 62) = 0.30424312D+03
           C( 62) =-0.24878486D-01
          EX( 63) = 0.12949597D+03
           C( 63) =-0.34532203D-01
          EX( 64) = 0.22464639D+03
           C( 64) =-0.19043494D+00
          EX( 65) = 0.37111202D+02
           C( 65) = 0.68222827D+00
          EX( 66) = 0.15244625D+02
           C( 66) = 0.17412070D+00
          EX( 67) = 0.91672180D+01
           C( 67) =-0.13032755D+01
          EX( 68) = 0.39933457D+01
           C( 68) =-0.30887971D+00
          EX( 69) = 0.18645782D+01
           C( 69) = 0.12662855D+01
          EX( 70) = 0.78509064D+00
           C( 70) = 0.26138555D+00
          EX( 71) = 0.89536905D+04
           C( 71) = 0.22561670D-01
          EX( 72) = 0.17237509D+04
           C( 72) = 0.15275005D+00
          EX( 73) = 0.49647987D+03
           C( 73) = 0.47005842D+00
          EX( 74) = 0.16959196D+03
           C( 74) = 0.48492987D+00
          EX( 75) = 0.78040481D+02
           C( 75) = 0.32002513D-01
          EX( 76) = 0.31084569D+02
           C( 76) = 0.40825148D-01
          EX( 77) = 0.14106232D+02
           C( 77) =-0.10097951D-01
          EX( 78) = 0.59894327D+01
           C( 78) =-0.90083761D-02
          EX( 79) = 0.24498059D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.96196724D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.89536905D+04
           C( 81) = 0.12789980D-01
          EX( 82) = 0.17237509D+04
           C( 82) = 0.86592445D-01
          EX( 83) = 0.49647987D+03
           C( 83) = 0.26647131D+00
          EX( 84) = 0.16959196D+03
           C( 84) = 0.27490179D+00
          EX( 85) = 0.78040481D+02
           C( 85) =-0.50895562D+00
          EX( 86) = 0.31084569D+02
           C( 86) =-0.64926741D+00
          EX( 87) = 0.14106232D+02
           C( 87) =-0.34521424D-01
          EX( 88) = 0.59894327D+01
           C( 88) =-0.30796544D-01
          EX( 89) = 0.24498059D+01
           C( 89) = 0.88111767D-02
          EX( 90) = 0.96196724D+00
           C( 90) = 0.54457378D-02
          EX( 91) = 0.89536905D+04
           C( 91) = 0.66322846D-02
          EX( 92) = 0.17237509D+04
           C( 92) = 0.44902788D-01
          EX( 93) = 0.49647987D+03
           C( 93) = 0.13817954D+00
          EX( 94) = 0.16959196D+03
           C( 94) = 0.14255120D+00
          EX( 95) = 0.78040481D+02
           C( 95) =-0.40432810D+00
          EX( 96) = 0.31084569D+02
           C( 96) =-0.51579559D+00
          EX( 97) = 0.14106232D+02
           C( 97) = 0.68602291D+00
          EX( 98) = 0.59894327D+01
           C( 98) = 0.61200064D+00
          EX( 99) = 0.24498059D+01
           C( 99) = 0.15879993D-01
          EX(100) = 0.96196724D+00
           C(100) = 0.98146116D-02
          EX(101) = 0.89536905D+04
           C(101) = 0.29360959D-02
          EX(102) = 0.17237509D+04
           C(102) = 0.19878352D-01
          EX(103) = 0.49647987D+03
           C(103) = 0.61171739D-01
          EX(104) = 0.16959196D+03
           C(104) = 0.63107059D-01
          EX(105) = 0.78040481D+02
           C(105) =-0.19736212D+00
          EX(106) = 0.31084569D+02
           C(106) =-0.25177203D+00
          EX(107) = 0.14106232D+02
           C(107) = 0.49386385D+00
          EX(108) = 0.59894327D+01
           C(108) = 0.44057565D+00
          EX(109) = 0.24498059D+01
           C(109) =-0.80300425D+00
          EX(110) = 0.96196724D+00
           C(110) =-0.49629587D+00
          EX(111) = 0.85619018D+03
           C(111) = 0.34794032D-01
          EX(112) = 0.23464886D+03
           C(112) = 0.21947022D+00
          EX(113) = 0.83571311D+02
           C(113) = 0.52708881D+00
          EX(114) = 0.32497767D+02
           C(114) = 0.38781734D+00
          EX(115) = 0.29447802D+02
           C(115) = 0.99420858D-02
          EX(116) = 0.12376532D+02
           C(116) = 0.25811285D-01
          EX(117) = 0.51264372D+01
           C(117) = 0.15897884D-01
          EX(118) = 0.33460241D+01
           C(118) =-0.30952764D-02
          EX(119) = 0.13247214D+01
           C(119) =-0.52015319D-02
          EX(120) = 0.48531856D+00
           C(120) =-0.20820454D-02
          EX(121) = 0.85619018D+03
           C(121) = 0.19150680D-01
          EX(122) = 0.23464886D+03
           C(122) = 0.12079669D+00
          EX(123) = 0.83571311D+02
           C(123) = 0.29011036D+00
          EX(124) = 0.32497767D+02
           C(124) = 0.21345517D+00
          EX(125) = 0.29447802D+02
           C(125) =-0.24282628D+00
          EX(126) = 0.12376532D+02
           C(126) =-0.63041684D+00
          EX(127) = 0.51264372D+01
           C(127) =-0.38829114D+00
          EX(128) = 0.33460241D+01
           C(128) =-0.68626788D-02
          EX(129) = 0.13247214D+01
           C(129) =-0.11532554D-01
          EX(130) = 0.48531856D+00
           C(130) =-0.46161980D-02
          EX(131) = 0.14449196D+03
           C(131) = 0.43785872D-01
          EX(132) = 0.46195455D+02
           C(132) = 0.22141085D+00
          EX(133) = 0.17872652D+02
           C(133) = 0.45406712D+00
          EX(134) = 0.71866700D+01
           C(134) = 0.43562530D+00
          EX(135) = 0.27293312D+01
           C(135) = 0.15188934D+00
          RETURN
          END IF
C ---
        ELSE IF (MMPTYP.EQ.121) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : AT/QR             CONFIGURATION : S02P05       *
C   VALENCE : (6S/6P)           BASIS SET     : ( 7/ 5)      *
C          EFFECTIVE CORE CHARGE :  7.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =  -10.957996 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =    -.9392   A.U.
C  ***     ORBITAL ENERGY( 6P ) =    -.3785   A.U.
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE -  7.0D+00
          SHINFO='6S/6P'
          NOSH= 2
          CDFCTR(1)='61'
          CDFCTR(2)='41'
             KNG(1)= 7
            KTYP(1)= 1
             KNG(2)= 5
            KTYP(2)= 2
          EX( 1)= 0.20001163D+03
           C( 1)= 0.50326141D-01
          EX( 2)= 0.37197364D+02
           C( 2)=-0.22271004D+00
          EX( 3)= 0.80511577D+01
           C( 3)= 0.58308717D+00
          EX( 4)= 0.23581784D+01
           C( 4)=-0.21000526D+00
          EX( 5)= 0.15044138D+01
           C( 5)=-0.82934765D+00
          EX( 6)= 0.28754616D+00
           C( 6)= 0.91243666D+00
          EX( 7)= 0.11291207D+00
           C( 7)= 0.37073940D+00
          EX( 8)= 0.47697942D+02
           C( 8)=-0.46730455D-01
          EX( 9)= 0.10686714D+02
           C( 9)= 0.16910708D+00
          EX(10)= 0.18472433D+01
           C(10)=-0.40996298D+00
          EX(11)= 0.25918906D+00
           C(11)= 0.69683467D+00
          EX(12)= 0.86877900D-01
           C(12)= 0.43001293D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE -  7.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.38535808D+01
          ALPN0( 1)= 0.51905204D+03
            AN0( 2)= 0.37129400D+01
          ALPN0( 2)= 0.77678336D+01
            AN0( 3)= 0.16052880D+01
          ALPN0( 3)= 0.16885947D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.13554001D+04
          ALPN1( 1)= 0.24914668D+05
            AN1( 2)= 0.21590014D+02
          ALPN1( 2)= 0.87023944D+02
            AN1( 3)= 0.17188226D+00
          ALPN1( 3)= 0.65017423D+00
C         --- CORE-SHELL INFORMATION 
          NOSH     = 13
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.53308934D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.97586853D+03
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.24219915D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.59304594D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.11763761D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.83399149D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.20122188D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.45617071D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.76603365D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.15935637D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.29682435D+02
          KTYP(12) =  3
           KNG(12) = 10
          BPAR(12) = 0.27433650D+01
          KTYP(13) =  4
           KNG(13) =  4
          BPAR(13) = 0.12334703D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.63666271D+06
           C(  1) = 0.20295197D-01
          EX(  2) = 0.47355860D+05
           C(  2) = 0.10834300D+00
          EX(  3) = 0.69980038D+04
           C(  3) = 0.39461250D+00
          EX(  4) = 0.14858694D+04
           C(  4) = 0.60862745D+00
          EX(  5) = 0.30372146D+04
           C(  5) =-0.46947619D-02
          EX(  6) = 0.30424312D+03
           C(  6) = 0.38365738D-01
          EX(  7) = 0.12949597D+03
           C(  7) = 0.53252977D-01
          EX(  8) = 0.22464639D+03
           C(  8) = 0.10183741D-01
          EX(  9) = 0.37111202D+02
           C(  9) =-0.36482993D-01
          EX( 10) = 0.15244625D+02
           C( 10) =-0.93113179D-02
          EX( 11) = 0.91672180D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.39933457D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.18645782D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.78509064D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.63666271D+06
           C( 15) = 0.84812923D-02
          EX( 16) = 0.47355860D+05
           C( 16) = 0.45276168D-01
          EX( 17) = 0.69980038D+04
           C( 17) = 0.16490720D+00
          EX( 18) = 0.14858694D+04
           C( 18) = 0.25434331D+00
          EX( 19) = 0.30372146D+04
           C( 19) = 0.56695771D-01
          EX( 20) = 0.30424312D+03
           C( 20) =-0.46331958D+00
          EX( 21) = 0.12949597D+03
           C( 21) =-0.64310367D+00
          EX( 22) = 0.22464639D+03
           C( 22) = 0.11722996D-01
          EX( 23) = 0.37111202D+02
           C( 23) =-0.41997334D-01
          EX( 24) = 0.15244625D+02
           C( 24) =-0.10718707D-01
          EX( 25) = 0.91672180D+01
           C( 25) = 0.11421719D-01
          EX( 26) = 0.39933457D+01
           C( 26) = 0.27069773D-02
          EX( 27) = 0.18645782D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.78509064D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.63666271D+06
           C( 29) = 0.41147725D-02
          EX( 30) = 0.47355860D+05
           C( 30) = 0.21966126D-01
          EX( 31) = 0.69980038D+04
           C( 31) = 0.80006157D-01
          EX( 32) = 0.14858694D+04
           C( 32) = 0.12339686D+00
          EX( 33) = 0.30372146D+04
           C( 33) = 0.32942869D-01
          EX( 34) = 0.30424312D+03
           C( 34) =-0.26921013D+00
          EX( 35) = 0.12949597D+03
           C( 35) =-0.37367302D+00
          EX( 36) = 0.22464639D+03
           C( 36) =-0.29407685D+00
          EX( 37) = 0.37111202D+02
           C( 37) = 0.10535228D+01
          EX( 38) = 0.15244625D+02
           C( 38) = 0.26888380D+00
          EX( 39) = 0.91672180D+01
           C( 39) =-0.19913212D-01
          EX( 40) = 0.39933457D+01
           C( 40) =-0.47194832D-02
          EX( 41) = 0.18645782D+01
           C( 41) = 0.32819889D-02
          EX( 42) = 0.78509064D+00
           C( 42) = 0.67746528D-03
          EX( 43) = 0.63666271D+06
           C( 43) = 0.22134927D-02
          EX( 44) = 0.47355860D+05
           C( 44) = 0.11816414D-01
          EX( 45) = 0.69980038D+04
           C( 45) = 0.43038354D-01
          EX( 46) = 0.14858694D+04
           C( 46) = 0.66379865D-01
          EX( 47) = 0.30372146D+04
           C( 47) = 0.10160011D-01
          EX( 48) = 0.30424312D+03
           C( 48) =-0.83027921D-01
          EX( 49) = 0.12949597D+03
           C( 49) =-0.11524563D+00
          EX( 50) = 0.22464639D+03
           C( 50) =-0.32962402D+00
          EX( 51) = 0.37111202D+02
           C( 51) = 0.11808696D+01
          EX( 52) = 0.15244625D+02
           C( 52) = 0.30138570D+00
          EX( 53) = 0.91672180D+01
           C( 53) =-0.13153645D+01
          EX( 54) = 0.39933457D+01
           C( 54) =-0.31174482D+00
          EX( 55) = 0.18645782D+01
           C( 55) = 0.30373801D-02
          EX( 56) = 0.78509064D+00
           C( 56) = 0.62697333D-03
          EX( 57) = 0.63666271D+06
           C( 57) = 0.10577763D-02
          EX( 58) = 0.47355860D+05
           C( 58) = 0.56467879D-02
          EX( 59) = 0.69980038D+04
           C( 59) = 0.20567023D-01
          EX( 60) = 0.14858694D+04
           C( 60) = 0.31721383D-01
          EX( 61) = 0.30372146D+04
           C( 61) = 0.30443455D-02
          EX( 62) = 0.30424312D+03
           C( 62) =-0.24878485D-01
          EX( 63) = 0.12949597D+03
           C( 63) =-0.34532202D-01
          EX( 64) = 0.22464639D+03
           C( 64) =-0.19043493D+00
          EX( 65) = 0.37111202D+02
           C( 65) = 0.68222825D+00
          EX( 66) = 0.15244625D+02
           C( 66) = 0.17412069D+00
          EX( 67) = 0.91672180D+01
           C( 67) =-0.13032755D+01
          EX( 68) = 0.39933457D+01
           C( 68) =-0.30887970D+00
          EX( 69) = 0.18645782D+01
           C( 69) = 0.12662855D+01
          EX( 70) = 0.78509064D+00
           C( 70) = 0.26138554D+00
          EX( 71) = 0.89536905D+04
           C( 71) = 0.22561670D-01
          EX( 72) = 0.17237509D+04
           C( 72) = 0.15275005D+00
          EX( 73) = 0.49647987D+03
           C( 73) = 0.47005842D+00
          EX( 74) = 0.16959196D+03
           C( 74) = 0.48492987D+00
          EX( 75) = 0.78040481D+02
           C( 75) = 0.32002513D-01
          EX( 76) = 0.31084569D+02
           C( 76) = 0.40825148D-01
          EX( 77) = 0.14106232D+02
           C( 77) =-0.10097951D-01
          EX( 78) = 0.59894327D+01
           C( 78) =-0.90083761D-02
          EX( 79) = 0.24498059D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.96196724D+00
           C( 80) = 0.00000000D+00
          EX( 81) = 0.89536905D+04
           C( 81) = 0.12789980D-01
          EX( 82) = 0.17237509D+04
           C( 82) = 0.86592445D-01
          EX( 83) = 0.49647987D+03
           C( 83) = 0.26647131D+00
          EX( 84) = 0.16959196D+03
           C( 84) = 0.27490179D+00
          EX( 85) = 0.78040481D+02
           C( 85) =-0.50895562D+00
          EX( 86) = 0.31084569D+02
           C( 86) =-0.64926741D+00
          EX( 87) = 0.14106232D+02
           C( 87) =-0.34521424D-01
          EX( 88) = 0.59894327D+01
           C( 88) =-0.30796544D-01
          EX( 89) = 0.24498059D+01
           C( 89) = 0.88111767D-02
          EX( 90) = 0.96196724D+00
           C( 90) = 0.54457378D-02
          EX( 91) = 0.89536905D+04
           C( 91) = 0.66322846D-02
          EX( 92) = 0.17237509D+04
           C( 92) = 0.44902788D-01
          EX( 93) = 0.49647987D+03
           C( 93) = 0.13817954D+00
          EX( 94) = 0.16959196D+03
           C( 94) = 0.14255120D+00
          EX( 95) = 0.78040481D+02
           C( 95) =-0.40432810D+00
          EX( 96) = 0.31084569D+02
           C( 96) =-0.51579559D+00
          EX( 97) = 0.14106232D+02
           C( 97) = 0.68602291D+00
          EX( 98) = 0.59894327D+01
           C( 98) = 0.61200064D+00
          EX( 99) = 0.24498059D+01
           C( 99) = 0.15879993D-01
          EX(100) = 0.96196724D+00
           C(100) = 0.98146116D-02
          EX(101) = 0.89536905D+04
           C(101) = 0.29360959D-02
          EX(102) = 0.17237509D+04
           C(102) = 0.19878352D-01
          EX(103) = 0.49647987D+03
           C(103) = 0.61171739D-01
          EX(104) = 0.16959196D+03
           C(104) = 0.63107059D-01
          EX(105) = 0.78040481D+02
           C(105) =-0.19736212D+00
          EX(106) = 0.31084569D+02
           C(106) =-0.25177203D+00
          EX(107) = 0.14106232D+02
           C(107) = 0.49386385D+00
          EX(108) = 0.59894327D+01
           C(108) = 0.44057565D+00
          EX(109) = 0.24498059D+01
           C(109) =-0.80300425D+00
          EX(110) = 0.96196724D+00
           C(110) =-0.49629587D+00
          EX(111) = 0.85619018D+03
           C(111) = 0.34794032D-01
          EX(112) = 0.23464886D+03
           C(112) = 0.21947022D+00
          EX(113) = 0.83571311D+02
           C(113) = 0.52708881D+00
          EX(114) = 0.32497767D+02
           C(114) = 0.38781734D+00
          EX(115) = 0.29447802D+02
           C(115) = 0.99420858D-02
          EX(116) = 0.12376532D+02
           C(116) = 0.25811285D-01
          EX(117) = 0.51264372D+01
           C(117) = 0.15897884D-01
          EX(118) = 0.33460241D+01
           C(118) =-0.30952764D-02
          EX(119) = 0.13247214D+01
           C(119) =-0.52015319D-02
          EX(120) = 0.48531856D+00
           C(120) =-0.20820454D-02
          EX(121) = 0.85619018D+03
           C(121) = 0.19150680D-01
          EX(122) = 0.23464886D+03
           C(122) = 0.12079669D+00
          EX(123) = 0.83571311D+02
           C(123) = 0.29011036D+00
          EX(124) = 0.32497767D+02
           C(124) = 0.21345517D+00
          EX(125) = 0.29447802D+02
           C(125) =-0.24282628D+00
          EX(126) = 0.12376532D+02
           C(126) =-0.63041684D+00
          EX(127) = 0.51264372D+01
           C(127) =-0.38829114D+00
          EX(128) = 0.33460241D+01
           C(128) =-0.68626788D-02
          EX(129) = 0.13247214D+01
           C(129) =-0.11532554D-01
          EX(130) = 0.48531856D+00
           C(130) =-0.46161980D-02
          EX(131) = 0.85619018D+03
           C(131) = 0.72758615D-02
          EX(132) = 0.23464886D+03
           C(132) = 0.45893929D-01
          EX(133) = 0.83571311D+02
           C(133) = 0.11022077D+00
          EX(134) = 0.32497767D+02
           C(134) = 0.81097390D-01
          EX(135) = 0.29447802D+02
           C(135) =-0.11674051D+00
          EX(136) = 0.12376532D+02
           C(136) =-0.30307751D+00
          EX(137) = 0.51264372D+01
           C(137) =-0.18667381D+00
          EX(138) = 0.33460241D+01
           C(138) = 0.37967788D+00
          EX(139) = 0.13247214D+01
           C(139) = 0.63803885D+00
          EX(140) = 0.48531856D+00
           C(140) = 0.25539127D+00
          EX(141) = 0.10506678D+03
           C(141) = 0.83690652D-01
          EX(142) = 0.31761790D+02
           C(142) = 0.36196210D+00
          EX(143) = 0.11163875D+02
           C(143) = 0.55822374D+00
          EX(144) = 0.38202673D+01
           C(144) = 0.29449137D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C
C     --- 
C
      IF(IZSAVE.EQ.86) THEN
        ITYP(1)=121
        ITYP(2)=122
C ---
        IF (MMPTYP.EQ.122) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : RN/QR             CONFIGURATION : S2P6D10      *
C   VALENCE : (6S/6P/5D)        BASIS SET     : ( 9/ 8/ 7)   *
C          EFFECTIVE CORE CHARGE : 18.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =  -111.37130317 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) = -1.072846 A.U. <REFERENCE = -1.072985>
C  ***     ORBITAL ENERGY( 6P ) =  -.427832 A.U. <REFERENCE =  -.427721>
C  ***     ORBITAL ENERGY( 5D ) = -2.094847 A.U. <REFERENCE = -2.093776>
C
C  ***     ORBITAL ENERGY DEV. =    .00132     DENSITY DEV. =    .01314
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE - 18.0D+00
          SHINFO='6S/6P/5D'
          NOSH= 3
          CDFCTR(1)='81'
          CDFCTR(2)='71'
          CDFCTR(3)='7'
             KNG(1)= 9
            KTYP(1)= 1
             KNG(2)= 8
            KTYP(2)= 2
             KNG(3)= 7
            KTYP(3)= 3
          EX( 1)= 0.62745555D+04
           C( 1)= 0.31139263D-01
          EX( 2)= 0.18288388D+03
           C( 2)=-0.12252361D+00
          EX( 3)= 0.40955365D+02
           C( 3)= 0.31204324D+00
          EX( 4)= 0.81009227D+01
           C( 4)=-0.64692955D+00
          EX( 5)= 0.22367789D+01
           C( 5)= 0.62766455D+00
          EX( 6)= 0.12715965D+01
           C( 6)= 0.54592425D+00
          EX( 7)= 0.43182352D+00
           C( 7)=-0.53732049D+00
          EX( 8)= 0.22091865D+00
           C( 8)=-0.63890590D+00
          EX( 9)= 0.10204845D+00
           C( 9)=-0.19187795D+00
          EX(10)= 0.66178804D+03
           C(10)= 0.24848029D-01
          EX(11)= 0.49376876D+02
           C(11)=-0.95402613D-01
          EX(12)= 0.10965731D+02
           C(12)= 0.22806279D+00
          EX(13)= 0.23824974D+01
           C(13)=-0.19003902D+00
          EX(14)= 0.17170843D+01
           C(14)=-0.28637304D+00
          EX(15)= 0.33656584D+00
           C(15)= 0.53961480D+00
          EX(16)= 0.14308343D+00
           C(16)= 0.48257238D+00
          EX(17)= 0.60916626D-01
           C(17)= 0.12590048D+00
          EX(18)= 0.36873891D+03
           C(18)= 0.36605348D-01
          EX(19)= 0.98948644D+02
           C(19)= 0.17004438D+00
          EX(20)= 0.16217453D+02
           C(20)=-0.22151728D+00
          EX(21)= 0.10413793D+02
           C(21)=-0.18034541D+00
          EX(22)= 0.22702500D+01
           C(22)= 0.55053651D+00
          EX(23)= 0.98664347D+00
           C(23)= 0.45217501D+00
          EX(24)= 0.38808435D+00
           C(24)= 0.12182520D+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.16954837D+01
          ALPN0( 1)= 0.55991707D+03
            AN0( 2)= 0.12984041D+01
          ALPN0( 2)= 0.22509290D+02
            AN0( 3)= 0.58718872D+00
          ALPN0( 3)= 0.34562737D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.36514049D+03
          ALPN1( 1)= 0.50991392D+04
            AN1( 2)= 0.92053668D+01
          ALPN1( 2)= 0.44973607D+02
            AN1( 3)= 0.65627533D-01
          ALPN1( 3)= 0.12405494D+01
C         --- CORE-SHELL INFORMATION 
          NOSH     = 12
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.73079100D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.13434916D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.33504200D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.82934740D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.16875387D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.11449259D+04
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.27790762D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.63859580D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.11094423D+02
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.22035392D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.41919560D+02
          KTYP(12) =  4
           KNG(12) =  5
          BPAR(12) = 0.18149190D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.67489330D+06
           C(  1) = 0.20496343D-01
          EX(  2) = 0.49861476D+05
           C(  2) = 0.10831446D+00
          EX(  3) = 0.73024199D+04
           C(  3) = 0.39349537D+00
          EX(  4) = 0.15392616D+04
           C(  4) = 0.60991196D+00
          EX(  5) = 0.31782876D+04
           C(  5) =-0.46672393D-02
          EX(  6) = 0.31806118D+03
           C(  6) = 0.38237583D-01
          EX(  7) = 0.13473430D+03
           C(  7) = 0.54816266D-01
          EX(  8) = 0.23287555D+03
           C(  8) = 0.10211268D-01
          EX(  9) = 0.38364325D+02
           C(  9) =-0.36750076D-01
          EX( 10) = 0.15788965D+02
           C( 10) =-0.94236788D-02
          EX( 11) = 0.95195017D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.41514861D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.19671897D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.83354639D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.67489330D+06
           C( 15) = 0.85933231D-02
          EX( 16) = 0.49861476D+05
           C( 16) = 0.45412059D-01
          EX( 17) = 0.73024199D+04
           C( 17) = 0.16497737D+00
          EX( 18) = 0.15392616D+04
           C( 18) = 0.25571247D+00
          EX( 19) = 0.31782876D+04
           C( 19) = 0.55477288D-01
          EX( 20) = 0.31806118D+03
           C( 20) =-0.45451224D+00
          EX( 21) = 0.13473430D+03
           C( 21) =-0.65157528D+00
          EX( 22) = 0.23287555D+03
           C( 22) = 0.11970326D-01
          EX( 23) = 0.38364325D+02
           C( 23) =-0.43080877D-01
          EX( 24) = 0.15788965D+02
           C( 24) =-0.11047062D-01
          EX( 25) = 0.95195017D+01
           C( 25) = 0.11778332D-01
          EX( 26) = 0.41514861D+01
           C( 26) = 0.27809716D-02
          EX( 27) = 0.19671897D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.83354639D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.67489330D+06
           C( 29) = 0.41725998D-02
          EX( 30) = 0.49861476D+05
           C( 30) = 0.22050416D-01
          EX( 31) = 0.73024199D+04
           C( 31) = 0.80106909D-01
          EX( 32) = 0.15392616D+04
           C( 32) = 0.12416452D+00
          EX( 33) = 0.31782876D+04
           C( 33) = 0.32318040D-01
          EX( 34) = 0.31806118D+03
           C( 34) =-0.26477402D+00
          EX( 35) = 0.13473430D+03
           C( 35) =-0.37957220D+00
          EX( 36) = 0.23287555D+03
           C( 36) =-0.29233559D+00
          EX( 37) = 0.38364325D+02
           C( 37) = 0.10521079D+01
          EX( 38) = 0.15788965D+02
           C( 38) = 0.26978790D+00
          EX( 39) = 0.95195017D+01
           C( 39) =-0.19990106D-01
          EX( 40) = 0.41514861D+01
           C( 40) =-0.47198461D-02
          EX( 41) = 0.19671897D+01
           C( 41) = 0.32573335D-02
          EX( 42) = 0.83354639D+00
           C( 42) = 0.64628588D-03
          EX( 43) = 0.67489330D+06
           C( 43) = 0.22477489D-02
          EX( 44) = 0.49861476D+05
           C( 44) = 0.11878397D-01
          EX( 45) = 0.73024199D+04
           C( 45) = 0.43153005D-01
          EX( 46) = 0.15392616D+04
           C( 46) = 0.66886515D-01
          EX( 47) = 0.31782876D+04
           C( 47) = 0.10026869D-01
          EX( 48) = 0.31806118D+03
           C( 48) =-0.82147757D-01
          EX( 49) = 0.13473430D+03
           C( 49) =-0.11776459D+00
          EX( 50) = 0.23287555D+03
           C( 50) =-0.32923917D+00
          EX( 51) = 0.38364325D+02
           C( 51) = 0.11849226D+01
          EX( 52) = 0.15788965D+02
           C( 52) = 0.30384512D+00
          EX( 53) = 0.95195017D+01
           C( 53) =-0.13204398D+01
          EX( 54) = 0.41514861D+01
           C( 54) =-0.31176789D+00
          EX( 55) = 0.19671897D+01
           C( 55) = 0.34019570D-02
          EX( 56) = 0.83354639D+00
           C( 56) = 0.67498051D-03
          EX( 57) = 0.67489330D+06
           C( 57) = 0.10851978D-02
          EX( 58) = 0.49861476D+05
           C( 58) = 0.57348093D-02
          EX( 59) = 0.73024199D+04
           C( 59) = 0.20833976D-01
          EX( 60) = 0.15392616D+04
           C( 60) = 0.32292353D-01
          EX( 61) = 0.31782876D+04
           C( 61) = 0.30317455D-02
          EX( 62) = 0.31806118D+03
           C( 62) =-0.24838370D-01
          EX( 63) = 0.13473430D+03
           C( 63) =-0.35607552D-01
          EX( 64) = 0.23287555D+03
           C( 64) =-0.19266206D+00
          EX( 65) = 0.38364325D+02
           C( 65) = 0.69338543D+00
          EX( 66) = 0.15788965D+02
           C( 66) = 0.17780213D+00
          EX( 67) = 0.95195017D+01
           C( 67) =-0.13294039D+01
          EX( 68) = 0.41514861D+01
           C( 68) =-0.31388437D+00
          EX( 69) = 0.19671897D+01
           C( 69) = 0.12870104D+01
          EX( 70) = 0.83354639D+00
           C( 70) = 0.25535504D+00
          EX( 71) = 0.92843044D+04
           C( 71) = 0.22538263D-01
          EX( 72) = 0.17815576D+04
           C( 72) = 0.15237316D+00
          EX( 73) = 0.51206667D+03
           C( 73) = 0.46955316D+00
          EX( 74) = 0.17469686D+03
           C( 74) = 0.48575988D+00
          EX( 75) = 0.80569175D+02
           C( 75) = 0.32127319D-01
          EX( 76) = 0.32089104D+02
           C( 76) = 0.41138943D-01
          EX( 77) = 0.14604510D+02
           C( 77) =-0.10087867D-01
          EX( 78) = 0.62250153D+01
           C( 78) =-0.89984701D-02
          EX( 79) = 0.25791543D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.10265151D+01
           C( 80) = 0.00000000D+00
          EX( 81) = 0.92843044D+04
           C( 81) = 0.12795772D-01
          EX( 82) = 0.17815576D+04
           C( 82) = 0.86507653D-01
          EX( 83) = 0.51206667D+03
           C( 83) = 0.26658200D+00
          EX( 84) = 0.17469686D+03
           C( 84) = 0.27578313D+00
          EX( 85) = 0.80569175D+02
           C( 85) =-0.50790447D+00
          EX( 86) = 0.32089104D+02
           C( 86) =-0.65037027D+00
          EX( 87) = 0.14604510D+02
           C( 87) =-0.34773360D-01
          EX( 88) = 0.62250153D+01
           C( 88) =-0.31018158D-01
          EX( 89) = 0.25791543D+01
           C( 89) = 0.87831771D-02
          EX( 90) = 0.10265151D+01
           C( 90) = 0.53146524D-02
          EX( 91) = 0.92843044D+04
           C( 91) = 0.66599856D-02
          EX( 92) = 0.17815576D+04
           C( 92) = 0.45025788D-01
          EX( 93) = 0.51206667D+03
           C( 93) = 0.13875147D+00
          EX( 94) = 0.17469686D+03
           C( 94) = 0.14354051D+00
          EX( 95) = 0.80569175D+02
           C( 95) =-0.40552984D+00
          EX( 96) = 0.32089104D+02
           C( 96) =-0.51927984D+00
          EX( 97) = 0.14604510D+02
           C( 97) = 0.68679552D+00
          EX( 98) = 0.62250153D+01
           C( 98) = 0.61262795D+00
          EX( 99) = 0.25791543D+01
           C( 99) = 0.16169534D-01
          EX(100) = 0.10265151D+01
           C(100) = 0.97840966D-02
          EX(101) = 0.92843044D+04
           C(101) = 0.29925067D-02
          EX(102) = 0.17815576D+04
           C(102) = 0.20231270D-01
          EX(103) = 0.51206667D+03
           C(103) = 0.62344688D-01
          EX(104) = 0.17469686D+03
           C(104) = 0.64496528D-01
          EX(105) = 0.80569175D+02
           C(105) =-0.20121160D+00
          EX(106) = 0.32089104D+02
           C(106) =-0.25765089D+00
          EX(107) = 0.14604510D+02
           C(107) = 0.50482660D+00
          EX(108) = 0.62250153D+01
           C(108) = 0.45030999D+00
          EX(109) = 0.25791543D+01
           C(109) =-0.81401325D+00
          EX(110) = 0.10265151D+01
           C(110) =-0.49255497D+00
          EX(111) = 0.88606278D+03
           C(111) = 0.34442285D-01
          EX(112) = 0.24272960D+03
           C(112) = 0.21784216D+00
          EX(113) = 0.86477724D+02
           C(113) = 0.52575107D+00
          EX(114) = 0.33666703D+02
           C(114) = 0.38973068D+00
          EX(115) = 0.30595152D+02
           C(115) = 0.10120546D-01
          EX(116) = 0.12913762D+02
           C(116) = 0.26536245D-01
          EX(117) = 0.53762372D+01
           C(117) = 0.16518247D-01
          EX(118) = 0.35507519D+01
           C(118) =-0.33197504D-02
          EX(119) = 0.14290796D+01
           C(119) =-0.55590324D-02
          EX(120) = 0.53148693D+00
           C(120) =-0.21511840D-02
          EX(121) = 0.88606278D+03
           C(121) = 0.19077472D-01
          EX(122) = 0.24272960D+03
           C(122) = 0.12066208D+00
          EX(123) = 0.86477724D+02
           C(123) = 0.29121185D+00
          EX(124) = 0.33666703D+02
           C(124) = 0.21587058D+00
          EX(125) = 0.30595152D+02
           C(125) =-0.23994734D+00
          EX(126) = 0.12913762D+02
           C(126) =-0.62914606D+00
          EX(127) = 0.53762372D+01
           C(127) =-0.39163001D+00
          EX(128) = 0.35507519D+01
           C(128) =-0.71069321D-02
          EX(129) = 0.14290796D+01
           C(129) =-0.11900794D-01
          EX(130) = 0.53148693D+00
           C(130) =-0.46052614D-02
          EX(131) = 0.14596212D+03
           C(131) = 0.46132312D-01
          EX(132) = 0.46727844D+02
           C(132) = 0.22953184D+00
          EX(133) = 0.18147788D+02
           C(133) = 0.45881009D+00
          EX(134) = 0.73652358D+01
           C(134) = 0.42617855D+00
          EX(135) = 0.28415998D+01
           C(135) = 0.14255531D+00
          RETURN
          END IF
C ---
        ELSE IF (MMPTYP.EQ.121) THEN
          IF (MMPMOD.EQ.0) THEN
C
C*************************************************************
C     TITLE : RN/QR             CONFIGURATION : S02P06       *
C   VALENCE : (6S/6P)           BASIS SET     : ( 7/ 5)      *
C          EFFECTIVE CORE CHARGE :  8.000000                 *
C*************************************************************
C
C  ***     TOTAL ENERGY         =  -14.703205 A.U.
C
C  ***     ORBITAL ENERGY( 6S ) =   -1.0730   A.U.
C  ***     ORBITAL ENERGY( 6P ) =    -.4272   A.U.
C
C         --- VALENCE-SHELL BASIS-SET
C
          ZCORE = IZSAVE -  8.0D+00
          SHINFO='6S/6P'
          NOSH= 2
          CDFCTR(1)='61'
          CDFCTR(2)='41'
             KNG(1)= 7
            KTYP(1)= 1
             KNG(2)= 5
            KTYP(2)= 2
          EX( 1)= 0.20698237D+03
           C( 1)= 0.52109051D-01
          EX( 2)= 0.38410839D+02
           C( 2)=-0.22404867D+00
          EX( 3)= 0.84155554D+01
           C( 3)= 0.57132124D+00
          EX( 4)= 0.22022622D+01
           C( 4)=-0.27551969D+00
          EX( 5)= 0.15343415D+01
           C( 5)=-0.78051661D+00
          EX( 6)= 0.31942847D+00
           C( 6)= 0.93233605D+00
          EX( 7)= 0.12644564D+00
           C( 7)= 0.37974223D+00
          EX( 8)= 0.49225280D+02
           C( 8)=-0.46679053D-01
          EX( 9)= 0.11064214D+02
           C( 9)= 0.16982025D+00
          EX(10)= 0.19652193D+01
           C(10)=-0.41863061D+00
          EX(11)= 0.29100513D+00
           C(11)= 0.69540181D+00
          EX(12)= 0.98689039D-01
           C(12)= 0.43685476D+00
          RETURN
        ELSE
C
C         --- CORE-SHELLS AND MODEL-POTENTIAL
C
          ZCORE = IZSAVE -  8.0D+00
          NOAN0=  3
          NOAN1=  3
C         --- A-PARAMETERS FOR N=0
            AN0( 1)= 0.33603135D+01
          ALPN0( 1)= 0.49881774D+03
            AN0( 2)= 0.32314055D+01
          ALPN0( 2)= 0.88114531D+01
            AN0( 3)= 0.14063416D+01
          ALPN0( 3)= 0.18226788D+01
C         --- A-PARAMETERS FOR N=1
            AN1( 1)= 0.19568452D+04
          ALPN1( 1)= 0.16105135D+05
            AN1( 2)= 0.20079958D+02
          ALPN1( 2)= 0.82519723D+02
            AN1( 3)= 0.15285981D+00
          ALPN1( 3)= 0.67093906D+00
C         --- CORE-SHELL INFORMATION 
          NOSH     = 13
          KTYP( 1) =  1
           KNG( 1) = 14
          BPAR( 1) = 0.54808719D+04
          KTYP( 2) =  1
           KNG( 2) = 14
          BPAR( 2) = 0.10076117D+04
          KTYP( 3) =  1
           KNG( 3) = 14
          BPAR( 3) = 0.25128136D+03
          KTYP( 4) =  1
           KNG( 4) = 14
          BPAR( 4) = 0.62200983D+02
          KTYP( 5) =  1
           KNG( 5) = 14
          BPAR( 5) = 0.12656536D+02
          KTYP( 6) =  2
           KNG( 6) = 10
          BPAR( 6) = 0.85869461D+03
          KTYP( 7) =  2
           KNG( 7) = 10
          BPAR( 7) = 0.20843073D+03
          KTYP( 8) =  2
           KNG( 8) = 10
          BPAR( 8) = 0.47894695D+02
          KTYP( 9) =  2
           KNG( 9) = 10
          BPAR( 9) = 0.83208180D+01
          KTYP(10) =  3
           KNG(10) = 10
          BPAR(10) = 0.16526546D+03
          KTYP(11) =  3
           KNG(11) = 10
          BPAR(11) = 0.31439670D+02
          KTYP(12) =  3
           KNG(12) = 10
          BPAR(12) = 0.31406630D+01
          KTYP(13) =  4
           KNG(13) =  4
          BPAR(13) = 0.13611889D+02
C         --- EXPONENTS AND COEFFICIENTS 
          EX(  1) = 0.67489330D+06
           C(  1) = 0.20496343D-01
          EX(  2) = 0.49861476D+05
           C(  2) = 0.10831446D+00
          EX(  3) = 0.73024199D+04
           C(  3) = 0.39349537D+00
          EX(  4) = 0.15392616D+04
           C(  4) = 0.60991196D+00
          EX(  5) = 0.31782876D+04
           C(  5) =-0.46672393D-02
          EX(  6) = 0.31806118D+03
           C(  6) = 0.38237583D-01
          EX(  7) = 0.13473430D+03
           C(  7) = 0.54816266D-01
          EX(  8) = 0.23287555D+03
           C(  8) = 0.10211268D-01
          EX(  9) = 0.38364325D+02
           C(  9) =-0.36750076D-01
          EX( 10) = 0.15788965D+02
           C( 10) =-0.94236787D-02
          EX( 11) = 0.95195017D+01
           C( 11) = 0.00000000D+00
          EX( 12) = 0.41514861D+01
           C( 12) = 0.00000000D+00
          EX( 13) = 0.19671897D+01
           C( 13) = 0.00000000D+00
          EX( 14) = 0.83354639D+00
           C( 14) = 0.00000000D+00
          EX( 15) = 0.67489330D+06
           C( 15) = 0.85933231D-02
          EX( 16) = 0.49861476D+05
           C( 16) = 0.45412059D-01
          EX( 17) = 0.73024199D+04
           C( 17) = 0.16497737D+00
          EX( 18) = 0.15392616D+04
           C( 18) = 0.25571247D+00
          EX( 19) = 0.31782876D+04
           C( 19) = 0.55477288D-01
          EX( 20) = 0.31806118D+03
           C( 20) =-0.45451224D+00
          EX( 21) = 0.13473430D+03
           C( 21) =-0.65157528D+00
          EX( 22) = 0.23287555D+03
           C( 22) = 0.11970326D-01
          EX( 23) = 0.38364325D+02
           C( 23) =-0.43080877D-01
          EX( 24) = 0.15788965D+02
           C( 24) =-0.11047062D-01
          EX( 25) = 0.95195017D+01
           C( 25) = 0.11778332D-01
          EX( 26) = 0.41514861D+01
           C( 26) = 0.27809716D-02
          EX( 27) = 0.19671897D+01
           C( 27) = 0.00000000D+00
          EX( 28) = 0.83354639D+00
           C( 28) = 0.00000000D+00
          EX( 29) = 0.67489330D+06
           C( 29) = 0.41725999D-02
          EX( 30) = 0.49861476D+05
           C( 30) = 0.22050416D-01
          EX( 31) = 0.73024199D+04
           C( 31) = 0.80106911D-01
          EX( 32) = 0.15392616D+04
           C( 32) = 0.12416452D+00
          EX( 33) = 0.31782876D+04
           C( 33) = 0.32318041D-01
          EX( 34) = 0.31806118D+03
           C( 34) =-0.26477403D+00
          EX( 35) = 0.13473430D+03
           C( 35) =-0.37957221D+00
          EX( 36) = 0.23287555D+03
           C( 36) =-0.29233560D+00
          EX( 37) = 0.38364325D+02
           C( 37) = 0.10521079D+01
          EX( 38) = 0.15788965D+02
           C( 38) = 0.26978791D+00
          EX( 39) = 0.95195017D+01
           C( 39) =-0.19990106D-01
          EX( 40) = 0.41514861D+01
           C( 40) =-0.47198462D-02
          EX( 41) = 0.19671897D+01
           C( 41) = 0.32573336D-02
          EX( 42) = 0.83354639D+00
           C( 42) = 0.64628589D-03
          EX( 43) = 0.67489330D+06
           C( 43) = 0.22477489D-02
          EX( 44) = 0.49861476D+05
           C( 44) = 0.11878397D-01
          EX( 45) = 0.73024199D+04
           C( 45) = 0.43153004D-01
          EX( 46) = 0.15392616D+04
           C( 46) = 0.66886514D-01
          EX( 47) = 0.31782876D+04
           C( 47) = 0.10026869D-01
          EX( 48) = 0.31806118D+03
           C( 48) =-0.82147755D-01
          EX( 49) = 0.13473430D+03
           C( 49) =-0.11776459D+00
          EX( 50) = 0.23287555D+03
           C( 50) =-0.32923916D+00
          EX( 51) = 0.38364325D+02
           C( 51) = 0.11849226D+01
          EX( 52) = 0.15788965D+02
           C( 52) = 0.30384511D+00
          EX( 53) = 0.95195017D+01
           C( 53) =-0.13204398D+01
          EX( 54) = 0.41514861D+01
           C( 54) =-0.31176788D+00
          EX( 55) = 0.19671897D+01
           C( 55) = 0.34019569D-02
          EX( 56) = 0.83354639D+00
           C( 56) = 0.67498050D-03
          EX( 57) = 0.67489330D+06
           C( 57) = 0.10851978D-02
          EX( 58) = 0.49861476D+05
           C( 58) = 0.57348094D-02
          EX( 59) = 0.73024199D+04
           C( 59) = 0.20833976D-01
          EX( 60) = 0.15392616D+04
           C( 60) = 0.32292354D-01
          EX( 61) = 0.31782876D+04
           C( 61) = 0.30317456D-02
          EX( 62) = 0.31806118D+03
           C( 62) =-0.24838371D-01
          EX( 63) = 0.13473430D+03
           C( 63) =-0.35607553D-01
          EX( 64) = 0.23287555D+03
           C( 64) =-0.19266206D+00
          EX( 65) = 0.38364325D+02
           C( 65) = 0.69338545D+00
          EX( 66) = 0.15788965D+02
           C( 66) = 0.17780213D+00
          EX( 67) = 0.95195017D+01
           C( 67) =-0.13294039D+01
          EX( 68) = 0.41514861D+01
           C( 68) =-0.31388438D+00
          EX( 69) = 0.19671897D+01
           C( 69) = 0.12870104D+01
          EX( 70) = 0.83354639D+00
           C( 70) = 0.25535505D+00
          EX( 71) = 0.92843044D+04
           C( 71) = 0.22538263D-01
          EX( 72) = 0.17815576D+04
           C( 72) = 0.15237316D+00
          EX( 73) = 0.51206667D+03
           C( 73) = 0.46955316D+00
          EX( 74) = 0.17469686D+03
           C( 74) = 0.48575988D+00
          EX( 75) = 0.80569175D+02
           C( 75) = 0.32127319D-01
          EX( 76) = 0.32089104D+02
           C( 76) = 0.41138943D-01
          EX( 77) = 0.14604510D+02
           C( 77) =-0.10087867D-01
          EX( 78) = 0.62250153D+01
           C( 78) =-0.89984701D-02
          EX( 79) = 0.25791543D+01
           C( 79) = 0.00000000D+00
          EX( 80) = 0.10265151D+01
           C( 80) = 0.00000000D+00
          EX( 81) = 0.92843044D+04
           C( 81) = 0.12795772D-01
          EX( 82) = 0.17815576D+04
           C( 82) = 0.86507653D-01
          EX( 83) = 0.51206667D+03
           C( 83) = 0.26658200D+00
          EX( 84) = 0.17469686D+03
           C( 84) = 0.27578313D+00
          EX( 85) = 0.80569175D+02
           C( 85) =-0.50790447D+00
          EX( 86) = 0.32089104D+02
           C( 86) =-0.65037027D+00
          EX( 87) = 0.14604510D+02
           C( 87) =-0.34773360D-01
          EX( 88) = 0.62250153D+01
           C( 88) =-0.31018158D-01
          EX( 89) = 0.25791543D+01
           C( 89) = 0.87831771D-02
          EX( 90) = 0.10265151D+01
           C( 90) = 0.53146524D-02
          EX( 91) = 0.92843044D+04
           C( 91) = 0.66599856D-02
          EX( 92) = 0.17815576D+04
           C( 92) = 0.45025788D-01
          EX( 93) = 0.51206667D+03
           C( 93) = 0.13875147D+00
          EX( 94) = 0.17469686D+03
           C( 94) = 0.14354051D+00
          EX( 95) = 0.80569175D+02
           C( 95) =-0.40552984D+00
          EX( 96) = 0.32089104D+02
           C( 96) =-0.51927984D+00
          EX( 97) = 0.14604510D+02
           C( 97) = 0.68679552D+00
          EX( 98) = 0.62250153D+01
           C( 98) = 0.61262795D+00
          EX( 99) = 0.25791543D+01
           C( 99) = 0.16169534D-01
          EX(100) = 0.10265151D+01
           C(100) = 0.97840965D-02
          EX(101) = 0.92843044D+04
           C(101) = 0.29925067D-02
          EX(102) = 0.17815576D+04
           C(102) = 0.20231270D-01
          EX(103) = 0.51206667D+03
           C(103) = 0.62344688D-01
          EX(104) = 0.17469686D+03
           C(104) = 0.64496528D-01
          EX(105) = 0.80569175D+02
           C(105) =-0.20121160D+00
          EX(106) = 0.32089104D+02
           C(106) =-0.25765089D+00
          EX(107) = 0.14604510D+02
           C(107) = 0.50482660D+00
          EX(108) = 0.62250153D+01
           C(108) = 0.45030999D+00
          EX(109) = 0.25791543D+01
           C(109) =-0.81401325D+00
          EX(110) = 0.10265151D+01
           C(110) =-0.49255497D+00
          EX(111) = 0.88606278D+03
           C(111) = 0.34442285D-01
          EX(112) = 0.24272960D+03
           C(112) = 0.21784216D+00
          EX(113) = 0.86477724D+02
           C(113) = 0.52575107D+00
          EX(114) = 0.33666703D+02
           C(114) = 0.38973068D+00
          EX(115) = 0.30595152D+02
           C(115) = 0.10120546D-01
          EX(116) = 0.12913762D+02
           C(116) = 0.26536245D-01
          EX(117) = 0.53762372D+01
           C(117) = 0.16518247D-01
          EX(118) = 0.35507519D+01
           C(118) =-0.33197504D-02
          EX(119) = 0.14290796D+01
           C(119) =-0.55590324D-02
          EX(120) = 0.53148693D+00
           C(120) =-0.21511840D-02
          EX(121) = 0.88606278D+03
           C(121) = 0.19077472D-01
          EX(122) = 0.24272960D+03
           C(122) = 0.12066208D+00
          EX(123) = 0.86477724D+02
           C(123) = 0.29121185D+00
          EX(124) = 0.33666703D+02
           C(124) = 0.21587058D+00
          EX(125) = 0.30595152D+02
           C(125) =-0.23994734D+00
          EX(126) = 0.12913762D+02
           C(126) =-0.62914606D+00
          EX(127) = 0.53762372D+01
           C(127) =-0.39163001D+00
          EX(128) = 0.35507519D+01
           C(128) =-0.71069321D-02
          EX(129) = 0.14290796D+01
           C(129) =-0.11900794D-01
          EX(130) = 0.53148693D+00
           C(130) =-0.46052614D-02
          EX(131) = 0.88606278D+03
           C(131) = 0.74547251D-02
          EX(132) = 0.24272960D+03
           C(132) = 0.47149990D-01
          EX(133) = 0.86477724D+02
           C(133) = 0.11379413D+00
          EX(134) = 0.33666703D+02
           C(134) = 0.84353725D-01
          EX(135) = 0.30595152D+02
           C(135) =-0.11929707D+00
          EX(136) = 0.12913762D+02
           C(136) =-0.31279899D+00
          EX(137) = 0.53762372D+01
           C(137) =-0.19471070D+00
          EX(138) = 0.35507519D+01
           C(138) = 0.38365695D+00
          EX(139) = 0.14290796D+01
           C(139) = 0.64244631D+00
          EX(140) = 0.53148693D+00
           C(140) = 0.24860805D+00
          EX(141) = 0.11007302D+03
           C(141) = 0.82190393D-01
          EX(142) = 0.33365306D+02
           C(142) = 0.35908621D+00
          EX(143) = 0.11785404D+02
           C(143) = 0.55883289D+00
          EX(144) = 0.40674882D+01
           C(144) = 0.29480070D+00
          RETURN
          END IF
        END IF
        IERR=2
        RETURN
      END IF
C ...
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
