home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / educ / crystal.zip / B2CL4.DAT < prev    next >
Text File  |  1988-06-26  |  966b  |  24 lines
  1. chemical_name("B2Cl4")
  2. chemical(a(6,"Cl",o("3p(z)",1,"σ",2)))
  3. chemical(a(2,"B ",o("sp2`",1,"σ",6)))
  4. chemical(a(5,"Cl",o("3p(z)",1,"σ",2)))
  5. chemical(a(2,"B ",o("sp2^",1,"σ",5)))
  6. chemical(a(4,"Cl",o("3p(z)",1,"σ",1)))
  7. chemical(a(1,"B ",o("sp2'",1,"σ",4)))
  8. chemical(a(3,"Cl",o("3p(z)",1,"σ",1)))
  9. chemical(a(1,"B ",o("sp2^",1,"σ",3)))
  10. chemical(a(2,"B ",o("sp2'",1,"σ",1)))
  11. chemical(a(1,"B ",o("sp2`",1,"σ",2)))
  12. atomlocation(6,l(591,-341,3073,1.05,0,63.355459414,4.712387201,2316),1)
  13. atomlocation(5,l(-2601,1501,945,1.05,3.141590881,58.119266757,1.57079633,2316),1)
  14. atomlocation(4,l(-57,-2423,-2011,1.05,0,64.40264941,4.712387201,2316),1)
  15. atomlocation(3,l(2069,1262,-2009,1.05,3.141590881,57.072071447,1.57079633,2316),1)
  16. atomlocation(2,l(-473,273,945,0.84,0,-2.0943853034,0,776),1)
  17. atomlocation(1,l(473,-273,-946,0.84,6.2832,6.2832,6.2832,776),1)
  18. commandactive("Files")
  19. viewshown("Top")
  20. grid(8)
  21. atom_count(7)
  22. valencelist(2,1,3)
  23. valencelist(1,1,3)
  24.