subroutine pes(x,iopt,e,g,h) ! PES for metaphosphorous acid (cis and trans rotamers) ! Fit to 4707 RHF fc-CCSD(T)-F12a/cc-pVTZ-F12 energies ! Fit set does not include points with energies above 20000 cm^-1 ! ! Minimum energy structure in angstrom ! 0.00000000 -0.45920589 -0.09184438 p ! 0.00000000 0.31692522 1.31251474 o ! 0.00000000 0.49167473 -1.21110024 o ! 0.00000000 1.27987369 1.21307381 h implicit none integer, parameter :: natoms=4, ndist=6 ! natoms*(natoms-1)/2 ! Input: Cartesian coordiates in bohr - connectivity assumed to be as eq structure double precision, intent(in) :: x(3,natoms) ! Input: iopt = 0 : energy ! iopt = 1 : energy and cartesian gradient ! iopt = 2 : energy, gradient and hessian integer, intent(in) :: iopt ! Output: energy above equilibrium in Hartree ! Cartesian gradient in atomic units ! Cartesian hessian in atomic units (triangular packed i=1,n ; j = 1,i) double precision, intent(out) :: e, g(3*natoms), h(3*natoms*3*natoms) ! Local integer :: i, j, k, l, ii, jj, ij, kl, ix, jx double precision :: r(4), dist(ndist), rij, v, gg(4), hh(10), rrij, d0 double precision :: gint(ndist), hint((ndist+1)*ndist/2) double precision :: B(ndist,natoms*3), db(ndist,3*natoms,3*natoms) ! pes integer, parameter :: nmorse=5, ncoul=0, nxrep=0, ng1d=11, ng2d=141, ng3d=336, ng4d=112 double precision :: shift integer :: imorse(nmorse), icoul(ncoul), ixrep(nxrep) integer :: ig1d(ng1d), ig2d(2,ng2d), ig3d(3,ng3d), ig4d(4,ng4d) double precision :: morse(3,nmorse), coul(2,ncoul), xrep(3,nxrep) double precision :: g1d(4,ng1d), g2d(6,ng2d), g3d(8,ng3d), g4d(10,ng4d) data shift /0.4314703504210857E-02/ data imorse / 1, 2, 5, 3, 4/ data morse / 0.3059581188146390E+01, 0.9187529227069120E+00, 0.3829388936291944E+00, & & 0.2772144589341151E+01, 0.1080390995458060E+01, 0.5569690035737440E+00, & & 0.1836366494013187E+01, 0.1053983755330152E+01, 0.5086412205883039E+00, & & 0.4768565437439447E+01, 0.3657489081010267E+00, 0.5804079723042481E+00, & & 0.4059058308795692E+01, 0.2766746508098261E+00, 0.6245842944483708E+00/ data ig1d / 1, 1, 1, 1, 1, 1, 2, 3, 3, 5, 5/ data ig2d / 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, & & 2, 1, 2, 1, 3, 1, 3, 1, 3, 1, 3, 1, 3, 1, 3, 1, 3, 1, 3, 1, & & 3, 1, 3, 1, 3, 1, 3, 1, 3, 1, 3, 1, 3, 1, 3, 2, 3, 2, 3, 2, & & 3, 2, 3, 2, 3, 2, 3, 2, 3, 2, 3, 2, 3, 2, 3, 2, 3, 2, 3, 2, & & 3, 2, 3, 2, 3, 2, 3, 2, 4, 1, 4, 1, 4, 1, 4, 1, 4, 1, 4, 1, & & 4, 1, 4, 2, 4, 2, 4, 2, 4, 2, 4, 2, 4, 2, 4, 2, 4, 3, 4, 3, & & 4, 3, 4, 3, 4, 3, 4, 3, 4, 3, 4, 3, 4, 3, 4, 3, 4, 3, 5, 1, & & 5, 1, 5, 1, 5, 1, 5, 1, 5, 1, 5, 1, 5, 1, 5, 1, 5, 2, 5, 2, & & 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 2, 5, 3, 5, 3, 5, 3, 5, 3, & & 5, 3, 5, 3, 5, 3, 5, 3, 5, 3, 5, 4, 5, 4, 5, 4, 6, 1, 6, 1, & & 6, 1, 6, 1, 6, 1, 6, 1, 6, 1, 6, 1, 6, 1, 6, 2, 6, 2, 6, 2, & & 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 2, 6, 3, 6, 3, & & 6, 3, 6, 3, 6, 3, 6, 3, 6, 3, 6, 3, 6, 3, 6, 3, 6, 3, 6, 3, & & 6, 3, 6, 3, 6, 4, 6, 4, 6, 4, 6, 4, 6, 5, 6, 5, 6, 5, 6, 5, & & 6, 5/ data ig3d / 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, & & 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, & & 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, & & 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, & & 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, & & 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, 3, 2, 1, & & 3, 2, 1, 3, 2, 1, 4, 2, 1, 4, 2, 1, 4, 2, 1, & & 4, 2, 1, 4, 2, 1, 4, 2, 1, 4, 2, 1, 4, 2, 1, & & 4, 2, 1, 4, 2, 1, 4, 2, 1, 4, 2, 1, 4, 2, 1, & & 4, 2, 1, 4, 2, 1, 4, 2, 1, 4, 3, 1, 4, 3, 1, & & 4, 3, 1, 4, 3, 1, 4, 3, 1, 4, 3, 1, 4, 3, 1, & & 4, 3, 1, 4, 3, 1, 4, 3, 1, 4, 3, 1, 4, 3, 1, & & 4, 3, 1, 4, 3, 1, 4, 3, 1, 4, 3, 1, 4, 3, 1, & & 4, 3, 1, 4, 3, 1, 4, 3, 1, 4, 3, 1, 4, 3, 2, & & 4, 3, 2, 4, 3, 2, 4, 3, 2, 4, 3, 2, 4, 3, 2, & & 4, 3, 2, 4, 3, 2, 4, 3, 2, 4, 3, 2, 4, 3, 2, & & 4, 3, 2, 4, 3, 2, 4, 3, 2, 4, 3, 2, 4, 3, 2, & & 4, 3, 2, 4, 3, 2, 4, 3, 2, 4, 3, 2, 4, 3, 2, & & 4, 3, 2, 5, 2, 1, 5, 2, 1, 5, 2, 1, 5, 2, 1, & & 5, 2, 1, 5, 2, 1, 5, 2, 1, 5, 2, 1, 5, 2, 1, & & 5, 2, 1, 5, 2, 1, 5, 2, 1, 5, 2, 1, 5, 2, 1, & & 5, 2, 1, 5, 3, 1, 5, 3, 1, 5, 3, 1, 5, 3, 1, & & 5, 3, 1, 5, 3, 1, 5, 3, 1, 5, 3, 1, 5, 3, 1, & & 5, 3, 1, 5, 3, 1, 5, 3, 1, 5, 3, 1, 5, 3, 1, & & 5, 3, 1, 5, 3, 1, 5, 3, 1, 5, 3, 1, 5, 3, 1, & & 5, 3, 1, 5, 3, 2, 5, 3, 2, 5, 3, 2, 5, 3, 2, & & 5, 3, 2, 5, 3, 2, 5, 3, 2, 5, 3, 2, 5, 3, 2, & & 5, 3, 2, 5, 3, 2, 5, 3, 2, 5, 3, 2, 5, 3, 2, & & 5, 3, 2, 5, 3, 2, 5, 3, 2, 5, 3, 2, 5, 3, 2, & & 5, 4, 1, 5, 4, 1, 5, 4, 1, 5, 4, 1, 5, 4, 1, & & 5, 4, 1, 5, 4, 1, 5, 4, 1, 5, 4, 1, 5, 4, 1, & & 5, 4, 1, 5, 4, 1, 5, 4, 2, 5, 4, 2, 5, 4, 2, & & 5, 4, 2, 5, 4, 2, 5, 4, 2, 5, 4, 2, 5, 4, 2, & & 5, 4, 2, 5, 4, 2, 5, 4, 2, 5, 4, 2, 5, 4, 2, & & 5, 4, 3, 5, 4, 3, 5, 4, 3, 5, 4, 3, 5, 4, 3, & & 5, 4, 3, 5, 4, 3, 5, 4, 3, 5, 4, 3, 5, 4, 3, & & 5, 4, 3, 5, 4, 3, 5, 4, 3, 6, 2, 1, 6, 2, 1, & & 6, 2, 1, 6, 2, 1, 6, 2, 1, 6, 2, 1, 6, 2, 1, & & 6, 2, 1, 6, 2, 1, 6, 2, 1, 6, 2, 1, 6, 2, 1, & & 6, 2, 1, 6, 2, 1, 6, 2, 1, 6, 2, 1, 6, 2, 1, & & 6, 2, 1, 6, 2, 1, 6, 2, 1, 6, 2, 1, 6, 3, 1, & & 6, 3, 1, 6, 3, 1, 6, 3, 1, 6, 3, 1, 6, 3, 1, & & 6, 3, 1, 6, 3, 1, 6, 3, 1, 6, 3, 1, 6, 3, 1, & & 6, 3, 1, 6, 3, 1, 6, 3, 1, 6, 3, 1, 6, 3, 1, & & 6, 3, 1, 6, 3, 1, 6, 3, 1, 6, 3, 1, 6, 3, 1, & & 6, 3, 1, 6, 3, 1, 6, 3, 2, 6, 3, 2, 6, 3, 2, & & 6, 3, 2, 6, 3, 2, 6, 3, 2, 6, 3, 2, 6, 3, 2, & & 6, 3, 2, 6, 3, 2, 6, 3, 2, 6, 3, 2, 6, 3, 2, & & 6, 3, 2, 6, 3, 2, 6, 3, 2, 6, 3, 2, 6, 3, 2, & & 6, 3, 2, 6, 4, 1, 6, 4, 1, 6, 4, 1, 6, 4, 1, & & 6, 4, 1, 6, 4, 1, 6, 4, 1, 6, 4, 1, 6, 4, 1, & & 6, 4, 1, 6, 4, 1, 6, 4, 1, 6, 4, 2, 6, 4, 2, & & 6, 4, 2, 6, 4, 2, 6, 4, 2, 6, 4, 2, 6, 4, 2, & & 6, 4, 2, 6, 4, 2, 6, 4, 2, 6, 4, 2, 6, 4, 2, & & 6, 4, 2, 6, 4, 2, 6, 4, 2, 6, 4, 2, 6, 4, 3, & & 6, 4, 3, 6, 4, 3, 6, 4, 3, 6, 4, 3, 6, 4, 3, & & 6, 4, 3, 6, 4, 3, 6, 4, 3, 6, 4, 3, 6, 4, 3, & & 6, 4, 3, 6, 4, 3, 6, 4, 3, 6, 5, 1, 6, 5, 1, & & 6, 5, 1, 6, 5, 1, 6, 5, 1, 6, 5, 1, 6, 5, 1, & & 6, 5, 1, 6, 5, 1, 6, 5, 1, 6, 5, 1, 6, 5, 1, & & 6, 5, 1, 6, 5, 2, 6, 5, 2, 6, 5, 2, 6, 5, 2, & & 6, 5, 2, 6, 5, 2, 6, 5, 2, 6, 5, 2, 6, 5, 2, & & 6, 5, 2, 6, 5, 2, 6, 5, 3, 6, 5, 3, 6, 5, 3, & & 6, 5, 3, 6, 5, 3, 6, 5, 3, 6, 5, 3, 6, 5, 3, & & 6, 5, 3, 6, 5, 3, 6, 5, 3, 6, 5, 3, 6, 5, 3, & & 6, 5, 3, 6, 5, 3, 6, 5, 3, 6, 5, 3, 6, 5, 4, & & 6, 5, 4, 6, 5, 4, 6, 5, 4, 6, 5, 4, 6, 5, 4, & & 6, 5, 4/ data ig4d / 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, & & 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, 4, 3, 2, 1, & & 4, 3, 2, 1, 5, 3, 2, 1, 5, 3, 2, 1, 5, 3, 2, 1, & & 5, 3, 2, 1, 5, 3, 2, 1, 5, 3, 2, 1, 5, 4, 2, 1, & & 5, 4, 2, 1, 5, 4, 2, 1, 5, 4, 2, 1, 5, 4, 2, 1, & & 5, 4, 2, 1, 5, 4, 3, 1, 5, 4, 3, 1, 5, 4, 3, 1, & & 5, 4, 3, 1, 5, 4, 3, 1, 5, 4, 3, 1, 5, 4, 3, 2, & & 5, 4, 3, 2, 5, 4, 3, 2, 6, 3, 2, 1, 6, 3, 2, 1, & & 6, 3, 2, 1, 6, 3, 2, 1, 6, 3, 2, 1, 6, 3, 2, 1, & & 6, 3, 2, 1, 6, 3, 2, 1, 6, 3, 2, 1, 6, 3, 2, 1, & & 6, 3, 2, 1, 6, 3, 2, 1, 6, 4, 2, 1, 6, 4, 2, 1, & & 6, 4, 2, 1, 6, 4, 2, 1, 6, 4, 2, 1, 6, 4, 2, 1, & & 6, 4, 2, 1, 6, 4, 2, 1, 6, 4, 2, 1, 6, 4, 3, 1, & & 6, 4, 3, 1, 6, 4, 3, 1, 6, 4, 3, 1, 6, 4, 3, 1, & & 6, 4, 3, 1, 6, 4, 3, 1, 6, 4, 3, 1, 6, 4, 3, 1, & & 6, 4, 3, 2, 6, 4, 3, 2, 6, 4, 3, 2, 6, 4, 3, 2, & & 6, 4, 3, 2, 6, 4, 3, 2, 6, 4, 3, 2, 6, 4, 3, 2, & & 6, 5, 2, 1, 6, 5, 2, 1, 6, 5, 2, 1, 6, 5, 2, 1, & & 6, 5, 2, 1, 6, 5, 2, 1, 6, 5, 2, 1, 6, 5, 2, 1, & & 6, 5, 2, 1, 6, 5, 3, 1, 6, 5, 3, 1, 6, 5, 3, 1, & & 6, 5, 3, 1, 6, 5, 3, 1, 6, 5, 3, 1, 6, 5, 3, 1, & & 6, 5, 3, 1, 6, 5, 3, 1, 6, 5, 3, 2, 6, 5, 3, 2, & & 6, 5, 3, 2, 6, 5, 3, 2, 6, 5, 3, 2, 6, 5, 3, 2, & & 6, 5, 3, 2, 6, 5, 3, 2, 6, 5, 3, 2, 6, 5, 4, 1, & & 6, 5, 4, 1, 6, 5, 4, 1, 6, 5, 4, 1, 6, 5, 4, 1, & & 6, 5, 4, 1, 6, 5, 4, 1, 6, 5, 4, 2, 6, 5, 4, 2, & & 6, 5, 4, 2, 6, 5, 4, 2, 6, 5, 4, 2, 6, 5, 4, 3, & & 6, 5, 4, 3, 6, 5, 4, 3, 6, 5, 4, 3, 6, 5, 4, 3/ data g1d / 2.54604187873032, 4.93827160493827, 0.216052476985023, 0.540140564527490, & & 2.69604187873032, 4.93827160493827, -0.592304768563297, 0.721415986426527, & & 3.14604187873032, 4.93827160493827, -0.527133859253655, 0.930330071032478, & & 3.44604187873032, 4.93827160493827, -0.470835889772638, 0.665236789913121, & & 3.74604187873032, 4.93827160493827, -0.175033915723163, 0.321571036982364, & & 4.04604187873032, 4.93827160493827, -0.877540831667573, 0.107062715918296, & & 3.02771204029171, 7.30300631655231, 0.966695855987017, 0.774690282318266, & & 4.01320795462504, 0.915649943214857, -1.10885317300391, 0.759222948749178, & & 5.40660216024393, 0.915649943214857, -0.974870131176029, 0.812516532926591, & & 1.41076536238452, 4.93827160493827, 0.167638175269596, 0.646254912017046, & & 2.16076536238452, 4.93827160493827, 0.104273300280425, 0.751361672935433/ data g2d / 2.41097801171611, 2.54604187873032, 5.36547402848741, & & 2.77777777777778, 1.24546788018301, 0.486372163300326, & & 2.41097801171611, 3.74604187873032, 5.36547402848741, & & 2.77777777777778, -0.800110297589319, 0.359724942786113, & & 2.55488261838375, 2.74604187873032, 5.36547402848741, & & 2.77777777777778, -2.43881381835806, 0.745278593088713, & & 2.55488261838375, 3.34604187873032, 5.36547402848741, & & 2.77777777777778, -1.04007740921159, 0.748565479427594, & & 2.69878722505139, 3.94604187873032, 5.36547402848741, & & 2.77777777777778, 0.161373044927678, 0.327633057028257, & & 2.98659643838667, 2.54604187873032, 5.36547402848741, & & 2.77777777777778, 0.123438576015203, 0.605525779437849, & & 2.98659643838667, 2.94604187873032, 5.36547402848741, & & 2.77777777777778, -0.229202426033708, 0.832390988810753, & & 2.98659643838667, 3.54604187873032, 5.36547402848741, & & 2.77777777777778, -1.95982726309328, 0.609915729663955, & & 3.13050104505431, 3.94604187873032, 5.36547402848741, & & 2.77777777777778, 0.333881081987419, 0.238894852004574, & & 3.27440565172195, 2.54604187873032, 5.36547402848741, & & 2.77777777777778, -0.435432122733186, 0.357357927097062, & & 3.27440565172195, 3.54604187873032, 5.36547402848741, & & 2.77777777777778, 0.181305623013231, 0.359699053517517, & & 3.27440565172195, 3.94604187873032, 5.36547402848741, & & 2.77777777777778, 0.724560343013103, 0.174046555595215, & & 6.10329926305338, 2.54604187873032, 0.298987736559953, & & 0.717894138037086, 5.02131841895133, 0.688289735163577, & & 6.10329926305338, 4.11969328088509, 0.298987736559953, & & 0.717894138037086, 1.10374194131042, 0.507467589880903, & & 3.66485940322031, 2.54604187873032, 0.672722407259895, & & 2.77777777777778, 0.599987525074650, 0.468722739652022, & & 3.66485940322031, 3.14604187873032, 0.672722407259895, & & 2.77777777777778, 4.58611828340326, 0.634297977238278, & & 3.66485940322031, 3.54604187873032, 0.672722407259895, & & 2.77777777777778, -3.09271295006982, 0.457941710319802, & & 4.07126604652582, 2.94604187873032, 0.672722407259895, & & 2.77777777777778, -3.82726262668589, 0.804727642448265, & & 4.47767268983133, 3.94604187873032, 0.672722407259895, & & 2.77777777777778, 3.63160164796171, 0.319718637524618, & & 4.88407933313684, 2.54604187873032, 0.672722407259895, & & 2.77777777777778, 4.73115610777552, 0.677426000733402, & & 4.88407933313684, 3.14604187873032, 0.672722407259895, & & 2.77777777777778, 4.66453628004292, 0.933557130847318, & & 4.88407933313684, 3.54604187873032, 0.672722407259895, & & 2.77777777777778, -1.18109687989228, 0.683646824860563, & & 5.29048597644235, 2.54604187873032, 0.672722407259895, & & 2.77777777777778, -2.10015486801197, 0.618931338324287, & & 5.29048597644235, 3.94604187873032, 0.672722407259895, & & 2.77777777777778, 1.80883213311071, 0.307758791537817, & & 6.10329926305338, 2.74604187873032, 0.672722407259895, & & 2.77777777777778, -2.17560226900420, 0.466866765709985, & & 6.10329926305338, 3.14604187873032, 0.672722407259895, & & 2.77777777777778, 1.51290596304678, 0.527578158398728, & & 6.10329926305338, 3.74604187873032, 0.672722407259895, & & 2.77777777777778, -1.47066415505825, 0.290706432625084, & & 6.10329926305338, 2.41097801171611, 0.298987736559953, & & 2.38465512377218, 0.871582724737963, 0.645196073746791, & & 6.10329926305338, 3.27440565172195, 0.298987736559953, & & 2.38465512377218, -5.40566856389640, 0.563465105424310, & & 3.66485940322031, 2.41097801171611, 0.672722407259895, & & 5.36547402848741, 2.58510039064388, 0.466220867997270, & & 3.66485940322031, 2.69878722505139, 0.672722407259895, & & 5.36547402848741, 2.03506637354943, 0.639426695961730, & & 3.66485940322031, 2.98659643838667, 0.672722407259895, & & 5.36547402848741, -3.28975653191510, 0.572694684325049, & & 3.66485940322031, 3.27440565172195, 0.672722407259895, & & 5.36547402848741, 2.92746697033485, 0.335402310306697, & & 4.47767268983133, 2.55488261838375, 0.672722407259895, & & 5.36547402848741, -0.306714431090944, 0.825036968640699, & & 4.47767268983133, 2.98659643838667, 0.672722407259895, & & 5.36547402848741, 1.24704963697135, 0.825890174472355, & & 4.47767268983133, 3.27440565172195, 0.672722407259895, & & 5.36547402848741, 0.143381689442346, 0.486048426514143, & & 4.88407933313684, 2.41097801171611, 0.672722407259895, & & 5.36547402848741, -0.625172735186208, 0.679499777796757, & & 5.29048597644235, 2.69878722505139, 0.672722407259895, & & 5.36547402848741, 2.73677876582923, 0.861694278969599, & & 5.29048597644235, 3.13050104505431, 0.672722407259895, & & 5.36547402848741, -3.83964235699843, 0.631564830654974, & & 5.69689261974786, 3.27440565172195, 0.672722407259895, & & 5.36547402848741, 6.34849879859624, 0.382683495911731, & & 6.10329926305338, 2.41097801171611, 0.672722407259895, & & 5.36547402848741, 0.394903167441052, 0.380446806846748, & & 6.10329926305338, 2.69878722505139, 0.672722407259895, & & 5.36547402848741, 0.218614072388127, 0.528625570643676, & & 6.10329926305338, 2.98659643838667, 0.672722407259895, & & 5.36547402848741, 0.271954034267115, 0.480196339290539, & & 6.10329926305338, 3.27440565172195, 0.672722407259895, & & 5.36547402848741, -2.88498615013412, 0.285823473249934, & & 2.62579155437878, 3.14604187873032, 0.512731940030608, & & 2.77777777777778, 1.10816229859634, 0.551491101446284, & & 2.62579155437878, 3.74604187873032, 0.512731940030608, & & 2.77777777777778, 0.337345807223081, 0.289636710180057, & & 3.09130642539251, 2.54604187873032, 0.512731940030608, & & 2.77777777777778, 0.770110746328846, 0.537403425856947, & & 3.55682129640625, 3.54604187873032, 0.512731940030608, & & 2.77777777777778, -1.823683169135609E-002, 0.634486830118404, & & 3.55682129640625, 3.94604187873032, 0.512731940030608, & & 2.77777777777778, 1.40484803622120, 0.304725346771056, & & 4.48785103843371, 3.14604187873032, 0.512731940030608, & & 2.77777777777778, 7.714618388705463E-002, 0.902565751853058, & & 4.95336590944744, 3.74604187873032, 0.512731940030608, & & 2.77777777777778, -0.319519615862312, 0.424477285470941, & & 2.62579155437878, 2.69878722505139, 0.512731940030608, & & 5.36547402848741, -0.637128848172485, 0.554783510047285, & & 2.62579155437878, 3.27440565172195, 0.512731940030608, & & 5.36547402848741, -0.735845093177608, 0.295661061029227, & & 3.09130642539251, 2.41097801171611, 0.512731940030608, & & 5.36547402848741, -0.596602204351342, 0.532453081366948, & & 3.09130642539251, 2.98659643838667, 0.512731940030608, & & 5.36547402848741, -0.693522651260581, 0.662810812019364, & & 4.02233616741998, 3.13050104505431, 0.512731940030608, & & 5.36547402848741, 0.411957621995652, 0.686023176856640, & & 5.41888078046118, 2.55488261838375, 0.512731940030608, & & 5.36547402848741, 0.323290935526244, 0.550914089590243, & & 5.41888078046118, 2.84269183171903, 0.512731940030608, & & 5.36547402848741, -0.518935268367728, 0.613767321006588, & & 2.62579155437878, 4.88407933313684, 0.512731940030608, & & 0.672722407259895, 1.07642658829263, 0.559798647275799, & & 2.62579155437878, 5.69689261974786, 0.512731940030608, & & 0.672722407259895, 0.952048917706591, 0.423110291743919, & & 3.55682129640625, 3.66485940322031, 0.512731940030608, & & 0.672722407259895, 0.633348367102722, 0.603618292140143, & & 3.55682129640625, 4.47767268983133, 0.512731940030608, & & 0.672722407259895, 0.446210541076485, 0.865844443675690, & & 3.55682129640625, 5.29048597644235, 0.512731940030608, & & 0.672722407259895, -0.921375251507774, 0.812063860611550, & & 3.55682129640625, 6.10329926305338, 0.512731940030608, & & 0.672722407259895, -1.02651530437490, 0.497799151528312, & & 4.48785103843371, 3.66485940322031, 0.512731940030608, & & 0.672722407259895, 0.237125371324322, 0.621462289728244, & & 4.48785103843371, 4.88407933313684, 0.512731940030608, & & 0.672722407259895, -0.122978907328392, 0.915306962302942, & & 5.41888078046118, 3.66485940322031, 0.512731940030608, & & 0.672722407259895, 0.392478614809155, 0.417864971925331, & & 5.41888078046118, 4.88407933313684, 0.512731940030608, & & 0.672722407259895, -1.59460617110153, 0.618975731691287, & & 5.41888078046118, 6.10329926305338, 0.512731940030608, & & 0.672722407259895, 1.28124978250137, 0.352709901631562, & & 1.41076536238452, 2.74604187873032, 2.77777777777778, & & 2.77777777777778, 0.184637183979458, 0.669535928354016, & & 1.41076536238452, 3.14604187873032, 2.77777777777778, & & 2.77777777777778, -0.280503949773265, 0.745614156362231, & & 1.61076536238452, 3.14604187873032, 2.77777777777778, & & 2.77777777777778, 0.474153153819763, 0.885188898411213, & & 1.81076536238452, 2.54604187873032, 2.77777777777778, & & 2.77777777777778, 0.516501876947517, 0.685280474418887, & & 1.81076536238452, 3.74604187873032, 2.77777777777778, & & 2.77777777777778, 0.124459843464024, 0.505851403993892, & & 2.21076536238452, 2.94604187873032, 2.77777777777778, & & 2.77777777777778, 0.762840309255809, 0.774824813042777, & & 2.21076536238452, 3.94604187873032, 2.77777777777778, & & 2.77777777777778, 0.484409188678470, 0.275048716452944, & & 2.61076536238452, 2.54604187873032, 2.77777777777778, & & 2.77777777777778, 0.368197070738451, 0.301470798694585, & & 2.61076536238452, 3.14604187873032, 2.77777777777778, & & 2.77777777777778, 0.374186182955213, 0.415083397923001, & & 1.61076536238452, 2.69878722505139, 2.77777777777778, & & 5.36547402848741, 3.487133874260432E-002, 0.889995987444030, & & 1.61076536238452, 2.98659643838667, 2.77777777777778, & & 5.36547402848741, -0.117537079561537, 0.802096175888004, & & 2.01076536238452, 2.69878722505139, 2.77777777777778, & & 5.36547402848741, 0.101929719602838, 0.907604393843724, & & 2.21076536238452, 3.13050104505431, 2.77777777777778, & & 5.36547402848741, -0.566881886235303, 0.569219565093625, & & 2.41076536238452, 2.41097801171611, 2.77777777777778, & & 5.36547402848741, -0.744200297015760, 0.436296992504891, & & 2.61076536238452, 2.55488261838375, 2.77777777777778, & & 5.36547402848741, 0.137978988310823, 0.374668474818950, & & 2.61076536238452, 2.98659643838667, 2.77777777777778, & & 5.36547402848741, -9.327354096291496E-002, 0.376164746642678, & & 2.61076536238452, 3.27440565172195, 2.77777777777778, & & 5.36547402848741, -0.158006427538319, 0.222084047127789, & & 1.61076536238452, 4.47767268983133, 2.77777777777778, & & 0.672722407259895, -0.712720056776873, 0.878239538449519, & & 1.81076536238452, 3.66485940322031, 2.77777777777778, & & 0.672722407259895, 0.260823139981368, 0.650981907747518, & & 1.81076536238452, 5.29048597644235, 2.77777777777778, & & 0.672722407259895, 0.818218953862502, 0.880104038549718, & & 1.81076536238452, 6.10329926305338, 2.77777777777778, & & 0.672722407259895, -0.516541107525383, 0.541000622593166, & & 2.21076536238452, 4.47767268983133, 2.77777777777778, & & 0.672722407259895, -0.982040976460765, 0.769691071809393, & & 2.21076536238452, 5.29048597644235, 2.77777777777778, & & 0.672722407259895, 0.472481284512067, 0.723757221091751, & & 2.41076536238452, 6.10329926305338, 2.77777777777778, & & 0.672722407259895, -0.202615705568135, 0.343475801397070, & & 2.61076536238452, 4.47767268983133, 2.77777777777778, & & 0.672722407259895, 0.718747797776005, 0.411863003438206, & & 2.61076536238452, 5.29048597644235, 2.77777777777778, & & 0.672722407259895, 0.623035527129636, 0.387318256248791, & & 1.61076536238452, 4.48785103843371, 2.77777777777778, & & 0.512731940030608, 0.535068605592361, 0.867724935292867, & & 1.81076536238452, 3.09130642539251, 2.77777777777778, & & 0.512731940030608, -0.561202945842865, 0.750563925730408, & & 2.21076536238452, 3.09130642539251, 2.77777777777778, & & 0.512731940030608, -0.156012473013397, 0.614697087110237, & & 2.49169775033608, 3.54604187873032, 0.250007375248228, & & 2.77777777777778, 0.359466068910673, 0.242896725007281, & & 3.15835458355602, 2.54604187873032, 0.250007375248228, & & 2.77777777777778, -0.872167726969684, 0.364104137039178, & & 3.15835458355602, 3.14604187873032, 0.250007375248228, & & 2.77777777777778, -1.16626254423497, 0.494787743130524, & & 4.49166824999589, 2.94604187873032, 0.250007375248228, & & 2.77777777777778, -0.437410320985398, 0.803541294464186, & & 4.49166824999589, 3.34604187873032, 0.250007375248228, & & 2.77777777777778, -0.368620728241428, 0.721955544885947, & & 4.49166824999589, 3.94604187873032, 0.250007375248228, & & 2.77777777777778, -0.720309706838231, 0.281252481119456, & & 5.15832508321582, 2.54604187873032, 0.250007375248228, & & 2.77777777777778, 0.262020620723829, 0.644243995888175, & & 5.82498191643575, 3.54604187873032, 0.250007375248228, & & 2.77777777777778, -0.182702399354168, 0.649483954922803, & & 6.49163874965569, 2.94604187873032, 0.250007375248228, & & 2.77777777777778, -0.621622049479690, 0.802265525640699, & & 2.49169775033608, 2.41097801171611, 0.250007375248228, & & 5.36547402848741, -0.317340282053722, 0.245733598669313, & & 2.49169775033608, 2.98659643838667, 0.250007375248228, & & 5.36547402848741, 0.884238446369294, 0.304622554200015, & & 3.15835458355602, 2.69878722505139, 0.250007375248228, & & 5.36547402848741, -0.953685740347276, 0.498085745537751, & & 3.15835458355602, 3.13050104505431, 0.250007375248228, & & 5.36547402848741, -1.40759716016804, 0.362500925432640, & & 4.49166824999589, 2.84269183171903, 0.250007375248228, & & 5.36547402848741, 1.49522382569261, 0.808017352864171, & & 4.49166824999589, 3.27440565172195, 0.250007375248228, & & 5.36547402848741, -0.416849953880493, 0.428242576583552, & & 5.15832508321582, 2.55488261838375, 0.250007375248228, & & 5.36547402848741, 6.475883974265652E-002, 0.799329257789364, & & 6.49163874965569, 2.41097801171611, 0.250007375248228, & & 5.36547402848741, -1.75604324423563, 0.586081844475724, & & 6.49163874965569, 2.69878722505139, 0.250007375248228, & & 5.36547402848741, 0.143096845333818, 0.808644406786584, & & 6.49163874965569, 2.98659643838667, 0.250007375248228, & & 5.36547402848741, -0.977533743514962, 0.729183168138056, & & 6.49163874965569, 3.27440565172195, 0.250007375248228, & & 5.36547402848741, -0.606731312742724, 0.430550042725668, & & 2.49169775033608, 6.10329926305338, 6.747966006760861E-002, & & 0.298987736559953, -2.49844940400369, 0.555780086104343, & & 7.62447353704731, 4.88407933313684, 6.747966006760861E-002, & & 0.298987736559953, -3.70136796315664, 0.835842249767255, & & 2.49169775033608, 3.66485940322031, 0.250007375248228, & & 0.672722407259895, 1.05112869838611, 0.238416118617137, & & 2.49169775033608, 4.47767268983133, 0.250007375248228, & & 0.672722407259895, -0.746111368259386, 0.335885913760183, & & 2.49169775033608, 5.69689261974786, 0.250007375248228, & & 0.672722407259895, -1.70137964632728, 0.253392954037158, & & 3.82501141677595, 3.66485940322031, 0.250007375248228, & & 0.672722407259895, -0.226678627014911, 0.462737732613808, & & 3.82501141677595, 4.47767268983133, 0.250007375248228, & & 0.672722407259895, 0.759139072665126, 0.658772805096472, & & 3.82501141677595, 6.10329926305338, 0.250007375248228, & & 0.672722407259895, 0.412544531878448, 0.372786639319538, & & 5.15832508321582, 4.88407933313684, 0.250007375248228, & & 0.672722407259895, -2.74053638964100, 0.898220265770111, & & 5.15832508321582, 6.10329926305338, 0.250007375248228, & & 0.672722407259895, 0.270350446206339, 0.506287585016310, & & 5.82498191643575, 3.66485940322031, 0.250007375248228, & & 0.672722407259895, 0.812121486575271, 0.608987224723401, & & 6.49163874965569, 4.07126604652582, 0.250007375248228, & & 0.672722407259895, 2.36471494429540, 0.698218459019788, & & 6.49163874965569, 5.29048597644235, 0.250007375248228, & & 0.672722407259895, 0.896879312170643, 0.754255905550621, & & 6.49163874965569, 6.10329926305338, 0.250007375248228, & & 0.672722407259895, -0.679162784100550, 0.466790566814135, & & 3.82501141677595, 4.02233616741998, 0.250007375248228, & & 0.512731940030608, -1.26195673453151, 0.672293482931864, & & 5.15832508321582, 3.09130642539251, 0.250007375248228, & & 0.512731940030608, 1.64587669098967, 0.704578677894942, & & 5.15832508321582, 4.48785103843371, 0.250007375248228, & & 0.512731940030608, -4.542595639155514E-002, 0.868182967480108, & & 6.49163874965569, 2.62579155437878, 0.250007375248228, & & 0.512731940030608, -0.790345813372845, 0.475426290908923, & & 2.49169775033608, 2.41076536238452, 0.250007375248228, & & 2.77777777777778, 0.197183787046885, 0.218413465422565, & & 3.15835458355602, 2.01076536238452, 0.250007375248228, & & 2.77777777777778, 0.337836521120785, 0.485691904367204, & & 4.49166824999589, 1.61076536238452, 0.250007375248228, & & 2.77777777777778, 0.152989758299692, 0.773508995335834, & & 5.82498191643575, 1.41076536238452, 0.250007375248228, & & 2.77777777777778, -0.593749748962258, 0.718479104738437, & & 5.82498191643575, 2.21076536238452, 0.250007375248228, & & 2.77777777777778, 0.365932253798650, 0.746970201138750/ data g3d / 3.66485940322031, 2.41097801171611, 2.54604187873032, & & 0.168180601814974, 1.34136850712185, 0.444444444444444, & & -4.97090485148762, 0.771489985725544, & & 3.66485940322031, 3.27440565172195, 2.54604187873032, & & 0.168180601814974, 1.34136850712185, 0.444444444444444, & & -6.20634674938456, 0.711656346412189, & & 3.66485940322031, 3.27440565172195, 4.04604187873032, & & 0.168180601814974, 1.34136850712185, 0.444444444444444, & & 7.21670656382250, 0.604239513425074, & & 6.10329926305338, 2.41097801171611, 4.04604187873032, & & 0.168180601814974, 1.34136850712185, 0.444444444444444, & & -6.37852353204277, 0.625589196001491, & & 3.66485940322031, 2.41097801171611, 2.79604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -3.65934223323644, 0.544298660609060, & & 3.66485940322031, 2.41097801171611, 3.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 6.92659111000928, 0.460729895264882, & & 3.66485940322031, 2.58366353971728, 4.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -5.61994906844569, 0.286253565759906, & & 3.66485940322031, 2.75634906771845, 3.29604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 1.55069146316098, 0.683810022680184, & & 3.66485940322031, 2.92903459571961, 2.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 6.00832154100630, 0.559786355086517, & & 3.66485940322031, 3.27440565172194, 3.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -5.31548246274278, 0.456602663952599, & & 3.66485940322031, 3.27440565172194, 4.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -7.97178052565863, 0.192123569401567, & & 4.15254737518692, 2.41097801171611, 2.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 2.21827820300665, 0.558024426154764, & & 4.15254737518692, 2.41097801171611, 3.79604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -3.27501610078175, 0.426327708817579, & & 4.15254737518692, 2.75634906771845, 2.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -4.69307951761365, 0.705332176810248, & & 4.15254737518692, 3.10172012372078, 3.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 15.9697184398315, 0.577634693171501, & & 4.15254737518692, 3.27440565172194, 4.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -2.13380105025404, 0.234172635833272, & & 4.64023534715354, 2.75634906771845, 4.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 1.55238638639321, 0.404287718437807, & & 4.64023534715354, 2.92903459571961, 3.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -4.34029747713267, 0.905956710294124, & & 5.12792331912015, 2.41097801171611, 4.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 3.87628194919668, 0.313156614873195, & & 5.12792331912015, 2.75634906771845, 3.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -8.42514950874606, 0.747862644814186, & & 5.12792331912015, 3.10172012372078, 2.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 0.792598980043663, 0.609893222826613, & & 5.12792331912015, 3.27440565172194, 3.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -6.33821863588979, 0.475752846415503, & & 5.61561129108676, 2.41097801171611, 2.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -0.521765837036338, 0.507607159009109, & & 5.61561129108676, 2.58366353971728, 3.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 9.13940818158741, 0.754392066447506, & & 5.61561129108676, 2.75634906771845, 4.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -2.57694542849747, 0.349373591169455, & & 5.61561129108676, 3.10172012372078, 3.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -0.687692035903198, 0.664734268781088, & & 6.10329926305337, 2.41097801171611, 3.04604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -4.12606674366462, 0.496975050529798, & & 6.10329926305337, 2.41097801171611, 3.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 1.57207708207963, 0.406541930629848, & & 6.10329926305337, 2.58366353971728, 2.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & -3.26594027640494, 0.471822212684965, & & 6.10329926305337, 2.92903459571961, 3.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 6.19408527553095, 0.495753994113547, & & 6.10329926305337, 3.27440565172194, 2.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 1.28219322594153, 0.322925497945580, & & 6.10329926305337, 3.27440565172194, 3.54604187873032, & & 0.467168338374927, 3.72602363089404, 1.77777777777778, & & 2.93319587155444, 0.330618402318456, & & 2.62579155437878, 2.41097801171611, 2.54604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & 2.09136472689691, 0.418793939951344, & & 2.62579155437878, 2.41097801171611, 3.54604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & 0.198857197464123, 0.415811673603337, & & 2.62579155437878, 3.10172012372078, 3.29604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -1.89195090985378, 0.510079813561374, & & 2.62579155437878, 3.27440565172194, 2.54604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -0.762751006535243, 0.337620985899020, & & 2.62579155437878, 3.27440565172194, 4.04604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -1.39532157999277, 0.175518753939188, & & 3.18440939959526, 2.75634906771845, 3.04604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & 0.938098601991219, 0.823094952058580, & & 3.18440939959526, 3.27440565172194, 2.79604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & 1.65982948754920, 0.496419545775770, & & 3.74302724481174, 2.75634906771845, 4.04604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & 0.674889354955917, 0.396131952199263, & & 3.74302724481174, 3.27440565172194, 4.04604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -0.750125501954502, 0.251557187645379, & & 4.30164509002822, 2.41097801171611, 2.79604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & 1.25471958966788, 0.703839795268215, & & 4.30164509002822, 2.41097801171611, 4.04604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -0.163859459401771, 0.319430940860218, & & 4.86026293524470, 2.75634906771845, 3.04604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -0.711379431047810, 0.857447801927056, & & 4.86026293524470, 3.27440565172194, 2.54604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -0.945823251985680, 0.436825045606661, & & 5.41888078046118, 2.58366353971728, 4.04604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & 0.460307197027548, 0.285910279868909, & & 5.41888078046118, 2.92903459571961, 4.04604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -5.224726220095101E-002, 0.291479976398756, & & 5.41888078046118, 3.27440565172194, 3.54604187873032, & & 0.356063847243478, 3.72602363089404, 1.77777777777778, & & -1.14817794592571, 0.362613174137459, & & 2.62579155437878, 6.10329926305338, 4.04604187873032, & & 0.128182985007652, 0.168180601814974, 0.444444444444444, & & -1.22416819137940, 0.594575543056587, & & 2.62579155437878, 3.66485940322031, 2.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -1.87400272741901, 0.408309364309158, & & 2.62579155437878, 3.66485940322031, 4.04604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 5.55877090731570, 0.207628146081743, & & 2.62579155437878, 4.15254737518692, 4.04604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -5.30740411864959, 0.251996985520270, & & 2.62579155437878, 4.64023534715354, 2.79604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 0.706435663153981, 0.621122127739797, & & 2.62579155437878, 5.61561129108676, 2.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -6.40336716994792, 0.447099915371113, & & 2.62579155437878, 6.10329926305337, 3.29604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -4.69902625028710, 0.412878374902625, & & 3.18440939959526, 4.15254737518692, 3.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -1.45228261724557, 0.608047767525103, & & 3.18440939959526, 5.12792331912015, 3.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 3.73079478045570, 0.644906413863808, & & 3.18440939959526, 6.10329926305337, 2.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 3.34968510036524, 0.438440477682292, & & 3.74302724481174, 4.15254737518692, 4.04604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -1.06891139979478, 0.360721901385088, & & 3.74302724481174, 5.12792331912015, 2.79604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -1.86059210540816, 0.853699768706739, & & 4.30164509002822, 3.66485940322031, 2.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -1.10027747079308, 0.580520912578039, & & 4.30164509002822, 5.61561129108676, 3.29604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -0.543216479993580, 0.761486365845125, & & 4.30164509002822, 6.10329926305337, 2.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 0.334655537051715, 0.500690241314665, & & 4.86026293524470, 4.15254737518692, 3.29604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 0.407767667734541, 0.747300156771458, & & 5.41888078046118, 4.15254737518692, 3.79604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 2.71706269476660, 0.400438008516598, & & 5.41888078046118, 4.64023534715354, 2.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 1.07512601044896, 0.559215534290407, & & 5.41888078046118, 5.61561129108676, 3.54604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & -1.90671996088671, 0.488889390311886, & & 5.41888078046118, 6.10329926305337, 3.04604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 1.38383922071182, 0.468642212032423, & & 5.41888078046118, 6.10329926305337, 4.04604187873032, & & 0.356063847243478, 0.467168338374927, 1.77777777777778, & & 0.888594778535329, 0.208127022045801, & & 2.62579155437878, 3.66485940322031, 2.41097801171611, & & 0.128182985007652, 0.168180601814974, 1.34136850712185, & & 0.732316710297102, 0.711222558136558, & & 5.41888078046118, 3.66485940322031, 3.27440565172195, & & 0.128182985007652, 0.168180601814974, 1.34136850712185, & & 2.49247739003267, 0.671580626041839, & & 5.41888078046118, 6.10329926305338, 3.27440565172195, & & 0.128182985007652, 0.168180601814974, 1.34136850712185, & & -1.43697325962874, 0.641781997126188, & & 2.62579155437878, 3.66485940322031, 2.41097801171611, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 1.88817262381295, 0.397180075850279, & & 2.62579155437878, 3.66485940322031, 3.10172012372078, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 2.09791607238825, 0.411077420343018, & & 2.62579155437878, 4.64023534715354, 3.27440565172194, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -2.58988910486460, 0.415864920745200, & & 2.62579155437878, 5.12792331912015, 2.41097801171611, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -1.65976616764972, 0.501851264107505, & & 2.62579155437878, 6.10329926305337, 3.10172012372078, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 0.924345821003079, 0.360356424186718, & & 3.18440939959526, 4.64023534715354, 2.75634906771845, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 1.12351896022869, 0.822531341670863, & & 3.18440939959526, 5.61561129108676, 3.27440565172194, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 2.76132840725624, 0.446377061787004, & & 3.74302724481174, 3.66485940322031, 2.58366353971728, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -2.02870400408529, 0.666562516771008, & & 3.74302724481174, 4.15254737518692, 3.27440565172194, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -1.71830147846670, 0.542294990730231, & & 3.74302724481174, 6.10329926305337, 2.41097801171611, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 2.61227356510826, 0.487617950463677, & & 3.74302724481174, 6.10329926305337, 2.75634906771845, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -0.607349181556407, 0.620143532958219, & & 4.30164509002822, 5.12792331912015, 2.58366353971728, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -0.634247821421126, 0.859861448115734, & & 4.30164509002822, 6.10329926305337, 3.27440565172194, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -0.724287347053120, 0.403153298828943, & & 4.86026293524470, 4.15254737518692, 3.27440565172194, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -0.984833098889288, 0.499649739566576, & & 4.86026293524470, 6.10329926305337, 2.58366353971728, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -2.70566708537661, 0.538091609171075, & & 5.41888078046118, 4.15254737518692, 2.41097801171611, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & -1.20939225579818, 0.510745044535583, & & 5.41888078046118, 4.15254737518692, 2.92903459571961, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 1.94868680902059, 0.616616656750549, & & 5.41888078046118, 5.61561129108676, 2.41097801171611, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 1.15522182748601, 0.471868206575796, & & 5.41888078046118, 6.10329926305337, 2.92903459571961, & & 0.356063847243478, 0.467168338374927, 3.72602363089404, & & 1.87912900422634, 0.451743798347507, & & 1.41076536238452, 2.58366353971728, 3.54604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 0.725128949948469, 0.622902260726055, & & 1.41076536238452, 2.92903459571961, 2.79604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 0.729918587979428, 0.742724509010900, & & 1.41076536238452, 3.27440565172194, 2.54604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & -1.20919591094503, 0.419165703391844, & & 1.66076536238452, 2.58366353971728, 4.04604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 1.07066030785110, 0.374696123871971, & & 1.66076536238452, 3.27440565172194, 4.04604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 1.18924537172511, 0.253560011657169, & & 1.91076536238452, 3.27440565172194, 3.54604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & -1.02372636547481, 0.488466418450380, & & 2.16076536238452, 2.41097801171611, 3.04604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & -1.17568583892380, 0.685450933645791, & & 2.16076536238452, 2.58366353971728, 2.54604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 1.63167680507913, 0.654769967236100, & & 2.41076536238452, 2.41097801171611, 4.04604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 0.265433576342037, 0.241171546825175, & & 2.41076536238452, 3.10172012372078, 4.04604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 1.61538392193720, 0.250962365878930, & & 2.66076536238452, 2.41097801171611, 2.54604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 0.404341391586526, 0.332306777179316, & & 2.66076536238452, 2.41097801171611, 3.54604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 0.507390857268720, 0.334912100151673, & & 2.66076536238452, 2.41097801171611, 4.04604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 2.13844916508402, 0.177400306410842, & & 2.66076536238452, 2.92903459571961, 3.29604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & 0.866534175490732, 0.475485982549286, & & 2.66076536238452, 3.27440565172194, 3.04604187873032, & & 1.77777777777778, 3.72602363089404, 1.77777777777778, & & -1.23001698793861, 0.332506899526940, & & 2.67622250323016, 3.66485940322031, 2.54604187873032, & & 0.624460709752935, 0.168180601814974, 0.444444444444444, & & -1.36636114912786, 0.675203451989619, & & 1.41076536238452, 4.64023534715354, 2.54604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & 0.777696726524919, 0.658456306421721, & & 1.41076536238452, 5.61561129108676, 3.79604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -1.03460761493822, 0.436091437003247, & & 1.41076536238452, 6.10329926305337, 3.04604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -0.375362661352399, 0.546195498066085, & & 1.66076536238452, 6.10329926305337, 2.54604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -0.199668101709859, 0.495302429150766, & & 1.91076536238452, 4.64023534715354, 3.54604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & 1.05564178551754, 0.765776781796710, & & 1.91076536238452, 5.12792331912015, 2.79604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -1.61033747823318, 0.871745240678286, & & 2.16076536238452, 3.66485940322031, 3.29604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -0.228092742256994, 0.624922301678276, & & 2.16076536238452, 3.66485940322031, 4.04604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & 0.793821948166369, 0.278336473140835, & & 2.16076536238452, 4.15254737518692, 2.54604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & 0.692105058773907, 0.644701221831110, & & 2.16076536238452, 5.61561129108676, 4.04604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -2.20280745722154, 0.319673647503824, & & 2.16076536238452, 6.10329926305337, 2.54604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -1.16179506950129, 0.461454645903750, & & 2.66076536238452, 3.66485940322031, 2.79604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -0.277291744035263, 0.378366942574948, & & 2.66076536238452, 3.66485940322031, 3.54604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & 0.209443269066619, 0.320183009699843, & & 2.66076536238452, 4.15254737518692, 4.04604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -1.29209384877658, 0.204157299089837, & & 2.66076536238452, 4.64023534715354, 3.04604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -0.581407660036005, 0.521773224384786, & & 2.66076536238452, 5.12792331912015, 3.79604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & 0.875873661659031, 0.316744059071754, & & 2.66076536238452, 6.10329926305337, 2.54604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -0.363258450289478, 0.278216833129920, & & 2.66076536238452, 6.10329926305337, 3.29604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & -1.79153444428664, 0.332601296978239, & & 2.66076536238452, 6.10329926305337, 4.04604187873032, & & 1.77777777777778, 0.467168338374927, 1.77777777777778, & & 0.520332303934233, 0.152680579824105, & & 1.41076536238452, 6.10329926305338, 2.41097801171611, & & 0.624460709752935, 0.168180601814974, 1.34136850712185, & & 0.917830744137137, 0.736041718474355, & & 1.41076536238452, 3.66485940322031, 2.41097801171611, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -1.60753649427263, 0.495780622684488, & & 1.41076536238452, 5.12792331912015, 2.58366353971728, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -0.883421503434650, 0.748294084112433, & & 1.41076536238452, 5.12792331912015, 2.92903459571961, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & 0.633596248429890, 0.764534021787780, & & 1.41076536238452, 6.10329926305337, 2.41097801171611, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -0.649989904125287, 0.431120279251206, & & 1.41076536238452, 6.10329926305337, 3.10172012372078, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -1.15680271225209, 0.453256224458592, & & 1.66076536238452, 5.61561129108676, 2.75634906771845, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -1.23055546716943, 0.793405684324222, & & 1.66076536238452, 5.61561129108676, 3.27440565172194, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & 2.20997765235198, 0.506292439728357, & & 1.91076536238452, 3.66485940322031, 3.10172012372078, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & 0.415636967172446, 0.593716085384055, & & 1.91076536238452, 4.64023534715354, 2.41097801171611, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & 1.34435255185203, 0.750109857355138, & & 2.16076536238452, 3.66485940322031, 2.58366353971728, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -1.42359377204397, 0.622154590448774, & & 2.16076536238452, 5.61561129108676, 3.27440565172194, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -0.419978991284904, 0.471733103034467, & & 2.41076536238452, 3.66485940322031, 3.27440565172194, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -0.417861198036963, 0.342810204253905, & & 2.41076536238452, 4.15254737518692, 2.41097801171611, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & 0.284591303804985, 0.518976274378104, & & 2.66076536238452, 3.66485940322031, 2.58366353971728, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -0.788030575484461, 0.375078966645844, & & 2.66076536238452, 4.15254737518692, 3.10172012372078, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & 1.32889222132401, 0.395926216900083, & & 2.66076536238452, 5.12792331912015, 2.58366353971728, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -1.46698841971626, 0.477587559877133, & & 2.66076536238452, 6.10329926305337, 2.92903459571961, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & -1.23584456442403, 0.335827482344030, & & 2.66076536238452, 6.10329926305337, 3.27440565172194, & & 1.77777777777778, 0.467168338374927, 3.72602363089404, & & 1.50637272473264, 0.224091134705197, & & 1.41076536238452, 4.86026293524470, 2.54604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & 0.317863157199406, 0.593062578544855, & & 1.66076536238452, 4.86026293524470, 4.04604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & -0.371863167154151, 0.363195953817841, & & 1.66076536238452, 5.41888078046118, 3.04604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & -0.673530348973205, 0.686967238941564, & & 1.91076536238452, 5.41888078046118, 2.54604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & -0.926092829952218, 0.560653737156807, & & 2.16076536238452, 3.74302724481174, 2.54604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & -0.421091875304093, 0.684546757255003, & & 2.16076536238452, 3.74302724481174, 3.04604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & 0.457438020893478, 0.849114617983385, & & 2.16076536238452, 5.41888078046118, 4.04604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & -1.11450273917464, 0.279087236622692, & & 2.66076536238452, 2.62579155437878, 2.79604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & 0.206768111407578, 0.341194520309796, & & 2.66076536238452, 2.62579155437878, 3.29604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & 0.948941921270357, 0.339794871082366, & & 2.66076536238452, 3.18440939959526, 4.04604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & -0.855216012888753, 0.191741446262135, & & 2.66076536238452, 4.30164509002822, 4.04604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & 0.864957950702199, 0.222941326788570, & & 2.66076536238452, 4.86026293524470, 3.29604187873032, & & 1.77777777777778, 0.356063847243478, 1.77777777777778, & & 0.611182487397077, 0.450605380356494, & & 1.41076536238452, 2.62579155437878, 2.75634906771845, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & 0.132262644647463, 0.568372913272844, & & 1.41076536238452, 4.30164509002822, 2.58366353971728, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & 0.512177144382191, 0.765096571004817, & & 1.41076536238452, 5.41888078046118, 2.58366353971728, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & -0.247412726069374, 0.568501882465715, & & 1.66076536238452, 3.74302724481174, 2.92903459571961, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & -0.391749509701967, 0.875473591110528, & & 1.66076536238452, 5.41888078046118, 3.27440565172194, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & -0.366838055894726, 0.437724773885699, & & 1.91076536238452, 2.62579155437878, 2.75634906771845, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & 0.222634540426597, 0.656267766251863, & & 1.91076536238452, 2.62579155437878, 3.27440565172194, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & 0.694232418188942, 0.417335522798479, & & 2.16076536238452, 3.74302724481174, 2.41097801171611, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & -7.436594024082172E-002, 0.672154398020556, & & 2.66076536238452, 2.62579155437878, 2.41097801171611, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & -0.182935518104794, 0.284069650104169, & & 2.66076536238452, 2.62579155437878, 3.27440565172194, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & -1.03277685779680, 0.228881276270818, & & 2.66076536238452, 3.74302724481174, 2.92903459571961, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & 0.307982693514836, 0.490630917608453, & & 2.66076536238452, 4.86026293524470, 2.41097801171611, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & -0.197366002467185, 0.375506126793519, & & 2.66076536238452, 5.41888078046118, 3.10172012372078, & & 1.77777777777778, 0.356063847243478, 3.72602363089404, & & -0.739890031988599, 0.320409486166192, & & 1.41076536238452, 2.62579155437878, 3.66485940322031, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 2.12935568279142, 0.433958255799256, & & 1.41076536238452, 3.18440939959526, 5.12792331912015, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & -0.912892748059186, 0.692550784237160, & & 1.41076536238452, 3.74302724481174, 6.10329926305337, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 0.270968557663249, 0.536443285879037, & & 1.41076536238452, 4.86026293524470, 5.12792331912015, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & -0.420951677954722, 0.720828721502122, & & 1.66076536238452, 2.62579155437878, 4.64023534715354, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 0.768272787239858, 0.643283670136401, & & 1.66076536238452, 2.62579155437878, 6.10329926305337, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 0.830368833607126, 0.428388641562158, & & 1.91076536238452, 4.86026293524470, 4.15254737518692, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 1.34773907220148, 0.789724035817085, & & 2.16076536238452, 3.18440939959526, 3.66485940322031, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 0.150008513001499, 0.574249615818167, & & 2.16076536238452, 5.41888078046118, 6.10329926305337, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 1.52102227937314, 0.431624053011429, & & 2.41076536238452, 2.62579155437878, 5.12792331912015, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 1.31733852735038, 0.475531037726566, & & 2.66076536238452, 3.18440939959526, 4.15254737518692, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & -0.107170127074718, 0.416880558912866, & & 2.66076536238452, 4.30164509002822, 4.64023534715354, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & -0.748236117653708, 0.519129469929100, & & 2.66076536238452, 4.86026293524470, 3.66485940322031, & & 1.77777777777778, 0.356063847243478, 0.467168338374927, & & 1.14875501779910, 0.360761451797317, & & 2.49169775033608, 2.41097801171611, 2.79604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 0.801366609534465, 0.340609727874297, & & 2.49169775033608, 2.75634906771845, 2.79604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 2.20551798168828, 0.430879616211710, & & 2.49169775033608, 2.75634906771845, 3.54604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & -0.219537371401086, 0.364648533219416, & & 2.49169775033608, 3.10172012372078, 3.04604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & -1.11108504375085, 0.372832081485019, & & 2.49169775033608, 3.27440565172194, 2.54604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 2.87749120327456, 0.233051684033046, & & 2.49169775033608, 3.27440565172194, 3.79604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 2.71770172860773, 0.176412874926269, & & 3.29168595020000, 3.10172012372078, 2.54604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & -1.71622081087964, 0.418217035232518, & & 4.09167415006392, 2.41097801171611, 3.79604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 0.887496479111601, 0.385250620670953, & & 4.09167415006392, 2.75634906771845, 3.29604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 0.550595269414736, 0.747440309568668, & & 4.09167415006392, 2.75634906771845, 4.04604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & -1.16427945051230, 0.335262555537451, & & 4.09167415006392, 3.27440565172194, 2.54604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 2.30476812394514, 0.404141956898734, & & 4.09167415006392, 3.27440565172194, 3.29604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 0.937157769452644, 0.474107731915805, & & 4.09167415006392, 3.27440565172194, 4.04604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & -0.602459904265263, 0.212543703294715, & & 4.89166234992785, 2.92903459571961, 2.79604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & -0.534922699269905, 0.810802076893791, & & 5.69165054979177, 2.75634906771845, 4.04604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 1.06096660693053, 0.393428893372715, & & 5.69165054979177, 2.92903459571961, 3.54604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & -1.04760891006541, 0.711196178448434, & & 5.69165054979177, 3.27440565172194, 3.79604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 1.99863887259843, 0.361978154107327, & & 6.49163874965569, 2.41097801171611, 3.54604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 1.35119614531398, 0.545323535943752, & & 6.49163874965569, 2.58366353971728, 2.79604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 2.14390494533724, 0.753510267476893, & & 6.49163874965569, 3.10172012372078, 4.04604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 0.689841410694669, 0.301492292185045, & & 6.49163874965569, 3.27440565172194, 3.04604187873032, & & 0.173616232811270, 3.72602363089404, 1.77777777777778, & & 0.851291676915464, 0.540361181543481, & & 2.49169775033608, 3.66485940322031, 3.04604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 1.11635764569685, 0.349815232858092, & & 2.49169775033608, 4.15254737518692, 2.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -2.74337534888323, 0.341380281048782, & & 2.49169775033608, 4.15254737518692, 4.04604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -0.672256629744735, 0.175406296652371, & & 2.49169775033608, 5.12792331912015, 4.04604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 1.13259152323168, 0.185466583680925, & & 2.49169775033608, 6.10329926305337, 2.79604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 4.82661652698014, 0.281172717189877, & & 2.49169775033608, 6.10329926305337, 3.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -0.617035063992167, 0.240957827946215, & & 3.29168595020000, 3.66485940322031, 2.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 3.88053258389251, 0.393253594450009, & & 3.29168595020000, 3.66485940322031, 3.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 0.776024730794900, 0.386353536001136, & & 3.29168595020000, 4.64023534715354, 3.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -1.70113172878356, 0.504907013129103, & & 3.29168595020000, 6.10329926305337, 4.04604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 3.12876861727800, 0.178610419731176, & & 4.09167415006392, 3.66485940322031, 4.04604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 5.31205323131645, 0.252517692200299, & & 4.09167415006392, 5.61561129108676, 2.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 2.08795360089645, 0.535495546223910, & & 4.09167415006392, 6.10329926305337, 2.79604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -2.64588495006593, 0.492745773700721, & & 4.89166234992785, 4.64023534715354, 3.79604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 1.11918419667016, 0.551601343953585, & & 4.89166234992785, 5.61561129108676, 3.04604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 1.77823324575086, 0.758197410767060, & & 5.69165054979177, 4.15254737518692, 2.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -2.74409268289668, 0.680702397271083, & & 5.69165054979177, 4.15254737518692, 3.29604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 1.24499594333773, 0.798515794676705, & & 6.49163874965569, 3.66485940322031, 2.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 1.19865924429564, 0.520942822421555, & & 6.49163874965569, 3.66485940322031, 3.54604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -2.64482957751163, 0.518910206529249, & & 6.49163874965569, 4.64023534715354, 4.04604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -1.42845285711863, 0.363928376187815, & & 6.49163874965569, 5.61561129108676, 3.29604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & -2.22070533419157, 0.690562429184699, & & 6.49163874965569, 6.10329926305337, 2.79604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 2.92486423503592, 0.536404726948594, & & 6.49163874965569, 6.10329926305337, 4.04604187873032, & & 0.173616232811270, 0.467168338374927, 1.77777777777778, & & 2.95352868099877, 0.250833934192876, & & 2.49169775033608, 4.15254737518692, 2.58366353971728, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 0.765176013578413, 0.395145528226524, & & 2.49169775033608, 4.64023534715354, 2.92903459571961, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 0.769478602811880, 0.433854238715946, & & 2.49169775033608, 6.10329926305337, 2.41097801171611, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 3.74686948200725, 0.234623239845033, & & 3.29168595020000, 3.66485940322031, 2.58366353971728, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & -0.853896581297506, 0.454975437103875, & & 3.29168595020000, 6.10329926305337, 3.27440565172194, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 1.15848299619353, 0.265206845356688, & & 4.09167415006392, 3.66485940322031, 3.10172012372078, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & -1.07467978463317, 0.495451899807148, & & 4.09167415006392, 4.15254737518692, 2.41097801171611, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & -1.54337353316661, 0.577233974765883, & & 4.09167415006392, 5.12792331912015, 2.75634906771845, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 0.187576524826700, 0.766263987344568, & & 4.09167415006392, 6.10329926305337, 2.41097801171611, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & -3.74814474021262, 0.411982113173252, & & 4.89166234992785, 4.64023534715354, 3.27440565172194, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 2.86665668033893, 0.567222320861311, & & 4.89166234992785, 5.12792331912015, 2.41097801171611, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 5.01713023303535, 0.686967322521330, & & 4.89166234992785, 6.10329926305337, 2.92903459571961, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & -1.68907888910638, 0.572145778568765, & & 5.69165054979177, 4.15254737518692, 2.75634906771845, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & -2.65348313326601, 0.844742284684164, & & 5.69165054979177, 5.61561129108676, 3.27440565172194, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & -1.39058114917353, 0.499017072578364, & & 6.49163874965569, 3.66485940322031, 2.92903459571961, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 1.29436379618288, 0.616945877755457, & & 6.49163874965569, 3.66485940322031, 3.27440565172194, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & -1.44105799072956, 0.407872833511500, & & 6.49163874965569, 4.64023534715354, 3.10172012372078, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 1.66015290989396, 0.699110347419316, & & 6.49163874965569, 6.10329926305337, 2.58366353971728, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 0.802076723088584, 0.535387977423465, & & 6.49163874965569, 6.10329926305337, 2.92903459571961, & & 0.173616232811270, 0.467168338374927, 3.72602363089404, & & 1.17619653564298, 0.549078130635020, & & 2.49169775033608, 3.74302724481174, 3.04604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & 0.916912758870470, 0.445274023182558, & & 2.49169775033608, 4.86026293524470, 2.54604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & -1.03007112077593, 0.326601586358931, & & 2.49169775033608, 4.86026293524470, 3.54604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & 0.254691386902401, 0.326000453106685, & & 2.49169775033608, 4.86026293524470, 4.04604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & 0.818196018866252, 0.171479329802348, & & 3.29168595020000, 3.18440939959526, 4.04604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & -1.38625503765460, 0.230435231396588, & & 3.29168595020000, 5.41888078046118, 2.79604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & 1.54532524581861, 0.433159761297358, & & 4.09167415006392, 2.62579155437878, 3.54604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & 0.326409131606605, 0.439724261238134, & & 4.89166234992785, 4.86026293524470, 3.29604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & 1.07372234941221, 0.766708821322737, & & 4.89166234992785, 5.41888078046118, 4.04604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & -0.705257776187315, 0.285167368825386, & & 5.69165054979177, 2.62579155437878, 2.79604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & -0.142063379925007, 0.599403298026717, & & 6.49163874965569, 3.74302724481174, 2.54604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & 0.307991904794170, 0.668903160574116, & & 6.49163874965569, 5.41888078046118, 3.54604187873032, & & 0.173616232811270, 0.356063847243478, 1.77777777777778, & & 1.37913472095919, 0.517258893872214, & & 2.49169775033608, 3.74302724481174, 2.41097801171611, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 0.681916030375001, 0.352607441263977, & & 2.49169775033608, 3.74302724481174, 3.10172012372078, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 0.326527946916283, 0.366526346206558, & & 2.49169775033608, 4.86026293524470, 2.58366353971728, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 1.06575969658297, 0.380428386134065, & & 2.49169775033608, 4.86026293524470, 2.92903459571961, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 0.105728324311700, 0.387660459324135, & & 3.29168595020000, 2.62579155437878, 3.10172012372078, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 1.94124856972878, 0.362555691127312, & & 3.29168595020000, 4.86026293524470, 3.27440565172194, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 1.49976211816841, 0.357756082150442, & & 3.29168595020000, 5.41888078046118, 2.41097801171611, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & -0.706408865843555, 0.363111897371434, & & 4.09167415006392, 3.18440939959526, 3.27440565172194, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & -0.992367642482014, 0.436954811412188, & & 4.09167415006392, 5.41888078046118, 2.75634906771845, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 0.270854469711741, 0.579396451454267, & & 4.89166234992785, 2.62579155437878, 2.41097801171611, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & -1.23844320448188, 0.489535994506312, & & 4.89166234992785, 3.18440939959526, 2.58366353971728, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & -8.441914170833162E-002, 0.730065934216351, & & 4.89166234992785, 4.30164509002822, 3.27440565172194, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & -0.921679037840768, 0.564567622462838, & & 6.49163874965569, 2.62579155437878, 3.27440565172194, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 1.59917663440745, 0.371097375374945, & & 6.49163874965569, 4.30164509002822, 3.27440565172194, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 0.415936055085865, 0.539013475396349, & & 6.49163874965569, 5.41888078046118, 2.75634906771845, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & -0.387082995820377, 0.635161381331536, & & 6.49163874965569, 5.41888078046118, 3.27440565172194, & & 0.173616232811270, 0.356063847243478, 3.72602363089404, & & 0.410370897645090, 0.403480618395723, & & 2.49169775033608, 3.18440939959526, 3.66485940322031, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & -1.86624108110352, 0.307538745401781, & & 2.49169775033608, 3.18440939959526, 6.10329926305337, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & 2.92976541370855, 0.260654506567600, & & 2.49169775033608, 4.30164509002822, 4.64023534715354, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & 3.59555772575830, 0.447534161293512, & & 2.49169775033608, 4.30164509002822, 6.10329926305337, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & -1.69564068726425, 0.294260908007838, & & 2.49169775033608, 5.41888078046118, 3.66485940322031, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & -0.448541946256031, 0.252606290037995, & & 3.29168595020000, 5.41888078046118, 6.10329926305337, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & 1.36699253493701, 0.303629792370978, & & 4.89166234992785, 3.18440939959526, 4.15254737518692, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & -1.15737410237196, 0.716984608041491, & & 4.89166234992785, 4.30164509002822, 4.64023534715354, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & 3.10618999170919, 0.887059387691698, & & 4.89166234992785, 5.41888078046118, 3.66485940322031, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & -1.61128791106522, 0.502098788352280, & & 5.69165054979177, 3.74302724481174, 6.10329926305337, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & 2.21599397082509, 0.600738250288017, & & 5.69165054979177, 5.41888078046118, 5.12792331912015, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & 1.11232370035364, 0.662976047697524, & & 5.69165054979177, 5.41888078046118, 6.10329926305337, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & -2.35818131960463, 0.457426853255295, & & 6.49163874965569, 3.18440939959526, 4.64023534715354, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & -2.65456533390796, 0.733591618561067, & & 6.49163874965569, 4.86026293524470, 5.61561129108676, & & 0.173616232811270, 0.356063847243478, 0.467168338374927, & & 1.65072106089120, 0.661616258357692, & & 2.49169775033608, 1.66076536238452, 2.54604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & 1.08653381000214, 0.360807301814805, & & 3.29168595020000, 1.41076536238452, 2.54604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & -1.27178141097635, 0.439686242704328, & & 3.29168595020000, 2.16076536238452, 3.29604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & 0.985419650914931, 0.544015437830790, & & 4.09167415006392, 1.41076536238452, 3.04604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & 1.31174032760702, 0.681739917153027, & & 4.09167415006392, 2.16076536238452, 2.79604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & -1.33952738788423, 0.683227684562065, & & 4.09167415006392, 2.66076536238452, 4.04604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & -1.38496702649154, 0.184564606198167, & & 4.89166234992785, 1.66076536238452, 3.54604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & -0.497914292804366, 0.710038976293938, & & 4.89166234992785, 1.91076536238452, 4.04604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & -0.371963556954513, 0.382047963406186, & & 5.69165054979177, 2.66076536238452, 3.04604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & 0.843865564662863, 0.505351761910722, & & 6.49163874965569, 1.66076536238452, 3.54604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & 1.37549359986023, 0.677588970271064, & & 6.49163874965569, 2.41076536238452, 3.54604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & -0.989629376987784, 0.517763591106708, & & 6.49163874965569, 2.66076536238452, 2.54604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & -0.960335800142012, 0.376391615258989, & & 6.49163874965569, 2.66076536238452, 4.04604187873032, & & 0.173616232811270, 1.77777777777778, 1.77777777777778, & & 0.442764602517790, 0.202280676782528, & & 2.49169775033608, 1.41076536238452, 2.41097801171611, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & -0.823246344275100, 0.310735153406116, & & 2.49169775033608, 1.41076536238452, 3.10172012372078, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & -1.18376996352335, 0.322929520749177, & & 2.49169775033608, 2.41076536238452, 2.75634906771845, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & -0.745989881338354, 0.340098223390399, & & 3.29168595020000, 2.16076536238452, 2.41097801171611, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & 6.805925217289194E-002, 0.455271831626307, & & 4.09167415006392, 2.41076536238452, 3.27440565172194, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & 0.161704423529546, 0.375549554086507, & & 4.09167415006392, 2.66076536238452, 2.58366353971728, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & 0.668926085491175, 0.408115329899427, & & 4.09167415006392, 2.66076536238452, 2.92903459571961, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & -0.375041911660898, 0.416204677448278, & & 4.89166234992785, 2.16076536238452, 2.75634906771845, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & -0.454904906666271, 0.819541827405952, & & 5.69165054979177, 2.41076536238452, 3.27440565172194, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & 0.903086509837126, 0.437874477864700, & & 6.49163874965569, 1.66076536238452, 2.92903459571961, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & -0.102951619075825, 0.801275018256852, & & 6.49163874965569, 2.66076536238452, 2.41097801171611, & & 0.173616232811270, 1.77777777777778, 3.72602363089404, & & 0.188659524268808, 0.371411065515047, & & 2.49169775033608, 1.66076536238452, 5.12792331912015, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & 1.82842303205470, 0.431228800839267, & & 2.49169775033608, 2.16076536238452, 5.61561129108676, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -3.30244717831317, 0.348838332246659, & & 2.49169775033608, 2.41076536238452, 4.15254737518692, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -0.252091272543515, 0.314636659676705, & & 2.49169775033608, 2.66076536238452, 5.12792331912015, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -0.904542532502539, 0.241444409348917, & & 3.29168595020000, 1.66076536238452, 4.15254737518692, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -2.61367820959756, 0.571484165923722, & & 3.29168595020000, 2.66076536238452, 6.10329926305337, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & 0.756525156248923, 0.228559323217644, & & 4.09167415006392, 1.41076536238452, 3.66485940322031, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & 1.25996989791613, 0.522530896955410, & & 4.09167415006392, 1.41076536238452, 6.10329926305337, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -5.959222915265905E-002, 0.452695517590375, & & 4.09167415006392, 2.16076536238452, 4.64023534715354, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & 1.48732828088223, 0.720538316411457, & & 4.89166234992785, 2.41076536238452, 6.10329926305337, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -0.919594305662998, 0.447093512005412, & & 5.69165054979177, 1.66076536238452, 4.15254737518692, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -0.645469844376127, 0.828973474697213, & & 5.69165054979177, 2.66076536238452, 4.64023534715354, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -1.66330234603521, 0.505240646387005, & & 6.49163874965569, 1.41076536238452, 5.61561129108676, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & 0.957233453031000, 0.628155186106195, & & 6.49163874965569, 2.16076536238452, 3.66485940322031, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & 0.637995332329300, 0.590223865478717, & & 6.49163874965569, 2.16076536238452, 4.64023534715354, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -1.03433232510058, 0.777199974488641, & & 6.49163874965569, 2.41076536238452, 6.10329926305337, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -6.901875758797556E-002, 0.429461936150166, & & 6.49163874965569, 2.66076536238452, 3.66485940322031, & & 0.173616232811270, 1.77777777777778, 0.467168338374927, & & -0.432499158339943, 0.355997702839134, & & 2.49169775033608, 1.66076536238452, 3.18440939959526, & & 0.173616232811270, 1.77777777777778, 0.356063847243478, & & -0.254276038538651, 0.391475780812238, & & 2.49169775033608, 2.16076536238452, 2.62579155437878, & & 0.173616232811270, 1.77777777777778, 0.356063847243478, & & 0.521127677893809, 0.291753341621721, & & 4.09167415006392, 1.41076536238452, 5.41888078046118, & & 0.173616232811270, 1.77777777777778, 0.356063847243478, & & 0.604393513440334, 0.499584111565498, & & 4.09167415006392, 2.16076536238452, 4.30164509002822, & & 0.173616232811270, 1.77777777777778, 0.356063847243478, & & 0.113165465387017, 0.715581301708931, & & 4.89166234992785, 1.66076536238452, 3.18440939959526, & & 0.173616232811270, 1.77777777777778, 0.356063847243478, & & -0.395304052306662, 0.764818923865172, & & 6.49163874965569, 1.66076536238452, 4.86026293524470, & & 0.173616232811270, 1.77777777777778, 0.356063847243478, & & -0.979013134719616, 0.759894368981017, & & 6.49163874965569, 2.41076536238452, 4.30164509002822, & & 0.173616232811270, 1.77777777777778, 0.356063847243478, & & -0.667508054931998, 0.636157810003514/ data g4d / 2.62579155437878, 3.66485940322031, 2.41097801171611, 2.54604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -3.58502061859214, 0.468473117337511, & & 2.62579155437878, 3.66485940322031, 3.27440565172195, 4.04604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 2.08831332546792, 0.255133740875231, & & 2.62579155437878, 4.27446936817858, 3.27440565172195, 2.54604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 4.97465254221358, 0.467005116120439, & & 2.62579155437878, 6.10329926305338, 3.27440565172195, 3.14604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 1.18232370467205, 0.429379333329036, & & 2.62579155437878, 6.10329926305338, 3.27440565172195, 4.04604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 3.12104438024232, 0.238310401397910, & & 3.32406386089938, 6.10329926305338, 2.41097801171611, 4.04604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -1.33127454249348, 0.326162069475230, & & 4.72060847394058, 3.66485940322031, 3.05854874172049, 4.04604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 0.917130089700283, 0.381422831308246, & & 5.41888078046118, 3.66485940322031, 2.41097801171611, 3.44604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -2.87205009740166, 0.513961333125128, & & 5.41888078046118, 6.10329926305338, 2.41097801171611, 2.54604187873032, & & 0.227880862235826, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 4.48343820468265, 0.441371399663829, & & 1.71076536238452, 6.10329926305338, 2.41097801171611, 4.04604187873032, & & 1.23456790123457, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 1.26274896816928, 0.348624612545461, & & 2.31076536238452, 6.10329926305338, 3.27440565172195, 4.04604187873032, & & 1.23456790123457, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -1.07693965515206, 0.266547803860677, & & 2.61076536238452, 3.66485940322031, 2.62683492171757, 4.04604187873032, & & 1.23456790123457, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 4.593670055486197E-002, 0.296345336126302, & & 2.61076536238452, 4.27446936817858, 3.27440565172195, 2.54604187873032, & & 1.23456790123457, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -0.861665829327935, 0.409140971313337, & & 2.61076536238452, 5.49368929809511, 2.41097801171611, 4.04604187873032, & & 1.23456790123457, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -1.41351099451900, 0.290879146976341, & & 2.61076536238452, 6.10329926305338, 2.41097801171611, 2.84604187873032, & & 1.23456790123457, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 2.39344950821789, 0.424157222956070, & & 1.41076536238452, 2.62579155437878, 2.41097801171611, 4.04604187873032, & & 1.23456790123457, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -1.31145788656476, 0.319030886370209, & & 2.31076536238452, 5.41888078046118, 3.27440565172195, 3.14604187873032, & & 1.23456790123457, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & 1.74669681779994, 0.508059729361743, & & 2.61076536238452, 2.62579155437878, 2.41097801171611, 3.14604187873032, & & 1.23456790123457, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -2.53323424090970, 0.442747914760830, & & 2.61076536238452, 2.62579155437878, 3.27440565172195, 4.04604187873032, & & 1.23456790123457, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -0.860719076451971, 0.212035407895191, & & 2.61076536238452, 5.41888078046118, 2.41097801171611, 4.04604187873032, & & 1.23456790123457, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -0.862186428845537, 0.259516516752946, & & 2.61076536238452, 5.41888078046118, 3.27440565172195, 2.54604187873032, & & 1.23456790123457, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & 1.04024574112334, 0.347348245324690, & & 1.41076536238452, 2.62579155437878, 3.66485940322031, 2.54604187873032, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -2.99552115987267, 0.492209977452774, & & 2.31076536238452, 2.62579155437878, 3.66485940322031, 4.04604187873032, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -2.98870498011224, 0.298513456222406, & & 2.31076536238452, 2.62579155437878, 6.10329926305338, 4.04604187873032, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & 2.27740767431078, 0.277423368305642, & & 2.61076536238452, 5.41888078046118, 4.27446936817858, 2.54604187873032, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -0.971775765564100, 0.450334007465939, & & 2.61076536238452, 5.41888078046118, 6.10329926305338, 2.84604187873032, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -2.81809332075732, 0.407832103084183, & & 2.61076536238452, 5.41888078046118, 6.10329926305338, 4.04604187873032, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -0.512761843686686, 0.234953935528594, & & 1.41076536238452, 2.62579155437878, 6.10329926305338, 3.27440565172195, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & -1.50776216751015, 0.390982379118502, & & 2.61076536238452, 2.62579155437878, 3.66485940322031, 2.41097801171611, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & 2.12522265703467, 0.375365571305642, & & 2.61076536238452, 5.41888078046118, 6.10329926305338, 2.41097801171611, & & 1.23456790123457, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & -0.380248719971144, 0.360676380143906, & & 2.49169775033608, 3.66485940322031, 3.27440565172195, 2.54604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -3.46724403769206, 0.317319966579257, & & 2.49169775033608, 4.27446936817858, 2.41097801171611, 3.14604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -1.73645178298158, 0.484731024303248, & & 2.49169775033608, 4.27446936817858, 3.27440565172195, 3.74604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -1.40547209153792, 0.313516252877731, & & 2.49169775033608, 6.10329926305338, 2.62683492171757, 4.04604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 0.688078595485031, 0.241019496021618, & & 2.49169775033608, 6.10329926305338, 3.27440565172195, 3.74604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -3.68220393288503, 0.250182942697317, & & 3.49168300016598, 6.10329926305338, 2.41097801171611, 3.14604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 0.469009546158748, 0.496480375229059, & & 4.49166824999589, 3.66485940322031, 2.41097801171611, 2.54604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 1.46750426904672, 0.553203991758333, & & 4.49166824999589, 4.88407933313684, 2.41097801171611, 4.04604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -2.45186656330287, 0.419346284477285, & & 4.49166824999589, 6.10329926305338, 3.27440565172195, 3.74604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & 2.16525216971870, 0.382914008254519, & & 6.49163874965569, 4.27446936817858, 2.41097801171611, 4.04604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -0.792503357127486, 0.405753601785332, & & 6.49163874965569, 6.10329926305338, 2.41097801171611, 2.54604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -3.82297383352511, 0.500844455272950, & & 6.49163874965569, 6.10329926305338, 3.05854874172049, 4.04604187873032, & & 0.111114388999212, 0.298987736559953, 2.38465512377218, 1.23456790123457, & & -3.21172849570159, 0.348147613754385, & & 2.49169775033608, 2.62579155437878, 2.62683492171757, 3.14604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -0.952492655793067, 0.450852108873434, & & 2.49169775033608, 2.62579155437878, 3.27440565172195, 2.54604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -1.95546164251512, 0.299428485427433, & & 2.49169775033608, 2.62579155437878, 3.27440565172195, 3.44604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & 0.289995859489535, 0.313851589056476, & & 2.49169775033608, 3.32406386089938, 2.41097801171611, 4.04604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & 2.35078915960134, 0.258106785016839, & & 2.49169775033608, 5.41888078046118, 2.41097801171611, 4.04604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & 2.36217977712466, 0.225821902604195, & & 4.49166824999589, 5.41888078046118, 3.27440565172195, 3.74604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -0.955756546910621, 0.406925199186865, & & 5.49165349982579, 2.62579155437878, 3.27440565172195, 2.54604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -3.85045418449027, 0.472924976195973, & & 6.49163874965569, 5.41888078046118, 2.41097801171611, 2.84604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & -1.01092439336036, 0.612053055750547, & & 6.49163874965569, 5.41888078046118, 2.84269183171903, 4.04604187873032, & & 0.111114388999212, 0.227880862235826, 2.38465512377218, 1.23456790123457, & & 0.110703949706192, 0.405407322117224, & & 2.49169775033608, 2.62579155437878, 3.66485940322031, 2.54604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & 2.52075131695247, 0.339995367239088, & & 2.49169775033608, 2.62579155437878, 3.66485940322031, 3.74604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -3.29523377987769, 0.289391280313768, & & 2.49169775033608, 2.62579155437878, 4.88407933313684, 4.04604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -0.815204978202264, 0.252373066875994, & & 2.49169775033608, 5.41888078046118, 3.66485940322031, 2.54604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & 0.402547304787598, 0.346160051571883, & & 3.49168300016598, 4.72060847394058, 3.66485940322031, 4.04604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -5.63227688850292, 0.333082231454066, & & 4.49166824999589, 5.41888078046118, 6.10329926305338, 2.54604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -7.84771762984508, 0.478135015210883, & & 6.49163874965569, 2.62579155437878, 3.66485940322031, 4.04604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & 0.553974971044114, 0.317818807992411, & & 6.49163874965569, 2.62579155437878, 6.10329926305338, 2.54604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & 4.22017211284299, 0.459482254766625, & & 6.49163874965569, 4.02233616741998, 6.10329926305338, 3.74604187873032, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 1.23456790123457, & & -3.40059344596058, 0.515690290514692, & & 2.49169775033608, 4.72060847394058, 6.10329926305338, 2.41097801171611, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & -7.52594863677371, 0.366769320470620, & & 2.49169775033608, 5.41888078046118, 4.88407933313684, 3.27440565172195, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & -1.47424558962359, 0.355708396960525, & & 3.49168300016598, 2.62579155437878, 6.10329926305338, 2.62683492171757, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & -0.327214868100788, 0.449419070997628, & & 3.49168300016598, 2.62579155437878, 6.10329926305338, 3.27440565172195, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & -2.94456778497185, 0.344636705297603, & & 4.49166824999589, 2.62579155437878, 3.66485940322031, 3.27440565172195, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & 1.73540079593461, 0.439337430638218, & & 6.49163874965569, 2.62579155437878, 6.10329926305338, 2.41097801171611, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & 4.65150580254186, 0.460458142265240, & & 6.49163874965569, 2.62579155437878, 6.10329926305338, 3.27440565172195, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & -5.689531326628094E-002, 0.402494631147222, & & 6.49163874965569, 5.41888078046118, 3.66485940322031, 2.41097801171611, & & 0.111114388999212, 0.227880862235826, 0.298987736559953, 2.38465512377218, & & 1.95771606350865, 0.527544402144412, & & 2.49169775033608, 2.01076536238452, 2.41097801171611, 2.54604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & -0.370975022722249, 0.426202288245731, & & 2.49169775033608, 2.61076536238452, 2.41097801171611, 4.04604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & -1.47104424290934, 0.190670844572935, & & 2.49169775033608, 2.61076536238452, 3.27440565172195, 2.84604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & 0.415164816669934, 0.294958846020926, & & 3.49168300016598, 1.41076536238452, 3.27440565172195, 3.74604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & -0.366899220447068, 0.381027249343342, & & 3.49168300016598, 2.31076536238452, 3.27440565172195, 3.44604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & -0.885157930003354, 0.448521444903211, & & 3.49168300016598, 2.61076536238452, 2.84269183171903, 4.04604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & 0.708900505859414, 0.287108518441901, & & 5.49165349982579, 1.41076536238452, 3.27440565172195, 2.54604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & 1.02415959609757, 0.540534097215133, & & 6.49163874965569, 1.41076536238452, 3.27440565172195, 3.74604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & -1.30595751587993, 0.447533503198543, & & 6.49163874965569, 2.61076536238452, 3.27440565172195, 3.74604187873032, & & 0.111114388999212, 1.23456790123457, 2.38465512377218, 1.23456790123457, & & -1.25902737881038, 0.343694691083036, & & 2.49169775033608, 1.41076536238452, 3.66485940322031, 4.04604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & 0.565425926427143, 0.242337754438993, & & 2.49169775033608, 1.41076536238452, 5.49368929809511, 4.04604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & -1.24513525882371, 0.268053420532826, & & 2.49169775033608, 2.61076536238452, 3.66485940322031, 2.54604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & -1.11339836925058, 0.295007480691334, & & 2.49169775033608, 2.61076536238452, 4.27446936817858, 3.74604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & 0.953021738180323, 0.291330670717175, & & 2.49169775033608, 2.61076536238452, 6.10329926305338, 2.54604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & 2.52801333957058, 0.265543296418762, & & 2.49169775033608, 2.61076536238452, 6.10329926305338, 3.44604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & -0.721627557429057, 0.281899896212611, & & 4.49166824999589, 1.41076536238452, 3.66485940322031, 3.74604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & -1.48476159124667, 0.500096742919592, & & 5.49165349982579, 2.61076536238452, 4.88407933313684, 4.04604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & 0.923676487556334, 0.356995739157419, & & 6.49163874965569, 2.61076536238452, 6.10329926305338, 2.84604187873032, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 1.23456790123457, & & 3.19821727123478, 0.461718466943035, & & 2.49169775033608, 1.41076536238452, 6.10329926305338, 2.84269183171903, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & 1.88740869037471, 0.403130155018778, & & 2.49169775033608, 1.71076536238452, 6.10329926305338, 2.41097801171611, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & 0.340610386413720, 0.382996915826588, & & 2.49169775033608, 2.31076536238452, 6.10329926305338, 2.84269183171903, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & 1.79826268978657, 0.389098926636483, & & 2.49169775033608, 2.61076536238452, 3.66485940322031, 3.27440565172195, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & 1.54202893672713, 0.254476322064991, & & 2.49169775033608, 2.61076536238452, 4.27446936817858, 2.41097801171611, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & -3.992748308244314E-002, 0.338011738807181, & & 2.49169775033608, 2.61076536238452, 6.10329926305338, 2.41097801171611, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & 0.351295530734519, 0.266106972458800, & & 4.49166824999589, 1.41076536238452, 3.66485940322031, 2.41097801171611, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & 1.59667177391515, 0.580400659248142, & & 6.49163874965569, 1.41076536238452, 3.66485940322031, 3.27440565172195, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & -1.39098514240234, 0.499814006208993, & & 6.49163874965569, 2.61076536238452, 6.10329926305338, 3.27440565172195, & & 0.111114388999212, 1.23456790123457, 0.298987736559953, 2.38465512377218, & & 0.771541724584195, 0.356253687230201, & & 2.49169775033608, 1.41076536238452, 5.41888078046118, 2.54604187873032, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 1.23456790123457, & & -0.662981886687959, 0.369534394592246, & & 2.49169775033608, 2.61076536238452, 2.62579155437878, 2.54604187873032, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 1.23456790123457, & & -0.420976207886003, 0.277139304681101, & & 2.49169775033608, 2.61076536238452, 5.41888078046118, 3.44604187873032, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 1.23456790123457, & & -1.46150552894593, 0.300740988993980, & & 3.49168300016598, 2.61076536238452, 2.62579155437878, 4.04604187873032, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 1.23456790123457, & & 1.33785124606297, 0.226276827459486, & & 6.49163874965569, 1.41076536238452, 3.32406386089938, 2.54604187873032, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 1.23456790123457, & & 0.505213661954385, 0.643666662213705, & & 6.49163874965569, 1.41076536238452, 5.41888078046118, 4.04604187873032, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 1.23456790123457, & & 1.05338413586842, 0.367183151201730, & & 6.49163874965569, 2.61076536238452, 5.41888078046118, 2.54604187873032, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 1.23456790123457, & & 0.471256156353846, 0.434296352121266, & & 2.49169775033608, 1.41076536238452, 2.62579155437878, 2.41097801171611, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 2.38465512377218, & & 0.339862406610869, 0.361579165947184, & & 2.49169775033608, 2.61076536238452, 5.41888078046118, 2.62683492171757, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 2.38465512377218, & & 0.738606708064353, 0.323551251063231, & & 2.49169775033608, 2.61076536238452, 5.41888078046118, 3.27440565172195, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 2.38465512377218, & & -1.96841160893892, 0.246916706792819, & & 5.49165349982579, 1.41076536238452, 5.41888078046118, 3.27440565172195, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 2.38465512377218, & & 1.29110532844255, 0.518690259767235, & & 5.49165349982579, 2.61076536238452, 5.41888078046118, 2.41097801171611, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 2.38465512377218, & & 0.867780998434402, 0.459749210319393, & & 2.49169775033608, 1.41076536238452, 2.62579155437878, 6.10329926305338, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 0.298987736559953, & & 0.715276749751603, 0.321199338261718, & & 3.49168300016598, 2.61076536238452, 2.62579155437878, 4.27446936817858, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 0.298987736559953, & & -0.739551594471102, 0.402618479010242, & & 3.49168300016598, 2.61076536238452, 5.41888078046118, 6.10329926305338, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 0.298987736559953, & & 4.30304402109661, 0.331279436882746, & & 5.49165349982579, 2.61076536238452, 2.62579155437878, 6.10329926305338, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 0.298987736559953, & & -2.60197294665796, 0.391633400476099, & & 6.49163874965569, 2.61076536238452, 2.62579155437878, 3.66485940322031, & & 0.111114388999212, 1.23456790123457, 0.227880862235826, 0.298987736559953, & & 2.14742213394496, 0.403926172427716/ !----------------------------------------------------------------------! ! Transforms xyz, grad and hess from internal coordinates ! ! q = B x B+ g' = g B+ h' B + dB+ g' = h ! ! ! ! dV/dx = dV/dq dq/dx d2V/dx2 = d2V/dq2 (dq/dx)2 + dV/dq d2q/dx2 ! !----------------------------------------------------------------------! ij=0 do i = 1,natoms do j = 1,i-1 ij=ij+1 r(1:3)=x(1:3,i)-x(1:3,j) rij=r(1)**2+r(2)**2+r(3)**2 dist(ij)=dsqrt(rij) enddo enddo if (iopt.ge.1) then ! build B matrix dr/dx from r = |xi-xj| B=0.d0 if (iopt.ge.2) db=0.d0 ij=0 do i = 1,natoms do j = 1,i-1 ij=ij+1 ix=(i-1)*3 jx=(j-1)*3 r(1:3)=x(1:3,i)-x(1:3,j) rrij=r(1)**2+r(2)**2+r(3)**2 rrij=1.d0/dsqrt(rrij) r(1:3)=rrij*r(1:3) B(ij,ix+1:ix+3) = r(1:3) B(ij,jx+1:jx+3) = -r(1:3) if (iopt.ge.2) then ! dB/dx do k = 1,3 dB(ij,ix+k,ix+k) = rrij dB(ij,jx+k,jx+k) = rrij dB(ij,ix+k,jx+k) = -rrij dB(ij,jx+k,ix+k) = -rrij enddo do k = 1,3 do l = 1,3 d0 = r(k)*r(l)*rrij dB(ij,ix+k,ix+l) = dB(ij,ix+k,ix+l) - d0 dB(ij,jx+k,jx+l) = dB(ij,jx+k,jx+l) - d0 dB(ij,ix+k,jx+l) = dB(ij,ix+k,jx+l) + d0 dB(ij,jx+k,ix+l) = dB(ij,jx+k,ix+l) + d0 enddo enddo end if enddo enddo end if if (iopt.ge.0) then e=shift do i = 1,nmorse ii=imorse(i) r(1)=dist(ii) call v_morse(morse(1,i),morse(2,i),morse(3,i),r(1),v) e = e+v enddo do i = 1,ncoul ii=icoul(i) r(1)=dist(ii) call v_coul(coul(1,i),coul(2,i),r(1),v) e = e+v enddo do i = 1,nxrep ii=ixrep(i) r(1)=dist(ii) call v_xrep(xrep(1,i),xrep(2,i),xrep(3,i),r(1),v) e = e+v enddo do i = 1,ng1d ii=ig1d(i) r(1)=dist(ii) call v_gauss(1,r,g1d(1,i),g1d(2,i),g1d(3,i),g1d(4,i),v) e = e+v enddo do i = 1,ng2d do j = 1,2 ii=ig2d(j,i) r(j)=dist(ii) enddo call v_gauss(2,r,g2d(1,i),g2d(3,i),g2d(5,i),g2d(6,i),v) e = e+v enddo do i = 1,ng3d do j = 1,3 ii=ig3d(j,i) r(j)=dist(ii) enddo call v_gauss(3,r,g3d(1,i),g3d(4,i),g3d(7,i),g3d(8,i),v) e = e+v enddo do i = 1,ng4d do j = 1,4 ii=ig4d(j,i) r(j)=dist(ii) enddo call v_gauss(4,r,g4d(1,i),g4d(5,i),g4d(9,i),g4d(10,i),v) e = e+v enddo end if if (iopt.ge.1) then g=0.d0 gint=0.d0 do i = 1,nmorse ii=imorse(i) r(1)=dist(ii) call f_morse(morse(1,i),morse(2,i),morse(3,i),r(1),gg(1)) gint(ii) = gint(ii)-gg(1) enddo do i = 1,ncoul ii=icoul(i) r(1)=dist(ii) call f_coul(coul(1,i),coul(2,i),r(1),gg(1)) gint(ii) = gint(ii)-gg(1) enddo do i = 1,nxrep ii=ixrep(i) r(1)=dist(ii) call f_xrep(xrep(1,i),xrep(2,i),xrep(3,i),r(1),gg(1)) gint(ii) = gint(ii)-gg(1) enddo do i = 1,ng1d ii=ig1d(i) r(1)=dist(ii) call f_gauss(1,r,g1d(1,i),g1d(2,i),g1d(3,i),g1d(4,i),gg) gint(ii) = gint(ii)+gg(1) enddo do i = 1,ng2d do j = 1,2 ii=ig2d(j,i) r(j)=dist(ii) enddo call f_gauss(2,r,g2d(1,i),g2d(3,i),g2d(5,i),g2d(6,i),gg) do j = 1,2 ii=ig2d(j,i) gint(ii) = gint(ii)+gg(j) enddo enddo do i = 1,ng3d do j = 1,3 ii=ig3d(j,i) r(j)=dist(ii) enddo call f_gauss(3,r,g3d(1,i),g3d(4,i),g3d(7,i),g3d(8,i),gg) do j = 1,3 ii=ig3d(j,i) gint(ii) = gint(ii)+gg(j) enddo enddo do i = 1,ng4d do j = 1,4 ii=ig4d(j,i) r(j)=dist(ii) enddo call f_gauss(4,r,g4d(1,i),g4d(5,i),g4d(9,i),g4d(10,i),gg) do j = 1,4 ii=ig4d(j,i) gint(ii) = gint(ii)+gg(j) enddo enddo do i = 1,3*natoms do j = 1,ndist g(i) = g(i) + B(j,i) * gint(j) enddo enddo end if if (iopt.ge.2) then h = 0.d0 hint = 0.d0 do i = 1,nmorse ii=imorse(i) r(1)=dist(ii) call h_morse(morse(1,i),morse(2,i),morse(3,i),r(1),hh(1)) ij = (ii-1)*ii/2 + ii hint(ij) = hint(ij)+hh(1) enddo do i = 1,ncoul ii=icoul(i) r(1)=dist(ii) call h_coul(coul(1,i),coul(2,i),r(1),hh(1)) ij = (ii-1)*ii/2 + ii hint(ij) = hint(ij)+hh(1) enddo do i = 1,nxrep ii=ixrep(i) r(1)=dist(ii) call h_xrep(xrep(1,i),xrep(2,i),xrep(3,i),r(1),hh(1)) ij = (ii-1)*ii/2 + ii hint(ij) = hint(ij)+hh(1) enddo do i = 1,ng1d ii=ig1d(i) r(1)=dist(ii) call h_gauss(1,r,g1d(1,i),g1d(2,i),g1d(3,i),g1d(4,i),hh) ij = (ii-1)*ii/2 + ii hint(ij) = hint(ij)+hh(1) enddo do i = 1,ng2d do j = 1,2 ii=ig2d(j,i) r(j)=dist(ii) enddo call h_gauss(2,r,g2d(1,i),g2d(3,i),g2d(5,i),g2d(6,i),hh) ij = 0 do j = 1,2 do k = 1,j ij=ij+1 ii=ig2d(j,i) jj=ig2d(k,i) call iorder(jj,ii) kl = (ii-1)*ii/2 + jj hint(kl) = hint(kl)+hh(ij) enddo enddo enddo do i = 1,ng3d do j = 1,3 ii=ig3d(j,i) r(j)=dist(ii) enddo call h_gauss(3,r,g3d(1,i),g3d(4,i),g3d(7,i),g3d(8,i),hh) ij = 0 do j = 1,3 do k = 1,j ij=ij+1 ii=ig3d(j,i) jj=ig3d(k,i) call iorder(jj,ii) kl = (ii-1)*ii/2 + jj hint(kl) = hint(kl)+hh(ij) enddo enddo enddo do i = 1,ng4d do j = 1,4 ii=ig4d(j,i) r(j)=dist(ii) enddo call h_gauss(4,r,g4d(1,i),g4d(5,i),g4d(9,i),g4d(10,i),hh) ij = 0 do j = 1,4 do k = 1,j ij=ij+1 ii=ig4d(j,i) jj=ig4d(k,i) call iorder(jj,ii) kl = (ii-1)*ii/2 + jj hint(kl) = hint(kl)+hh(ij) enddo enddo enddo ij = 0 do i = 1,3*natoms do j = 1,i ij = ij +1 do k = 1,ndist h(ij) = h(ij) + dB(k,j,i) * gint(k) enddo enddo enddo ! reuse dB as scratch dB(:,:,1)=0.d0 do j = 1,3*natoms kl = 0 do k = 1,ndist do l = 1,k-1 kl = kl+1 dB(k,j,1) = dB(k,j,1) + hint(kl) * B(l,j) dB(l,j,1) = dB(l,j,1) + hint(kl) * B(k,j) enddo kl = kl+1 dB(k,j,1) = dB(k,j,1) + hint(kl) * B(k,j) enddo enddo ij = 0 do i = 1,3*natoms do j = 1,i ij = ij + 1 do k = 1,ndist h(ij) = h(ij) + B(k,i) * dB(k,j,1) enddo enddo enddo end if !----------------------------------------------------------------------! return end subroutine pes !======================================================================! !----------------------------------------------------------------------! subroutine v_morse(re,al,de,r,v) !----------------------------------------------------------------------! ! Purpose: Evaluate V(r) = De**2*(1-exp(-alpha*(r-re)))**2 ! !----------------------------------------------------------------------! double precision, intent(in) :: al,re,de,r double precision, intent(out) :: v v = al*(re-r) v = dexp(v) - 1.d0 v = (de*v)**2 return end subroutine v_morse !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine f_morse(re,al,de,r,f) !----------------------------------------------------------------------! ! Purpose: Evaluate -dV(r)/dr = dV(r)/d re !----------------------------------------------------------------------! double precision, intent(in) :: al,re,de,r double precision, intent(out) :: f f = al*(re-r) f = dexp(f) f = f*(f-1.d0) f = f*2d0*al*de**2 return end subroutine f_morse !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine h_morse(re,al,de,r,h) !----------------------------------------------------------------------! ! Purpose: Evaluate d2V(r)/dr2 !----------------------------------------------------------------------! double precision, intent(in) :: al,re,de,r double precision, intent(out) :: h h = al*(re-r) h = dexp(h) h = h*(2.d0*h-1.d0) h = h*2d0*al**2*de**2 return end subroutine h_morse !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine v_coul(q1,q2,r,v) !----------------------------------------------------------------------! ! Purpose: Evaluate V(r) !----------------------------------------------------------------------! double precision, intent(in) :: r, q1, q2 double precision, intent(out) :: v v = q1 * q2 / r return end subroutine v_coul !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine f_coul(q1,q2,r,f) !----------------------------------------------------------------------! ! Purpose: Evaluate -dV(r)/dr !----------------------------------------------------------------------! double precision, intent(in) :: r, q1, q2 double precision, intent(out) :: f f = q1 * q2 / r**2 return end subroutine f_coul !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine h_coul(q1,q2,r,h) !----------------------------------------------------------------------! ! Purpose: Evaluate d2V(r)/dr2 !----------------------------------------------------------------------! double precision, intent(in) :: r, q1, q2 double precision, intent(out) :: h h = 2.d0 * q1 * q2 / r**3 return end subroutine h_coul !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine v_xrep(re,al,de,r,v) !----------------------------------------------------------------------! ! Purpose: Evaluate V(r) !----------------------------------------------------------------------! double precision, intent(in) :: r, al, re, de double precision, intent(out) :: v v = al*(re-r) v = dexp(v) * de**2 return end subroutine v_xrep !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine f_xrep(re,al,de,r,f) !----------------------------------------------------------------------! ! Purpose: Evaluate -dV(r)/dr = dV(r)/d re !----------------------------------------------------------------------! double precision, intent(in) :: r, al, re, de double precision, intent(out) :: f f = al*(re-r) f = dexp(f) f = f*al*de**2 return end subroutine f_xrep !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine h_xrep(re,al,de,r,h) !----------------------------------------------------------------------! ! Purpose: Evaluate d2V(r)/dr2 !----------------------------------------------------------------------! double precision, intent(in) :: r, al, re, de double precision, intent(out) :: h h = al*(re-r) h = dexp(h) h = h*al**2*de**2 return end subroutine h_xrep !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine v_gauss(ndim,r,x,alpha,d,shift,v) !----------------------------------------------------------------------! ! Purpose: Evaluate V(r) = D ( exp(- 0.5 a rx**2 ) - shift ) !----------------------------------------------------------------------! integer, intent(in) :: ndim double precision, intent(in) :: r(ndim), alpha(ndim), x(ndim), d, shift double precision, intent(out) :: v integer :: i v = 0.d0 do i = 1,ndim v = v + (r(i)-x(i))**2 * alpha(i) enddo v = v * 0.5d0 v = dexp(-v) - shift v = v*d return end subroutine v_gauss !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine f_gauss(ndim,r,x,alpha,d,shift,v) !----------------------------------------------------------------------! ! Purpose: Evaluate dV/dr !----------------------------------------------------------------------! integer, intent(in) :: ndim double precision, intent(in) :: r(ndim), alpha(ndim), x(ndim), d, shift double precision, intent(out) :: v(ndim) double precision :: vv integer :: i vv = 0.d0 do i = 1,ndim vv = vv + (r(i)-x(i))**2 * alpha(i) enddo vv = vv * 0.5d0 vv = dexp(-vv) vv = vv*d do i = 1,ndim v(i) = - vv * (r(i)-x(i)) * alpha(i) enddo return end subroutine f_gauss !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine h_gauss(ndim,r,x,alpha,d,shift,h) !----------------------------------------------------------------------! ! Purpose: Evaluate d2V/dr2 !----------------------------------------------------------------------! integer, intent(in) :: ndim double precision, intent(in) :: r(ndim), alpha(ndim), x(ndim), d, shift double precision, intent(out) :: h(ndim*(ndim+1)/2) double precision :: vv, fi integer :: i, j , ij vv = 0.d0 do i = 1,ndim vv = vv + (r(i)-x(i))**2 * alpha(i) enddo vv = vv * 0.5d0 vv = dexp(-vv) vv = vv*d ij=0 do i = 1,ndim fi = (r(i)-x(i)) * alpha(i) do j = 1,i ij=ij+1 h(ij) = vv * fi * (r(j)-x(j)) * alpha(j) enddo h(ij) = h(ij) - alpha(i) * vv enddo return end subroutine h_gauss !----------------------------------------------------------------------! !----------------------------------------------------------------------! subroutine iorder(i,j) ! permute i,j such that i < j implicit none integer :: i, j, k if (i.le.j) return k=i i=j j=k end subroutine iorder !----------------------------------------------------------------------!