home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / educ / crystal.zip / NITRO.DAT < prev    next >
Text File  |  1988-06-26  |  4KB  |  80 lines
  1. chemical_name("Nitroglycerin")
  2. chemical(a(19,"O ",o("3p(y)",1,"σ",20)))
  3. chemical(a(20,"N ",o("sp2'",1,"σ",19)))
  4. chemical(a(18,"O ",o("3p(y)",1,"σ",20)))
  5. chemical(a(20,"N ",o("sp2`",1,"σ",18)))
  6. chemical(a(17,"O ",o("3p(y)",1,"σ",16)))
  7. chemical(a(16,"N ",o("sp2'",1,"σ",17)))
  8. chemical(a(15,"O ",o("3p(y)",1,"σ",16)))
  9. chemical(a(16,"N ",o("sp2`",1,"σ",15)))
  10. chemical(a(14,"O ",o("3p(y)",1,"σ",12)))
  11. chemical(a(12,"N ",o("sp2'",1,"σ",14)))
  12. chemical(a(13,"O ",o("3p(y)",1,"σ",12)))
  13. chemical(a(12,"N ",o("sp2`",1,"σ",13)))
  14. chemical(a(20,"N ",o("sp2^",1,"σ",11)))
  15. chemical(a(11,"O ",o("3p(z)",1,"σ",20)))
  16. chemical(a(16,"N ",o("sp2^",1,"σ",10)))
  17. chemical(a(10,"O ",o("3p(z)",1,"σ",16)))
  18. chemical(a(12,"N ",o("sp2^",1,"σ",9)))
  19. chemical(a(9,"O ",o("3p(z)",1,"σ",12)))
  20. chemical(a(11,"O ",o("3p(y)",1,"σ",3)))
  21. chemical(a(3,"C ",o("sp3`",1,"σ",11)))
  22. chemical(a(10,"O ",o("3p(y)",1,"σ",2)))
  23. chemical(a(2,"C ",o("sp3^",1,"σ",10)))
  24. chemical(a(9,"O ",o("3p(y)",1,"σ",1)))
  25. chemical(a(1,"C ",o("sp3'",1,"σ",9)))
  26. chemical(a(8,"H ",o("1s",1,"σ",3)))
  27. chemical(a(3,"C ",o("sp3^",1,"σ",8)))
  28. chemical(a(7,"H ",o("1s",1,"σ",3)))
  29. chemical(a(3,"C ",o("sp3~",1,"σ",7)))
  30. chemical(a(6,"H ",o("1s",1,"σ",2)))
  31. chemical(a(2,"C ",o("sp3~",1,"σ",6)))
  32. chemical(a(5,"H ",o("1s",1,"σ",1)))
  33. chemical(a(1,"C ",o("sp3^",1,"σ",5)))
  34. chemical(a(4,"H ",o("1s",1,"σ",1)))
  35. chemical(a(1,"C ",o("sp3~",1,"σ",4)))
  36. chemical(a(3,"C ",o("sp3'",1,"σ",2)))
  37. chemical(a(2,"C ",o("sp3`",1,"σ",3)))
  38. chemical(a(2,"C ",o("sp3'",1,"σ",1)))
  39. chemical(a(1,"C ",o("sp3`",1,"σ",2)))
  40. atomlocation(20,l(-363,1929,2236,0.727,1.2715212253,62.832462643,5.1990911556,3596),1)
  41. atomlocation(19,l(-1231,3569,2237,0.7,0.00032344625063,29.845741456,0.48638118518,269),1)
  42. atomlocation(18,l(1427,1827,1761,0.7,4.5010860769,23.821140076,0.16156073709,269),1)
  43. atomlocation(17,l(1327,-3268,-1140,0.7,3.1101361243,29.888444107,5.6866521149,269),1)
  44. atomlocation(16,l(2417,-1767,-1187,0.727,5.0930844193,62.87516529,0.94239577722,3596),1)
  45. atomlocation(15,l(4141,-1893,-1859,0.7,4.5264660317,23.933663977,0.12600812052,269),1)
  46. atomlocation(14,l(-1378,3426,-2509,0.7,0,31.41592654,0,269),1)
  47. atomlocation(13,l(-1378,643,-4116,0.7,4.1887861914,31.41592654,0,269),1)
  48. atomlocation(12,l(-1378,1571,-2509,0.727,0,62.83185308,4.712387201,3596),1)
  49. atomlocation(11,l(-1286,392,2710,0.7,0.42691923359,30.129896764,0.58737410701,269),1)
  50. atomlocation(10,l(1762,-156,-542,0.7,5.5144544659,24.066718199,5.9339026188,269),1)
  51. atomlocation(9,l(-1378,1571,-654,0.7,0,31.41592654,0,269),1)
  52. atomlocation(8,l(1491,184,2590,0.375,5.1127754633,-0.27110841646,0.33048747074,3848),1)
  53. atomlocation(7,l(285,-1892,3020,0.375,1.0304677456,-1.5598021686,6.2769584274,3848),1)
  54. atomlocation(6,l(349,-2486,79,0.375,4.8517030823,-5.1031179222,5.9467094178,3848),1)
  55. atomlocation(5,l(-2590,-840,59,0.375,0.60928883931,-2.609987149,0.064796236593,3848),1)
  56. atomlocation(4,l(-1381,-840,-2060,0.375,5.9431972842,-4.7099905132,0.00041168711003,3848),1)
  57. atomlocation(3,l(277,-613,2253,0.772,1.3704477694,31.42257268,6.2831643881,1290),1)
  58. atomlocation(2,l(264,-1012,286,0.772,2.1894828727,32.466744656,0.29998843039,1290),1)
  59. atomlocation(1,l(-1378,-343,-654,0.772,6.2832,6.2832,6.2832,1290),1)
  60. commandactive("Files")
  61. viewshown("Rht")
  62. grid(8)
  63. atom_count(21)
  64. valencelist(20,1,5)
  65. valencelist(16,1,5)
  66. valencelist(12,1,5)
  67. valencelist(3,1,4)
  68. valencelist(2,1,4)
  69. valencelist(1,1,4)
  70. valencelist(1,0,6)
  71. valencelist(1,0,6)
  72. valencelist(1,0,6)
  73. valencelist(1,0,6)
  74. valencelist(1,0,6)
  75. valencelist(1,0,6)
  76. valencelist(2,0,4)
  77. valencelist(2,0,4)
  78. valencelist(2,0,4)
  79. valencelist(2,0,4)
  80.