home *** CD-ROM | disk | FTP | other *** search
/ Play and Learn 2 / 19941.ZIP / 19941 / EDUCICAL / CHEMICAL / H2SO4.DAT < prev    next >
Encoding:
CHEMICAL molecule Data  |  1994-02-04  |  931 b   |  25 lines

  1. chemical_name("H2SO4  Sulfuric Acid")
  2. chemical(a(7,"H",o("1s",1,"σ",3)))
  3. chemical(a(3,"O",o("3p(z)",1,"σ",7)))
  4. chemical(a(6,"H",o("1s",1,"σ",2)))
  5. chemical(a(2,"O",o("3p(z)",1,"σ",6)))
  6. chemical(a(5,"O",o("3d(a)",1,"σ",1)))
  7. chemical(a(1,"S",o("sp3~",1,"σ",5)))
  8. chemical(a(4,"O",o("3d(a)",1,"σ",1)))
  9. chemical(a(1,"S",o("sp3^",1,"σ",4)))
  10. chemical(a(3,"O",o("3p(y)",1,"σ",1)))
  11. chemical(a(1,"S",o("sp3'",1,"σ",3)))
  12. chemical(a(2,"O",o("3p(y)",1,"σ",1)))
  13. chemical(a(1,"S",o("sp3`",1,"σ",2)))
  14. atomlocation(1,l(-312,-399,-10,1.03,0,0,0,1546),1)
  15. atomlocation(2,l(1528,-1149,1044,0.7,0,0,0,269),1)
  16. atomlocation(3,l(-312,1850,-10,0.7,0,0,0,269),1)
  17. atomlocation(4,l(-2140,-1149,1065,0.7,0,0,0,269),1)
  18. atomlocation(5,l(-317,-1149,-2130,0.7,0,0,0,269),1)
  19. atomlocation(6,l(1864,146,1447,0.375,0,0,0,3848),1)
  20. atomlocation(7,l(-312,1850,-1407,0.375,0,0,0,3848),1)
  21. commandactive("Files")
  22. viewshown("Rht")
  23. grid(8)
  24. atom_count(8)
  25.