home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / educ / chemical.zip / WATER.DAT < prev   
Text File  |  1988-12-03  |  405b  |  13 lines
  1. chemical_name("H2O (Water)")
  2. chemical(a(3,"H ",o("1s",1,"σ",1)))
  3. chemical(a(1,"O ",o("sp3'",1,"σ",3)))
  4. chemical(a(2,"H ",o("1s",1,"σ",1)))
  5. chemical(a(1,"O ",o("sp3`",1,"σ",2)))
  6. atomlocation(1,l(-380,-310,-220,0.7,0,0,0,269),1)
  7. atomlocation(2,l(761,-776,439,0.375,0,0,0,3848),1)
  8. atomlocation(3,l(-380,1087,-220,0.375,0,0,0,3848),1)
  9. commandactive("Files")
  10. viewshown("Fnt")
  11. grid(8)
  12. atom_count(4)
  13.