CCL Home Page
Up Directory CCL diamond.java
/**
 * diamond.java
 * Copyright (c) 1997 Will Ware, all rights reserved.
 * 
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    or its derived works must display the following acknowledgement:
 * 	This product includes software developed by Will Ware.
 * 
 * This software is provided "as is" and any express or implied warranties,
 * including, but not limited to, the implied warranties of merchantability
 * or fitness for any particular purpose are disclaimed. In no event shall
 * Will Ware be liable for any direct, indirect, incidental, special,
 * exemplary, or consequential damages (including, but not limited to,
 * procurement of substitute goods or services; loss of use, data, or
 * profits; or business interruption) however caused and on any theory of
 * liability, whether in contract, strict liability, or tort (including
 * negligence or otherwise) arising in any way out of the use of this
 * software, even if advised of the possibility of such damage.
 */

import java.awt.Panel;
import group;

public class diamond extends group
{
  public static final String rcsid =
  "$Id: diamond.java,v 1.5 1997/08/12 12:30:55 wware Exp $";
  public diamond (Panel p)
  {
    mypanel = p;
    addAtom (new carbon (atom.SP3,
              1.4957411036739, 1.9611529704595, -2.9047323150567));
    addAtom (new carbon (atom.SP3,
              -0.21110340676223, 2.4082717785191, -2.9280615331263));
    addAtom (new carbon (atom.SP3,
              1.6075410728026, 0.20096582516019, -2.8875081859839));
    addAtom (new carbon (atom.SP3,
              2.1673709136765, 2.7771217328278, -1.4772542775396));
    addAtom (new carbon (atom.SP3,
              1.4637069461378, 1.9888613657861, -0.05440770380818));
    addAtom (new carbon (atom.SP3,
              -0.22238029728114, 2.4050621073795, -0.05784692483348));
    addAtom (new carbon (atom.SP3,
              -0.95790608016684, 1.7024852480152, -1.4939687204886));
    addAtom (new carbon (atom.SP3,
              1.6336039519914, 0.21866883461274, -0.033205722671446));
    addAtom (new carbon (atom.SP3,
              -0.82023416680651, -0.081101714594029, -1.439614048895));
    addAtom (new carbon (atom.SP3,
              0.051523410808133, -0.57653068788018, 0.00475049139251));
    addAtom (new carbon (atom.SP3,
              2.541902388094, -0.26967345844744, -1.4633761403956));
    addAtom (new carbon (atom.SP3,
              0.072174401754665, -0.72776104468942, -2.8056145307116));
    addAtom (new carbon (atom.SP3,
              -0.86497478306361, -0.08094925432252, 1.4063525407596));
    addAtom (new carbon (atom.SP3,
              -1.0048954870127, 1.699066243639, 1.3645443001173));
    addAtom (new carbon (atom.SP3,
              -2.495963979276, -0.79828216260771, 1.4040125810607));
    addAtom (new carbon (atom.SP3,
              -2.4339360948529, -0.74712423368495, -1.4360318908772));
    addAtom (new carbon (atom.SP3,
              -3.3152850873906, -0.13483490742223, -0.04386396987475));
    addAtom (new carbon (atom.SP3,
              -2.5933829264707, 2.3521958312035, -1.4920414180358));
    addAtom (new carbon (atom.SP3,
              -2.654588938064, 2.2987460198873, 1.3363158479069));
    addAtom (new carbon (atom.SP3,
              -3.4162435109839, 1.6272816556055, -0.098073537016876));
    addAtom (new carbon (atom.SP3,
              1.3976935706957, 2.0454559031477, 2.7876669492671));
    addAtom (new carbon (atom.SP3,
              1.5309489678441, 0.29272637930374, 2.8237805668557));
    addAtom (new carbon (atom.SP3,
              -0.0062157621116928, -0.64062416875666, 2.847811769149));
    addAtom (new carbon (atom.SP3,
              -0.30525792768824, 2.4727880726101, 2.7763325839208));
    addAtom (new carbon (atom.SP3,
              2.1327613396776, 2.7942363044797, 1.358029650957));
    addAtom (new carbon (atom.SP3,
              2.495320591706, -0.22158404893032, 1.424655967621));
    addAtom (new
        hydrogen (-2.6388903989342, 3.5814405158709, 1.2286859737103));
    addAtom (new
        hydrogen (-0.40838524541493, 3.7467287516074, 2.6656364019502));
    addAtom (new
        hydrogen (-2.5414545417187, 3.6284746235543, -1.317926178318));
    addAtom (new
        hydrogen (-0.34760133857968, 3.6894774487878, -0.054909003494731));
    addAtom (new
        hydrogen (1.7841388960649, 4.034233961674, 1.3351432623532));
    addAtom (new
        hydrogen (-0.3009037294836, 3.6726966891232, -2.8764614831422));
    addAtom (new
        hydrogen (1.7966699328935, 4.0062166676318, -1.5058857949522));
    addAtom (new
        hydrogen (2.0705744769394, 2.4039798357813, -3.9057227015992));
    addAtom (new
        hydrogen (2.1882884428454, -0.1309233139239, -3.9309482951164));
    addAtom (new
        hydrogen (3.4291000273107, 2.6960788237895, -1.4625246592938));
    addAtom (new
        hydrogen (3.3933910229237, 2.6769472820379, 1.3938966035284));
    addAtom (new
        hydrogen (3.6051525603578, 0.30852808953504, 1.4320746742046));
    addAtom (new
        hydrogen (-4.6118594047386, 1.9710469957481, -0.13325422094352));
    addAtom (new
        hydrogen (-4.4782263354601, -0.56153415744593, -0.063412796517909));
    addAtom (new
        hydrogen (-0.7473616445615, 1.9311682693517, -3.9783173374878));
    addAtom (new
        hydrogen (-0.56804313398781, -0.54372691906679, -3.8613310773289));
    addAtom (new
        hydrogen (-3.191376673216, 2.0553419820095, -2.5536046319414));
    addAtom (new
        hydrogen (-3.0144825970693, -0.42611735365233, -2.4999720703742));
    addAtom (new
        hydrogen (1.9398939357094, 2.5264747447514, 3.8007798989288));
    addAtom (new
        hydrogen (2.1428653509767, 0.011091108697268, 3.8755753978251));
    addAtom (new
        hydrogen (-3.1144351645878, -0.4373593279557, 2.4123553691322));
    addAtom (new
        hydrogen (-0.66373127390939, -0.37786778886396, 3.8463977245506));
    addAtom (new
        hydrogen (-3.2854984680285, 1.9350596557963, 2.3726506146842));
    addAtom (new
        hydrogen (-0.86154882565898, 2.0481438951965, 3.8338251156868));
    addAtom (new
        hydrogen (3.6570610006835, 0.29142684933868, -1.460694603908));
    addAtom (new carbon (atom.SP3,
              2.8656020291392, -1.9908609063993, -1.7042098696665));
    addAtom (new carbon (atom.SP3,
              0.25343798137723, -2.3078017512477, 0.082812130977885));
    addAtom (new carbon (atom.SP3,
              -2.5334565903764, -2.609148769233, 1.4811749111377));
    addAtom (new carbon (atom.SP3,
              2.7878901796637, -1.948992529756, 1.7121674355863));
    addAtom (new carbon (atom.SP3,
              0.46600419640095, -2.3834036680532, 3.0599776510897));
    addAtom (new carbon (atom.SP3,
              0.4019447783676, -2.5030678279404, -2.7585490183951));
    addAtom (new carbon (atom.SP3,
              -2.5812569037071, -2.5179427084363, -1.2848655581909));
    addAtom (new carbon (atom.SP3,
              1.2300497294992, -2.7768746153646, 1.5199887842423));
    addAtom (new carbon (atom.SP3,
              -1.4580829662828, -3.0196890914416, 0.06789780072953));
    addAtom (new carbon (atom.SP3,
               1.3276107064161, -2.8062905584505, -1.2741781899109));
    addAtom (new
        hydrogen (1.4352128592703, -4.0089448784158, 1.4586408096312));
    addAtom (new
        hydrogen (-1.3277956987313, -4.2371749276937, 0.037929068584557));
    addAtom (new
        hydrogen (1.5659137885841, -4.0237620933937, -1.15401528758));
    addAtom (new
        hydrogen (-2.5703394063547, -2.978000894804, -2.499332566701));
    addAtom (new
        hydrogen (1.0620145925599, -2.7580556567994, -3.8309567353425));
    addAtom (new
        hydrogen (-3.780522393577, -2.768841794694, -0.90631772606046));
    addAtom (new
        hydrogen (-0.50496939957045, -3.3631379835781, -2.6641154745504));
    addAtom (new
        hydrogen (1.2827548673912, -2.352599568432, 4.0591823414848));
    addAtom (new
        hydrogen (-0.31316990532059, -3.3544909098453, 3.3119834980139));
    addAtom (new
        hydrogen (-2.2650962112672, -2.8981334427333, 2.6636374946479));
    addAtom (new
        hydrogen (-3.7183638682308, -3.0600904956539, 1.2699674196514));
    addAtom (new
        hydrogen (3.2153189615012, -2.0247807761021, 2.9316151319846));
    addAtom (new
        hydrogen (3.6525095915743, -2.4550519050926, 0.99820220167773));
    addAtom (new
        hydrogen (3.8990785273093, -2.3762437724983, -1.122115403282));
    addAtom (new
        hydrogen (3.0864534720768, -2.1802663946164, -2.9672293615882));
    addBond (51, 75);
    addBond (74, 51);
    addBond (73, 54);
    addBond (72, 54);
    addBond (55, 68);
    addBond (53, 71);
    addBond (53, 70);
    addBond (55, 69);
    addBond (57, 66);
    addBond (56, 67);
    addBond (56, 65);
    addBond (64, 57);
    addBond (60, 63);
    addBond (59, 62);
    addBond (58, 61);
    addBond (52, 60);
    addBond (56, 60);
    addBond (51, 60);
    addBond (57, 59);
    addBond (53, 59);
    addBond (52, 59);
    addBond (58, 52);
    addBond (58, 55);
    addBond (54, 58);
    addBond (15, 57);
    addBond (11, 56);
    addBond (22, 55);
    addBond (25, 54);
    addBond (14, 53);
    addBond (9, 52);
    addBond (10, 51);
    addBond (50, 10);
    addBond (23, 49);
    addBond (18, 48);
    addBond (14, 46);
    addBond (22, 47);
    addBond (20, 44);
    addBond (21, 45);
    addBond (42, 17);
    addBond (15, 43);
    addBond (1, 40);
    addBond (11, 41);
    addBond (16, 39);
    addBond (19, 38);
    addBond (25, 37);
    addBond (3, 35);
    addBond (36, 24);
    addBond (2, 34);
    addBond (0, 33);
    addBond (3, 32);
    addBond (1, 31);
    addBond (24, 30);
    addBond (5, 29);
    addBond (17, 28);
    addBond (23, 27);
    addBond (18, 26);
    addBond (23, 20);
    addBond (13, 23);
    addBond (22, 12);
    addBond (21, 22);
    addBond (21, 25);
    addBond (20, 21);
    addBond (24, 20);
    addBond (4, 24);
    addBond (7, 25);
    addBond (18, 13);
    addBond (6, 17);
    addBond (8, 15);
    addBond (12, 14);
    addBond (16, 14);
    addBond (15, 16);
    addBond (19, 17);
    addBond (19, 18);
    addBond (19, 16);
    addBond (5, 13);
    addBond (9, 12);
    addBond (12, 13);
    addBond (11, 2);
    addBond (8, 11);
    addBond (9, 7);
    addBond (8, 9);
    addBond (10, 2);
    addBond (7, 10);
    addBond (6, 8);
    addBond (4, 7);
    addBond (4, 3);
    addBond (5, 4);
    addBond (6, 5);
    addBond (1, 6);
    addBond (0, 2);
    addBond (0, 3);
    addBond (0, 1);
  }
}
Modified: Sat Jan 17 17:00:00 1998 GMT
Page accessed 7360 times since Sat Apr 17 22:02:30 1999 GMT