**DIRAC .TITLE W atom .WAVE FUNCTION .ANALYZE **INTEGRALS *READIN .UNCONTRACT **HAMILTONIAN .X2C *AMFI .AMFICH +4 **WAVE FUNCTION .SCF #.RESOLVE *SCF .MAXITR 55 # W(74 electrons): [Xe] 4f(14) 5d(4) 6s(2) .CLOSED SHELL ! [Xe] 4f(14) 6s(2) 32 38 .OPEN SHELL ! 5d(4) 1 4/10,0 .EVCCNV 1.0D-09 1.0D-07 .MJSELECTION 7 9 4 2 11 6 2 1 2 2 1 0 0 0 0 #.NODIIS #.DAMP #0.9 **ANALYZE .MULPOP *MULPOP .VECPOP 1..oo 1..oo *END OF $GOSCIP IPRNT=5 &END