home *** CD-ROM | disk | FTP | other *** search
/ Shareware Breakthrough: Entertainment & Education / SharewearBreakthroughEnt_Ed.cdr / educ / wchem / leu.ami < prev    next >
Text File  |  1992-08-16  |  2KB  |  39 lines

  1. atomlocation(1,l(0,0,0,0.7,1,1,1,-21141),1)
  2. chemical(a(1,"C",o("sp3~",1,"no",0)))
  3. chemical(a(1,"C",o("sp3'",1,"σ",4)))
  4. chemical(a(1,"C",o("sp3^",1,"σ",12)))
  5. chemical(a(1,"C",o("sp3`",1,"σ",13)))
  6. atomlocation(2,l(-1449,2426,858,0.7,1,1,1,-21141),1)
  7. chemical(a(2,"C",o("sp3~",1,"σ",4)))
  8. chemical(a(2,"C",o("sp3'",1,"σ",5)))
  9. chemical(a(2,"C",o("sp3^",1,"σ",10)))
  10. chemical(a(2,"C",o("sp3`",1,"σ",6)))
  11. atomlocation(3,l(1486,2426,858,0.7,1,1,1,-21141),1)
  12. chemical(a(3,"C",o("sp3~",1,"σ",4)))
  13. chemical(a(3,"C",o("sp3'",1,"σ",8)))
  14. chemical(a(3,"C",o("sp3^",1,"σ",9)))
  15. chemical(a(3,"C",o("sp3`",1,"σ",7)))
  16. atomlocation(4,l(0,1820,0,0.7,1,1,1,-21141),1)
  17. chemical(a(4,"C",o("sp3~",1,"σ",1)))
  18. chemical(a(4,"C",o("sp3'",1,"σ",11)))
  19. chemical(a(4,"C",o("sp3^",1,"σ",3)))
  20. chemical(a(4,"C",o("sp3`",1,"σ",2)))
  21. atomlocation(5,l(-2387,2934,-13,0.375,1,1,1,-1),1)
  22. chemical(a(5,"H",o("1s",1,"σ",2)))
  23. atomlocation(6,l(-1952,1268,1455,0.375,1,1,1,-1),1)
  24. chemical(a(6,"H",o("1s",1,"σ",2)))
  25. atomlocation(7,l(1221,3380,1843,0.375,1,1,1,-1),1)
  26. chemical(a(7,"H",o("1s",1,"σ",3)))
  27. atomlocation(8,l(2426,2934,-19,0.375,1,1,1,-1),1)
  28. chemical(a(8,"H",o("1s",1,"σ",3)))
  29. atomlocation(9,l(1990,1266,1455,0.375,1,1,1,-1),1)
  30. chemical(a(9,"H",o("1s",1,"σ",3)))
  31. atomlocation(10,l(-1183,3380,1843,0.375,1,1,1,-1),1)
  32. chemical(a(10,"H",o("1s",1,"σ",2)))
  33. atomlocation(11,l(0,2285,-1300,0.375,1,1,1,-1),1)
  34. chemical(a(11,"H",o("1s",1,"σ",4)))
  35. atomlocation(12,l(-1133,-457,659,0.375,1,1,1,-1),1)
  36. chemical(a(12,"H",o("1s",1,"σ",1)))
  37. atomlocation(13,l(1141,-455,659,0.375,1,1,1,-1),1)
  38. chemical(a(13,"H",o("1s",1,"σ",1)))
  39.