***,H2O finite fields R = 0.96488518 ANG THETA = 101.90140469 geometry={H1 O,H1,R; H2,O,R,H1,THETA} {hf;wf,10,1} !scf without field f=0.05 dip,,,f !add dipole (z) field to h0 hf !do scf with modified h0 field,dmz,f !add dipole (z) field to H0 !same result as previous example hf !do scf with modified h0 quad,,,f !add quadrupole (qmzz) field to h0 hf !do scf with modified h0 field,qmzz,f !add quadrupole (qmzz) field to h0; !same result as previous example hf !do scf with modified h0 field,zz,f,xx,-0.5*f,yy,-0.5*f !add general field; same result as quad above hf !do scf with modified h0 field,zz,f !same as before with separate field commands field+,xx,-0.5*f field+,yy,-0.5*f hf !do scf with modified h0 field !remove field hf !scf without field