From dea3addb339090388b6528c7a824050586bff24f Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Sat, 23 Aug 2025 19:44:33 +0200 Subject: [PATCH 01/26] Added larger structures for testing timings and robustness Signed-off-by: lukaswittmann --- src/mstore.f90 | 2 + src/mstore/large.f90 | 1433 ++++++++++++++++++++++++++++++++++++++++ src/mstore/meson.build | 1 + 3 files changed, 1436 insertions(+) create mode 100644 src/mstore/large.f90 diff --git a/src/mstore.f90 b/src/mstore.f90 index d1b41eb..f0998a7 100644 --- a/src/mstore.f90 +++ b/src/mstore.f90 @@ -27,6 +27,7 @@ module mstore use mstore_il16, only : get_il16_records use mstore_mb16_43, only : get_mb16_43_records use mstore_upu23, only : get_upu23_records + use mstore_large, only : get_large_records use mstore_x23, only : get_x23_records use mstore_f_block, only : get_f_block_records implicit none @@ -136,6 +137,7 @@ subroutine get_mstore_collections(collections) new_collection("IL16", get_il16_records), & new_collection("MB16-43", get_mb16_43_records), & new_collection("UPU23", get_upu23_records), & + ! new_collection("TOOLS-LARGE", get_tools_large_records), & new_collection("X23", get_x23_records) & ] diff --git a/src/mstore/large.f90 b/src/mstore/large.f90 new file mode 100644 index 0000000..5114857 --- /dev/null +++ b/src/mstore/large.f90 @@ -0,0 +1,1433 @@ +module mstore_large + use mctc_env_accuracy, only : wp + use mctc_io_structure, only : structure_type, new + use mstore_data_record, only : record_type, new_record + implicit none + private + public :: get_tools_large_records +contains +subroutine get_tools_large_records(records) + type(record_type), allocatable, intent(out) :: records(:) + records = [ & + new_record('hs13l_12alcb', hs13l_12alcb), & + new_record('hs13l_6ab', hs13l_6ab), & + new_record('lnci16_brcap', lnci16_brcap), & + new_record('lnci16_dna', lnci16_dna) & + ] +end subroutine get_tools_large_records + +subroutine hs13l_12alcb(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 165 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "C", "C", "C", "C", "H", "C", "C", "H", "H", "O", "H", "H", "O", "O", "C", "H", & + & "O", "C", "C", "H", "H", "O", "H", "C", "C", "C", "O", "H", "H", "H", "O", "H", & + & "O", "C", "C", "C", "C", "H", "C", "C", "H", "H", "O", "H", "O", "H", "O", "C", & + & "C", "C", "H", "C", "C", "C", "O", "H", "H", "H", "H", "O", "H", "O", "C", "C", & + & "C", "C", "H", "C", "C", "H", "O", "H", "H", "H", "O", "O", "C", "H", "O", "C", & + & "C", "H", "C", "C", "H", "O", "H", "O", "H", "H", "O", "C", "H", "O", "H", "H", & + & "H", "H", "O", "H", "H", "O", "H", "H", "O", "H", "O", "H", "H", "H", "H", "O", & + & "H", "O", "H", "H", "H", "H", "H", "H", "O", "H", "H", "O", "H", "H", "H", "C", & + & "C", "C", "C", "C", "C", "N", "N", "C", "C", "C", "C", "C", "C", "H", "H", "As", & + & "O", "O", "O", "H", "H", "H", "H", "H", "O", "H", "C", "H", "H", "C", "C", "H", & + & "H", "H", "H", "H", "Na" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.61480950_wp, 4.96219740_wp, -0.99796760_wp, -1.61281410_wp, & + & 4.84983600_wp, 0.15599380_wp, -2.19799670_wp, 3.44115060_wp, & + & 0.19570670_wp, -2.77282610_wp, 3.04787580_wp, -1.15647920_wp, & + & -3.69168060_wp, 3.61953370_wp, -1.34833980_wp, -1.75562830_wp, & + & 3.29020970_wp, -2.27756450_wp, -2.32241500_wp, 3.09140960_wp, & + & -3.66897950_wp, -1.52935540_wp, 3.30086670_wp, -4.40084560_wp, & + & -2.62494270_wp, 2.04608680_wp, -3.78094670_wp, -3.48201020_wp, & + & 3.88782210_wp, -3.93496510_wp, -3.21211550_wp, 4.81536860_wp, & + & -3.90655480_wp, -0.92118720_wp, 2.58289160_wp, -2.15482890_wp, & + & -1.26089120_wp, 4.64596800_wp, -2.22010590_wp, -3.05680090_wp, & + & 1.64559400_wp, -1.07998780_wp, -4.31380730_wp, 1.14732730_wp, & + & -1.50000780_wp, -4.99411810_wp, 1.96279690_wp, -1.77377430_wp, & + & -4.18083900_wp, 0.33958450_wp, -2.65815570_wp, -3.26047730_wp, & + & -0.76198570_wp, -2.49625410_wp, -3.21203470_wp, -1.48152790_wp, & + & -3.82912280_wp, -2.44360460_wp, -2.25811430_wp, -3.78671880_wp, & + & -2.92628740_wp, -0.75664410_wp, -4.60487970_wp, -4.43970730_wp, & + & -2.13336340_wp, -4.17073590_wp, -5.12022270_wp, -1.45082010_wp, & + & -4.24430160_wp, -3.69530970_wp, -1.65452260_wp, -1.32905510_wp, & + & -3.91701980_wp, -0.84230890_wp, -0.06073570_wp, -4.87571040_wp, & + & 0.31374070_wp, -0.34664530_wp, -5.10694350_wp, 1.12373050_wp, & + & 0.80078510_wp, -4.31828980_wp, 1.68380380_wp, 0.94464450_wp, & + & -5.85037330_wp, -0.08851440_wp, -0.65038750_wp, -2.95073430_wp, & + & -0.42981120_wp, 0.26772360_wp, -4.42408410_wp, -1.72513870_wp, & + & 0.94273780_wp, -4.22036990_wp, -1.33471120_wp, 1.82239030_wp, & + & -2.64364510_wp, -2.58664950_wp, -1.04992180_wp, -2.86288570_wp, & + & -3.96725100_wp, -1.25759770_wp, -2.32435800_wp, -4.69063650_wp, & + & -0.02311410_wp, -0.82516540_wp, -4.43263570_wp, 0.08740530_wp, & + & -0.11282580_wp, -4.82116720_wp, -1.19824020_wp, -0.11032200_wp, & + & -5.91490640_wp, -1.30438230_wp, -0.77542870_wp, -4.16992890_wp, & + & -2.41561190_wp, -0.23004470_wp, -4.66606090_wp, -3.73931650_wp, & + & -0.78754900_wp, -4.17706230_wp, -4.55096690_wp, 0.82074930_wp, & + & -4.37259290_wp, -3.82055340_wp, -0.27186060_wp, -6.08991400_wp, & + & -3.87945720_wp, -1.20047530_wp, -6.35734170_wp, -3.87291250_wp, & + & -2.19469170_wp, -4.43583270_wp, -2.41930090_wp, -0.60134770_wp, & + & -3.08377100_wp, -2.36787070_wp, 1.22630800_wp, -4.32081830_wp, & + & -1.08893830_wp, 2.32889410_wp, -5.18618940_wp, -1.27588010_wp, & + & 3.27011670_wp, -4.95162450_wp, -0.09191460_wp, 3.75406480_wp, & + & -3.50788350_wp, -0.13054220_wp, 2.87915820_wp, -2.85473450_wp, & + & -0.00654730_wp, 4.39822940_wp, -3.19241030_wp, -1.47399370_wp, & + & 3.44480940_wp, -3.54210940_wp, -2.62196110_wp, 4.05756530_wp, & + & -3.41467700_wp, -4.00237030_wp, 5.25172210_wp, -4.18481500_wp, & + & -4.17313630_wp, 5.00778810_wp, -5.11819080_wp, -4.11682040_wp, & + & 4.32514580_wp, -2.36761670_wp, -4.17724850_wp, 3.30025230_wp, & + & -3.69987500_wp, -4.74641790_wp, 2.57794530_wp, -2.86404220_wp, & + & -2.57824180_wp, 3.00257940_wp, -4.91310070_wp, -2.49136810_wp, & + & 5.33861640_wp, -3.75161750_wp, -1.57239780_wp, 4.65721420_wp, & + & -1.77931810_wp, -1.46709960_wp, 5.87330530_wp, -1.30906780_wp, & + & -2.04121220_wp, 6.72265960_wp, -0.65378470_wp, -0.95622610_wp, & + & 5.99769360_wp, 0.55636530_wp, -0.37229140_wp, 5.46003710_wp, & + & 1.50384990_wp, -1.44125770_wp, 6.27835070_wp, 2.14493430_wp, & + & -1.80237350_wp, 4.81449210_wp, 0.76191930_wp, -2.62098470_wp, & + & 4.67717990_wp, 1.64393540_wp, -3.84489170_wp, 5.67993340_wp, & + & 1.90684170_wp, -4.21473890_wp, 3.90249210_wp, 1.01817280_wp, & + & -4.87348200_wp, 4.37690700_wp, 0.22124310_wp, -5.14658070_wp, & + & 4.15848890_wp, 2.56545280_wp, -3.57369930_wp, 3.82020350_wp, & + & 0.40835230_wp, -2.31410550_wp, 5.60977760_wp, -0.36236430_wp, & + & -3.05376100_wp, 4.43688480_wp, 2.30274970_wp, -0.81702340_wp, & + & 4.57801920_wp, 3.70189290_wp, -0.78375540_wp, 5.63307220_wp, & + & 3.99474890_wp, -0.85167600_wp, 3.93718430_wp, 4.33845830_wp, & + & -1.88742530_wp, 2.52586810_wp, 4.05024570_wp, -1.98545830_wp, & + & 1.79900460_wp, 4.54391970_wp, -0.73034870_wp, 1.81582010_wp, & + & 5.64173850_wp, -0.68706550_wp, 2.44497850_wp, 3.97023200_wp, & + & 0.51665840_wp, 3.95257310_wp, 4.20709150_wp, 0.52213320_wp, & + & 4.14263320_wp, 5.28738430_wp, 0.57066200_wp, 4.56145070_wp, & + & 3.62645530_wp, 1.66629390_wp, 4.22151670_wp, 2.70548400_wp, & + & 1.75878190_wp, 1.82568740_wp, 4.59112720_wp, 1.65278690_wp, & + & 2.13011500_wp, 4.12351230_wp, 2.44342090_wp, 2.24836410_wp, & + & 2.88614140_wp, 0.53669100_wp, 0.44728800_wp, 4.06263500_wp, & + & -0.73785320_wp, 2.03236170_wp, 4.69247220_wp, -3.26666430_wp, & + & 0.98613090_wp, 4.41245940_wp, -3.41987240_wp, 2.07818890_wp, & + & 6.12334360_wp, -3.24443680_wp, 3.00639560_wp, 6.38465330_wp, & + & -3.18186010_wp, 2.62046420_wp, 4.29768950_wp, -4.10743510_wp, & + & 2.37122440_wp, 2.96284600_wp, -2.07545350_wp, 5.14402800_wp, & + & 0.19197750_wp, 0.21759100_wp, 6.86379820_wp, 1.31989000_wp, & + & 0.47576040_wp, 7.02290910_wp, 0.79675840_wp, 1.27291930_wp, & + & 7.66374140_wp, -0.33076150_wp, -1.41818930_wp, 7.07044800_wp, & + & -1.58923280_wp, 0.06418010_wp, 6.25180200_wp, -2.03436750_wp, & + & 0.35319040_wp, 6.41656830_wp, -2.13227600_wp, -2.52010270_wp, & + & 4.67182470_wp, -3.25812340_wp, 0.94355520_wp, 4.33987880_wp, & + & -2.43563710_wp, 1.38941770_wp, 2.60960000_wp, -5.23936470_wp, & + & 1.14910850_wp, 1.64059790_wp, -5.11914050_wp, 1.03217230_wp, & + & 4.12267700_wp, -5.63695090_wp, -0.17502760_wp, 2.00924670_wp, & + & -6.23376310_wp, -1.33273090_wp, -0.65671670_wp, -3.36177500_wp, & + & 0.27303720_wp, -0.23778230_wp, -5.19925320_wp, 1.15125460_wp, & + & -0.49879670_wp, -4.78799790_wp, 1.98730760_wp, -3.01475240_wp, & + & -4.28757690_wp, 1.15678770_wp, -3.25892220_wp, -3.34454120_wp, & + & 1.06027600_wp, -2.49799790_wp, -5.76691280_wp, -0.15008670_wp, & + & -3.92715200_wp, -4.18143500_wp, -1.41392140_wp, -4.62090830_wp, & + & -2.18842720_wp, -1.58631060_wp, -2.25062020_wp, -0.37580660_wp, & + & -2.28807940_wp, -1.40096470_wp, 2.72750580_wp, 0.45771940_wp, & + & -3.25832430_wp, 3.34690840_wp, 1.15797100_wp, -2.86567860_wp, & + & 3.44327630_wp, 2.03684960_wp, -2.42109410_wp, 5.57079030_wp, & + & -0.01973980_wp, -1.01065480_wp, 5.20062910_wp, 1.39866160_wp, & + & -0.13826950_wp, 4.76171950_wp, 1.45051740_wp, -0.24582090_wp, & + & 5.98942590_wp, -1.10414820_wp, -4.92646070_wp, 1.61334710_wp, & + & 5.11570260_wp, -5.63661710_wp, 0.81350050_wp, 4.93171420_wp, & + & -6.89151690_wp, 0.88298210_wp, 5.50903450_wp, -7.79718070_wp, & + & -0.17307820_wp, 5.25622570_wp, -7.44264110_wp, -1.25792610_wp, & + & 4.45141550_wp, -6.18357600_wp, -1.30577840_wp, 3.88202400_wp, & + & -5.26721600_wp, -0.27138240_wp, 4.11588140_wp, -4.01452110_wp, & + & -0.42392050_wp, 3.50936410_wp, -3.16091390_wp, 0.47412550_wp, & + & 3.74805870_wp, -1.88417840_wp, 0.26292120_wp, 3.18794410_wp, & + & -1.03985580_wp, 1.37982000_wp, 3.18387590_wp, 0.27282550_wp, & + & 1.26403350_wp, 2.74796450_wp, 0.75349970_wp, 0.02308020_wp, & + & 2.33434140_wp, -0.08647070_wp, -1.09624400_wp, 2.32929350_wp, & + & -1.40363260_wp, -0.98100450_wp, 2.74498220_wp, -2.04507730_wp, & + & -1.85649900_wp, 2.76740200_wp, 0.29556130_wp, -2.06709910_wp, & + & 2.02151520_wp, 2.60829720_wp, -0.16810000_wp, 1.85163040_wp, & + & 3.50317450_wp, 1.16958250_wp, 2.28219780_wp, 3.23757870_wp, & + & -1.61295920_wp, 2.43263820_wp, 2.41961420_wp, -0.28487200_wp, & + & 0.07706340_wp, 3.22383240_wp, -0.65121800_wp, -0.33487910_wp, & + & 0.92453190_wp, 2.13314150_wp, 2.75348980_wp, -1.42041450_wp, & + & 2.33228530_wp, 3.54256070_wp, -5.89333300_wp, -2.14963120_wp, & + & 3.26311300_wp, -8.15884610_wp, -2.05800550_wp, 4.28297070_wp, & + & -9.02313350_wp, -0.08780330_wp, 5.83904350_wp, -9.54989150_wp, & + & -0.86725450_wp, 5.60675160_wp, -7.30160720_wp, 2.05845890_wp, & + & 6.35051710_wp, -7.87623430_wp, 1.71472470_wp, 7.21929350_wp, & + & -6.40053870_wp, 2.55354950_wp, 6.73073550_wp, -8.14064630_wp, & + & 3.08031990_wp, 5.56644740_wp, -8.58226080_wp, 4.24401430_wp, & + & 6.44719220_wp, -7.71692510_wp, 4.76896850_wp, 6.86837100_wp, & + & -9.19792270_wp, 3.89059180_wp, 7.28245690_wp, -9.17183720_wp, & + & 4.97106340_wp, 5.87890730_wp, -9.01886310_wp, 2.58099410_wp, & + & 5.13872230_wp, -7.54483400_wp, 3.45041410_wp, 4.72210300_wp, & + & 3.18228530_wp, -3.80592780_wp, 2.86368570_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine hs13l_12alcb + +subroutine hs13l_6ab(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 234 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "C", "C", "C", "C", "C", "C", "H", "O", "C", "C", "C", "C", "C", "C", "H", "H", & + & "H", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "O", "C", "C", "C", & + & "C", "C", "C", "H", "C", "O", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "O", "H", "O", "C", "C", "C", "C", "C", "C", "H", "C", "C", "C", & + & "C", "C", "C", "H", "H", "H", "O", "H", "C", "C", "C", "C", "C", "C", "H", "O", & + & "H", "H", "H", "H", "O", "C", "C", "C", "C", "C", "C", "C", "H", "C", "C", "C", & + & "C", "C", "C", "C", "O", "C", "O", "H", "H", "O", "C", "O", "H", "C", "H", "C", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "C", "H", "H", "C", "H", "C", "C", "H", "H", "H", "C", "H", "H", "C", "H", & + & "H", "C", "C", "C", "O", "O", "H", "O", "O", "H", "H", "H", "C", "C", "H", "C", & + & "H", "C", "H", "C", "H", "C", "H", "H", "H", "C", "C", "H", "C", "H", "C", "H", & + & "C", "H", "C", "H", "H", "H", "C", "C", "H", "C", "H", "C", "H", "C", "H", "C", & + & "H", "H", "H", "C", "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", "H", "H", & + & "C", "C", "C", "H", "H", "C", "C", "H", "H", "C", "H", "C", "H", "H", "H", "C", & + & "H", "H", "C", "H", "H", "H", "H", "H", "C", "I" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -2.06305600_wp, -4.21975850_wp, 1.96098110_wp, -1.03112390_wp, & + & -4.95620000_wp, 2.53959670_wp, -1.11837360_wp, -5.27787100_wp, & + & 3.89355060_wp, -2.20374110_wp, -4.88175390_wp, 4.66643580_wp, & + & -3.21418220_wp, -4.13929260_wp, 4.06305960_wp, -3.15968280_wp, & + & -3.79955090_wp, 2.71304340_wp, -3.94244860_wp, -3.20745050_wp, & + & 2.25641320_wp, -4.23773280_wp, -3.75711640_wp, 4.89598470_wp, & + & -5.22501730_wp, -2.90726470_wp, 4.41221370_wp, -5.15098520_wp, & + & -1.56147850_wp, 4.74883280_wp, -6.20347160_wp, -0.73360030_wp, & + & 4.37389380_wp, -7.29796030_wp, -1.21659980_wp, 3.66939370_wp, & + & -7.33663780_wp, -2.56835760_wp, 3.33406560_wp, -6.30431000_wp, & + & -3.42502340_wp, 3.70512270_wp, -6.33569250_wp, -4.48239740_wp, & + & 3.46001220_wp, -8.18843740_wp, -2.96063660_wp, 2.78619240_wp, & + & -8.10524200_wp, -0.54464420_wp, 3.39409550_wp, -5.52079590_wp, & + & 1.50811140_wp, 4.01006870_wp, -5.10997590_wp, 1.22799790_wp, & + & 2.70920300_wp, -4.45809630_wp, 2.22330360_wp, 1.98288340_wp, & + & -4.19945290_wp, 3.46879350_wp, 2.54687590_wp, -4.62310540_wp, & + & 3.71508370_wp, 3.85143760_wp, -3.35308270_wp, 5.70350460_wp, & + & 4.05283600_wp, -3.56816450_wp, 6.89089580_wp, 3.36630380_wp, & + & -2.47372680_wp, 7.69559730_wp, 3.05393180_wp, -1.18630920_wp, & + & 7.32801080_wp, 3.43176970_wp, -1.00812740_wp, 6.13540400_wp, & + & 4.12536530_wp, -2.07534910_wp, 5.30264020_wp, 4.43446920_wp, & + & 0.24231030_wp, 5.81193970_wp, 4.63812970_wp, 1.18211020_wp, & + & 5.23197080_wp, 3.82216410_wp, 2.37910940_wp, 4.89569620_wp, & + & 4.44564470_wp, 3.36580770_wp, 4.26535600_wp, 3.69623500_wp, & + & 3.18033580_wp, 3.97301230_wp, 2.34578550_wp, 1.97278410_wp, & + & 4.32822360_wp, 1.74633630_wp, 0.96351100_wp, 4.95957230_wp, & + & 2.47304640_wp, 0.02223920_wp, 5.21290250_wp, 2.00214540_wp, & + & 1.65357230_wp, 3.80198760_wp, 0.36706320_wp, 0.72248140_wp, & + & 4.65827610_wp, -0.29120330_wp, -0.30008660_wp, 3.96013400_wp, & + & -0.92302820_wp, -1.53013460_wp, 3.91102310_wp, -0.28492950_wp, & + & -2.55472020_wp, 3.15761540_wp, -0.83931340_wp, -2.38565050_wp, & + & 2.45917400_wp, -2.03656990_wp, -1.13723550_wp, 2.54285040_wp, & + & -2.65616960_wp, -0.08137240_wp, 3.29198750_wp, -2.13225780_wp, & + & 1.28199140_wp, 3.34651980_wp, -2.80344210_wp, 2.15690180_wp, & + & 2.23136230_wp, -2.25126090_wp, 2.20209630_wp, 0.96029880_wp, & + & -2.83058510_wp, 2.95548310_wp, -0.08805060_wp, -2.29776520_wp, & + & 3.68200050_wp, 0.17259210_wp, -1.13046900_wp, 3.66744940_wp, & + & 1.42297470_wp, -0.53080860_wp, 2.89569130_wp, 2.43504970_wp, & + & -1.08243290_wp, 2.84434280_wp, 3.64589870_wp, -0.40035020_wp, & + & 4.22496370_wp, 1.59364990_wp, 0.38549610_wp, 4.42437140_wp, & + & -0.82112150_wp, -0.50620810_wp, 3.63928630_wp, -1.73209700_wp, & + & 0.25692040_wp, 4.32711190_wp, -2.03276810_wp, 1.56649370_wp, & + & 4.05076680_wp, -3.23255020_wp, 2.21942980_wp, 4.58993720_wp, & + & -3.44400020_wp, 3.48638230_wp, 5.63404210_wp, -1.29521180_wp, & + & 3.43499970_wp, 5.11003780_wp, -1.05011640_wp, 2.16713760_wp, & + & 5.31466500_wp, -0.11898510_wp, 1.65354390_wp, 6.41856020_wp, & + & 0.93195560_wp, 3.66682500_wp, 5.39904030_wp, 1.75653660_wp, & + & 4.13091250_wp, 5.44858340_wp, 3.10613540_wp, 3.80434460_wp, & + & 6.46810230_wp, 3.63119560_wp, 3.01860470_wp, 7.46675050_wp, & + & 2.77788500_wp, 2.55799620_wp, 7.45368130_wp, 1.42296910_wp, & + & 2.88224560_wp, 8.23700970_wp, 0.75404430_wp, 2.53904650_wp, & + & 8.27269210_wp, 3.17496880_wp, 1.94775010_wp, 6.48194900_wp, & + & 4.69168730_wp, 2.78579530_wp, 4.51483990_wp, 3.95718730_wp, & + & 4.38391640_wp, 4.60489160_wp, 1.36310260_wp, 4.75914270_wp, & + & 3.36819490_wp, -5.45967030_wp, 3.78850750_wp, 3.66558230_wp, & + & -6.56281380_wp, 2.99882670_wp, 2.64824590_wp, -7.46478340_wp, & + & 2.69539300_wp, 1.35650100_wp, -7.27367010_wp, 3.17865860_wp, & + & 1.09389480_wp, -6.15797000_wp, 3.96437320_wp, 2.08506910_wp, & + & -5.23409580_wp, 4.27405500_wp, 1.87149420_wp, -4.37743940_wp, & + & 4.90641130_wp, -0.15654360_wp, -6.00619610_wp, 4.55317520_wp, & + & 0.56333150_wp, -7.98211610_wp, 2.95940060_wp, 2.86824190_wp, & + & -8.33443320_wp, 2.08327430_wp, 4.67786970_wp, -6.71385350_wp, & + & 2.63629760_wp, 3.43604560_wp, -3.98750340_wp, 1.74548190_wp, & + & 3.42061060_wp, -2.94234850_wp, -0.46159160_wp, 2.16828350_wp, & + & -3.01811290_wp, -1.05501440_wp, 1.20218750_wp, -3.76973440_wp, & + & -0.40326610_wp, -0.08140670_wp, -3.82630210_wp, -0.92502660_wp, & + & -0.41630300_wp, -3.16639150_wp, -2.11046010_wp, 0.58531540_wp, & + & -2.42344620_wp, -2.73981670_wp, 1.88613030_wp, -2.33212880_wp, & + & -2.24054600_wp, 2.96166110_wp, -1.48319970_wp, -2.90315350_wp, & + & 0.33969510_wp, -1.89445520_wp, -3.65632220_wp, -1.84425900_wp, & + & -3.22034260_wp, -2.63384420_wp, -2.65330480_wp, -2.10258050_wp, & + & -1.99337460_wp, -2.76248660_wp, -0.83535520_wp, -2.57161070_wp, & + & -3.45682850_wp, 0.21761090_wp, -1.97037190_wp, -4.05842740_wp, & + & -0.03361140_wp, -0.73231510_wp, -3.97920470_wp, -1.28154220_wp, & + & -0.13156060_wp, -3.26706970_wp, -2.29786130_wp, -0.75164060_wp, & + & -3.15340770_wp, -3.50438890_wp, -0.06955770_wp, -1.88743010_wp, & + & -3.67230810_wp, 0.56478450_wp, -1.03865230_wp, -4.52385510_wp, & + & -0.19902710_wp, -1.40880950_wp, -2.68237480_wp, 0.64305580_wp, & + & -4.43959030_wp, -1.44836900_wp, 0.83770870_wp, -4.74025000_wp, & + & 0.96014530_wp, -0.04158460_wp, -3.89215340_wp, 1.89251070_wp, & + & 0.62346060_wp, -3.74916300_wp, 3.08789920_wp, -0.13729050_wp, & + & -2.89812070_wp, 1.43384090_wp, 0.75038070_wp, -3.51953560_wp, & + & 1.60627590_wp, -2.58937470_wp, -2.27716100_wp, -0.65624640_wp, & + & -3.52578870_wp, -1.93567690_wp, -3.23125000_wp, -4.16452450_wp, & + & -2.27362370_wp, -4.16260570_wp, -2.27142250_wp, 1.43911680_wp, & + & -4.27208540_wp, 0.53021420_wp, 2.66242270_wp, -1.26560980_wp, & + & 0.46662300_wp, 1.61768150_wp, 0.77770410_wp, -3.72755990_wp, & + & -0.97790500_wp, 1.99901790_wp, -3.58214080_wp, -1.67946250_wp, & + & 4.42232710_wp, 0.66140030_wp, 1.18560210_wp, 2.81080130_wp, & + & 0.48433540_wp, 3.94769840_wp, 3.46388720_wp, 1.77638840_wp, & + & 2.53117190_wp, 5.10049250_wp, 5.50059400_wp, -0.33147970_wp, & + & 7.95932440_wp, 3.20846510_wp, -2.62987890_wp, 8.62749640_wp, & + & 2.51833520_wp, -4.57627850_wp, 7.17970580_wp, 3.08551950_wp, & + & -3.68905730_wp, 4.23702490_wp, 1.97900720_wp, -5.29954830_wp, & + & 0.25895470_wp, 2.26441700_wp, -2.25158240_wp, -5.12571310_wp, & + & 5.72292860_wp, -0.17517530_wp, -5.26208820_wp, 1.95131910_wp, & + & -2.99702580_wp, -3.23002830_wp, -4.44487490_wp, -1.25120890_wp, & + & -4.45891300_wp, -4.78339560_wp, -1.49953160_wp, -2.32483280_wp, & + & -4.59938070_wp, -4.45311710_wp, 2.06276520_wp, -2.23712610_wp, & + & -3.56183800_wp, 1.57703410_wp, -4.12157690_wp, 1.74572220_wp, & + & 4.29213280_wp, -2.49634610_wp, 1.17986630_wp, 3.35254010_wp, & + & -4.33295060_wp, 2.88624170_wp, -1.47693010_wp, -4.43537520_wp, & + & 3.92182610_wp, -1.93388100_wp, -2.62425120_wp, -4.36878300_wp, & + & 0.90109670_wp, -4.43287230_wp, -2.63579460_wp, 1.16372840_wp, & + & -4.53719190_wp, -3.80107580_wp, 2.96501450_wp, -4.73347270_wp, & + & 0.48247170_wp, 4.14851780_wp, -4.62497630_wp, 0.75313520_wp, & + & 2.41508790_wp, -4.70725520_wp, 2.52884960_wp, 3.59096390_wp, & + & -5.02586030_wp, 3.67861800_wp, -0.81506540_wp, -4.80848230_wp, & + & 1.93719810_wp, -1.05822470_wp, -4.78868880_wp, 3.06493210_wp, & + & -2.87552760_wp, -5.05166840_wp, -5.28813620_wp, 2.75021360_wp, & + & 4.59697710_wp, 5.38577900_wp, -2.48658340_wp, 4.10825370_wp, & + & -4.44902870_wp, 4.94587310_wp, 4.44677900_wp, 4.39241410_wp, & + & -4.60889930_wp, 4.19044080_wp, -4.30699100_wp, -1.17221460_wp, & + & 5.31093240_wp, 6.44958740_wp, -0.39494200_wp, 4.08075720_wp, & + & -6.18857840_wp, 0.59343280_wp, 4.79008310_wp, -1.91995020_wp, & + & 4.38108230_wp, 4.98802440_wp, 5.79282680_wp, -2.66144330_wp, & + & 5.09905320_wp, -5.60789300_wp, 2.95341000_wp, 5.61400560_wp, & + & 4.38046600_wp, -3.50962870_wp, -4.67970990_wp, 4.45173720_wp, & + & -4.50328500_wp, -3.69953870_wp, 3.53624150_wp, -4.85137430_wp, & + & -3.22510280_wp, 5.67790450_wp, -5.04748770_wp, -3.32141690_wp, & + & 5.71290390_wp, -5.81882730_wp, -2.55605160_wp, 6.85405470_wp, & + & -4.60695600_wp, -3.92299600_wp, 7.81085140_wp, -5.03293540_wp, & + & -3.63293330_wp, 6.79495910_wp, -3.61921760_wp, -4.90552780_wp, & + & 7.70723210_wp, -3.27507720_wp, -5.38639600_wp, 5.56893670_wp, & + & -3.07534180_wp, -5.27731050_wp, 5.53004930_wp, -2.30522940_wp, & + & -6.04554960_wp, 2.99811720_wp, -2.77787480_wp, -6.14225400_wp, & + & 2.24226850_wp, -3.52726910_wp, -4.73390480_wp, 2.36990800_wp, & + & 3.52557720_wp, -6.52124380_wp, 2.43312340_wp, 2.29575680_wp, & + & -7.18497820_wp, 2.65934630_wp, 1.39467790_wp, -6.61753180_wp, & + & 2.21239150_wp, 2.21360790_wp, -8.55708870_wp, 2.27023950_wp, & + & 1.25009390_wp, -9.05706360_wp, 1.92313660_wp, 3.36380100_wp, & + & -9.28912440_wp, 1.75282590_wp, 3.30178400_wp, -10.36048970_wp, & + & 1.85957970_wp, 4.59434430_wp, -8.63891070_wp, 1.63991190_wp, & + & 5.49728020_wp, -9.20286960_wp, 2.08031910_wp, 4.67278840_wp, & + & -7.26565280_wp, 2.02841060_wp, 5.63655520_wp, -6.76279860_wp, & + & 3.24887310_wp, 2.83077960_wp, -4.69876580_wp, 2.92255720_wp, & + & 4.57040360_wp, -4.72724740_wp, -3.72095670_wp, 2.91302050_wp, & + & -6.23562340_wp, -2.47817270_wp, 2.96109590_wp, -6.87733450_wp, & + & -1.57440750_wp, 3.08750110_wp, -6.28341910_wp, -2.38564060_wp, & + & 2.85014470_wp, -8.26169500_wp, -1.41129680_wp, 2.89373910_wp, & + & -8.74294630_wp, -3.53845670_wp, 2.68894650_wp, -9.02895570_wp, & + & -3.46880980_wp, 2.60395780_wp, -10.10994070_wp, -4.78088900_wp, & + & 2.64171220_wp, -8.40090880_wp, -5.68535180_wp, 2.51995510_wp, & + & -8.99130130_wp, -4.86957080_wp, 2.75249610_wp, -7.01486330_wp, & + & -5.84270800_wp, 2.71422290_wp, -6.52931470_wp, -3.04764500_wp, & + & 3.66576860_wp, -4.35347900_wp, -4.78406110_wp, 3.33666720_wp, & + & -4.41902710_wp, -1.31871220_wp, -4.42802620_wp, -6.28713160_wp, & + & -0.47766730_wp, -3.57539570_wp, -7.01186970_wp, 0.24939760_wp, & + & -2.96390750_wp, -6.48000800_wp, -0.55918870_wp, -3.50206350_wp, & + & -8.39909470_wp, 0.10499940_wp, -2.83693530_wp, -8.94517800_wp, & + & -1.48668970_wp, -4.28272430_wp, -9.08812590_wp, -1.55041190_wp, & + & -4.22817540_wp, -10.17158630_wp, -2.32781030_wp, -5.13547970_wp, & + & -8.37798660_wp, -3.05160810_wp, -5.75055920_wp, -8.90673390_wp, & + & -2.24358860_wp, -5.20604020_wp, -6.98836040_wp, -2.90379410_wp, & + & -5.87530460_wp, -6.44030320_wp, -1.72925140_wp, -5.37104590_wp, & + & -4.40573700_wp, -0.20070060_wp, -4.48388870_wp, -4.46642100_wp, & + & 0.22661530_wp, -1.40808820_wp, 3.00315120_wp, 0.31791930_wp, & + & -1.41802280_wp, 4.54570970_wp, 1.51450950_wp, -0.56502130_wp, & + & 4.98726450_wp, 1.60975910_wp, -0.58786890_wp, 6.08121360_wp, & + & 2.44369350_wp, -0.97760560_wp, 4.56674580_wp, 1.31577650_wp, & + & 0.87842910_wp, 4.50718540_wp, 0.01873140_wp, 1.45285070_wp, & + & 5.09517930_wp, 0.07807880_wp, 1.46774230_wp, 6.19174180_wp, & + & -0.11520620_wp, 2.49069670_wp, 4.75845550_wp, -1.17416930_wp, & + & 0.59580090_wp, 4.64833030_wp, -2.10961300_wp, 1.00999450_wp, & + & 5.05012490_wp, -1.26269050_wp, 0.60822340_wp, 3.10554420_wp, & + & -1.40793620_wp, 1.63494530_wp, 2.74455670_wp, -2.11750150_wp, & + & 0.00536230_wp, 2.77163740_wp, 2.16983880_wp, 1.49951600_wp, & + & 4.80976920_wp, 1.22241730_wp, 0.89893870_wp, 2.96399690_wp, & + & 1.07273820_wp, 1.92851190_wp, 2.62252130_wp, 2.15240770_wp, & + & 0.52124290_wp, 2.51854960_wp, -0.98193830_wp, -0.84807730_wp, & + & 5.13162650_wp, -0.94286540_wp, -0.87451910_wp, 6.22882830_wp, & + & -1.83369420_wp, -1.46732610_wp, 4.81664490_wp, 0.45152380_wp, & + & -2.45681060_wp, 4.87665200_wp, 1.13974500_wp, -1.83495260_wp, & + & 2.56683280_wp, -0.62489930_wp, -2.01775840_wp, 2.68380630_wp, & + & 0.03762940_wp, 0.03489280_wp, 2.55987200_wp, -0.09765060_wp, & + & 0.05986120_wp, 0.30590250_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine hs13l_6ab + +subroutine lnci16_brcap(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 380 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "C", "C", "C", "C", "C", "C", "H", "H", "O", "C", "C", "C", "C", "O", "C", "C", & + & "C", "C", "C", "C", "H", "H", "C", "C", "C", "C", "C", "C", "H", "H", "O", "O", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "H", "H", "O", "C", "H", "C", & + & "H", "C", "H", "C", "H", "C", "C", "C", "C", "O", "O", "O", "C", "H", "H", "C", & + & "H", "H", "C", "H", "H", "C", "H", "H", "H", "H", "H", "H", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "H", "H", "O", "C", "C", "C", "C", "O", "C", "C", & + & "C", "C", "C", "C", "H", "H", "C", "C", "C", "C", "C", "C", "H", "H", "O", "O", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "H", "H", "O", "C", "H", "C", & + & "H", "C", "H", "C", "H", "C", "C", "C", "C", "O", "O", "O", "C", "H", "H", "C", & + & "H", "H", "C", "H", "H", "C", "H", "H", "H", "H", "H", "H", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "F", "F", "F", "F", "C", "C", "C", "C", "C", "C", & + & "F", "F", "F", "F", "C", "C", "C", "C", "C", "C", "F", "F", "F", "F", "C", "C", & + & "C", "C", "C", "C", "F", "F", "F", "F", "C", "H", "C", "H", "C", "H", "C", "H", & + & "C", "H", "C", "H", "C", "H", "C", "H", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", & + & "N", "N", "N", "N", "N", "N", "N", "N", "N", "H", "N", "H", "N", "H", "N", "H", & + & "N", "H", "N", "H", "N", "H", "N", "H", "Br", "Br", "Br", "Br", "C", "C", "C", "C", & + & "H", "C", "C", "C", "C", "H", "C", "C", "C", "C", "C", "C", "C", "H", "C", "H", & + & "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", & + & "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", & + & "N", "N", "N", "N", "C", "H", "C", "H", "C", "H", "C", "H", "O", "H", "O", "H", & + & "O", "H", "O", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", & + & "C", "H", "H", "H", "O", "H", "C", "H", "H", "H", "O", "H", "C", "H", "H", "H", & + & "O", "H", "C", "H", "H", "H", "O", "H", "C", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -13.10634300_wp, 2.26940450_wp, -3.32597310_wp, -14.22740000_wp, & + & 3.10448990_wp, -0.90182230_wp, -14.21375990_wp, 1.58747540_wp, & + & -2.82964730_wp, -12.58908480_wp, 3.36138980_wp, -2.65406320_wp, & + & -13.12340150_wp, 3.75690790_wp, -1.44191080_wp, -14.74406370_wp, & + & 2.03449240_wp, -1.62403890_wp, -11.78469680_wp, 3.92825980_wp, & + & -3.09715670_wp, -15.60547270_wp, 1.51681440_wp, -1.22245710_wp, & + & -12.57883870_wp, 4.83849160_wp, -0.78913890_wp, -11.37531200_wp, & + & 4.63988430_wp, -0.16980950_wp, -11.36961680_wp, 4.47116470_wp, & + & 1.23435050_wp, -11.34132020_wp, 1.23435040_wp, -4.45745600_wp, & + & -11.34969020_wp, -0.16933610_wp, -4.63092770_wp, -12.55234910_wp, & + & -0.78509470_wp, -4.84737220_wp, -13.12424410_wp, 3.31287000_wp, & + & 2.25939650_wp, -14.22529410_wp, 0.87894050_wp, 3.09176550_wp, & + & -12.59801960_wp, 2.64123720_wp, 3.34742600_wp, -14.22778240_wp, & + & 2.80853510_wp, 1.57683940_wp, -14.74870360_wp, 1.59879260_wp, & + & 2.02343600_wp, -13.12178310_wp, 1.42375500_wp, 3.74109570_wp, & + & -11.79482250_wp, 3.08819190_wp, 3.91301180_wp, -15.60822040_wp, & + & 1.19171430_wp, 1.50694840_wp, -13.11148170_wp, -1.43779340_wp, & + & -3.77275990_wp, -14.22619860_wp, -2.82173130_wp, -1.61245530_wp, & + & -12.59040190_wp, -2.65596360_wp, -3.37764420_wp, -14.21662450_wp, & + & -0.89193680_wp, -3.12706210_wp, -14.74426650_wp, -1.61129090_wp, & + & -2.06048330_wp, -13.12118240_wp, -3.32735260_wp, -2.29165230_wp, & + & -11.78581590_wp, -3.10361710_wp, -3.94070380_wp, -15.60493310_wp, & + & -1.20328250_wp, -1.54667290_wp, -12.56670250_wp, 0.77053210_wp, & + & 4.81752230_wp, -12.57299120_wp, -4.53210240_wp, -1.91875070_wp, & + & -11.36380800_wp, 0.15401030_wp, 4.60453880_wp, -11.35591980_wp, & + & -1.24951940_wp, 4.42986260_wp, -11.37136790_wp, -4.48847000_wp, & + & -1.26182530_wp, -11.38116970_wp, -4.65706040_wp, 0.14232620_wp, & + & -13.11838240_wp, -2.28337320_wp, 3.29310050_wp, -14.23346020_wp, & + & -3.11767060_wp, 0.86592200_wp, -14.22381400_wp, -1.60048740_wp, & + & 2.79365640_wp, -12.60034820_wp, -3.37600190_wp, 2.62281220_wp, & + & -13.13171600_wp, -3.77124610_wp, 1.40925050_wp, -14.75112010_wp, & + & -2.04709330_wp, 1.58659040_wp, -11.79783680_wp, -3.94365220_wp, & + & 3.06830830_wp, -15.61094840_wp, -1.52869390_wp, 1.18257780_wp, & + & -12.55653010_wp, -1.90748270_wp, 4.49061700_wp, -14.83051500_wp, & + & -0.43414920_wp, 3.55072060_wp, -14.56290050_wp, -0.56029660_wp, & + & 4.59937150_wp, -14.83833150_wp, 3.56149550_wp, 0.40953740_wp, & + & -14.57745040_wp, 4.61190230_wp, 0.53519060_wp, -14.81925530_wp, & + & 0.42155680_wp, -3.58827940_wp, -14.54834580_wp, 0.54713950_wp, & + & -4.63615080_wp, -14.84122770_wp, -3.57410360_wp, -0.44712300_wp, & + & -14.58124770_wp, -4.62482220_wp, -0.57201110_wp, -9.01737700_wp, & + & 0.18300970_wp, 4.35746870_wp, -8.99344860_wp, -1.20332860_wp, & + & 4.17901900_wp, -9.00397410_wp, -0.19956580_wp, -4.37741860_wp, & + & -8.97953560_wp, 1.18691310_wp, -4.20016870_wp, -12.54134490_wp, & + & 1.89304330_wp, -4.52186400_wp, -12.57304240_wp, 4.51667040_wp, & + & 1.88788510_wp, -12.58669360_wp, -4.85377730_wp, 0.75838990_wp, & + & -16.36519590_wp, 3.50555430_wp, 0.40226050_wp, -16.75719570_wp, & + & 4.11237480_wp, -0.41355520_wp, -16.77081110_wp, 2.50117630_wp, & + & 0.28070140_wp, -16.35780680_wp, -0.42908800_wp, 3.50447320_wp, & + & -16.74711590_wp, 0.38568630_wp, 4.11440830_wp, -16.74711930_wp, & + & -1.36628210_wp, 3.90130000_wp, -16.36802190_wp, -3.51624670_wp, & + & -0.44433360_wp, -16.75897020_wp, -3.91095350_wp, -1.38173660_wp, & + & -16.77273930_wp, -2.51135550_wp, -0.32405790_wp, -16.34668530_wp, & + & 0.41794900_wp, -3.54661730_wp, -16.73389250_wp, 1.35538020_wp, & + & -3.94493460_wp, -16.76191100_wp, 0.29696120_wp, -2.54610670_wp, & + & -16.76989890_wp, -0.30732660_wp, 2.50276110_wp, -16.76317980_wp, & + & -4.12250930_wp, 0.37037050_wp, -16.73493670_wp, -0.39666420_wp, & + & -4.15744080_wp, -16.75841620_wp, 3.90067140_wp, 1.33854110_wp, & + & -9.00474850_wp, -4.28475180_wp, -1.21864300_wp, -9.03052030_wp, & + & -4.45266000_wp, 0.16905260_wp, -9.00305020_wp, 4.26498690_wp, & + & 1.19777460_wp, -9.02487290_wp, 4.43284880_wp, -0.18998970_wp, & + & 12.42220880_wp, 3.76601520_wp, -1.41261700_wp, 13.51038000_wp, & + & 1.59946410_wp, -2.80645230_wp, 13.52917070_wp, 3.11425180_wp, & + & -0.87756950_wp, 11.88230390_wp, 3.37096130_wp, -2.62260100_wp, & + & 12.40520420_wp, 2.28536730_wp, -3.30205380_wp, 14.04147690_wp, & + & 2.04306560_wp, -1.60003030_wp, 11.07411710_wp, 3.93707750_wp, & + & -3.06056140_wp, 14.90278780_wp, 1.52394370_wp, -1.20035050_wp, & + & 11.85229340_wp, 1.92283620_wp, -4.50862550_wp, 10.64750910_wp, & + & 1.27362020_wp, -4.46511420_wp, 10.64725900_wp, -0.13253190_wp, & + & -4.60979720_wp, 10.69040630_wp, 4.71016040_wp, -0.13685390_wp, & + & 10.68742020_wp, 4.55361170_wp, 1.26903330_wp, 11.89420300_wp, & + & 4.54197560_wp, 1.91397650_wp, 12.39771710_wp, -1.41940180_wp, & + & -3.73890360_wp, 13.52433040_wp, -2.81836600_wp, -1.59673700_wp, & + & 11.87518240_wp, -2.63888070_wp, -3.34819870_wp, 13.50913090_wp, & + & -0.87971140_wp, -3.09903770_wp, 14.04035200_wp, -1.60483230_wp, & + & -2.03881620_wp, 12.41704170_wp, -3.32135330_wp, -2.27419370_wp, & + & 11.06711550_wp, -3.08269160_wp, -3.90987970_wp, 14.90483060_wp, & + & -1.20171510_wp, -1.52775600_wp, 12.41812760_wp, 3.32059130_wp, & + & 2.26825060_wp, 13.50608240_wp, 0.87829720_wp, 3.09520300_wp, & + & 11.87157020_wp, 2.63770920_wp, 3.33968730_wp, 13.52632150_wp, & + & 2.81680110_wp, 1.59313300_wp, 14.04041080_wp, 1.60287340_wp, & + & 2.03614270_wp, 12.39268440_wp, 1.41804130_wp, 3.73175120_wp, & + & 11.06112110_wp, 3.08067730_wp, 3.89862690_wp, 14.90580770_wp, & + & 1.19912120_wp, 1.52715890_wp, 11.88841500_wp, -4.54109140_wp, & + & -1.92078400_wp, 11.83723570_wp, 0.76086310_wp, 4.80468010_wp, & + & 10.68184610_wp, -4.54859780_wp, -1.27484960_wp, 10.68613610_wp, & + & -4.70550240_wp, 0.13087410_wp, 10.64005420_wp, 0.13262460_wp, & + & 4.60569480_wp, 10.64092270_wp, -1.27399310_wp, 4.46200000_wp, & + & 12.41776810_wp, -3.76519010_wp, 1.40807870_wp, 13.50644070_wp, & + & -1.60033220_wp, 2.80355700_wp, 13.52600990_wp, -3.11465330_wp, & + & 0.87450610_wp, 11.87651710_wp, -3.36983810_wp, 2.61736490_wp, & + & 12.39969260_wp, -2.28485450_wp, 3.29752960_wp, 14.03876100_wp, & + & -2.04422350_wp, 1.59773320_wp, 11.06709660_wp, -3.93495030_wp, & + & 3.05426180_wp, 14.90108450_wp, -1.52587750_wp, 1.19920480_wp, & + & 11.89087980_wp, -4.85595220_wp, 0.75710650_wp, 14.14214590_wp, & + & -3.57178430_wp, -0.43417120_wp, 13.88664180_wp, -4.62338000_wp, & + & -0.56010620_wp, 14.11469650_wp, 0.43180540_wp, -3.56340150_wp, & + & 13.84460610_wp, 0.55546950_wp, -4.61163860_wp, 14.14563970_wp, & + & 3.57025580_wp, 0.43141890_wp, 13.89134390_wp, 4.62209530_wp, & + & 0.55770140_wp, 14.11037760_wp, -0.43311030_wp, 3.56134410_wp, & + & 13.83845710_wp, -0.55622630_wp, 4.60916920_wp, 8.30417730_wp, & + & -4.50273540_wp, -1.26230910_wp, 8.32814930_wp, -4.64513060_wp, & + & 0.12753880_wp, 8.31093650_wp, 4.51532830_wp, 1.25866510_wp, & + & 8.33180010_wp, 4.65657640_wp, -0.13098790_wp, 11.89529650_wp, & + & 4.85803190_wp, -0.76360440_wp, 11.84389040_wp, -0.76090040_wp, & + & -4.81193730_wp, 11.84627490_wp, -1.92214640_wp, 4.50378800_wp, & + & 15.64208820_wp, 0.42545350_wp, -3.52153480_wp, 16.03083680_wp, & + & 1.36122810_wp, -3.92205430_wp, 16.05759760_wp, 0.30593830_wp, & + & -2.52098770_wp, 15.66847100_wp, -3.50823070_wp, -0.42663280_wp, & + & 16.06362400_wp, -3.90062660_wp, -1.36317300_wp, 16.06316520_wp, & + & -4.11443010_wp, 0.38826000_wp, 15.63781990_wp, -0.42776360_wp, & + & 3.52195480_wp, 16.02422490_wp, 0.38880550_wp, 4.13124820_wp, & + & 16.05507820_wp, -0.30936230_wp, 2.52200880_wp, 15.67186740_wp, & + & 3.50483270_wp, 0.42429670_wp, 16.06717940_wp, 3.89689990_wp, & + & 1.36091440_wp, 16.06759460_wp, 4.11041410_wp, -0.39055090_wp, & + & 16.06996850_wp, -2.50241170_wp, -0.30367580_wp, 16.02526660_wp, & + & -1.36349480_wp, 3.92383210_wp, 16.07219190_wp, 2.49850940_wp, & + & 0.30166020_wp, 16.02892220_wp, -0.39090630_wp, -4.13083170_wp, & + & 8.29109960_wp, 0.13282150_wp, 4.39871600_wp, 8.27157260_wp, & + & -1.25869430_wp, 4.27569040_wp, 8.29888170_wp, -0.13611330_wp, & + & -4.38959990_wp, 8.27904950_wp, 1.25585440_wp, -4.26779530_wp, & + & -2.71204000_wp, 4.05870730_wp, 0.57510730_wp, -3.44587370_wp, & + & 3.06674340_wp, 1.20533480_wp, -4.82704740_wp, 3.07215970_wp, & + & 1.16158150_wp, -5.52458760_wp, 4.07035150_wp, 0.49469810_wp, & + & -4.77728210_wp, 5.04549310_wp, -0.15234040_wp, -3.39723200_wp, & + & 5.04241710_wp, -0.11867870_wp, -2.82636270_wp, 2.09821320_wp, & + & 1.86521070_wp, -5.48402970_wp, 2.09208210_wp, 1.76996430_wp, & + & -5.39321390_wp, 6.03326170_wp, -0.79307060_wp, -2.73673780_wp, & + & 6.01015910_wp, -0.73706890_wp, -2.71594470_wp, -4.06234530_wp, & + & -0.57588130_wp, -3.45175540_wp, -3.07361400_wp, -1.20872090_wp, & + & -4.83290590_wp, -3.08450890_wp, -1.16986100_wp, -5.52865690_wp, & + & -4.08556300_wp, -0.50545510_wp, -4.77966080_wp, -5.05793350_wp, & + & 0.14376300_wp, -3.39943700_wp, -5.04921900_wp, 0.11500820_wp, & + & -2.83385430_wp, -2.10229540_wp, -1.86597380_wp, -5.49153630_wp, & + & -2.10658750_wp, -1.77989510_wp, -5.39403020_wp, -6.04810500_wp, & + & 0.78230940_wp, -2.73705560_wp, -6.01425850_wp, 0.73565440_wp, & + & -2.71040530_wp, 0.42991010_wp, -3.65388880_wp, -3.48948940_wp, & + & 1.09326330_wp, -2.71980520_wp, -4.86777180_wp, 1.10044960_wp, & + & -2.82445980_wp, -5.51607180_wp, 0.45196980_wp, -3.86753140_wp, & + & -4.72415310_wp, -0.21845940_wp, -4.79010580_wp, -3.34773180_wp, & + & -0.23607640_wp, -4.68764890_wp, -2.91653400_wp, 1.73059730_wp, & + & -1.70764050_wp, -5.57054590_wp, 1.73138040_wp, -1.89174540_wp, & + & -5.29198430_wp, -0.84002790_wp, -5.81844160_wp, -2.64233340_wp, & + & -0.88164930_wp, -5.60482530_wp, -2.72239270_wp, -0.45706780_wp, & + & 3.65046720_wp, -3.36098410_wp, 0.21040390_wp, 4.68250860_wp, & + & -4.73781630_wp, 0.19676070_wp, 4.78061230_wp, -5.52875660_wp, & + & -0.47107140_wp, 3.85533540_wp, -4.87917480_wp, -1.12007940_wp, & + & 2.81341610_wp, -3.50062140_wp, -1.11670440_wp, 2.71306090_wp, & + & -2.65659160_wp, 0.85267570_wp, 5.60270180_wp, -5.30708230_wp, & + & 0.81894800_wp, 5.80776620_wp, -5.58084880_wp, -1.74841010_wp, & + & 1.87812740_wp, -2.92632650_wp, -1.75511370_wp, 1.70234960_wp, & + & -10.20184170_wp, 4.64598530_wp, -0.89408060_wp, -10.19358230_wp, & + & 4.81906000_wp, -1.96028390_wp, -10.18890190_wp, 4.30843620_wp, & + & 1.92771080_wp, -10.17494840_wp, 4.22216350_wp, 3.00496660_wp, & + & -10.19255300_wp, 0.88179270_wp, 4.59666640_wp, -10.18435780_wp, & + & 1.94759440_wp, 4.77216510_wp, -10.17566100_wp, -1.93773870_wp, & + & 4.24254920_wp, -10.15949020_wp, -3.01424080_wp, 4.14837760_wp, & + & -10.20968850_wp, -4.66464590_wp, 0.86983610_wp, -10.20468630_wp, & + & -4.83746760_wp, 1.93610500_wp, -10.18855350_wp, -4.32716060_wp, & + & -1.95189290_wp, -10.17150260_wp, -4.24069850_wp, -3.02908500_wp, & + & -10.17895090_wp, -0.89787180_wp, -4.61905830_wp, -10.17091160_wp, & + & -1.96384830_wp, -4.79351870_wp, -10.16113290_wp, 1.92199790_wp, & + & -4.26753250_wp, -10.14457560_wp, 2.99858310_wp, -4.17435020_wp, & + & -6.98658680_wp, 4.14631130_wp, 0.51923340_wp, -6.98443090_wp, & + & -0.51339190_wp, 4.00641130_wp, -6.99031510_wp, -4.16559210_wp, & + & -0.53437850_wp, -6.97136290_wp, 0.49580740_wp, -4.02210750_wp, & + & 6.27154840_wp, 4.54302840_wp, 0.60749840_wp, 6.25587660_wp, & + & 0.58764900_wp, -4.10690000_wp, 6.24535940_wp, -0.59237670_wp, & + & 4.12764720_wp, 6.26722080_wp, -4.52543100_wp, -0.60412890_wp, & + & 9.51204050_wp, 4.77632260_wp, -0.85139360_wp, 9.50344430_wp, & + & 4.92684440_wp, -1.92107330_wp, 9.50513380_wp, 4.47605330_wp, & + & 1.97541300_wp, 9.50024990_wp, 4.40214310_wp, 3.05401850_wp, & + & 9.46924530_wp, 1.97701870_wp, -4.32135340_wp, 9.46550020_wp, & + & 3.05552550_wp, -4.24850510_wp, 9.46991290_wp, -0.85089260_wp, & + & -4.59266330_wp, 9.45668280_wp, -1.92115860_wp, -4.73818010_wp, & + & 9.46222270_wp, 0.85017250_wp, 4.59316150_wp, 9.44602970_wp, & + & 1.92111490_wp, 4.73325400_wp, 9.46302060_wp, -1.97871620_wp, & + & 4.32270790_wp, 9.46047300_wp, -3.05718660_wp, 4.24943640_wp, & + & 9.50853880_wp, -4.76910130_wp, 0.84633050_wp, 9.50030480_wp, & + & -4.92057690_wp, 1.91583210_wp, 9.49843450_wp, -4.46839770_wp, & + & -1.97990210_wp, 9.49399570_wp, -4.39948890_wp, -3.05886780_wp, & + & 7.00114680_wp, -4.43038280_wp, -1.68951800_wp, 6.97514620_wp, & + & -1.68458710_wp, 4.11367000_wp, 6.98306730_wp, 1.68120420_wp, & + & -4.09906750_wp, 7.00952700_wp, 4.44741810_wp, 1.69004910_wp, & + & -7.70906030_wp, 4.08962400_wp, 1.61261930_wp, -7.68905740_wp, & + & 1.59309250_wp, -3.98210380_wp, -7.70272410_wp, -1.61019390_wp, & + & 3.96389950_wp, -7.70965060_wp, -4.10913040_wp, -1.62981840_wp, & + & -7.72079790_wp, 0.59149670_wp, 4.24709090_wp, -7.41697440_wp, & + & 1.58602240_wp, 4.24854150_wp, -7.73024920_wp, -4.37484290_wp, & + & 0.57410030_wp, -7.42187590_wp, -4.35718370_wp, 1.56754450_wp, & + & -7.70797210_wp, -0.60881210_wp, -4.26347280_wp, -7.40510730_wp, & + & -1.60358560_wp, -4.26383930_wp, -7.72349930_wp, 4.35499820_wp, & + & -0.59136510_wp, -7.41251890_wp, 4.33815590_wp, -1.58399290_wp, & + & 7.01934330_wp, 4.67299040_wp, -0.51421770_wp, 6.71783060_wp, & + & 4.67486770_wp, -1.49367790_wp, 6.99590060_wp, -0.53011070_wp, & + & -4.28291150_wp, 6.67756730_wp, -1.51342040_wp, -4.25322150_wp, & + & 7.01727430_wp, -4.65854890_wp, 0.51503820_wp, 6.71868890_wp, & + & -4.66152310_wp, 1.49557770_wp, 6.98679830_wp, 0.52521220_wp, & + & 4.30199710_wp, 6.68175510_wp, 1.50969220_wp, 4.28380440_wp, & + & -0.86277050_wp, -0.46150130_wp, 3.54565790_wp, -0.85588390_wp, & + & -4.09954810_wp, -0.66870040_wp, -0.85132690_wp, 0.42287630_wp, & + & -3.54053180_wp, -0.85267320_wp, 4.10805900_wp, 0.67629720_wp, & + & 4.80018780_wp, 4.51908920_wp, 0.61164970_wp, 4.09503290_wp, & + & 3.62143100_wp, -0.19421840_wp, 4.09371830_wp, 5.38611780_wp, & + & 1.45493810_wp, 2.70968760_wp, 3.60586570_wp, -0.07219940_wp, & + & 2.12640160_wp, 2.91028630_wp, -0.66860670_wp, 4.79386910_wp, & + & 0.52739360_wp, -3.95402780_wp, 4.22945180_wp, -0.20308520_wp, & + & -2.90568010_wp, 3.96408440_wp, 1.19925800_wp, -4.85572140_wp, & + & 2.84105220_wp, -0.22737000_wp, -2.82236600_wp, 2.35775950_wp, & + & -0.78283150_wp, -2.02415340_wp, 4.78304920_wp, -0.54135940_wp, & + & 3.97673460_wp, 4.20828850_wp, 0.22005660_wp, 2.95565460_wp, & + & 3.96067010_wp, -1.26129030_wp, 4.84844310_wp, 4.79602130_wp, & + & -4.49565810_wp, -0.60381030_wp, 4.09648470_wp, -3.58909020_wp, & + & 0.19672560_wp, 4.08516960_wp, -5.36862960_wp, -1.43748650_wp, & + & 2.71094900_wp, -3.56730710_wp, 0.07455800_wp, 2.13091750_wp, & + & -2.86564450_wp, 0.66704660_wp, 5.04573050_wp, -0.88611920_wp, & + & -1.85183620_wp, 5.37679170_wp, -1.87694060_wp, -2.16188070_wp, & + & 5.93492540_wp, -0.31336420_wp, -1.58760310_wp, 4.45396500_wp, & + & -1.01457580_wp, -0.94802450_wp, 4.49195250_wp, 1.98961260_wp, & + & -6.01411710_wp, 3.68653060_wp, 2.25620840_wp, -6.69669730_wp, & + & 4.97065190_wp, 2.91196810_wp, -5.68700100_wp, 5.23758560_wp, & + & 1.43019950_wp, -6.57890270_wp, 4.74236360_wp, 2.67996360_wp, & + & -1.15923770_wp, 4.96651110_wp, 3.16705120_wp, -2.10807440_wp, & + & 5.67371000_wp, 2.25738820_wp, -0.78317640_wp, 4.06789160_wp, & + & 1.85813190_wp, -1.38681140_wp, 4.75276780_wp, 6.44261140_wp, & + & 2.29003130_wp, 5.27520880_wp, 6.02331490_wp, 3.14739840_wp, & + & 5.48914740_wp, 7.00625140_wp, 1.71781290_wp, 4.01149800_wp, & + & 7.14754130_wp, 2.66404060_wp, 4.74063360_wp, -6.44224480_wp, & + & -2.25362640_wp, 3.99319200_wp, -7.12984370_wp, -2.64695320_wp, & + & 5.30041120_wp, -6.04052590_wp, -3.09563580_wp, 5.44482230_wp, & + & -7.02251320_wp, -1.65746910_wp, 4.74945210_wp, -2.65124200_wp, & + & 1.16184920_wp, 4.96252860_wp, -3.13973230_wp, 2.11261930_wp, & + & 5.68787190_wp, -2.24037680_wp, 0.79062650_wp, 4.08361370_wp, & + & -1.82097830_wp, 1.38494580_wp, 4.49303280_wp, -2.08238100_wp, & + & 5.98319850_wp, 3.68970150_wp, -2.36469860_wp, 6.66198680_wp, & + & 4.96725230_wp, -2.99739200_wp, 5.63053680_wp, 5.24257940_wp, & + & -1.54010240_wp, 6.55901460_wp, 5.01064490_wp, 0.97118760_wp, & + & 1.93783510_wp, 5.91668240_wp, 0.43720030_wp, 1.65084300_wp, & + & 4.41817330_wp, 1.12660610_wp, 1.03859250_wp, 5.30979740_wp, & + & 1.95662770_wp, 2.29479650_wp, 2.70872440_wp, 5.26495400_wp, & + & 1.47086290_wp, 2.11979230_wp, 5.91537890_wp, 2.10910300_wp, & + & 2.03222230_wp, 4.39296160_wp, 0.74250290_wp, 2.03102450_wp, & + & -0.46512420_wp, 3.67290370_wp, 2.02973490_wp, -4.35673880_wp, & + & -0.73466570_wp, 2.04375840_wp, 0.40803200_wp, -3.66220190_wp, & + & 2.58920660_wp, -1.18018620_wp, 4.63492340_wp, 1.90992640_wp, & + & -1.72181000_wp, 5.28525060_wp, 2.70104790_wp, -5.23956890_wp, & + & -1.45518060_wp, 2.10812270_wp, -5.89297810_wp, -2.08668370_wp, & + & 2.82026930_wp, 0.21864690_wp, 2.86422800_wp, 2.33058690_wp, & + & 0.79562850_wp, 2.08548890_wp, 2.59317050_wp, 1.09927850_wp, & + & -4.64655710_wp, 1.90709560_wp, 1.60396850_wp, -5.31908910_wp, & + & 6.42725810_wp, -3.21230840_wp, -4.15221630_wp, 6.59853430_wp, & + & -3.69084720_wp, -3.30900410_wp, 6.90465760_wp, 4.35286200_wp, & + & -3.29694830_wp, 6.84584840_wp, 3.40806970_wp, -3.56835790_wp, & + & 6.66630630_wp, 3.25562100_wp, 4.18674240_wp, 6.72576650_wp, & + & 3.70780000_wp, 3.31360980_wp, 6.90845690_wp, -4.35237180_wp, & + & 3.29425720_wp, 6.84074700_wp, -3.41169790_wp, 3.57739750_wp, & + & 5.27312070_wp, -3.73009080_wp, -4.77198360_wp, 5.04914570_wp, & + & -3.11779890_wp, -5.64540110_wp, 5.41929840_wp, -4.75768980_wp, & + & -5.11882240_wp, 4.39638390_wp, -3.70872900_wp, -4.11632410_wp, & + & 6.45718460_wp, 5.16455590_wp, -4.35572320_wp, 5.38334040_wp, & + & 5.05856210_wp, -4.54559670_wp, 6.64529410_wp, 6.20603920_wp, & + & -4.09666820_wp, 6.98868390_wp, 4.95272940_wp, -5.28845660_wp, & + & 5.87884890_wp, 4.02146290_wp, 5.06639030_wp, 4.84451500_wp, & + & 4.12847050_wp, 4.72287510_wp, 5.85695120_wp, 3.51953880_wp, & + & 6.03342030_wp, 6.29373950_wp, 5.02208360_wp, 5.22369580_wp, & + & 6.49320430_wp, -5.18701310_wp, 4.34821760_wp, 5.41840050_wp, & + & -5.11438890_wp, 4.54765000_wp, 6.70931500_wp, -6.21995310_wp, & + & 4.07697440_wp, 7.02597170_wp, -4.96921960_wp, 5.27880870_wp, & + & -7.27029250_wp, 4.19305250_wp, -3.23776410_wp, -7.36601880_wp, & + & 3.25001170_wp, -3.51705010_wp, -6.23695710_wp, 4.79274610_wp, & + & -3.97957640_wp, -6.18623810_wp, 5.84795430_wp, -3.71405240_wp, & + & -5.25599990_wp, 4.34870470_wp, -3.77521780_wp, -6.41923780_wp, & + & 4.72608540_wp, -5.05607600_wp, -7.30778550_wp, -3.27119910_wp, & + & -4.20122150_wp, -7.39490140_wp, -3.59408080_wp, -3.27169890_wp, & + & -6.31118670_wp, -4.01531130_wp, -4.85780430_wp, -6.27689180_wp, & + & -3.70527730_wp, -5.90141140_wp, -5.31458890_wp, -3.85954640_wp, & + & -4.42950420_wp, -6.52448800_wp, -5.08785470_wp, -4.83341770_wp, & + & -7.28230880_wp, -4.21026350_wp, 3.22112080_wp, -7.37892890_wp, & + & -3.26710260_wp, 3.49972480_wp, -6.25056700_wp, -4.80932430_wp, & + & 3.96564850_wp, -6.19790510_wp, -5.86429850_wp, 3.69957530_wp, & + & -5.26947250_wp, -4.36410170_wp, 3.76452930_wp, -6.43614050_wp, & + & -4.74356700_wp, 5.04164050_wp, -7.31596040_wp, 3.25298220_wp, & + & 4.18561040_wp, -7.39948600_wp, 3.57541040_wp, 3.25559850_wp, & + & -6.31981910_wp, 3.99535850_wp, 4.84485870_wp, -6.28983590_wp, & + & 3.68628850_wp, 5.88888460_wp, -5.32214600_wp, 3.83677060_wp, & + & 4.42013610_wp, -6.53050210_wp, 5.06837720_wp, 4.81867800_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine lnci16_brcap + +subroutine lnci16_dna(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 910 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", & + & "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & + & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "N", "N", & + & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & + & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & + & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & + & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & + & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & + & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & + & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & + & "C", "C", "C", "C", "C", "C", "C", "C", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & + & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & 18.08558277_wp, -5.10686976_wp, -6.62572227_wp, 15.87607995_wp, & + & -8.86345290_wp, -1.32672576_wp, 12.96989554_wp, -7.99847606_wp, & + & 4.19927174_wp, 9.66560312_wp, -4.63454978_wp, 8.64895448_wp, & + & 5.57545602_wp, 0.88379427_wp, 10.02684957_wp, 1.78697521_wp, & + & 4.56859362_wp, 6.82096694_wp, 0.05232934_wp, 7.57803417_wp, & + & 2.04777988_wp, -3.34921718_wp, 9.34754856_wp, -3.91967457_wp, & + & -6.28541506_wp, 5.05375495_wp, -7.65836437_wp, -9.94499141_wp, & + & -0.25389290_wp, -8.60037092_wp, -12.98875920_wp, -5.36714892_wp, & + & -6.33567040_wp, -15.65848196_wp, -8.75961662_wp, -1.32448508_wp, & + & -19.14820552_wp, -7.90919645_wp, 4.26068727_wp, -18.04267114_wp, & + & 6.51691851_wp, -5.99352630_wp, -15.52758632_wp, 8.67809683_wp, & + & -0.54085380_wp, -12.00766574_wp, 8.31742224_wp, 4.84604025_wp, & + & -7.90192653_wp, 4.82651320_wp, 9.15739471_wp, -5.18302816_wp, & + & -0.79214371_wp, 8.83428734_wp, -2.92606929_wp, -6.12879086_wp, & + & 5.70479170_wp, -0.56285937_wp, -9.00093995_wp, 0.82683112_wp, & + & 2.64175036_wp, -8.97778101_wp, -4.75732066_wp, 6.55582486_wp, & + & -4.85809798_wp, -8.31283487_wp, 8.83815104_wp, 0.58719490_wp, & + & -8.14252321_wp, 11.62663870_wp, 5.95365524_wp, -5.97274253_wp, & + & 15.66621512_wp, 9.01446680_wp, -1.69198788_wp, 18.73117287_wp, & + & 8.28770040_wp, 3.60074931_wp, -19.81059031_wp, -9.30977876_wp, & + & 3.70973505_wp, -16.18242565_wp, -9.59777030_wp, -2.63822559_wp, & + & -13.71402434_wp, -5.01781505_wp, -7.77050649_wp, -10.57200829_wp, & + & 0.88456934_wp, -9.61133029_wp, -6.82598351_wp, 6.54323341_wp, & + & -8.11075467_wp, -3.99803122_wp, 10.80198721_wp, -3.50125967_wp, & + & -0.45173051_wp, 7.86499999_wp, 3.58536656_wp, 17.58058843_wp, & + & 8.38159203_wp, 4.49594541_wp, 18.52876449_wp, 7.11852580_wp, & + & 2.47563747_wp, 0.99365081_wp, 4.16874654_wp, 8.20970321_wp, & + & 4.96052017_wp, 0.35217641_wp, 11.45612122_wp, 18.20923303_wp, & + & 5.94089257_wp, -0.48975517_wp, 9.20427063_wp, -6.20780261_wp, & + & 8.80265428_wp, 17.13680457_wp, 8.67706840_wp, -1.04483661_wp, & + & 12.50868088_wp, -9.34571915_wp, 3.37019813_wp, 15.18558107_wp, & + & -9.88959971_wp, -2.41409909_wp, 17.28695134_wp, -4.80420678_wp, & + & -8.02825721_wp, -17.23606480_wp, 6.50907610_wp, -7.42711119_wp, & + & 16.86623178_wp, 3.03620895_wp, -0.95860494_wp, -15.14229570_wp, & + & 9.48482717_wp, -1.92113221_wp, -11.54281764_wp, 9.68561460_wp, & + & 4.06091938_wp, -7.02284760_wp, 6.07815604_wp, 9.76740164_wp, & + & -4.34153417_wp, 0.18075610_wp, 9.86387261_wp, -2.22794958_wp, & + & -6.20948600_wp, 7.19334633_wp, -0.15012653_wp, -9.53375581_wp, & + & 2.32792517_wp, 2.65847422_wp, -10.08541408_wp, -5.95959497_wp, & + & 7.22623636_wp, -6.06603623_wp, -9.20884740_wp, 9.45292355_wp, & + & -0.32042898_wp, -9.36983783_wp, 11.89804063_wp, 5.71013385_wp, & + & -7.57640129_wp, 16.29433216_wp, 9.71946469_wp, -3.04048881_wp, & + & 19.13546668_wp, 9.55266431_wp, 2.62875693_wp, 19.84274887_wp, & + & 1.28774243_wp, -3.22977832_wp, 18.25991655_wp, -0.62903843_wp, & + & -8.67896799_wp, 17.76930128_wp, -0.44633261_wp, -5.47737058_wp, & + & 18.17250982_wp, -3.62025383_wp, -5.95312039_wp, 19.41595123_wp, & + & -5.71039395_wp, -6.62354519_wp, 14.66136175_wp, 9.70298348_wp, & + & -0.89033957_wp, 15.05168893_wp, 7.60904391_wp, -2.26388667_wp, & + & 22.39205035_wp, 4.92856333_wp, 6.63485217_wp, 17.60134565_wp, & + & -1.49607649_wp, 1.98428978_wp, 14.54752421_wp, 4.80722881_wp, & + & -3.58809298_wp, 16.85840280_wp, -5.97161317_wp, -5.95687467_wp, & + & 13.10400018_wp, 6.56569750_wp, -5.61995732_wp, 15.91756862_wp, & + & -4.76157915_wp, -3.34196915_wp, 16.11152732_wp, -7.52336078_wp, & + & -2.22753160_wp, 17.10559774_wp, -9.22730893_wp, -0.62869338_wp, & + & 14.38402064_wp, -2.89901919_wp, -0.67696040_wp, 14.49567875_wp, & + & -8.68014237_wp, -0.45821731_wp, 13.33417562_wp, -5.88034831_wp, & + & -0.04828353_wp, 13.16482561_wp, -6.93870250_wp, 2.96872798_wp, & + & 14.17293836_wp, 1.72065191_wp, 2.22253909_wp, 14.15925080_wp, & + & -8.05492907_wp, 5.04885458_wp, 10.83690304_wp, 1.23761738_wp, & + & 2.78540464_wp, 11.53769664_wp, -7.71820041_wp, 4.93882914_wp, & + & 10.23464250_wp, -5.20839271_wp, 3.98129816_wp, 10.00371051_wp, & + & -4.57410881_wp, 7.05120829_wp, 10.75840313_wp, -4.12706053_wp, & + & 9.47560036_wp, 21.92870397_wp, 5.48696680_wp, 4.15088856_wp, & + & 7.74714353_wp, 2.01243899_wp, 2.55299971_wp, 7.91806774_wp, & + & -2.42576801_wp, 3.70419544_wp, 8.17664275_wp, -3.97688141_wp, & + & 8.82043190_wp, 6.46847761_wp, -1.91104213_wp, 6.95908094_wp, & + & 6.39777067_wp, -0.44395234_wp, 9.53131940_wp, 6.36867462_wp, & + & 2.11353561_wp, 10.01746493_wp, 4.16783251_wp, 0.85654136_wp, & + & 9.17946717_wp, 3.12985246_wp, -0.09863627_wp, 6.31497813_wp, & + & 2.63525063_wp, 3.19594257_wp, 6.52004906_wp, 2.60438137_wp, & + & 5.77982382_wp, 6.82777434_wp, 10.45490551_wp, 6.70480461_wp, & + & -5.52510904_wp, 11.55575997_wp, 4.40985997_wp, -5.44339147_wp, & + & 20.20647464_wp, 8.08242350_wp, 4.28509790_wp, 1.48223065_wp, & + & 0.34856805_wp, 2.06533379_wp, 11.64140789_wp, 1.30093081_wp, & + & -5.20859593_wp, 0.50086465_wp, 4.47467014_wp, 5.81203952_wp, & + & 10.23166171_wp, 1.42808661_wp, -7.90482987_wp, -0.34247205_wp, & + & 3.05190304_wp, 3.28184394_wp, -0.07787318_wp, 5.94998318_wp, & + & 1.99865660_wp, 1.37343167_wp, 8.01819640_wp, 1.60690211_wp, & + & -1.52185028_wp, 0.37336297_wp, -3.29624716_wp, 10.90157166_wp, & + & -0.18270984_wp, -2.49770248_wp, -1.24667715_wp, 8.21119992_wp, & + & 1.27425933_wp, -2.86726526_wp, 6.46349685_wp, -0.93422803_wp, & + & -2.66481730_wp, 8.91573532_wp, -2.49527898_wp, -2.44083798_wp, & + & 9.27508166_wp, -5.06220493_wp, -4.77238969_wp, 8.53040915_wp, & + & -3.99691750_wp, -6.12405759_wp, 5.87309701_wp, -3.00604093_wp, & + & -5.96280067_wp, 5.30084525_wp, -6.07419009_wp, -5.15783178_wp, & + & 4.43072431_wp, -8.34302979_wp, -7.78721313_wp, -1.93512844_wp, & + & -1.74253149_wp, -8.07630306_wp, 2.58413910_wp, -2.30181145_wp, & + & -7.75684267_wp, 4.33392505_wp, -7.78282871_wp, -8.95672670_wp, & + & 3.08350765_wp, -5.27815367_wp, -9.34175441_wp, 0.67618556_wp, & + & -7.39879704_wp, -8.95653470_wp, -1.21263684_wp, -9.08304620_wp, & + & -10.82885079_wp, -1.93010945_wp, 1.08543989_wp, -11.40382972_wp, & + & -0.82367121_wp, -8.10383758_wp, -12.43828454_wp, -0.74746640_wp, & + & -5.26483997_wp, 7.59697993_wp, 1.33249136_wp, -8.30382477_wp, & + & 8.71163594_wp, -0.50924177_wp, -6.93313217_wp, -12.60644111_wp, & + & -3.88330214_wp, -5.76104342_wp, -11.82834742_wp, -6.24713560_wp, & + & -6.27881405_wp, 9.32093508_wp, -3.07299240_wp, -5.02309654_wp, & + & -14.10392260_wp, -1.70014970_wp, -1.94480667_wp, 7.93608704_wp, & + & -4.31406338_wp, -7.60572463_wp, -14.38128832_wp, -5.83604675_wp, & + & -5.59881873_wp, -15.54104872_wp, -4.49779518_wp, -3.02607372_wp, & + & -15.50039206_wp, -7.24662580_wp, -1.91760631_wp, -14.42823537_wp, & + & -9.12369296_wp, -0.62584104_wp, -16.93422828_wp, -0.27506641_wp, & + & 2.99558090_wp, -17.07594461_wp, -8.89407318_wp, -0.50311969_wp, & + & -18.16894850_wp, -6.10217837_wp, -0.01633849_wp, -18.59449652_wp, & + & -7.24908259_wp, 2.87171608_wp, -18.09543641_wp, -7.91431880_wp, & + & 5.27241889_wp, -20.16979351_wp, -3.01472057_wp, 0.98649653_wp, & + & -20.58246675_wp, -7.20129072_wp, 4.62679606_wp, -21.74598427_wp, & + & -4.45697970_wp, 3.60390834_wp, -22.41324496_wp, -3.19452034_wp, & + & 5.74341441_wp, -20.20939174_wp, 2.39278919_wp, 0.01943054_wp, & + & -19.10199850_wp, 2.90168942_wp, -9.11424637_wp, -18.21630437_wp, & + & 1.65333192_wp, -6.17699469_wp, -18.47409981_wp, 4.94497608_wp, & + & -5.87498321_wp, -19.16365186_wp, 7.43744006_wp, -5.81286595_wp, & + & 20.87268979_wp, -0.58791773_wp, 1.75855992_wp, -17.03382370_wp, & + & 1.90630030_wp, -1.94796583_wp, -16.71569929_wp, 6.71686237_wp, & + & -5.05705236_wp, -15.77148326_wp, 4.67720295_wp, -3.00497931_wp, & + & -15.66574858_wp, 7.15460651_wp, -1.10867334_wp, -16.71181174_wp, & + & 9.05614613_wp, 0.22924617_wp, 5.69057910_wp, -3.89399485_wp, & + & -8.99187788_wp, 5.80659548_wp, -5.71937092_wp, -7.13624483_wp, & + & -13.61965488_wp, 0.08323217_wp, 3.19537541_wp, -14.06909696_wp, & + & 8.84764567_wp, 0.18961228_wp, 6.05493827_wp, -5.62905269_wp, & + & -4.16727641_wp, -12.75567850_wp, 6.17933324_wp, 0.66245404_wp, & + & 4.16129829_wp, -8.38341652_wp, -4.83024384_wp, -12.43405487_wp, & + & 7.36666168_wp, 3.58450882_wp, -13.04881946_wp, 8.40555044_wp, & + & 5.86707300_wp, -10.43157091_wp, 3.47725442_wp, 2.00650256_wp, & + & -10.51250298_wp, 7.80921961_wp, 5.27562722_wp, 5.15699333_wp, & + & -4.05535276_wp, -1.00931554_wp, -8.92061078_wp, 4.91388538_wp, & + & 4.97754544_wp, -8.71730516_wp, 5.51687302_wp, 7.91273677_wp, & + & 4.30876061_wp, 0.10777928_wp, -2.70176992_wp, -8.79420294_wp, & + & 4.05878191_wp, 10.01564129_wp, -6.58749908_wp, 4.08787284_wp, & + & 8.48728520_wp, -5.66297513_wp, 2.90216897_wp, 5.75629860_wp, & + & -5.65811691_wp, 0.30331891_wp, 7.71433379_wp, -6.30671266_wp, & + & -1.58364744_wp, 9.32866353_wp, -4.86180478_wp, -2.86003362_wp, & + & -0.25676159_wp, -4.25953118_wp, 0.32368707_wp, 2.96365722_wp, & + & -3.87664935_wp, -1.58681012_wp, 8.25150278_wp, -2.99708848_wp, & + & -1.40128977_wp, 5.37259959_wp, -3.21067302_wp, -4.52827211_wp, & + & 5.54203095_wp, -4.11904254_wp, -6.90952980_wp, 5.39980093_wp, & + & -1.62790984_wp, -1.80909393_wp, 1.68215507_wp, -1.52723658_wp, & + & -6.44827273_wp, 4.90033679_wp, -0.33609125_wp, -4.67556387_wp, & + & 2.72887792_wp, -0.48999274_wp, -7.38377771_wp, 1.05646485_wp, & + & -1.84038995_wp, -9.37848687_wp, 0.22765350_wp, 1.47692662_wp, & + & -8.06940897_wp, -4.77713361_wp, 2.75081823_wp, -9.97242612_wp, & + & -3.45632381_wp, 1.33749177_wp, -1.02174205_wp, -3.15046772_wp, & + & 0.81137086_wp, -9.48116975_wp, 0.07473717_wp, 2.51439466_wp, & + & -7.32455954_wp, -1.68375116_wp, 16.93238515_wp, 4.46160901_wp, & + & 0.85197569_wp, 17.14911367_wp, 2.04232480_wp, 1.09216627_wp, & + & 17.50501416_wp, 1.08038606_wp, 3.18820724_wp, 20.84637774_wp, & + & -2.34216012_wp, -0.50678928_wp, 1.00010520_wp, -5.60310303_wp, & + & -2.25834421_wp, 20.28542712_wp, -0.50090712_wp, -1.84524570_wp, & + & 0.83147110_wp, -4.04135117_wp, -3.93100940_wp, 19.77221214_wp, & + & -0.79489620_wp, -4.22202487_wp, 17.21434596_wp, -1.86750687_wp, & + & -2.15869906_wp, 17.14437982_wp, 0.49041173_wp, -2.21546536_wp, & + & 1.56431288_wp, -1.75977947_wp, -1.01044514_wp, 17.26246519_wp, & + & -0.59758103_wp, -0.07755441_wp, 1.66077374_wp, -2.41446269_wp, & + & 1.30283658_wp, 1.36997370_wp, -4.09589261_wp, -0.32852214_wp, & + & 17.89996484_wp, -4.27692067_wp, 0.48926755_wp, 17.62060399_wp, & + & -4.27416695_wp, -1.79081609_wp, 13.43668180_wp, 4.43463268_wp, & + & -1.52888681_wp, 14.54122402_wp, -0.82726809_wp, 3.48046308_wp, & + & 14.42509230_wp, -1.85933173_wp, 1.37476738_wp, 13.69906376_wp, & + & 4.48116224_wp, 0.75507255_wp, 14.63158351_wp, -4.28653158_wp, & + & 1.15402229_wp, 14.10697561_wp, 0.78240505_wp, 0.15349233_wp, & + & 11.41375125_wp, -2.77341077_wp, 1.76567443_wp, 11.60451587_wp, & + & -2.00947887_wp, -0.46798946_wp, 11.18641466_wp, -0.39795924_wp, & + & 1.24697663_wp, 14.02862337_wp, -0.33829057_wp, -1.96978283_wp, & + & 11.13267646_wp, -1.03489356_wp, 4.96261259_wp, 11.43395615_wp, & + & -3.18389124_wp, 4.20568383_wp, 13.68053689_wp, 2.00031921_wp, & + & -1.91949596_wp, 7.81019601_wp, -0.19214602_wp, 3.10365919_wp, & + & 7.89987897_wp, -0.87000188_wp, 5.41438824_wp, 4.68431404_wp, & + & -1.39175402_wp, 3.09990502_wp, 4.76231478_wp, -0.84788069_wp, & + & 0.72532881_wp, 4.72091134_wp, 1.36365296_wp, -0.14071365_wp, & + & 4.41069968_wp, 2.23841927_wp, 2.86450503_wp, 4.51443664_wp, & + & 0.65495829_wp, 4.53561310_wp, -1.78847843_wp, -3.99028962_wp, & + & 0.96446493_wp, 1.79969601_wp, 1.71232924_wp, -2.36426162_wp, & + & 1.60805643_wp, 0.99790920_wp, -0.13753798_wp, -1.71801919_wp, & + & -2.11556120_wp, -0.60086563_wp, 1.34802893_wp, 2.62236318_wp, & + & 1.66907669_wp, -1.95996362_wp, -2.45636244_wp, -2.90980508_wp, & + & 10.39545179_wp, 1.93051484_wp, -3.27612589_wp, -1.64700016_wp, & + & 2.96636486_wp, -0.02793121_wp, -1.52315215_wp, 1.03343049_wp, & + & 1.31565361_wp, -1.53383325_wp, 0.75551663_wp, -1.06037722_wp, & + & 10.75738202_wp, 1.46682331_wp, -0.90443353_wp, -1.13668705_wp, & + & 3.51656918_wp, -3.59223696_wp, -1.38836016_wp, 4.78010981_wp, & + & -1.69077822_wp, 10.48083606_wp, 3.15392236_wp, 0.68997700_wp, & + & -4.87107088_wp, 3.21116866_wp, -0.65594323_wp, -4.71071360_wp, & + & 0.79285111_wp, -0.45686005_wp, -4.69788084_wp, -0.70511591_wp, & + & -2.27843865_wp, -4.55397047_wp, 1.91321540_wp, -4.05143374_wp, & + & -4.70102711_wp, 3.97377520_wp, -3.03355344_wp, 20.54208613_wp, & + & 3.62084662_wp, 3.80585875_wp, -7.92499228_wp, 0.30537775_wp, & + & -2.04047911_wp, -7.76714797_wp, 1.31003854_wp, -4.22155933_wp, & + & -10.92195578_wp, 0.56111664_wp, -2.26467929_wp, -10.76642226_wp, & + & 2.36672719_wp, -0.74391226_wp, -10.88340002_wp, 0.13345808_wp, & + & 0.13942305_wp, -10.98793577_wp, -3.06622677_wp, -1.85209136_wp, & + & -10.97759748_wp, -1.54331438_wp, -3.57851579_wp, 20.95467934_wp, & + & 1.40050416_wp, 4.23049538_wp, -13.63525398_wp, -2.70104146_wp, & + & 2.56132311_wp, -4.59030772_wp, -1.85798156_wp, 3.68333666_wp, & + & -13.87432960_wp, -2.17331539_wp, 0.29525307_wp, -13.93968181_wp, & + & -3.93591304_wp, -1.39373460_wp, -4.57245832_wp, -1.28819952_wp, & + & 1.34902304_wp, 7.82145381_wp, -1.80052316_wp, -3.68511618_wp, & + & 7.48548369_wp, 0.42299437_wp, -3.18298945_wp, -16.95989601_wp, & + & -2.85405117_wp, -0.29127798_wp, -17.01110586_wp, -0.91236099_wp, & + & -1.63264325_wp, -16.96048083_wp, -0.64725113_wp, 0.75621840_wp, & + & -16.87694551_wp, -3.41227807_wp, 3.31082590_wp, -16.90211634_wp, & + & -4.67588131_wp, 1.38867288_wp, 7.72990160_wp, 1.41359144_wp, & + & -0.22813799_wp, 8.06062427_wp, -0.87713810_wp, 0.31588098_wp, & + & -20.08261343_wp, 1.32456618_wp, 2.64039794_wp, -20.06937104_wp, & + & -0.85864051_wp, 1.78058144_wp, 8.27473605_wp, -2.63783652_wp, & + & -1.36061319_wp, -20.14387286_wp, -2.77779636_wp, 3.28612105_wp, & + & -19.88529078_wp, -0.12767044_wp, -3.30026023_wp, -20.08881914_wp, & + & -1.92210942_wp, -1.75730491_wp, -20.11923660_wp, 0.31427366_wp, & + & -0.90431084_wp, -20.23518145_wp, 3.48980827_wp, -2.91454431_wp, & + & 20.20236752_wp, 3.51547980_wp, 1.35575170_wp, -20.00104869_wp, & + & 1.97574208_wp, -4.63733516_wp, -17.12841559_wp, 2.56137047_wp, & + & 2.66338651_wp, -17.05941762_wp, 2.21227909_wp, 0.33559287_wp, & + & -17.21328438_wp, 4.09022056_wp, -1.22513053_wp, 20.42394578_wp, & + & 1.24571553_wp, 0.49430889_wp, -14.04341941_wp, 2.92623437_wp, & + & 0.15864803_wp, -14.27539348_wp, 1.08013865_wp, -1.30389935_wp, & + & -13.87176977_wp, 0.64130364_wp, 1.01106372_wp, -13.67008467_wp, & + & 3.19491636_wp, 3.77746624_wp, -7.22632068_wp, 1.45030026_wp, & + & 4.72232508_wp, -13.93235467_wp, 4.60002846_wp, 1.97620480_wp, & + & -7.56333689_wp, -0.76863095_wp, 4.20883184_wp, 4.68807182_wp, & + & -3.91297172_wp, -3.27418037_wp, -10.78051175_wp, -0.83246948_wp, & + & 3.69209432_wp, -7.83022572_wp, -1.62715595_wp, 1.16944667_wp, & + & -7.81989807_wp, 0.69984787_wp, 0.74206330_wp, -10.63396103_wp, & + & 1.33297746_wp, 2.81595343_wp, -7.35713719_wp, 2.40244832_wp, & + & 2.41567253_wp, -10.45288524_wp, 3.25561969_wp, 4.31101838_wp, & + & 4.80207351_wp, -1.95047174_wp, -1.88646646_wp, 19.99133739_wp, & + & 3.12047887_wp, -0.96186233_wp, 19.42033525_wp, 7.04653763_wp, & + & 1.32677059_wp, 18.60510044_wp, 7.22547622_wp, 0.04351487_wp, & + & 17.27211783_wp, 7.99945084_wp, 0.23061172_wp, 16.24270426_wp, & + & 6.89799881_wp, 0.50155606_wp, 16.85566908_wp, 5.61007735_wp, & + & -0.07830973_wp, 1.03833118_wp, -9.20348465_wp, -1.33738052_wp, & + & 16.97449439_wp, 3.12223028_wp, 0.26100552_wp, 0.26125788_wp, & + & -8.01539541_wp, -1.90226350_wp, 17.25414245_wp, 2.19788359_wp, & + & 2.45524650_wp, 1.14056546_wp, -6.82667283_wp, -1.49519539_wp, & + & 3.59435450_wp, -0.90125936_wp, -5.32189583_wp, 4.11467290_wp, & + & -1.75859099_wp, -4.22415123_wp, -7.93173281_wp, 6.09930503_wp, & + & 6.83939764_wp, -8.87742072_wp, 6.20169591_wp, 5.64445733_wp, & + & 4.40026782_wp, -1.08357382_wp, -2.94508608_wp, -10.34701667_wp, & + & 6.56835196_wp, 6.01078669_wp, 17.18230444_wp, 3.51474629_wp, & + & 3.04966733_wp, -11.18586508_wp, 5.39409675_wp, 5.50615403_wp, & + & -10.28078499_wp, 4.70277859_wp, 4.46796635_wp, 17.03901317_wp, & + & 4.60148666_wp, 2.23566328_wp, -10.49931171_wp, 2.69754248_wp, & + & 2.94224206_wp, 4.90678604_wp, -3.34640829_wp, -1.96336516_wp, & + & -7.37924112_wp, 1.37961701_wp, 3.33153573_wp, -10.77173283_wp, & + & 0.51750172_wp, 3.90764189_wp, -7.60441022_wp, 1.99448015_wp, & + & 1.15037894_wp, -10.81579886_wp, 1.07327742_wp, 5.24654643_wp, & + & -10.67406702_wp, 2.41872419_wp, 5.40731106_wp, 19.93349498_wp, & + & -2.17080138_wp, -4.07444439_wp, 20.32210047_wp, -2.71480551_wp, & + & -2.88206894_wp, 0.76791438_wp, -5.34205102_wp, -3.66238414_wp, & + & 20.47075780_wp, -1.85114076_wp, -1.73393565_wp, 1.12312186_wp, & + & -3.38890025_wp, -2.71659145_wp, 19.96658437_wp, 0.08658362_wp, & + & -3.05502363_wp, 1.33595150_wp, -1.99651522_wp, -2.42220443_wp, & + & 19.19281333_wp, -0.19427745_wp, -5.45218164_wp, 19.77468819_wp, & + & -0.75642491_wp, -6.75797644_wp, 18.59694917_wp, -1.38889017_wp, & + & -7.52234494_wp, 17.40794620_wp, -1.37978372_wp, -6.52650947_wp, & + & 20.17716543_wp, 2.61606321_wp, 0.31839709_wp, -7.78090427_wp, & + & -0.34258289_wp, 1.64803721_wp, 4.82249931_wp, -5.37330923_wp, & + & -3.41514239_wp, -11.54367088_wp, 7.31862716_wp, 2.43035704_wp, & + & -12.41553109_wp, 7.48366550_wp, 1.17829419_wp, 3.69304703_wp, & + & -6.03413165_wp, -4.21576530_wp, -13.78232789_wp, 8.17449220_wp, & + & 1.44163534_wp, 4.34965540_wp, -6.98536767_wp, -5.20467520_wp, & + & -14.69694085_wp, 7.00268175_wp, 1.81736324_wp, -14.07269544_wp, & + & 5.77934095_wp, 1.11848391_wp, -7.58443333_wp, -0.01140251_wp, & + & 3.02568234_wp, -13.74248133_wp, 4.47104807_wp, 3.39868792_wp, & + & -7.36555069_wp, 0.10562731_wp, 5.20020734_wp, -13.76695352_wp, & + & 2.42928930_wp, 2.60345575_wp, -13.73453947_wp, 1.00601881_wp, & + & 2.40293623_wp, 5.87744279_wp, -6.79144316_wp, -5.01333176_wp, & + & -7.06276258_wp, 2.70582765_wp, 5.47512320_wp, -14.03327926_wp, & + & 1.56755940_wp, -0.04208395_wp, -7.79405127_wp, 2.67265140_wp, & + & 6.82930918_wp, 4.24891451_wp, -3.10163955_wp, -4.34649608_wp, & + & -13.89727217_wp, 3.29269683_wp, 1.46863833_wp, 17.02594758_wp, & + & -2.72751418_wp, -5.90946564_wp, 15.85255006_wp, 6.80612609_wp, & + & -3.17144902_wp, 14.86190476_wp, 6.11468481_wp, -4.11609600_wp, & + & 17.43830016_wp, -2.95051785_wp, -1.35337679_wp, 2.52460548_wp, & + & -8.73265366_wp, -1.33357443_wp, 1.51506625_wp, -2.76021580_wp, & + & -0.02315189_wp, 17.16815045_wp, -0.67516054_wp, -1.47795166_wp, & + & 1.22364678_wp, -4.34391227_wp, -1.66650953_wp, 13.49672465_wp, & + & 6.84148856_wp, -4.25069284_wp, 17.52146424_wp, -1.73053734_wp, & + & 0.79283551_wp, 17.63017802_wp, -2.96577626_wp, 0.06117740_wp, & + & -6.70690494_wp, 2.76307507_wp, 7.90555144_wp, 6.65879868_wp, & + & -6.55700967_wp, -6.30692217_wp, 17.87642833_wp, -5.04539107_wp, & + & -0.60002136_wp, -14.67971227_wp, 6.63870589_wp, -2.04862834_wp, & + & -15.42558307_wp, 6.05815788_wp, -3.25075503_wp, 17.36221234_wp, & + & -4.62814873_wp, -3.18187807_wp, -16.76552614_wp, 6.75660229_wp, & + & -3.61088475_wp, 17.99173321_wp, -5.92808298_wp, -3.69515399_wp, & + & -17.83923212_wp, 5.89738258_wp, -2.93446141_wp, -17.16521634_wp, & + & 4.54507788_wp, -2.64233846_wp, 12.64405066_wp, 6.20787064_wp, & + & -3.14678588_wp, -17.09626185_wp, 2.64964513_wp, -0.98147560_wp, & + & 16.91565317_wp, -6.51487275_wp, -4.61266637_wp, -5.36236218_wp, & + & 2.62953237_wp, 7.14365100_wp, -17.11429066_wp, 3.08873587_wp, & + & 1.37344374_wp, -4.67549367_wp, 1.26146248_wp, 7.23340301_wp, & + & -17.22654653_wp, 4.50402843_wp, 1.14274380_wp, -17.27815877_wp, & + & 4.96254652_wp, -0.14898468_wp, 13.25207338_wp, 4.81064478_wp, & + & -2.93223776_wp, 15.58729473_wp, -6.01033640_wp, -3.98082890_wp, & + & 14.97886028_wp, -6.97024136_wp, -2.95286447_wp, 13.49770825_wp, & + & 5.23124885_wp, -0.32836480_wp, 22.70298628_wp, 6.27277769_wp, & + & 6.26408144_wp, 14.67756091_wp, -4.39358556_wp, 2.54052794_wp, & + & 14.60475467_wp, -3.28973546_wp, 3.34434187_wp, 14.50449086_wp, & + & -1.98619529_wp, 2.73037759_wp, 14.46816479_wp, -2.96168359_wp, & + & 0.53971714_wp, 14.69128720_wp, -5.46402097_wp, 0.24828202_wp, & + & 15.41067305_wp, -6.69794260_wp, 0.82567425_wp, 13.81643293_wp, & + & 3.15719289_wp, 0.30373912_wp, 14.41169106_wp, -7.85373599_wp, & + & 0.72935932_wp, 14.03409957_wp, 1.93355811_wp, 1.02997202_wp, & + & -17.43752365_wp, 3.93678262_wp, -6.02176605_wp, -17.95533669_wp, & + & 2.84030087_wp, -6.96453247_wp, 13.03542990_wp, -7.15861545_wp, & + & 0.55409102_wp, -19.27437564_wp, 3.15248491_wp, -7.72330714_wp, & + & 12.23773326_wp, -6.95846608_wp, 1.84591926_wp, -20.34100441_wp, & + & 2.23348929_wp, -7.09673319_wp, -19.63387943_wp, 1.46500552_wp, & + & -5.96892283_wp, 13.89573651_wp, 0.83004705_wp, -1.23650452_wp, & + & -20.14111489_wp, 3.35893985_wp, -4.23375058_wp, 21.92251204_wp, & + & 6.66654886_wp, 4.99927302_wp, -20.13984000_wp, 2.19011988_wp, & + & -2.38791286_wp, -20.17065764_wp, 1.75513199_wp, -1.02129756_wp, & + & 11.32161065_wp, -2.36747302_wp, 3.07188110_wp, 11.36260260_wp, & + & -1.74052554_wp, 0.86382949_wp, -19.99486210_wp, -0.55880613_wp, & + & -2.00395669_wp, 11.03915411_wp, 0.04727351_wp, 2.61608881_wp, & + & 11.16362695_wp, -1.03199108_wp, 3.55871940_wp, -19.97716028_wp, & + & 1.23633044_wp, -3.44246731_wp, 3.45558090_wp, -9.46335673_wp, & + & -2.30118031_wp, 11.27073140_wp, -2.30812336_wp, 5.33556278_wp, & + & 11.56093578_wp, -4.63938801_wp, 4.11191943_wp, 12.22169691_wp, & + & -5.30658149_wp, 5.33290682_wp, 0.54447840_wp, -6.79235683_wp, & + & 1.89372529_wp, 11.30229289_wp, -6.48558360_wp, 5.66904135_wp, & + & 13.67154838_wp, 3.11254170_wp, -1.11860203_wp, 9.91974923_wp, & + & -6.02602734_wp, 5.12731360_wp, 9.08070428_wp, -5.20887668_wp, & + & 6.11726333_wp, 8.08950232_wp, 0.47799208_wp, 5.79330338_wp, & + & 8.29251767_wp, 2.90547650_wp, 5.24211809_wp, 8.06139257_wp, & + & 1.48031816_wp, 4.88287519_wp, 7.87653991_wp, 1.19474036_wp, & + & 3.44735739_wp, -22.82432419_wp, -4.56157318_wp, 5.73947612_wp, & + & -22.01624368_wp, -5.36158021_wp, 4.70119335_wp, -0.11695326_wp, & + & -6.06606535_wp, 3.06756234_wp, -20.64382150_wp, -5.87240024_wp, & + & 5.20961291_wp, 7.99278914_wp, -1.67286106_wp, -2.29913443_wp, & + & -19.62854602_wp, -4.87152213_wp, 4.66184874_wp, -20.30957231_wp, & + & -4.23417216_wp, 3.44221419_wp, 7.88434558_wp, -1.25116952_wp, & + & 4.01702660_wp, -20.13983135_wp, -2.22934168_wp, 1.92000864_wp, & + & 7.82816347_wp, -1.95086467_wp, 6.39957703_wp, 8.75688237_wp, & + & -1.84106002_wp, 7.61948973_wp, -19.98249903_wp, -0.02699315_wp, & + & 2.86093451_wp, 7.98540066_wp, -2.53902891_wp, 8.73601399_wp, & + & -19.88671370_wp, -0.56873736_wp, 4.20143801_wp, -19.97865078_wp, & + & -1.91651441_wp, 4.37783140_wp, 6.49327259_wp, -2.47065532_wp, & + & 8.29384546_wp, 5.60712552_wp, -1.62126575_wp, 9.20388402_wp, & + & 20.43147588_wp, 7.02198909_wp, 5.25550711_wp, 4.57717794_wp, & + & -0.04171378_wp, 3.32054152_wp, -1.51157773_wp, -6.62074670_wp, & + & 3.46270520_wp, 4.78442988_wp, -1.71954592_wp, 1.78926575_wp, & + & -2.48917462_wp, -5.74037003_wp, 2.68000888_wp, 4.64633188_wp, & + & 0.50779024_wp, 0.94205662_wp, 4.54805661_wp, 0.96256119_wp, & + & 2.28955334_wp, -1.72489942_wp, -4.44044550_wp, 2.37563726_wp, & + & 4.39446487_wp, 2.04523968_wp, 4.18349783_wp, -1.70898538_wp, & + & -2.54427319_wp, 0.70968703_wp, 20.70663654_wp, 0.61554039_wp, & + & 1.77723808_wp, 8.26771413_wp, -2.17519125_wp, -0.08725543_wp, & + & 4.49385813_wp, 0.03335926_wp, 5.87203507_wp, -19.48241789_wp, & + & -7.17475777_wp, 1.72275151_wp, -18.61050786_wp, -7.38457680_wp, & + & 0.47807602_wp, 5.21481348_wp, 0.90976549_wp, 6.91004096_wp, & + & -17.30260433_wp, -8.18237183_wp, 0.73754047_wp, 7.81832525_wp, & + & 0.10469337_wp, -0.62780785_wp, -16.28266058_wp, -7.09649187_wp, & + & 1.09391948_wp, -16.82995767_wp, -5.80546754_wp, 0.45488068_wp, & + & 4.13677852_wp, 1.44943061_wp, 7.85206261_wp, -16.85858922_wp, & + & -4.65489168_wp, 2.82854062_wp, 2.79321021_wp, 0.91454716_wp, & + & 7.29142704_wp, -16.93826318_wp, -2.56118075_wp, 2.19737205_wp, & + & -16.93991532_wp, -1.12504541_wp, 2.11989519_wp, 7.75305657_wp, & + & -0.28844982_wp, -1.99986789_wp, 1.89241217_wp, 1.94596368_wp, & + & 6.59557446_wp, -16.94826067_wp, -1.48459522_wp, -0.37445184_wp, & + & -4.95049936_wp, -3.17157902_wp, 3.33456644_wp, -5.61833813_wp, & + & -4.91094940_wp, 1.66339238_wp, -16.96006234_wp, -3.33357047_wp, & + & 0.99109224_wp, 12.54530828_wp, 3.44922547_wp, -5.91168154_wp, & + & 11.79367445_wp, 2.18686965_wp, -6.33885095_wp, 1.36440082_wp, & + & 3.65310438_wp, 0.73402008_wp, 1.53913186_wp, 3.39632788_wp, & + & -0.59763568_wp, 1.62380896_wp, 2.02730757_wp, -1.04541834_wp, & + & -1.83589473_wp, -2.99002068_wp, -1.64396161_wp, 10.35168051_wp, & + & 2.42763872_wp, -6.86464872_wp, 1.48147994_wp, 1.23099476_wp, & + & 1.21753886_wp, -1.88961850_wp, -4.41398105_wp, -1.40012239_wp, & + & 1.08536122_wp, 2.86236308_wp, 3.11044522_wp, 1.77653838_wp, & + & 4.11038564_wp, 3.68994721_wp, 20.72655966_wp, 1.57168976_wp, & + & 2.85484125_wp, -5.12208501_wp, -3.55986837_wp, 2.04430746_wp, & + & 7.53256995_wp, -0.47538052_wp, -4.16729495_wp, -16.51976014_wp, & + & -6.70400583_wp, -2.80188392_wp, -15.78351662_wp, -5.73412391_wp, & + & -3.73057974_wp, 9.46421994_wp, 2.22371495_wp, -5.63210043_wp, & + & -14.40036245_wp, -6.25361364_wp, -4.21107105_wp, 7.99205546_wp, & + & -3.04241700_wp, -4.46336956_wp, -13.39680246_wp, -5.55794502_wp, & + & -3.28938180_wp, -14.11660991_wp, -4.28290208_wp, -2.81895484_wp, & + & -4.88039110_wp, -2.61782076_wp, 0.93953791_wp, -13.97175419_wp, & + & -2.51432084_wp, -1.03513765_wp, 7.01019234_wp, -3.11340622_wp, & + & -5.64285475_wp, 0.67966145_wp, 4.88238720_wp, 4.42445623_wp, & + & -13.75197917_wp, -3.13226077_wp, 1.26801113_wp, -4.45981625_wp, & + & -0.84324008_wp, 2.66752699_wp, -13.71732242_wp, -4.53539083_wp, & + & 0.92105474_wp, -13.79859960_wp, -4.89412760_wp, -0.39593975_wp, & + & 10.30534592_wp, 1.38429545_wp, -4.65423199_wp, -0.63742438_wp, & + & 4.37654422_wp, 3.78084736_wp, -1.17863341_wp, 5.25563055_wp, & + & 2.64872463_wp, -1.83363560_wp, -4.87268151_wp, -0.11372633_wp, & + & 10.70698347_wp, 0.99013104_wp, -2.19555166_wp, 19.69197916_wp, & + & 5.71427794_wp, 4.96768895_wp, -1.51358382_wp, 3.43155963_wp, & + & -1.30667685_wp, -1.60816155_wp, 1.59115801_wp, 0.06990503_wp, & + & -1.48057170_wp, 1.22935874_wp, -2.43539381_wp, -1.36264121_wp, & + & 2.66272799_wp, -2.50096108_wp, -1.15249162_wp, 4.75910503_wp, & + & -3.11668643_wp, -4.41871745_wp, -1.40549664_wp, 5.08476084_wp, & + & 7.84772894_wp, -3.03115533_wp, -6.92045542_wp, 9.30150574_wp, & + & -2.79808437_wp, -6.44477146_wp, -13.56845996_wp, -2.80091594_wp, & + & -5.87660874_wp, -12.81448026_wp, -1.56833882_wp, -6.39210359_wp, & + & 9.84184030_wp, -1.37596011_wp, -6.65539316_wp, -11.48709327_wp, & + & -1.89218923_wp, -7.12864427_wp, -1.54185329_wp, 5.86299795_wp, & + & -0.73934245_wp, -10.43711978_wp, -1.84750084_wp, -6.01422219_wp, & + & -11.04507064_wp, -0.95275269_wp, -4.91680576_wp, -5.08898046_wp, & + & -2.29067792_wp, 6.15068888_wp, -11.02176292_wp, -2.92916066_wp, & + & -3.17634122_wp, -0.57294490_wp, 7.04978305_wp, -0.86841380_wp, & + & -10.96991357_wp, -1.76357667_wp, -1.32432883_wp, -10.89929641_wp, & + & -1.30491332_wp, 0.03485926_wp, 10.52056993_wp, 2.79028406_wp, & + & -0.62071092_wp, -3.99959237_wp, -2.56830849_wp, 7.18792397_wp, & + & -10.82227644_wp, 1.00462550_wp, -0.97533206_wp, -1.34172338_wp, & + & 8.17733292_wp, -0.17718670_wp, -2.67548223_wp, -2.35333359_wp, & + & 6.40650114_wp, -10.97858035_wp, -0.80625386_wp, -2.38662836_wp, & + & -2.84031434_wp, 7.81098508_wp, -0.39798041_wp, -3.57460600_wp, & + & 8.72837300_wp, -1.37558733_wp, 10.27050771_wp, 3.73342995_wp, & + & -1.69047648_wp, 10.22493294_wp, 3.27823781_wp, -2.97812039_wp, & + & 20.55356053_wp, 5.07289143_wp, 3.86980646_wp, -4.78038016_wp, & + & 3.01774844_wp, -2.01395994_wp, -4.80019452_wp, 2.06497871_wp, & + & 0.05547367_wp, -4.67876551_wp, 0.58181252_wp, -1.82330428_wp, & + & -4.68462562_wp, 1.73752790_wp, -2.66303420_wp, -4.55878478_wp, & + & 3.23201305_wp, -4.25688690_wp, 20.49168884_wp, 2.94729473_wp, & + & 2.57133343_wp, 20.86581427_wp, 2.60546989_wp, 4.78628169_wp, & + & -4.76532532_wp, 5.42646018_wp, -2.80362135_wp, -3.87138900_wp, & + & 6.21867782_wp, -3.77170673_wp, -10.18808488_wp, 1.73076897_wp, & + & -6.86227203_wp, -9.30954625_wp, 2.97315426_wp, -6.67398675_wp, & + & -4.79497245_wp, 7.17525301_wp, -4.52587364_wp, -7.95622731_wp, & + & 2.94201518_wp, -7.43167356_wp, -6.23550872_wp, 6.72414747_wp, & + & -4.16620443_wp, -6.97585810_wp, 2.35303216_wp, -6.41373246_wp, & + & -7.63342500_wp, 2.54998051_wp, -5.03462907_wp, -2.09860510_wp, & + & -3.61338529_wp, 5.75173603_wp, -7.93679970_wp, 1.48058592_wp, & + & -2.80108984_wp, -6.97739062_wp, 5.97314626_wp, -5.27511102_wp, & + & -7.61928400_wp, 0.02233285_wp, -4.76829820_wp, -7.75372666_wp, & + & -1.01981518_wp, -2.54450947_wp, -7.37505778_wp, -2.46207802_wp, & + & -4.56613278_wp, -7.59245410_wp, -1.09951534_wp, -4.00503211_wp, & + & -20.54576460_wp, -9.71554163_wp, 4.23652025_wp, 9.19111262_wp, & + & 3.22322275_wp, -5.21577445_wp, -10.52617677_wp, 1.35531304_wp, & + & -5.85786828_wp, -11.06113527_wp, 1.94018487_wp, -7.50691506_wp, & + & -9.87670628_wp, 3.91321063_wp, -6.87162499_wp, -7.97426280_wp, & + & 2.40086242_wp, -8.40290923_wp, -6.80150293_wp, 1.27563888_wp, & + & -6.65992194_wp, -5.94369712_wp, 2.75423525_wp, -6.43307780_wp, & + & -7.16323524_wp, 3.34362305_wp, -4.39013049_wp, -7.95322442_wp, & + & 0.40659635_wp, -0.97585386_wp, -7.39454390_wp, -2.48920784_wp, & + & -5.66135144_wp, -6.39504133_wp, -2.85492841_wp, -4.24347532_wp, & + & -8.12418585_wp, -3.17182045_wp, -4.17825643_wp, -7.50783559_wp, & + & -0.01846647_wp, -5.86807901_wp, 3.74216994_wp, -1.32969939_wp, & + & -6.31951272_wp, 10.20002980_wp, 3.40126107_wp, -7.37887260_wp, & + & 12.40317295_wp, 1.58432155_wp, -7.05412281_wp, 4.87588626_wp, & + & -1.50546096_wp, -0.91497589_wp, 8.47086663_wp, 1.76394296_wp, & + & -5.80649393_wp, 13.17002118_wp, 3.85463763_wp, -6.72775568_wp, & + & 10.00047763_wp, 0.30036617_wp, -4.57960553_wp, 13.17507752_wp, & + & 3.23016581_wp, -5.00790236_wp, 10.65272208_wp, 2.44225308_wp, & + & 1.42327794_wp, 10.56605596_wp, 4.11605502_wp, 0.97848076_wp, & + & 10.11167739_wp, 4.78108527_wp, -1.45749481_wp, -10.31831600_wp, & + & 2.93262784_wp, -1.46963917_wp, -1.83432923_wp, -5.95209006_wp, & + & 0.11986388_wp, -10.60437616_wp, 2.69914912_wp, 0.21641162_wp, & + & -10.75757146_wp, 0.53686708_wp, 1.10720101_wp, -1.97140716_wp, & + & -5.09987071_wp, -2.23906434_wp, -1.61433887_wp, -3.00742031_wp, & + & -3.69422229_wp, -11.03904162_wp, -3.72024189_wp, -3.91579854_wp, & + & -1.76296566_wp, -1.44109828_wp, -3.01926964_wp, -10.62957746_wp, & + & 0.09810060_wp, -4.87748004_wp, -7.61375360_wp, 5.17295880_wp, & + & -4.82609335_wp, -7.59294173_wp, 6.65797065_wp, -5.88988758_wp, & + & -6.85000478_wp, 7.58327635_wp, -3.79817427_wp, -4.59587571_wp, & + & 7.22910306_wp, -5.61874761_wp, -3.33129782_wp, 5.56249563_wp, & + & -4.48782234_wp, -3.06796167_wp, 6.71353071_wp, -3.18226888_wp, & + & -4.57979519_wp, 5.62129240_wp, -1.70664313_wp, -4.43784403_wp, & + & 3.74010500_wp, -5.20907579_wp, -4.66452167_wp, -1.48384301_wp, & + & -1.59887044_wp, -4.43083524_wp, -0.90511200_wp, -3.23315484_wp, & + & -4.80926094_wp, 2.13757661_wp, 1.16487027_wp, -9.43184002_wp, & + & -1.49313403_wp, -6.30556347_wp, -10.24999452_wp, -2.88736145_wp, & + & -5.65415536_wp, -11.49324521_wp, -2.83918862_wp, -7.71040936_wp, & + & -13.48009299_wp, -0.90092041_wp, -6.98746447_wp, -14.42476603_wp, & + & -3.06380767_wp, -6.52118715_wp, -2.01175261_wp, -3.56959936_wp, & + & 3.03712388_wp, -13.91689308_wp, -2.61692051_wp, -4.82306499_wp, & + & 4.98682526_wp, -5.82649598_wp, -2.40013627_wp, 10.02390736_wp, & + & 3.95745514_wp, -3.82784828_wp, 3.00440474_wp, -6.54594087_wp, & + & -3.50190004_wp, -3.45686916_wp, -5.52689234_wp, 3.17415280_wp, & + & 20.21921039_wp, 7.45994246_wp, 6.25193000_wp, -2.80371609_wp, & + & -6.27726460_wp, 1.75492310_wp, -13.75505442_wp, -5.94960794_wp, & + & -0.71854548_wp, -13.56195413_wp, -5.27750204_wp, 1.69819000_wp, & + & -1.64540532_wp, -7.71119197_wp, 3.29659943_wp, 0.57465401_wp, & + & -6.00403680_wp, 3.94195958_wp, -13.88180845_wp, -3.30970545_wp, & + & 3.32706712_wp, 1.28478972_wp, -7.53691489_wp, 2.23332909_wp, & + & 1.02812398_wp, -6.04176149_wp, 1.20440884_wp, -13.69138677_wp, & + & -1.68524670_wp, 2.75377052_wp, -4.53168442_wp, 8.26147868_wp, & + & -1.69904332_wp, -3.76647047_wp, 9.72573223_wp, -0.93063699_wp, & + & -3.38652468_wp, 7.76091265_wp, 0.57793365_wp, -1.06254777_wp, & + & 9.19630291_wp, -0.51955952_wp, -0.40630963_wp, 7.32617399_wp, & + & -1.93451876_wp, 0.44185781_wp, 6.83540372_wp, -0.48701141_wp, & + & -1.56368345_wp, 5.41456363_wp, 0.29741201_wp, -0.98729326_wp, & + & 5.66942779_wp, -3.67519881_wp, -1.57913530_wp, -0.29340829_wp, & + & -0.93771878_wp, -1.68513451_wp, 0.02403605_wp, 1.44616843_wp, & + & -1.63476381_wp, 1.63102039_wp, 2.13409207_wp, -13.87634506_wp, & + & -3.36345784_wp, -3.43599377_wp, -12.40491581_wp, -5.33093407_wp, & + & -3.72390428_wp, -13.15192765_wp, -6.24275894_wp, -2.44118332_wp, & + & -14.30563524_wp, -7.36069557_wp, -4.22738941_wp, -16.43652898_wp, & + & -5.43668395_wp, -4.58652867_wp, -17.03756731_wp, -7.50037106_wp, & + & -3.36740337_wp, -17.23882141_wp, -6.14582407_wp, -2.15323378_wp, & + & 3.04860460_wp, -5.30013028_wp, -4.74750790_wp, 4.02129021_wp, & + & -6.85531250_wp, -6.26016765_wp, -16.60459817_wp, -1.45610768_wp, & + & -2.39556332_wp, -16.85009261_wp, 0.10902366_wp, -1.70697239_wp, & + & -16.95614752_wp, 0.40545902_wp, 0.62645366_wp, -16.81752781_wp, & + & -5.57536064_wp, 3.39769923_wp, -16.30484470_wp, -5.46431096_wp, & + & -0.48296215_wp, -15.23183636_wp, -7.30481443_wp, 0.81440554_wp, & + & 2.50317490_wp, -0.74541005_wp, -5.18160122_wp, -16.23533168_wp, & + & -7.02359778_wp, 2.20790225_wp, -17.39494282_wp, -8.98652331_wp, & + & 1.49860033_wp, -1.58399663_wp, 4.60567158_wp, 1.82128578_wp, & + & -1.95903311_wp, 5.95057495_wp, 3.00238870_wp, -1.43119031_wp, & + & 4.18356033_wp, 4.54487511_wp, 0.80303797_wp, 5.98621728_wp, & + & 4.42051558_wp, 2.23837674_wp, 4.75049260_wp, 2.90487100_wp, & + & 2.64629508_wp, 3.82081387_wp, 4.31314784_wp, 1.30120930_wp, & + & 1.91023922_wp, 3.67115493_wp, 1.76720016_wp, 0.71490759_wp, & + & -2.63881845_wp, 1.47895077_wp, 2.35410651_wp, -3.08308353_wp, & + & 1.58558405_wp, 4.20359567_wp, -1.32241689_wp, 1.24556367_wp, & + & 4.68247062_wp, 1.11471780_wp, -19.20405261_wp, -7.80091665_wp, & + & -0.36798716_wp, -20.29960600_wp, -7.91567055_wp, 1.78157645_wp, & + & 19.66899355_wp, 5.08949487_wp, 5.88911333_wp, -19.89278618_wp, & + & -6.12846579_wp, 1.72025156_wp, -1.71495853_wp, -3.36006593_wp, & + & 4.72944944_wp, 13.51914559_wp, -0.37229833_wp, -2.85286259_wp, & + & -1.29675290_wp, -4.06544431_wp, 6.36213975_wp, 14.03403693_wp, & + & -1.23618644_wp, -1.45120734_wp, -1.90613443_wp, -1.82516404_wp, & + & 7.01834474_wp, -4.08810411_wp, -3.55366178_wp, 7.69151267_wp, & + & -5.43728901_wp, -3.26845999_wp, 5.73110386_wp, -22.33227738_wp, & + & -2.89052696_wp, 4.79480174_wp, -19.93588906_wp, -2.37745613_wp, & + & 5.37884686_wp, -19.73407166_wp, 0.10139054_wp, 5.04525629_wp, & + & -19.57907600_wp, 1.95707847_wp, 3.25124364_wp, -20.12540245_wp, & + & 1.65842404_wp, 1.65682067_wp, 4.05554112_wp, 0.09901204_wp, & + & -5.30877499_wp, -20.05169045_wp, -4.73689624_wp, 2.46167088_wp, & + & -18.63375607_wp, -5.28500507_wp, 4.40460750_wp, -19.37620838_wp, & + & -4.12068054_wp, 5.44745592_wp, 1.70668829_wp, 1.63504643_wp, & + & 5.53908953_wp, 0.92624258_wp, 2.06246579_wp, 7.12502424_wp, & + & 2.23111396_wp, 0.34929431_wp, 8.07321953_wp, 4.16800243_wp, & + & 2.55569814_wp, 7.97952443_wp, 5.79579490_wp, 1.73718123_wp, & + & 6.45188588_wp, 5.99149393_wp, 0.28403022_wp, 7.40568603_wp, & + & 4.86249999_wp, -1.02881817_wp, 5.79422105_wp, 4.31162249_wp, & + & 2.81050676_wp, 4.95018271_wp, 4.57155900_wp, 0.95140426_wp, & + & -1.07871147_wp, 4.33560076_wp, 2.29371725_wp, -0.01576698_wp, & + & 4.88264790_wp, -2.79194288_wp, 1.52918490_wp, -20.58301610_wp, & + & -6.01568522_wp, 6.30950138_wp, 14.23210615_wp, -0.15624263_wp, & + & 0.62900963_wp, 13.36455039_wp, 6.30382495_wp, -0.36209335_wp, & + & -22.61042402_wp, -6.18942311_wp, 4.25020075_wp, -22.66145382_wp, & + & -4.89882825_wp, 6.77806911_wp, 12.70628589_wp, 3.96724924_wp, & + & -3.44666282_wp, -23.90644291_wp, -4.59893836_wp, 5.50813643_wp, & + & 11.55392924_wp, 6.18253544_wp, -3.33060958_wp, -6.02666652_wp, & + & -1.83945286_wp, 6.52668131_wp, -4.68952726_wp, -0.30888936_wp, & + & 5.14416695_wp, 4.00623359_wp, -3.62726935_wp, -5.28139082_wp, & + & -4.56213955_wp, -0.52771363_wp, 0.57771319_wp, 12.73913562_wp, & + & 6.84646832_wp, -2.23454177_wp, -5.51723980_wp, -5.65392781_wp, & + & 2.46367842_wp, 10.27644589_wp, -0.99165075_wp, -5.69510707_wp, & + & 13.55400886_wp, 7.95058561_wp, -4.20056053_wp, 10.60316338_wp, & + & -1.34400411_wp, -7.45465769_wp, -19.65552494_wp, -2.54554686_wp, & + & -2.43093698_wp, -20.00756117_wp, -2.24819723_wp, -0.78199259_wp, & + & 4.66366813_wp, -1.34800061_wp, 8.68245030_wp, 5.38257627_wp, & + & -2.14606551_wp, 10.15455770_wp, 6.06564159_wp, -3.50174490_wp, & + & 8.19855891_wp, 8.17760704_wp, -2.12331741_wp, 9.74978425_wp, & + & 8.95176169_wp, -0.78147911_wp, 7.90498821_wp, 9.76898292_wp, & + & -2.23405896_wp, 7.39717905_wp, 7.92153904_wp, -2.94517184_wp, & + & 5.86675672_wp, 7.89501125_wp, -0.43707976_wp, 2.06245513_wp, & + & 8.06920984_wp, 3.13024412_wp, 6.29103616_wp, 9.35137729_wp, & + & 3.17081331_wp, 5.06281948_wp, 7.69100657_wp, 3.57808866_wp, & + & 4.60760518_wp, 8.26075426_wp, 0.65884320_wp, 6.86479418_wp, & + & 15.32641390_wp, 5.89430052_wp, -5.10441641_wp, 16.59070259_wp, & + & 7.41630425_wp, -3.72168606_wp, 16.36952511_wp, 6.03756594_wp, & + & -2.54134108_wp, -20.09505275_wp, -0.07753288_wp, 0.07631062_wp, & + & -20.19243404_wp, 4.15189135_wp, -4.97205988_wp, -19.75435821_wp, & + & 0.35351822_wp, -5.98189722_wp, -20.75488169_wp, 1.53608895_wp, & + & -7.84890701_wp, -21.21499715_wp, 2.81017643_wp, -6.73554358_wp, & + & -18.97406123_wp, 1.94822305_wp, -9.30003004_wp, -19.55816520_wp, & + & 4.22798958_wp, -7.70967514_wp, 22.43342257_wp, 6.87093024_wp, & + & 7.15222211_wp, -17.14904842_wp, 2.51613031_wp, -7.66208055_wp, & + & -16.48458175_wp, 4.36702259_wp, -6.38220053_wp, -17.29494462_wp, & + & 3.51488923_wp, -4.99316999_wp, -6.68939120_wp, -4.86088398_wp, & + & 1.39759726_wp, 23.79436735_wp, 6.34328007_wp, 6.09057023_wp, & + & 1.27402359_wp, -3.06628107_wp, 1.98806828_wp, -5.10406753_wp, & + & -5.28546964_wp, 0.76343781_wp, 1.59433870_wp, -1.41226961_wp, & + & 1.56033835_wp, 1.64803850_wp, -0.73822977_wp, -0.71730445_wp, & + & -5.09752305_wp, -3.86716081_wp, 4.18041702_wp, 8.58888465_wp, & + & -4.35298155_wp, 5.57652103_wp, 8.32570711_wp, -5.83046140_wp, & + & 6.63180520_wp, 9.33118926_wp, -6.86707318_wp, 4.69106815_wp, & + & 11.31173024_wp, -6.78659557_wp, 6.73634045_wp, 12.25517237_wp, & + & -4.62069891_wp, 6.21278945_wp, 13.28540989_wp, -5.55016932_wp, & + & 5.15852865_wp, 12.04605776_wp, -4.88002789_wp, 3.11886013_wp, & + & 11.27824191_wp, -2.69269353_wp, 6.34861426_wp, 11.03960828_wp, & + & 0.33871785_wp, 0.49874144_wp, 11.22582518_wp, -1.36927567_wp, & + & -1.18887894_wp, 11.68072004_wp, -2.98611237_wp, -0.74378141_wp, & + & 9.99458053_wp, -3.56544326_wp, -6.86593420_wp, 6.31355459_wp, & + & -7.65671256_wp, -4.45263243_wp, 0.56999788_wp, -6.15882627_wp, & + & -4.35931540_wp, 6.82136286_wp, -7.50809083_wp, -6.85497830_wp, & + & 7.48212577_wp, -2.26814857_wp, -7.64631092_wp, 6.25529436_wp, & + & -2.29883543_wp, -5.62791890_wp, 6.42106151_wp, -4.05756353_wp, & + & -5.55187645_wp, 7.96506534_wp, -3.92035127_wp, -3.76498328_wp, & + & 7.35564564_wp, -0.28980802_wp, -5.22410506_wp, -17.38414959_wp, & + & 6.03877021_wp, -0.37534347_wp, 1.06631321_wp, -6.56211704_wp, & + & -0.39905799_wp, -17.31616275_wp, 5.18558077_wp, 1.98240345_wp, & + & -0.79468848_wp, -7.92358413_wp, -1.59255880_wp, 0.19168190_wp, & + & -8.10119900_wp, -3.01951561_wp, -16.64497761_wp, 3.09622525_wp, & + & 3.37918019_wp, 0.86322070_wp, -10.16781316_wp, -1.85873857_wp, & + & -16.93780665_wp, 1.54286357_wp, 2.74266004_wp, -17.52472451_wp, & + & 3.69765297_wp, -3.29482061_wp, 11.78629897_wp, -5.92825948_wp, & + & 1.85576616_wp, 11.44246035_wp, -7.71563681_wp, 1.96654186_wp, & + & 12.41172354_wp, -7.66468835_wp, -0.22134870_wp, 14.47380101_wp, & + & -8.57315205_wp, 1.57304174_wp, 15.71992259_wp, -6.55791568_wp, & + & 1.88977231_wp, 16.38470116_wp, -6.86390754_wp, 0.32698240_wp, & + & 15.07681419_wp, -5.11230471_wp, -0.75019613_wp, 14.12637584_wp, & + & -0.84492534_wp, 4.40418639_wp, 14.38757877_wp, 0.06497031_wp, & + & 2.97834485_wp, 14.69313206_wp, -3.36986764_wp, 4.42347709_wp, & + & 14.78363227_wp, -5.40939630_wp, 2.96303583_wp, -18.77775645_wp, & + & 5.74860502_wp, -3.50686280_wp, -18.20744989_wp, 6.40615937_wp, & + & -2.01483638_wp, 2.94196768_wp, -8.78024330_wp, -0.29411789_wp, & + & -16.81787281_wp, 7.83475744_wp, -3.34749289_wp, -14.74556701_wp, & + & 5.99355171_wp, -4.13678211_wp, -13.94167757_wp, 7.40443774_wp, & + & -2.34704324_wp, -14.17022955_wp, 5.81427229_wp, -1.48247224_wp, & + & 7.66925449_wp, 1.61946875_wp, 0.78187595_wp, 7.63021822_wp, & + & -6.06122739_wp, -6.08737734_wp, 7.23188897_wp, 2.05747864_wp, & + & -0.83166645_wp, 3.83568806_wp, -10.40541763_wp, -1.84579329_wp, & + & 8.45119052_wp, -2.90694759_wp, 0.72462411_wp, 4.31659400_wp, & + & -8.81918542_wp, -2.58516160_wp, 22.43217719_wp, 7.46010616_wp, & + & 4.40840106_wp, -14.27661436_wp, 1.73465861_wp, -2.08089775_wp, & + & -14.04479898_wp, 0.10059867_wp, -1.53275824_wp, -13.90258966_wp, & + & -0.39485714_wp, 0.79619935_wp, -13.68176942_wp, 5.34612817_wp, & + & 4.03527312_wp, -14.58921662_wp, 5.46008903_wp, 0.16574010_wp, & + & -15.76788384_wp, 7.12581130_wp, 1.57492252_wp, -14.69640987_wp, & + & 6.89483326_wp, 2.92799717_wp, 14.34778247_wp, -6.40287109_wp, & + & -2.22816450_wp, 14.39365888_wp, -7.77275025_wp, -3.43900973_wp, & + & 14.83124926_wp, -5.72646832_wp, -4.75057025_wp, 16.98021266_wp, & + & -7.61408897_wp, -4.75134738_wp, 18.18328792_wp, -6.65063738_wp, & + & -2.86550285_wp, 18.98760469_wp, -5.78363805_wp, -4.15571020_wp, & + & 17.61393600_wp, -3.71600015_wp, -3.80307432_wp, 18.05610716_wp, & + & -6.11097896_wp, -0.64733054_wp, 17.24446428_wp, 0.35232406_wp, & + & 0.39217477_wp, 16.87938252_wp, 1.37437157_wp, -1.74998131_wp, & + & 16.87873917_wp, 0.41198610_wp, -3.19525359_wp, -13.75692908_wp, & + & 8.99226247_wp, 2.19200752_wp, -11.84985243_wp, 7.95489706_wp, & + & 0.34272318_wp, 18.62987050_wp, 5.80242093_wp, 4.67805809_wp, & + & -10.74507775_wp, 8.08142018_wp, 2.48208232_wp, -11.09971553_wp, & + & 6.28768737_wp, 2.45221681_wp, 16.98755255_wp, 5.62867499_wp, & + & 2.63836007_wp, -10.72534022_wp, 2.89366848_wp, 6.40007722_wp, & + & 17.22257553_wp, 3.62185896_wp, 4.12860789_wp, -11.00466496_wp, & + & 0.41771682_wp, 6.09294831_wp, -11.18484375_wp, -1.45035716_wp, & + & 4.37917193_wp, -10.82419486_wp, -1.17652007_wp, 2.71618416_wp, & + & -10.32949078_wp, 5.19054258_wp, 3.45062535_wp, 17.46538397_wp, & + & 1.08609956_wp, 4.19431673_wp, -12.17414166_wp, 5.64344223_wp, & + & 5.06989451_wp, -11.44271415_wp, 4.72462526_wp, 6.35595232_wp, & + & -10.50035845_wp, 6.80075048_wp, 7.08881864_wp, -8.47185559_wp, & + & 6.92547809_wp, 4.89172241_wp, -7.60454545_wp, 7.10672858_wp, & + & 7.17263290_wp, 16.83240818_wp, -2.59799531_wp, -4.80733335_wp, & + & 16.14138594_wp, -3.16855529_wp, -6.39861544_wp, 16.50001766_wp, & + & -0.90623625_wp, -6.97409945_wp, 18.82683875_wp, -2.38702654_wp, & + & -7.95486519_wp, 18.07850906_wp, 0.30794228_wp, -8.45756804_wp, & + & 20.58504411_wp, -1.49156695_wp, -6.59047512_wp, 20.24697157_wp, & + & 0.04561015_wp, -7.35774945_wp, 19.25548065_wp, 0.92308774_wp, & + & -5.34970465_wp, 20.84107471_wp, -1.69043176_wp, 0.30148256_wp, & + & 20.60617218_wp, -3.29702526_wp, -0.26914350_wp, 20.51327486_wp, & + & -3.77877039_wp, -2.78555334_wp, 19.75781232_wp, -2.79835431_wp, & + & -4.96521761_wp, 17.47772974_wp, 0.15006488_wp, 2.73242462_wp, & + & 19.43538518_wp, 10.39578488_wp, 3.04987411_wp, 16.37687530_wp, & + & 5.26062629_wp, -1.04175479_wp, 17.22639431_wp, 10.06391450_wp, & + & -2.97313144_wp, 15.22929795_wp, 7.07498739_wp, 0.09256719_wp, & + & 12.01727196_wp, 6.50195387_wp, -8.15726790_wp, 16.05932353_wp, & + & 6.82585198_wp, 1.60043994_wp, 10.15346998_wp, 0.09290266_wp, & + & -9.93672873_wp, 17.29875499_wp, 8.80536566_wp, 0.99324417_wp, & + & 7.27987660_wp, -5.92987473_wp, -10.18926958_wp, 19.23031087_wp, & + & 7.65455474_wp, -0.77521422_wp, 1.80762909_wp, -10.22630927_wp, & + & -6.45846904_wp, 20.24780962_wp, 7.77528564_wp, 1.39322053_wp, & + & 0.09788012_wp, -10.48495185_wp, 2.43824839_wp, 19.82153385_wp, & + & 5.99300476_wp, 1.38116730_wp, -1.43152042_wp, -6.79486412_wp, & + & 7.28941244_wp, -7.05586405_wp, 5.46297947_wp, 6.58368333_wp, & + & -3.97730128_wp, -0.21914506_wp, 10.69041810_wp, -4.39977283_wp, & + & 0.91234049_wp, 6.20257843_wp, -6.04652014_wp, 5.92338336_wp, & + & 9.87857391_wp, -3.77273959_wp, 1.29389433_wp, 7.87296983_wp, & + & -11.46489795_wp, 10.52216120_wp, 4.58517920_wp, -4.65477444_wp, & + & 3.45054735_wp, 7.41685690_wp, -14.88672950_wp, 10.43812093_wp, & + & -1.84816430_wp, -7.63548506_wp, 2.76719698_wp, 0.35205848_wp, & + & -17.09608555_wp, 7.37278074_wp, -7.88822676_wp, -8.21405136_wp, & + & -2.34911275_wp, 1.76945591_wp, 16.61505860_wp, -5.47075742_wp, & + & -8.32770582_wp, -7.97342156_wp, -1.76378914_wp, 0.15346804_wp, & + & 14.47229766_wp, -10.49161950_wp, -2.07564101_wp, -7.29458115_wp, & + & -0.12424793_wp, 6.25912047_wp, 12.49073918_wp, -10.20637154_wp, & + & 3.85649819_wp, -7.32687428_wp, 3.57224358_wp, 4.80193820_wp, & + & 9.15769353_wp, -6.59390682_wp, 9.71189546_wp, -8.53581214_wp, & + & 3.50042869_wp, 6.84931819_wp, 4.74016868_wp, 1.03118060_wp, & + & 12.14308027_wp, -8.40346258_wp, 1.75724299_wp, 6.97033857_wp, & + & 0.91680105_wp, 4.86864518_wp, 8.90628183_wp, -6.83750858_wp, & + & 2.03758416_wp, 8.73860650_wp, -0.52003864_wp, 8.80166537_wp, & + & 3.89482291_wp, 20.32366580_wp, 5.47581463_wp, 2.83888302_wp, & + & -4.34256350_wp, 11.37998888_wp, -4.22552303_wp, 22.41675920_wp, & + & 4.36284483_wp, 5.81101812_wp, -7.36853411_wp, 6.60256902_wp, & + & -8.93684344_wp, 19.43077032_wp, 3.97477399_wp, -1.01761121_wp, & + & -11.33019297_wp, 0.61895350_wp, -10.18974798_wp, 19.79983326_wp, & + & 2.44029387_wp, -1.71487217_wp, -14.53785914_wp, -5.52489580_wp, & + & -7.99941313_wp, 20.34058274_wp, 0.58473253_wp, -0.32938141_wp, & + & -16.80106037_wp, -10.35888725_wp, -2.47794884_wp, 20.99031614_wp, & + & 2.85490831_wp, 5.83140116_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine lnci16_dna +end module mstore_large diff --git a/src/mstore/meson.build b/src/mstore/meson.build index 711ae0e..850efaa 100644 --- a/src/mstore/meson.build +++ b/src/mstore/meson.build @@ -23,6 +23,7 @@ srcs += files( 'ice10.f90', 'il16.f90', 'mb16_43.f90', + 'large.f90', 'upu23.f90', 'x23.f90', ) From 20911e401f94d510979efe63e7b90d87f30bee11 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Sat, 23 Aug 2025 20:01:15 +0200 Subject: [PATCH 02/26] Woops, i should rename everything Signed-off-by: lukaswittmann --- src/mstore/large.f90 | 6 +++--- subprojects/jonquil.wrap | 2 ++ subprojects/test-drive.wrap | 2 ++ subprojects/toml-f.wrap | 2 ++ 4 files changed, 9 insertions(+), 3 deletions(-) create mode 100644 subprojects/jonquil.wrap create mode 100644 subprojects/test-drive.wrap create mode 100644 subprojects/toml-f.wrap diff --git a/src/mstore/large.f90 b/src/mstore/large.f90 index 5114857..354f33e 100644 --- a/src/mstore/large.f90 +++ b/src/mstore/large.f90 @@ -4,9 +4,9 @@ module mstore_large use mstore_data_record, only : record_type, new_record implicit none private - public :: get_tools_large_records + public :: get_large_records contains -subroutine get_tools_large_records(records) +subroutine get_large_records(records) type(record_type), allocatable, intent(out) :: records(:) records = [ & new_record('hs13l_12alcb', hs13l_12alcb), & @@ -14,7 +14,7 @@ subroutine get_tools_large_records(records) new_record('lnci16_brcap', lnci16_brcap), & new_record('lnci16_dna', lnci16_dna) & ] -end subroutine get_tools_large_records +end subroutine get_large_records subroutine hs13l_12alcb(self) type(structure_type), intent(out) :: self diff --git a/subprojects/jonquil.wrap b/subprojects/jonquil.wrap new file mode 100644 index 0000000..48c1863 --- /dev/null +++ b/subprojects/jonquil.wrap @@ -0,0 +1,2 @@ +[wrap-redirect] +filename = mctc-lib/subprojects/jonquil.wrap diff --git a/subprojects/test-drive.wrap b/subprojects/test-drive.wrap new file mode 100644 index 0000000..bc18dc2 --- /dev/null +++ b/subprojects/test-drive.wrap @@ -0,0 +1,2 @@ +[wrap-redirect] +filename = jonquil/subprojects/test-drive.wrap diff --git a/subprojects/toml-f.wrap b/subprojects/toml-f.wrap new file mode 100644 index 0000000..b23e3da --- /dev/null +++ b/subprojects/toml-f.wrap @@ -0,0 +1,2 @@ +[wrap-redirect] +filename = mctc-lib/subprojects/toml-f.wrap From 04f5e1901748be39cc05477666ae244bfee42c2b Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Sat, 23 Aug 2025 20:04:19 +0200 Subject: [PATCH 03/26] Revert "Woops, i should rename everything" This reverts commit 20911e401f94d510979efe63e7b90d87f30bee11. --- src/mstore/large.f90 | 6 +++--- subprojects/jonquil.wrap | 2 -- subprojects/test-drive.wrap | 2 -- subprojects/toml-f.wrap | 2 -- 4 files changed, 3 insertions(+), 9 deletions(-) delete mode 100644 subprojects/jonquil.wrap delete mode 100644 subprojects/test-drive.wrap delete mode 100644 subprojects/toml-f.wrap diff --git a/src/mstore/large.f90 b/src/mstore/large.f90 index 354f33e..5114857 100644 --- a/src/mstore/large.f90 +++ b/src/mstore/large.f90 @@ -4,9 +4,9 @@ module mstore_large use mstore_data_record, only : record_type, new_record implicit none private - public :: get_large_records + public :: get_tools_large_records contains -subroutine get_large_records(records) +subroutine get_tools_large_records(records) type(record_type), allocatable, intent(out) :: records(:) records = [ & new_record('hs13l_12alcb', hs13l_12alcb), & @@ -14,7 +14,7 @@ subroutine get_large_records(records) new_record('lnci16_brcap', lnci16_brcap), & new_record('lnci16_dna', lnci16_dna) & ] -end subroutine get_large_records +end subroutine get_tools_large_records subroutine hs13l_12alcb(self) type(structure_type), intent(out) :: self diff --git a/subprojects/jonquil.wrap b/subprojects/jonquil.wrap deleted file mode 100644 index 48c1863..0000000 --- a/subprojects/jonquil.wrap +++ /dev/null @@ -1,2 +0,0 @@ -[wrap-redirect] -filename = mctc-lib/subprojects/jonquil.wrap diff --git a/subprojects/test-drive.wrap b/subprojects/test-drive.wrap deleted file mode 100644 index bc18dc2..0000000 --- a/subprojects/test-drive.wrap +++ /dev/null @@ -1,2 +0,0 @@ -[wrap-redirect] -filename = jonquil/subprojects/test-drive.wrap diff --git a/subprojects/toml-f.wrap b/subprojects/toml-f.wrap deleted file mode 100644 index b23e3da..0000000 --- a/subprojects/toml-f.wrap +++ /dev/null @@ -1,2 +0,0 @@ -[wrap-redirect] -filename = mctc-lib/subprojects/toml-f.wrap From 7d3646993edb9a7175681d3ef69ae400a4f686d2 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Sat, 23 Aug 2025 20:04:38 +0200 Subject: [PATCH 04/26] Woops, i should rename everything Signed-off-by: lukaswittmann --- src/mstore/large.f90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/mstore/large.f90 b/src/mstore/large.f90 index 5114857..354f33e 100644 --- a/src/mstore/large.f90 +++ b/src/mstore/large.f90 @@ -4,9 +4,9 @@ module mstore_large use mstore_data_record, only : record_type, new_record implicit none private - public :: get_tools_large_records + public :: get_large_records contains -subroutine get_tools_large_records(records) +subroutine get_large_records(records) type(record_type), allocatable, intent(out) :: records(:) records = [ & new_record('hs13l_12alcb', hs13l_12alcb), & @@ -14,7 +14,7 @@ subroutine get_tools_large_records(records) new_record('lnci16_brcap', lnci16_brcap), & new_record('lnci16_dna', lnci16_dna) & ] -end subroutine get_tools_large_records +end subroutine get_large_records subroutine hs13l_12alcb(self) type(structure_type), intent(out) :: self From d280020a53b035039e9e794ffb643d4ee5bc8260 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Sat, 23 Aug 2025 21:42:54 +0200 Subject: [PATCH 05/26] Fix cmake build Signed-off-by: lukaswittmann --- src/mstore/CMakeLists.txt | 1 + 1 file changed, 1 insertion(+) diff --git a/src/mstore/CMakeLists.txt b/src/mstore/CMakeLists.txt index 1ffe6db..b3e25b0 100644 --- a/src/mstore/CMakeLists.txt +++ b/src/mstore/CMakeLists.txt @@ -28,6 +28,7 @@ list( "${dir}/mb16_43.f90" "${dir}/upu23.f90" "${dir}/x23.f90" + "${dir}/large.f90" ) set(srcs "${srcs}" PARENT_SCOPE) From 5ef801e35340a268f025c5dfb516e50ff1ec90ac Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Sat, 23 Aug 2025 21:46:39 +0200 Subject: [PATCH 06/26] Possible gcc ubuntu-latest fix Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 15 +++++++++++---- 1 file changed, 11 insertions(+), 4 deletions(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index f3b8376..be485dd 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -55,10 +55,17 @@ jobs: - name: Install GCC (Linux) if: contains(matrix.os, 'ubuntu') run: | - sudo update-alternatives \ - --install /usr/bin/gcc gcc /usr/bin/gcc-${GCC_V} 100 \ - --slave /usr/bin/gfortran gfortran /usr/bin/gfortran-${GCC_V} \ - --slave /usr/bin/gcov gcov /usr/bin/gcov-${GCC_V} + if [[ -x "/usr/bin/gcc-${GCC_V}" && -x "/usr/bin/gfortran-${GCC_V}" ]]; then + echo "Using GCC ${GCC_V} via update-alternatives" + sudo update-alternatives \ + --install /usr/bin/gcc gcc /usr/bin/gcc-${GCC_V} 100 \ + --slave /usr/bin/gfortran gfortran /usr/bin/gfortran-${GCC_V} \ + --slave /usr/bin/gcov gcov /usr/bin/gcov-${GCC_V} + else + echo "GCC ${GCC_V} not found; using default system compilers" + gcc --version + gfortran --version + fi - name: Install meson/cmake run: pip3 install meson==0.57.2 ninja cmake From c1485dcbdcfcf4550bbcf2922e0514dc74aa73c3 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 09:04:17 +0200 Subject: [PATCH 07/26] Added mindless molecule with atoms Fr to Lr Signed-off-by: lukaswittmann --- src/mstore/f_block.f90 | 30 +++++++++++++++++++++++++++++- 1 file changed, 29 insertions(+), 1 deletion(-) diff --git a/src/mstore/f_block.f90 b/src/mstore/f_block.f90 index 963cb68..55b6606 100644 --- a/src/mstore/f_block.f90 +++ b/src/mstore/f_block.f90 @@ -71,7 +71,8 @@ subroutine get_f_block_records(records) new_record('Pr2', Pr2), & new_record('Gd2', Gd2), & new_record('U2', U2), & - new_record('PaNp', PaNp) & + new_record('PaNp', PaNp), & + new_record('Fr_to_Lr', Fr_to_Lr) & ] @@ -736,4 +737,31 @@ subroutine PaNp(self) call new(self, sym, xyz) end subroutine PaNp +subroutine Fr_to_Lr(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 17 + integer, parameter :: num(nat) = [& + & 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & 0.98692316414074_wp, 6.12727238368797_wp,-6.67861597188102_wp, & + & 3.63898862390869_wp, 5.12109301182962_wp, 3.01908613326278_wp, & + & 5.14503571563551_wp,-3.97172984617710_wp, 3.82011791828867_wp, & + & 6.71986847575494_wp, 1.71382138402812_wp, 3.92749159076307_wp, & + & 4.13783589704826_wp,-2.10695793491818_wp, 0.19753203068899_wp, & + & 8.97685097698326_wp,-3.08813636191844_wp,-4.45568615593938_wp, & + & 12.5486412940776_wp,-1.77128765259458_wp, 0.59261498922861_wp, & + & 7.82051475868325_wp,-3.97159756604558_wp,-0.53637703616916_wp, & + &-0.43444574624893_wp,-1.69696511583960_wp,-1.65898182093050_wp, & + &-4.71270645149099_wp,-0.11534827468942_wp, 2.84863373521297_wp, & + &-2.52061680335614_wp, 1.82937752749537_wp,-2.10366982879172_wp, & + & 0.13551154616576_wp, 7.99805359235043_wp,-1.55508522619903_wp, & + & 3.91594542499717_wp,-1.72975169129597_wp,-5.07944366756113_wp, & + &-1.03393930231679_wp, 4.69307230054046_wp, 0.02656940927472_wp, & + & 6.20675384557240_wp, 4.24490721493632_wp,-0.71004195169885_wp, & + & 7.04586341131562_wp, 5.20053667939076_wp,-7.51972863675876_wp, & + & 2.01082807362334_wp, 1.34838807211157_wp,-4.70482633508447_wp],& + & [3, nat]) + call new(self, num, xyz) +end subroutine Fr_to_Lr + end module mstore_f_block From 3ff751db7a3e0f85d6559139f1308864adac3574 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 09:19:05 +0200 Subject: [PATCH 08/26] Updated intel job to use ubuntu-latest and bumped actions to supported versions Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index be485dd..8f75576 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -154,7 +154,7 @@ jobs: strategy: fail-fast: false matrix: - os: [ubuntu-20.04] + os: [ubuntu-latest] env: FC: ifort @@ -162,9 +162,9 @@ jobs: steps: - name: Checkout code - uses: actions/checkout@v2 + uses: actions/checkout@v3 - - uses: actions/setup-python@v1 + - uses: actions/setup-python@v4 with: python-version: '3.x' From 1587bc3adad6731cd198751bcfd58f959ec9d3c2 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 09:24:21 +0200 Subject: [PATCH 09/26] Possible fix for the intel build still sticking to ifort Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 18 ++++++++---------- 1 file changed, 8 insertions(+), 10 deletions(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index 8f75576..fde3bfd 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -178,28 +178,26 @@ jobs: - name: Install Intel oneAPI compiler run: | - sudo apt-get install intel-oneapi-compiler-fortran - source /opt/intel/oneapi/setvars.sh - printenv >> $GITHUB_ENV + sudo apt-get install -y intel-oneapi-compiler-fortran intel-oneapi-compiler-fortran-classic - name: Install meson/cmake - run: pip3 install meson==0.56.2 ninja cmake + run: pip3 install meson==0.57.2 ninja cmake - name: Configure meson build - run: meson setup ${{ env.M_BUILD_DIR }} + run: . /opt/intel/oneapi/setvars.sh && meson setup ${{ env.M_BUILD_DIR }} - name: Build library (meson) - run: meson compile -C ${{ env.M_BUILD_DIR }} + run: . /opt/intel/oneapi/setvars.sh && meson compile -C ${{ env.M_BUILD_DIR }} - name: Run unit tests (meson) - run: meson test -C ${{ env.M_BUILD_DIR }} --print-errorlogs --no-rebuild + run: . /opt/intel/oneapi/setvars.sh && meson test -C ${{ env.M_BUILD_DIR }} --print-errorlogs --no-rebuild - name: Configure cmake build - run: cmake -B ${{ env.C_BUILD_DIR }} -G Ninja + run: . /opt/intel/oneapi/setvars.sh && cmake -B ${{ env.C_BUILD_DIR }} -G Ninja - name: Build library (CMake) - run: cmake --build ${{ env.C_BUILD_DIR }} + run: . /opt/intel/oneapi/setvars.sh && cmake --build ${{ env.C_BUILD_DIR }} - name: Run unit tests (CTest) - run: ctest + run: . /opt/intel/oneapi/setvars.sh && ctest working-directory: ${{ env.C_BUILD_DIR }} From a344dbf23f2a6776f7c6fafdde0d47c45d5be19e Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 09:27:03 +0200 Subject: [PATCH 10/26] Possible fix for the intel CI Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index fde3bfd..021594d 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -157,7 +157,7 @@ jobs: os: [ubuntu-latest] env: - FC: ifort + FC: ifx OMP_NUM_THREADS: 2,1 steps: @@ -178,10 +178,10 @@ jobs: - name: Install Intel oneAPI compiler run: | - sudo apt-get install -y intel-oneapi-compiler-fortran intel-oneapi-compiler-fortran-classic + sudo apt-get install -y intel-oneapi-compiler-fortran - name: Install meson/cmake - run: pip3 install meson==0.57.2 ninja cmake + run: pip3 install meson==1.4.1 ninja cmake - name: Configure meson build run: . /opt/intel/oneapi/setvars.sh && meson setup ${{ env.M_BUILD_DIR }} From 9defbf3999bb81b81498c855c80ab9c3c54ff51f Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 10:23:11 +0200 Subject: [PATCH 11/26] Possible fix for intel build (local build working) Signed-off-by: lukaswittmann --- config/meson.build | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/config/meson.build b/config/meson.build index 6e8574b..f8e6ee2 100644 --- a/config/meson.build +++ b/config/meson.build @@ -25,6 +25,13 @@ if fc_id == 'gcc' ) elif fc_id == 'intel' add_project_arguments( + '-fpp', + '-traceback', + language: 'fortran', + ) +elif fc_id == 'intel-llvm' + add_project_arguments( + '-fpp', '-traceback', language: 'fortran', ) From 0b7cc59893a395a0ecf8f45ec15250b05f4326e1 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 10:29:45 +0200 Subject: [PATCH 12/26] meson: detect and link libunwind for Fortran traceback --- config/meson.build | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/config/meson.build b/config/meson.build index f8e6ee2..b936c73 100644 --- a/config/meson.build +++ b/config/meson.build @@ -48,6 +48,13 @@ if get_option('openmp') omp_dep = dependency('openmp') lib_deps += omp_dep endif +# Detect libunwind (needed for Fortran traceback with some compilers) +cc = meson.get_compiler('c') +unwind_lib = cc.find_library('unwind', required: false) +if unwind_lib.found() + lib_deps += unwind_lib +endif + # Create the tool chain library as subproject mctc_dep = dependency('mctc-lib', required: false) From 3eafae4019fc2471d8238d93fa44a7175781c848 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 10:34:00 +0200 Subject: [PATCH 13/26] CI: install libunwind-dev on intel Ubuntu runners --- .github/workflows/build.yml | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index 021594d..feece72 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -180,6 +180,10 @@ jobs: run: | sudo apt-get install -y intel-oneapi-compiler-fortran + - name: Install libunwind dev + run: | + sudo apt-get install -y libunwind-dev + - name: Install meson/cmake run: pip3 install meson==1.4.1 ninja cmake From 6d97188742b77421fd42649bc1c1aee1a12e61c2 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 10:40:40 +0200 Subject: [PATCH 14/26] meson: only probe libunwind when a C compiler is present --- config/meson.build | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/config/meson.build b/config/meson.build index b936c73..d93327b 100644 --- a/config/meson.build +++ b/config/meson.build @@ -49,10 +49,12 @@ if get_option('openmp') lib_deps += omp_dep endif # Detect libunwind (needed for Fortran traceback with some compilers) -cc = meson.get_compiler('c') -unwind_lib = cc.find_library('unwind', required: false) -if unwind_lib.found() - lib_deps += unwind_lib +if meson.has_compiler('c') + cc = meson.get_compiler('c') + unwind_lib = cc.find_library('unwind', required: false) + if unwind_lib.found() + lib_deps += unwind_lib + endif endif From c0559ba781b7e7b2a5a6ebde4395e478f68a40d5 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 10:44:07 +0200 Subject: [PATCH 15/26] Revert "CI: install libunwind-dev on intel Ubuntu runners" This reverts commit 3eafae4019fc2471d8238d93fa44a7175781c848. --- .github/workflows/build.yml | 4 ---- 1 file changed, 4 deletions(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index feece72..021594d 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -180,10 +180,6 @@ jobs: run: | sudo apt-get install -y intel-oneapi-compiler-fortran - - name: Install libunwind dev - run: | - sudo apt-get install -y libunwind-dev - - name: Install meson/cmake run: pip3 install meson==1.4.1 ninja cmake From 0d4161c090a3eb7fe5940b8988bdde9668e1d950 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 10:46:10 +0200 Subject: [PATCH 16/26] Revert "meson: detect and link libunwind for Fortran traceback" This reverts commit 0b7cc59893a395a0ecf8f45ec15250b05f4326e1. --- config/meson.build | 9 --------- 1 file changed, 9 deletions(-) diff --git a/config/meson.build b/config/meson.build index d93327b..f8e6ee2 100644 --- a/config/meson.build +++ b/config/meson.build @@ -48,15 +48,6 @@ if get_option('openmp') omp_dep = dependency('openmp') lib_deps += omp_dep endif -# Detect libunwind (needed for Fortran traceback with some compilers) -if meson.has_compiler('c') - cc = meson.get_compiler('c') - unwind_lib = cc.find_library('unwind', required: false) - if unwind_lib.found() - lib_deps += unwind_lib - endif -endif - # Create the tool chain library as subproject mctc_dep = dependency('mctc-lib', required: false) From 6bfde10f8734d23b0d33d8340f1b883595928588 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Mon, 25 Aug 2025 10:58:20 +0200 Subject: [PATCH 17/26] CI: update MSYS2 packages on Windows runner (enable update) --- .github/workflows/build.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index 021594d..9eaa7a2 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -110,7 +110,7 @@ jobs: uses: msys2/setup-msys2@v2 with: msystem: ${{ matrix.msystem }} - update: false + update: true install: >- git mingw-w64-${{ matrix.arch }}-gcc-fortran From b32ce39d5107abfb86f4262db27d51bac6ef60fd Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 11:30:35 +0100 Subject: [PATCH 18/26] Added systematic alanine and amylose chains. Removed old large structures Signed-off-by: lukaswittmann --- src/mstore.f90 | 6 +- src/mstore/amylose.f90 | 3147 ++++++++++ src/mstore/large.f90 | 1433 ----- src/mstore/meson.build | 3 +- src/mstore/polyalanine.f90 | 10969 +++++++++++++++++++++++++++++++++++ 5 files changed, 14122 insertions(+), 1436 deletions(-) create mode 100644 src/mstore/amylose.f90 delete mode 100644 src/mstore/large.f90 create mode 100644 src/mstore/polyalanine.f90 diff --git a/src/mstore.f90 b/src/mstore.f90 index f0998a7..1c5b92e 100644 --- a/src/mstore.f90 +++ b/src/mstore.f90 @@ -27,7 +27,8 @@ module mstore use mstore_il16, only : get_il16_records use mstore_mb16_43, only : get_mb16_43_records use mstore_upu23, only : get_upu23_records - use mstore_large, only : get_large_records + use mstore_amylose, only : get_amylose_records + use mstore_polyalanine, only : get_polyalanine_records use mstore_x23, only : get_x23_records use mstore_f_block, only : get_f_block_records implicit none @@ -137,7 +138,8 @@ subroutine get_mstore_collections(collections) new_collection("IL16", get_il16_records), & new_collection("MB16-43", get_mb16_43_records), & new_collection("UPU23", get_upu23_records), & - ! new_collection("TOOLS-LARGE", get_tools_large_records), & + new_collection("ALYLOSE", get_amylose_records), & + new_collection("POLYALANINE", get_polyalanine_records), & new_collection("X23", get_x23_records) & ] diff --git a/src/mstore/amylose.f90 b/src/mstore/amylose.f90 new file mode 100644 index 0000000..d7bdd92 --- /dev/null +++ b/src/mstore/amylose.f90 @@ -0,0 +1,3147 @@ +! This file is part of mstore. +! SPDX-Identifier: Apache-2.0 +! +! Licensed under the Apache License, Version 2.0 (the "License"); +! you may not use this file except in compliance with the License. +! You may obtain a copy of the License at +! +! http://www.apache.org/licenses/LICENSE-2.0 +! +! Unless required by applicable law or agreed to in writing, software +! distributed under the License is distributed on an "AS IS" BASIS, +! WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +! See the License for the specific language governing permissions and +! limitations under the License. + +! Structures of amylose-chains as used in the following publications: + +! - J. Kussmann and C. Ochsenfeld, +! "Linear-scaling method for calculating nuclear magnetic resonance +! chemical shifts using gauge-including atomic orbitals within Hartree-Fock +! and density-functional theory", +! J. Chem. Phys. 127, 054103 (2007). + +! - J. Kussmann and C. Ochsenfeld, +! "A density matrix-based method for the linear-scaling calculation of +! dynamic second- and third-order properties at the Hartree-Fock and Kohn-Sham +! density functional theory levels", +! J. Chem. Phys., submitted for publication (2007). + +module mstore_amylose + use mctc_env_accuracy, only : wp + use mctc_io_structure, only : structure_type, new + use mstore_data_record, only : record_type, new_record + implicit none + private + public :: get_amylose_records +contains +subroutine get_amylose_records(records) + type(record_type), allocatable, intent(out) :: records(:) + records = [ & + new_record('aDGlucose', aDGlucose), & + new_record('Amylose2', Amylose2 ), & + new_record('Amylose4', Amylose4 ), & + new_record('Amylose8', Amylose8 ), & + new_record('Amylose16', Amylose16), & + new_record('Amylose32', Amylose32), & + new_record('Amylose48', Amylose48), & + new_record('Amylose64', Amylose64) & + ] +end subroutine get_amylose_records + +subroutine aDGlucose(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 24 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "H", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", & + & "H", "C", "C", "O", "H", "C", "O", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -1.23997500_wp, -2.91634700_wp, -0.23541800_wp, -3.65783300_wp, & + & 0.88589000_wp, 1.63490900_wp, 2.19379600_wp, -2.53360600_wp, & + & -0.38987600_wp, -1.08280300_wp, -2.01648000_wp, -0.82813600_wp, & + & -0.74403500_wp, -1.20514300_wp, 1.03245100_wp, -3.05072000_wp, & + & 0.23117600_wp, 1.00994300_wp, -3.04576900_wp, -0.29529500_wp, & + & -0.92551700_wp, -3.24393000_wp, 1.12881300_wp, -0.67307900_wp, & + & 1.53999900_wp, -2.16999700_wp, 0.40372100_wp, 1.25434400_wp, & + & -0.89201300_wp, -1.21081100_wp, 3.58900500_wp, 0.58422500_wp, & + & 1.13354500_wp, -0.51456000_wp, -1.00226300_wp, -0.01327900_wp, & + & -2.60885100_wp, 0.44526900_wp, -0.32153800_wp, -0.87969400_wp, & + & 0.51528000_wp, -1.45685300_wp, 0.99025900_wp, -0.97119300_wp, & + & -0.15622700_wp, 2.95288900_wp, 0.35230000_wp, 0.27962500_wp, & + & 1.44307900_wp, 0.08080600_wp, 1.65788000_wp, -1.10415600_wp, & + & 0.34135700_wp, -0.44098100_wp, 1.57050700_wp, 0.22207600_wp, & + & 0.58530600_wp, -0.54224100_wp, 1.35452900_wp, 0.41038600_wp, & + & 1.25836300_wp, 2.33613000_wp, 0.82527200_wp, 0.86740600_wp, & + & 1.52387400_wp, 0.21293700_wp, 1.07718600_wp, 1.96676200_wp, & + & -1.12200900_wp, 0.71452600_wp, 1.21021800_wp, -1.81804400_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine aDGlucose + +subroutine Amylose16(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 339 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "H", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", & + & "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", & + & "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", & + & "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", & + & "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", & + & "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", & + & "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", & + & "C", "O", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -23.90323200_wp, 1.57351100_wp, 5.10544300_wp, -25.96894200_wp, & + & 4.44436800_wp, 1.74505800_wp, -20.56528500_wp, 2.22505700_wp, & + & 5.73371800_wp, -23.40948300_wp, 1.47221700_wp, 4.14018100_wp, & + & -23.47100100_wp, 3.52745600_wp, 4.22400000_wp, -25.34696200_wp, & + & 3.71752700_wp, 2.26722800_wp, -24.88613500_wp, 1.78274300_wp, & + & 2.00751400_wp, -24.86733300_wp, 2.59093500_wp, 0.79196900_wp, & + & -21.33641900_wp, 2.96504700_wp, 5.51640600_wp, -20.88912300_wp, & + & 2.04810400_wp, 3.70513600_wp, -19.08983300_wp, 5.18066800_wp, & + & 3.97995300_wp, -22.91447700_wp, 2.73576800_wp, 3.72312200_wp, & + & -24.50666300_wp, 2.71726000_wp, 1.71289100_wp, -22.54436900_wp, & + & 2.05968900_wp, 1.74168100_wp, -21.45654800_wp, 2.89532600_wp, & + & 4.09036400_wp, -19.48478700_wp, 4.21182900_wp, 3.67503700_wp, & + & -21.35085300_wp, 5.03524200_wp, 3.97936100_wp, -23.08193400_wp, & + & 2.83860500_wp, 2.20745400_wp, -20.89424000_wp, 4.17456000_wp, & + & 3.49218400_wp, -22.60360200_wp, 4.13273400_wp, 1.80307800_wp, & + & -20.84427500_wp, 5.25226300_wp, 1.63199600_wp, -21.19221700_wp, & + & 4.28740000_wp, 2.00015000_wp, -23.13408500_wp, 3.20996400_wp, & + & -2.60654000_wp, -17.72079900_wp, 5.13574700_wp, 1.51976400_wp, & + & -20.52390400_wp, 3.34198100_wp, 1.17445100_wp, -20.64216800_wp, & + & 4.66861500_wp, -0.39475900_wp, -22.49820800_wp, 3.19216300_wp, & + & -1.72092200_wp, -21.98380500_wp, 1.81236900_wp, -0.36024000_wp, & + & -21.97099700_wp, 1.34891000_wp, -1.74530400_wp, -18.50903900_wp, & + & 5.39772000_wp, 0.81373500_wp, -18.01590400_wp, 3.41770400_wp, & + & 0.41769600_wp, -16.30331700_wp, 5.60443900_wp, -1.90886700_wp, & + & -20.05821600_wp, 3.80140200_wp, -0.08534800_wp, -21.62507600_wp, & + & 2.16300100_wp, -1.28315000_wp, -19.64649100_wp, 1.83209200_wp, & + & -0.77433800_wp, -18.61024100_wp, 4.22719300_wp, -0.00587300_wp, & + & -16.66913100_wp, 4.75859800_wp, -1.32678800_wp, -18.56060700_wp, & + & 5.45638600_wp, -1.76309300_wp, -20.21002800_wp, 2.66446500_wp, & + & -1.09551100_wp, -18.07529300_wp, 4.55483500_wp, -1.39011700_wp, & + & -19.76186000_wp, 3.15233300_wp, -2.37076400_wp, -18.03193200_wp, & + & 3.75036500_wp, -3.38474500_wp, -18.35777300_wp, 3.43937300_wp, & + & -2.39243800_wp, -20.21450300_wp, -0.90654600_wp, -4.34562200_wp, & + & -14.90489000_wp, 3.67088400_wp, -3.40418300_wp, -17.65468900_wp, & + & 2.22500800_wp, -2.16233700_wp, -17.78929300_wp, 1.79817900_wp, & + & -4.17102600_wp, -19.59023600_wp, -0.20323900_wp, -3.79572600_wp, & + & -19.05436600_wp, 0.03741800_wp, -1.87731700_wp, -19.01312200_wp, & + & -1.34023300_wp, -2.36423600_wp, -15.69147100_wp, 3.25443600_wp, & + & -4.03373500_wp, -15.14029500_wp, 1.73957700_wp, -2.72206600_wp, & + & -13.46024100_wp, 1.29023800_wp, -5.90056600_wp, -17.18696500_wp, & + & 1.52482500_wp, -3.30566000_wp, -18.69471400_wp, -0.46720500_wp, & + & -2.72689100_wp, -16.71421500_wp, -0.21656300_wp, -2.18081300_wp, & + & -15.75078000_wp, 1.88608300_wp, -3.61251300_wp, -13.81008400_wp, & + & 1.22050100_wp, -4.87030400_wp, -15.71391600_wp, 1.25575600_wp, & + & -5.66307100_wp, -17.29563200_wp, 0.02568300_wp, -3.02749900_wp, & + & -15.20916000_wp, 1.00949300_wp, -4.72891000_wp, -16.84598900_wp, & + & -0.66930000_wp, -4.20144900_wp, -15.11990200_wp, -1.05657000_wp, & + & -5.32056300_wp, -15.44961000_wp, -0.47296800_wp, -4.46056400_wp, & + & -17.16566300_wp, -4.72977500_wp, -2.20607300_wp, -11.99189200_wp, & + & -1.03933200_wp, -5.31331000_wp, -14.71721700_wp, -1.01968900_wp, & + & -3.37105700_wp, -14.81675600_wp, -2.86954000_wp, -4.26708000_wp, & + & -16.56621400_wp, -3.84815000_wp, -2.43246700_wp, -16.06060700_wp, & + & -2.17397600_wp, -1.45114000_wp, -15.97661700_wp, -3.40125600_wp, & + & -0.66382300_wp, -12.75953000_wp, -1.81210300_wp, -5.36049400_wp, & + & -12.18401000_wp, -1.69336600_wp, -3.36708300_wp, -10.45534800_wp, & + & -4.43294200_wp, -4.98855600_wp, -14.21642500_wp, -2.33841600_wp, & + & -3.52757000_wp, -15.67649500_wp, -3.14425300_wp, -1.58004700_wp, & + & -13.71143500_wp, -2.50810700_wp, -1.46953100_wp, -12.78724300_wp, & + & -2.32170300_wp, -4.02134400_wp, -10.81438000_wp, -3.67137100_wp, & + & -4.29554300_wp, -12.70865000_wp, -4.32518100_wp, -4.78381300_wp, & + & -14.28893000_wp, -3.04221800_wp, -2.17229000_wp, -12.20926400_wp, & + & -3.72654100_wp, -4.02229100_wp, -13.80623600_wp, -4.38395400_wp, & + & -2.35199900_wp, -12.05751600_wp, -5.45982000_wp, -2.75731100_wp, & + & -12.41246800_wp, -4.43083700_wp, -2.68469000_wp, -14.04052600_wp, & + & -5.31088500_wp, 2.08266900_wp, -8.93210200_wp, -5.36204500_wp, & + & -2.80981800_wp, -11.67905000_wp, -3.88789400_wp, -1.59500200_wp, & + & -11.71697800_wp, -5.73305900_wp, -0.68435300_wp, -13.46218700_wp, & + & -4.93257500_wp, 1.23966300_wp, -13.01336000_wp, -3.11673000_wp, & + & 0.51382400_wp, -12.90530100_wp, -3.24714100_wp, 1.96505900_wp, & + & -9.67754400_wp, -5.89380400_wp, -2.21862900_wp, -9.12907900_wp, & + & -4.23266100_wp, -1.09601400_wp, -7.30780800_wp, -7.14913400_wp, & + & 0.04561400_wp, -11.14148600_wp, -4.80863600_wp, -0.65784900_wp, & + & -12.60275500_wp, -3.80488900_wp, 1.19489800_wp, -10.65559300_wp, & + & -3.27597500_wp, 0.73443100_wp, -9.70744400_wp, -5.15114300_wp, & + & -0.99437200_wp, -7.69542200_wp, -6.14456200_wp, -0.12476000_wp, & + & -9.56565700_wp, -6.98052200_wp, 0.11723100_wp, -11.21037200_wp, & + & -4.17258700_wp, 0.73078600_wp, -9.09104100_wp, -5.99863300_wp, & + & 0.10594800_wp, -10.69019900_wp, -5.12577900_wp, 1.67308800_wp, & + & -8.90813300_wp, -6.06028400_wp, 2.24761000_wp, -9.29203200_wp, & + & -5.38120600_wp, 1.48667100_wp, -10.95158500_wp, -2.20270400_wp, & + & 5.13149700_wp, -5.78631700_wp, -5.96190900_wp, 2.09526400_wp, & + & -8.58596600_wp, -4.16956700_wp, 1.71693300_wp, -8.58587500_wp, & + & -4.58451900_wp, 3.73270500_wp, -10.37446600_wp, -2.62029700_wp, & + & 4.30643100_wp, -9.96552400_wp, -2.06657000_wp, 2.42270200_wp, & + & -9.87188800_wp, -0.99872100_wp, 3.41564500_wp, -6.52355200_wp, & + & -5.84091200_wp, 2.88861600_wp, -6.03348900_wp, -3.92117800_wp, & + & 2.25996600_wp, -4.14799600_wp, -4.76356200_wp, 5.23730400_wp, & + & -8.03473100_wp, -3.98071500_wp, 3.01096800_wp, -9.54426400_wp, & + & -1.94060800_wp, 3.37818800_wp, -7.60768500_wp, -1.92939200_wp, & + & 2.65094900_wp, -6.58867300_wp, -4.41889200_wp, 3.05577400_wp, & + & -4.56160900_wp, -4.29132400_wp, 4.34569100_wp, -6.41181400_wp, & + & -4.66198700_wp, 5.17934400_wp, -8.13802600_wp, -2.49678000_wp, & + & 3.36443300_wp, -5.96270200_wp, -4.05642100_wp, 4.39152200_wp, & + & -7.60275200_wp, -2.32554400_wp, 4.68736300_wp, -5.80405000_wp, & + & -2.39946000_wp, 5.75301200_wp, -6.19692600_wp, -2.59279100_wp, & + & 4.75490100_wp, -7.98540200_wp, 2.19047900_wp, 4.50912800_wp, & + & -2.68351400_wp, -2.37744200_wp, 5.53811300_wp, -5.52588100_wp, & + & -1.64781300_wp, 3.93071500_wp, -5.53970700_wp, -0.31274400_wp, & + & 5.49648600_wp, -7.38725600_wp, 1.29894300_wp, 4.32496500_wp, & + & -6.97068300_wp, 0.16351900_wp, 2.72400700_wp, -6.91765800_wp, & + & 1.60511300_wp, 2.49125600_wp, -3.43398400_wp, -1.69642100_wp, & + & 5.93990300_wp, -2.98825800_wp, -1.00121700_wp, 4.03379400_wp, & + & -1.11674800_wp, 0.87871000_wp, 6.50036900_wp, -4.99608000_wp, & + & -0.49697100_wp, 4.57030500_wp, -6.56460800_wp, 1.00542400_wp, & + & 3.20630700_wp, -4.62001400_wp, 0.48854100_wp, 2.72365200_wp, & + & -3.53946800_wp, -0.69409800_wp, 4.92210600_wp, -1.53221900_wp, & + & 0.45487500_wp, 5.58597100_wp, -3.38091900_wp, 0.83741700_wp, & + & 6.41574900_wp, -5.14330400_wp, 0.68939900_wp, 3.61707900_wp, & + & -2.93970600_wp, 0.59940400_wp, 5.44810200_wp, -4.62934000_wp, & + & 1.85246700_wp, 4.28742200_wp, -2.84122000_wp, 2.69460400_wp, & + & 4.97500400_wp, -3.21644700_wp, 1.77808700_wp, 4.52053100_wp, & + & -5.13026600_wp, 4.47501800_wp, 0.62035400_wp, 0.27938400_wp, & + & 2.61904000_wp, 4.78274300_wp, -2.56200900_wp, 1.72528100_wp, & + & 3.25968200_wp, -2.62963000_wp, 3.77988800_wp, 3.16781200_wp, & + & -4.50578100_wp, 3.79698400_wp, 1.20183300_wp, -4.04053300_wp, & + & 1.84791700_wp, 1.10882300_wp, -4.02367600_wp, 2.54972800_wp, & + & -0.17195600_wp, -0.49370700_wp, 3.33529900_wp, 4.50267700_wp, & + & -0.04407200_wp, 2.26931400_wp, 2.77612400_wp, 1.74711100_wp, & + & 5.41734500_wp, 2.78311300_wp, -2.07095500_wp, 2.94896600_wp, & + & 2.73612300_wp, -3.66260500_wp, 2.75503500_wp, 0.73497300_wp, & + & -1.69922200_wp, 2.10802600_wp, 0.81904700_wp, -0.61432600_wp, & + & 3.14438200_wp, 3.08782200_wp, 1.35385500_wp, 4.42568000_wp, & + & 2.56108300_wp, -0.51444900_wp, 5.26732800_wp, 2.79603400_wp, & + & -2.23832400_wp, 2.92282600_wp, 1.21718100_wp, -0.05540600_wp, & + & 4.36861000_wp, 2.38246000_wp, -1.76358200_wp, 4.17843700_wp, & + & 0.70455800_wp, -0.00826200_wp, 5.28506300_wp, 0.43687600_wp, & + & -0.35284500_wp, 4.35323700_wp, 0.88669100_wp, -2.29175100_wp, & + & 2.88196100_wp, -3.61099700_wp, 3.11567100_wp, 5.16821400_wp, & + & 0.33535400_wp, 0.31752900_wp, 3.34317400_wp, 0.14433400_wp, & + & 0.19606600_wp, 4.53098800_wp, -1.53196800_wp, -1.65591400_wp, & + & 2.94127900_wp, -2.72773700_wp, -1.13703200_wp, 1.68381500_wp, & + & -1.25352800_wp, -1.12402600_wp, 1.10467300_wp, -2.59383200_wp, & + & 2.32714400_wp, 5.36607100_wp, -0.39040300_wp, 2.82546400_wp, & + & 3.36136100_wp, -0.61673200_wp, 4.53120100_wp, 5.34609900_wp, & + & -3.12158000_wp, 0.78210700_wp, 3.69503300_wp, -1.14939700_wp, & + & -0.77973300_wp, 1.95559800_wp, -2.20432600_wp, 1.19873200_wp, & + & 1.67493400_wp, -1.66882400_wp, 2.22900500_wp, 4.13001600_wp, & + & -1.10768900_wp, 4.16836300_wp, 4.55167900_wp, -2.46892600_wp, & + & 2.27538400_wp, 5.20455400_wp, -2.96362100_wp, 0.63382000_wp, & + & 2.47506300_wp, -2.05976400_wp, 2.76290100_wp, 4.33957300_wp, & + & -2.51508200_wp, 1.07997600_wp, 2.85420700_wp, -3.37174800_wp, & + & 2.80869600_wp, 3.36794200_wp, -4.43321900_wp, 2.48368300_wp, & + & 3.14246200_wp, -3.41774000_wp, 0.63898000_wp, -1.36019300_wp, & + & -4.99317800_wp, 5.93578000_wp, 3.29693700_wp, -4.44725800_wp, & + & 3.19002800_wp, 1.95362600_wp, -3.08603900_wp, 3.05602200_wp, & + & 1.35692400_wp, -5.05045900_wp, 1.26176400_wp, -0.60957700_wp, & + & -4.50496400_wp, 1.79738500_wp, -0.20542500_wp, -2.61507000_wp, & + & 1.84210400_wp, -1.61866100_wp, -2.98222400_wp, 5.15017800_wp, & + & 2.82576800_wp, -5.03868200_wp, 5.70582900_wp, 1.42919400_wp, & + & -3.60287400_wp, 7.38735000_wp, 0.71597300_wp, -6.73157100_wp, & + & 3.66030200_wp, 1.16038500_wp, -4.16438700_wp, 2.15841000_wp, & + & -0.77984000_wp, -3.41859800_wp, 4.13766500_wp, -0.47750500_wp, & + & -2.89644300_wp, 5.09438900_wp, 1.49873300_wp, -4.50249300_wp, & + & 7.03769400_wp, 0.73398000_wp, -5.69886400_wp, 5.13400200_wp, & + & 0.69484600_wp, -6.49115300_wp, 3.55502400_wp, -0.31011200_wp, & + & -3.75988200_wp, 5.63920600_wp, 0.53053200_wp, -5.54007800_wp, & + & 4.00782900_wp, -1.10113700_wp, -4.87103100_wp, 5.73394500_wp, & + & -1.57802800_wp, -5.95222300_wp, 5.40285900_wp, -0.92390200_wp, & + & -5.14571800_wp, 3.69913400_wp, -4.97804500_wp, -2.53563700_wp, & + & 8.86190200_wp, -1.55099800_wp, -5.94830600_wp, 6.13749300_wp, & + & -1.37285700_wp, -4.01357500_wp, 6.04267200_wp, -3.29318100_wp, & + & -4.74895200_wp, 4.29626700_wp, -4.11708800_wp, -2.83737400_wp, & + & 4.79756700_wp, -2.36371400_wp, -2.00187200_wp, 4.88420300_wp, & + & -3.51931700_wp, -1.11298600_wp, 8.09673800_wp, -2.32770000_wp, & + & -5.92820300_wp, 8.67214100_wp, -2.03794000_wp, -3.95289900_wp, & + & 10.40888000_wp, -4.90054900_wp, -5.33510600_wp, 6.64178000_wp, & + & -2.69896000_wp, -4.05775700_wp, 5.18371300_wp, -3.34014900_wp, & + & -2.04813600_wp, 7.14750800_wp, -2.69218200_wp, -1.99285200_wp, & + & 8.07008800_wp, -2.72067900_wp, -4.55100900_wp, 10.04696000_wp, & + & -4.08380400_wp, -4.70944600_wp, 8.15435800_wp, -4.78240800_wp, & + & -5.14035300_wp, 6.57098700_wp, -3.28505900_wp, -2.64687100_wp, & + & 8.65287800_wp, -4.11895900_wp, -4.43261700_wp, 7.05806400_wp, & + & -4.63595700_wp, -2.71200700_wp, 8.80937700_wp, -5.73716700_wp, & + & -3.02474500_wp, 8.45066100_wp, -4.70788000_wp, -3.03963900_wp, & + & 6.82604900_wp, -5.18195300_wp, 1.78559900_wp, 11.93488500_wp, & + & -5.63593000_wp, -3.08658000_wp, 9.18414000_wp, -4.07148800_wp, & + & -2.00092300_wp, 9.15076000_wp, -5.83230400_wp, -0.93563100_wp, & + & 7.40280600_wp, -4.87543100_wp, 0.91325200_wp, 7.84617400_wp, & + & -3.12719500_wp, 0.03575800_wp, 7.95430900_wp, -3.13274200_wp, & + & 1.49227900_wp, 11.19068500_wp, -6.11697900_wp, -2.45147000_wp, & + & 11.73453000_wp, -4.36582800_wp, -1.47442400_wp, 13.56423900_wp, & + & -7.16841400_wp, -0.08878000_wp, 9.72402000_wp, -4.90718300_wp, & + & -0.98801000_wp, 8.25969400_wp, -3.75304300_wp, 0.77290200_wp, & + & 10.20451100_wp, -3.25987900_wp, 0.26837300_wp, 11.15853500_wp, & + & -5.27343500_wp, -1.29410400_wp, 13.17367600_wp, -6.18337500_wp, & + & -0.34405300_wp, 11.30502900_wp, -7.00063000_wp, -0.03067100_wp, & + & 9.65277500_wp, -4.15507800_wp, 0.34140100_wp, 11.77658400_wp, & + & -6.02237100_wp, -0.12663200_wp, 10.17580200_wp, -5.02304200_wp, & + & 1.36028600_wp, 11.95962400_wp, -5.90052400_wp, 2.01345500_wp, & + & 11.57457400_wp, -5.28990900_wp, 1.19664600_wp, 9.90483200_wp, & + & -1.81668000_wp, 4.55731000_wp, 15.08230900_wp, -5.80578400_wp, & + & 1.85162100_wp, 12.27737600_wp, -4.06063500_wp, 1.32310300_wp, & + & 12.27839600_wp, -4.30211300_wp, 3.36692900_wp, 10.48359400_wp, & + & -2.30176800_wp, 3.77153300_wp, 10.89119800_wp, -1.90902500_wp, & + & 1.84754900_wp, 10.98166300_wp, -0.76047500_wp, 2.74583800_wp, & + & 14.34398800_wp, -5.61967100_wp, 2.63257300_wp, 14.82888500_wp, & + & -3.75898800_wp, 1.84290300_wp, 16.71615300_wp, -4.34017100_wp, & + & 4.87947300_wp, 12.82761900_wp, -3.76040700_wp, 2.59693100_wp, & + & 11.31179500_wp, -1.70149600_wp, 2.78795500_wp, 13.24912700_wp, & + & -1.74643700_wp, 2.06164300_wp, 14.27491500_wp, -4.18994100_wp, & + & 2.67669100_wp, 16.30172700_wp, -3.94608700_wp, 3.95091000_wp, & + & 14.45290500_wp, -4.25005600_wp, 4.81394100_wp, 12.72034300_wp, & + & -2.25270800_wp, 2.82141300_wp, 14.90007000_wp, -3.71248300_wp, & + & 3.97674100_wp, 13.25463700_wp, -1.96714800_wp, 4.12469400_wp, & + & 15.05418900_wp, -1.94451500_wp, 5.19284600_wp, 14.66160500_wp, & + & -2.22407300_wp, 4.21472900_wp, 12.85934600_wp, 2.51618400_wp, & + & 3.56218600_wp, 18.17369800_wp, -1.93228400_wp, 4.97591200_wp, & + & 15.32958200_wp, -1.35078300_wp, 3.31233600_wp, 15.31329200_wp, & + & 0.11267300_wp, 4.75913500_wp, 13.46057200_wp, 1.61368800_wp, & + & 3.45374800_wp, 13.87984900_wp, 0.34700900_wp, 1.95644200_wp, & + & 13.92824800_wp, 1.76297600_wp, 1.60113500_wp, 17.42158500_wp, & + & -1.22178900_wp, 5.31883300_wp, 17.86558900_wp, -0.69040000_wp, & + & 3.35876500_wp, 19.73195900_wp, 1.39793700_wp, 5.65649300_wp, & + & 15.85653300_wp, -0.14795300_wp, 3.85122800_wp, 14.28394500_wp, & + & 1.22771300_wp, 2.36467700_wp, 16.23006000_wp, 0.67714200_wp, & + & 1.92731800_wp, 17.31438200_wp, -0.31007900_wp, 4.21882000_wp, & + & 19.31773000_wp, 0.89641600_wp, 4.78145800_wp, 17.46845400_wp, & + & 1.34350300_wp, 5.57675900_wp, 15.70634100_wp, 0.95265300_wp, & + & 2.80095700_wp, 17.90944800_wp, 1.02461100_wp, 4.63312200_wp, & + & 16.21710500_wp, 2.16967700_wp, 3.36918400_wp, 18.00136900_wp, & + & 3.07267000_wp, 3.98272100_wp, 17.62938800_wp, 2.11949700_wp, & + & 3.60708800_wp, 15.70798400_wp, 4.46836700_wp, -0.50801500_wp, & + & 21.12266500_wp, 2.98985900_wp, 3.79646100_wp, 18.28456000_wp, & + & 1.96074300_wp, 2.35570100_wp, 18.21006300_wp, 4.00023400_wp, & + & 2.08940600_wp, 16.33400700_wp, 3.84445600_wp, 0.12980500_wp, & + & 16.80543900_wp, 1.89653500_wp, 0.20259800_wp, 16.82007100_wp, & + & 2.48635700_wp, -1.13349400_wp, 20.34786900_wp, 3.67769100_wp, & + & 3.45693900_wp, 20.80060300_wp, 2.46979000_wp, 1.82761900_wp, & + & 22.58251600_wp, 5.61192800_wp, 1.56495000_wp, 18.77172900_wp, & + & 3.13771800_wp, 1.72953500_wp, 17.18018800_wp, 2.76908500_wp, & + & -0.24661700_wp, 19.14574800_wp, 2.13631200_wp, -0.10878000_wp, & + & 20.22811800_wp, 3.36677100_wp, 2.06305600_wp, 22.19259800_wp, & + & 4.60387300_wp, 1.42939100_wp, 20.32112700_wp, 5.45669900_wp, & + & 1.59105500_wp, 18.60445600_wp, 2.98150300_wp, 0.21849200_wp, & + & 20.78335300_wp, 4.52780400_wp, 1.25615300_wp, 19.07485900_wp, & + & 4.19000600_wp, -0.39999900_wp, 20.82775000_wp, 5.27506400_wp, & + & -0.75976300_wp, 20.48566000_wp, 4.38432100_wp, -0.23313700_wp, & + & 18.55131600_wp, 2.52919500_wp, -4.58861500_wp, 23.95151500_wp, & + & 5.15828400_wp, -0.85268500_wp, 21.15911200_wp, 3.31608900_wp, & + & -0.88695100_wp, 21.03362000_wp, 4.35597800_wp, -2.65808000_wp, & + & 19.18674500_wp, 2.66501800_wp, -3.71341400_wp, 19.70852300_wp, & + & 1.53928000_wp, -2.13764300_wp, 19.72398300_wp, 0.84717900_wp, & + & -3.42432800_wp, 23.16261700_wp, 5.29187700_wp, -1.59200600_wp, & + & 23.66806200_wp, 3.27673600_wp, -1.64695800_wp, 25.36700000_wp, & + & 5.04527500_wp, -4.31242000_wp, 21.62239900_wp, 3.55750700_wp, & + & -2.20657000_wp, 20.06519600_wp, 1.73027900_wp, -3.10792600_wp, & + & 22.04560100_wp, 1.50190100_wp, -2.55117500_wp, 23.06829500_wp, & + & 3.99815200_wp, -2.20190300_wp, 25.00599500_wp, 4.30875900_wp, & + & -3.59472800_wp, 23.11114000_wp, 4.91205800_wp, -4.14290000_wp, & + & 21.47786700_wp, 2.26476400_wp, -3.00861500_wp, 23.60159700_wp, & + & 4.08929100_wp, -3.62173600_wp, 21.92308000_wp, 2.53186700_wp, & + & -4.34879400_wp, 23.64987300_wp, 2.95824200_wp, -5.45053600_wp, & + & 23.32594400_wp, 2.81762400_wp, -4.41920000_wp, 24.03541100_wp, & + & 1.66432600_wp, -3.98679500_wp, 23.77456600_wp, 1.44274600_wp, & + & -2.95218000_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine Amylose16 + +subroutine Amylose2(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 45 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "H", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", & + & "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "O", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -5.27726600_wp, 0.15768000_wp, 1.36892200_wp, -3.89542800_wp, & + & -2.74424000_wp, -2.30130300_wp, -3.40930200_wp, 3.04543100_wp, & + & 1.73325500_wp, -4.25161600_wp, -0.18429700_wp, 1.49882100_wp, & + & -4.12153800_wp, 0.39113300_wp, -0.47267000_wp, -3.93883900_wp, & + & -2.16385600_wp, -1.37984300_wp, -3.65755500_wp, -2.55190700_wp, & + & 0.56784700_wp, -2.66688100_wp, -3.14000000_wp, -0.32869500_wp, & + & -3.68737500_wp, 2.57255700_wp, 0.79064000_wp, -2.16845100_wp, & + & 1.40439900_wp, 1.59676000_wp, -0.80004200_wp, 3.67692500_wp, & + & -0.87083100_wp, -3.47036900_wp, 0.21757400_wp, 0.38361600_wp, & + & -3.08081600_wp, -2.23618400_wp, -0.25179500_wp, -1.85215300_wp, & + & -1.05270700_wp, 0.92021000_wp, -2.73634500_wp, 1.50748700_wp, & + & 0.67208400_wp, -0.95388200_wp, 2.93603600_wp, -0.08659400_wp, & + & -2.34176600_wp, 2.08883700_wp, -1.35500100_wp, -2.46637300_wp, & + & -0.89337900_wp, 0.07760800_wp, -1.77582000_wp, 1.83730600_wp, & + & -0.45887200_wp, -1.70216500_wp, -0.48600700_wp, -1.07005300_wp, & + & -0.26347500_wp, 0.90841600_wp, -1.67304500_wp, -0.87599900_wp, & + & 0.65569500_wp, -0.80788200_wp, 1.05124200_wp, -4.08129300_wp, & + & -0.80486600_wp, 1.91283800_wp, 2.93924200_wp, -0.71300300_wp, & + & 0.07008000_wp, 0.29718500_wp, 0.19143900_wp, 1.28489000_wp, & + & -0.48228600_wp, -1.27588000_wp, 0.83243800_wp, -3.05225100_wp, & + & -0.51820400_wp, 0.03099100_wp, -2.15700600_wp, 1.08682400_wp, & + & 0.99725800_wp, -3.21082100_wp, 1.38542800_wp, 1.92550800_wp, & + & 1.99389900_wp, -1.25576900_wp, 2.32288900_wp, 1.52348900_wp, & + & 0.72949900_wp, 5.42305000_wp, 1.71940000_wp, -1.13583500_wp, & + & 1.35508600_wp, -0.11004200_wp, -0.25348100_wp, 0.98581800_wp, & + & -2.43946400_wp, 0.75228600_wp, 1.91239000_wp, -0.83125900_wp, & + & 1.66788900_wp, 2.32240300_wp, 1.05122700_wp, -0.25278700_wp, & + & 4.65571500_wp, 1.63248200_wp, -0.36643100_wp, 3.77658600_wp, & + & 0.23304600_wp, -1.60079800_wp, 1.86060300_wp, -1.20698500_wp, & + & 0.68314600_wp, 3.72997800_wp, 0.57134800_wp, -0.56599700_wp, & + & 3.14827800_wp, -1.62888800_wp, 0.20457400_wp, 5.12279100_wp, & + & -0.96659200_wp, 0.00181300_wp, 4.14403500_wp, -0.60389600_wp, & + & 0.31494400_wp, 4.31315000_wp, -0.29843200_wp, 1.69336600_wp, & + & 3.37540300_wp, 0.07856300_wp, 2.10071300_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine Amylose2 + +subroutine Amylose32(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 675 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "H", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "O", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & 47.73072800_wp, 2.37546600_wp, -1.01448700_wp, 49.40235100_wp, & + & 6.09842900_wp, -0.17095100_wp, 42.58422400_wp, 4.31412500_wp, & + & -1.95674100_wp, 48.03390700_wp, 3.11201200_wp, -1.75828300_wp, & + & 47.71586400_wp, 5.00008600_wp, -2.30422500_wp, 49.00783800_wp, & + & 5.10148900_wp, 0.02529000_wp, 47.14055500_wp, 5.95636900_wp, & + & -0.16591900_wp, 47.85340200_wp, 4.36936100_wp, 2.76144000_wp, & + & 43.18539200_wp, 3.93941400_wp, -1.12859300_wp, 43.63755500_wp, & + & 2.12930700_wp, -0.39451600_wp, 43.69785200_wp, 2.23921200_wp, & + & -1.84968900_wp, 47.35032600_wp, 4.33578000_wp, -1.52082400_wp, & + & 47.60463000_wp, 4.96927300_wp, -0.15623000_wp, 47.09554500_wp, & + & 4.90202200_wp, 2.18771400_wp, 47.58656300_wp, 3.21994500_wp, & + & 1.06984900_wp, 44.03283200_wp, 2.80252400_wp, -1.09745500_wp, & + & 45.94367200_wp, 4.09483100_wp, -1.65659100_wp, 45.98826500_wp, & + & 2.25676100_wp, -0.69526600_wp, 47.01547700_wp, 4.14355500_wp, & + & 0.97444500_wp, 45.44418400_wp, 3.15985400_wp, -0.68558000_wp, & + & 45.00262300_wp, 4.74508900_wp, 0.72421100_wp, 45.56732900_wp, & + & 3.81385100_wp, 0.69098000_wp, 46.39470800_wp, 3.48759400_wp, & + & 5.00172800_wp, 39.59711600_wp, 3.82799700_wp, 2.44120900_wp, & + & 45.05123400_wp, 2.91258400_wp, 1.65828100_wp, 44.72965300_wp, & + & 4.50321400_wp, 2.81099300_wp, 46.00265400_wp, 2.72148600_wp, & + & 4.33208500_wp, 44.13302300_wp, 3.40417100_wp, 4.87357000_wp, & + & 44.82942900_wp, 0.11726400_wp, 5.42363200_wp, 40.19346100_wp, & + & 2.94261300_wp, 2.65956700_wp, 40.64719700_wp, 1.24917200_wp, & + & 1.68486300_wp, 40.71893500_wp, 2.46555200_wp, 0.87860600_wp, & + & 44.36025300_wp, 3.47853500_wp, 2.76459000_wp, 44.60003900_wp, & + & 2.78965400_wp, 4.10454000_wp, 44.07324100_wp, 0.89995600_wp, & + & 5.48581100_wp, 44.58037700_wp, 0.74806200_wp, 3.47660400_wp, & + & 41.04634600_wp, 2.21619800_wp, 1.78716800_wp, 42.95648100_wp, & + & 3.44334300_wp, 2.47959600_wp, 43.00002300_wp, 1.55578700_wp, & + & 1.62012000_wp, 44.00598500_wp, 1.39181800_wp, 4.14236500_wp, & + & 42.45146300_wp, 2.10534700_wp, 2.33455100_wp, 41.99356200_wp, & + & 1.96736100_wp, 4.44705900_wp, 42.56170300_wp, 1.41876200_wp, & + & 3.69656300_wp, 43.35550000_wp, -2.18695700_wp, 6.09150800_wp, & + & 36.57755900_wp, 0.07010700_wp, 4.73379800_wp, 42.04165400_wp, & + & 0.10428400_wp, 3.57454100_wp, 41.70416700_wp, 0.17184200_wp, & + & 5.53510700_wp, 42.97176400_wp, -2.12676200_wp, 5.07287700_wp, & + & 41.09496500_wp, -2.12816500_wp, 5.92941600_wp, 41.80062800_wp, & + & -4.58299900_wp, 3.67857900_wp, 37.17577400_wp, -0.64834100_wp, & + & 4.17300700_wp, 37.64447000_wp, -0.92034800_wp, 2.24176800_wp, & + & 37.71692000_wp, 0.46228900_wp, 2.70778900_wp, 41.33920000_wp, & + & -0.41880700_wp, 4.69457600_wp, 41.57191300_wp, -1.90063200_wp, & + & 4.97584400_wp, 41.04076100_wp, -4.14864200_wp, 4.32795700_wp, & + & 41.56466400_wp, -2.65809000_wp, 2.97754300_wp, 38.03834500_wp, & + & -0.40941800_wp, 3.07219100_wp, 39.93745000_wp, -0.20960200_wp, & + & 4.48054800_wp, 39.99573900_wp, -0.69016200_wp, 2.46340000_wp, & + & 40.98226300_wp, -2.78560800_wp, 3.89119400_wp, 39.44043800_wp, & + & -0.91460300_wp, 3.33164700_wp, 38.96507600_wp, -2.66578300_wp, & + & 4.51569600_wp, 39.54120200_wp, -2.41182100_wp, 3.62624100_wp, & + & 40.33021300_wp, -6.51863700_wp, 2.25764000_wp, 33.55517000_wp, & + & -4.03522100_wp, 3.14976500_wp, 39.02667000_wp, -3.12048000_wp, & + & 2.50959900_wp, 38.67420100_wp, -4.62494500_wp, 3.76375300_wp, & + & 39.95519300_wp, -5.67658300_wp, 1.67635500_wp, 38.07150700_wp, & + & -6.34576200_wp, 2.18570200_wp, 38.80400300_wp, -6.07919300_wp, & + & -1.12893400_wp, 34.15983500_wp, -4.03567300_wp, 2.24346200_wp, & + & 34.64530700_wp, -2.68061500_wp, 0.84738900_wp, 34.70911600_wp, & + & -2.19871800_wp, 2.22497000_wp, 38.31839300_wp, -4.32334400_wp, & + & 2.77941500_wp, 38.55445600_wp, -5.45504600_wp, 1.78415400_wp, & + & 38.03739700_wp, -6.32238700_wp, -0.39329400_wp, 38.56629800_wp, & + & -4.34340500_wp, -0.04025100_wp, 35.03043600_wp, -3.02240100_wp, & + & 1.76308700_wp, 36.91701800_wp, -4.02024800_wp, 2.80122700_wp, & + & 36.99377800_wp, -2.72260300_wp, 1.18363900_wp, 37.97737600_wp, & + & -5.13967200_wp, 0.41463900_wp, 36.43239100_wp, -3.54381000_wp, & + & 1.53447200_wp, 35.95460100_wp, -5.55241700_wp, 0.87615500_wp, & + & 36.53777000_wp, -4.69587000_wp, 0.53545500_wp, 37.35255600_wp, & + & -6.13978000_wp, -3.54083800_wp, 30.56154800_wp, -5.29244700_wp, & + & -1.08737800_wp, 36.03510100_wp, -4.24798300_wp, -0.71374000_wp, & + & 35.67773900_wp, -6.16061500_wp, -1.13420200_wp, 36.97922900_wp, & + & -5.16271800_wp, -3.23522800_wp, 35.09505700_wp, -5.96774400_wp, & + & -3.46648900_wp, 35.85306400_wp, -3.19166900_wp, -5.28447700_wp, & + & 31.17461700_wp, -4.58016900_wp, -1.63995000_wp, 31.66506700_wp, & + & -2.64743300_wp, -1.42261500_wp, 31.71546500_wp, -3.43984900_wp, & + & -0.19614900_wp, 35.32863300_wp, -5.19621300_wp, -1.50411900_wp, & + & 35.57675800_wp, -5.10587200_wp, -3.00615300_wp, 35.08151400_wp, & + & -3.91775300_wp, -5.03123700_wp, 35.59965100_wp, -2.98394300_wp, & + & -3.24819000_wp, 32.04420600_wp, -3.58264400_wp, -1.12728200_wp, & + & 33.92657100_wp, -5.02163200_wp, -1.26286900_wp, 34.01138200_wp, & + & -2.94863700_wp, -1.23019700_wp, 35.01076600_wp, -3.82919800_wp, & + & -3.60279300_wp, 33.45037700_wp, -3.72793400_wp, -1.66742100_wp, & + & 32.98484700_wp, -4.43892900_wp, -3.66028000_wp, 33.56762700_wp, & + & -3.64654900_wp, -3.19006100_wp, 34.42205200_wp, -1.31866100_wp, & + & -6.82570500_wp, 27.60703000_wp, -2.70918800_wp, -4.70423800_wp, & + & 33.07311700_wp, -2.38333200_wp, -3.60683900_wp, 32.72668700_wp, & + & -3.22482300_wp, -5.37760800_wp, 34.04142400_wp, -0.95866100_wp, & + & -5.86898700_wp, 32.16215700_wp, -1.26290000_wp, -6.66211800_wp, & + & 32.92422500_wp, 1.87370900_wp, -5.58034200_wp, 28.22151800_wp, & + & -1.83789100_wp, -4.47614700_wp, 28.70297500_wp, -0.82481600_wp, & + & -2.81352200_wp, 28.74741700_wp, -2.27911200_wp, -2.68650300_wp, & + & 32.37673600_wp, -2.33934500_wp, -4.84547100_wp, 32.63768000_wp, & + & -1.09931200_wp, -5.69535900_wp, 32.15297300_wp, 1.23001400_wp, & + & -6.00410300_wp, 32.65318800_wp, 0.39542000_wp, -4.16876000_wp, & + & 29.08326600_wp, -1.63353900_wp, -3.36759800_wp, 30.97325500_wp, & + & -2.41758500_wp, -4.57140900_wp, 31.04834500_wp, -1.17038900_wp, & + & -2.91493800_wp, 32.07012300_wp, 0.15814200_wp, -5.05847800_wp, & + & 30.49463500_wp, -1.30176200_wp, -3.80259000_wp, 30.04842400_wp, & + & -0.16221700_wp, -5.59067300_wp, 30.62347200_wp, -0.05003300_wp, & + & -4.67209500_wp, 31.49759600_wp, 4.24487400_wp, -5.06011100_wp, & + & 24.67209500_wp, 1.74487900_wp, -4.90997900_wp, 30.12787800_wp, & + & 1.05659300_wp, -3.93458500_wp, 29.79912200_wp, 1.93914100_wp, & + & -5.68903800_wp, 31.10906800_wp, 3.71341600_wp, -4.19173900_wp, & + & 29.23661400_wp, 4.15984800_wp, -4.93372200_wp, 29.97752000_wp, & + & 5.22790300_wp, -1.78755400_wp, 25.28105600_wp, 2.09622500_wp, & + & -4.07761100_wp, 25.74505100_wp, 1.40423500_wp, -2.25308800_wp, & + & 25.79402100_wp, 0.41062500_wp, -3.32265100_wp, 29.44103800_wp, & + & 2.06442500_wp, -4.66652400_wp, 29.70348200_wp, 3.49513700_wp, & + & -4.20714900_wp, 29.21280600_wp, 5.17152100_wp, -2.56192400_wp, & + & 29.70130900_wp, 3.20687500_wp, -2.09017800_wp, 26.13274300_wp, & + & 1.34440900_wp, -3.22844600_wp, 28.03435200_wp, 1.80502300_wp, & + & -4.57088600_wp, 28.09292400_wp, 1.26266600_wp, -2.56864500_wp, & + & 29.12553700_wp, 3.76625500_wp, -2.82785900_wp, 27.54581900_wp, & + & 1.88579600_wp, -3.22168500_wp, 27.11005800_wp, 3.99826000_wp, & + & -3.42436900_wp, 27.67739300_wp, 3.33904400_wp, -2.76712900_wp, & + & 28.53830700_wp, 6.27873300_wp, 0.39240400_wp, 21.72068900_wp, & + & 4.65222700_wp, -1.54512400_wp, 27.17128500_wp, 3.43837200_wp, & + & -1.44505400_wp, 26.85320100_wp, 5.36601200_wp, -1.82750900_wp, & + & 28.14358800_wp, 5.26837200_wp, 0.50266300_wp, 26.27667400_wp, & + & 6.13637700_wp, 0.38459600_wp, 26.98769200_wp, 4.30573800_wp, & + & 3.16566600_wp, 22.32213000_wp, 4.20962500_wp, -0.74991300_wp, & + & 22.77387900_wp, 2.34204100_wp, -0.17292300_wp, 22.83572000_wp, & + & 2.57616200_wp, -1.61332800_wp, 26.48687600_wp, 4.63741000_wp, & + & -1.10486400_wp, 26.74027900_wp, 5.15250700_wp, 0.30924100_wp, & + & 26.22912600_wp, 4.88479900_wp, 2.63829200_wp, 26.72166300_wp, & + & 3.30494300_wp, 1.38181600_wp, 23.16995600_wp, 3.07357300_wp, & + & -0.81559100_wp, 25.08039100_wp, 4.40849500_wp, -1.26115400_wp, & + & 25.12465000_wp, 2.49478600_wp, -0.45976700_wp, 26.15051700_wp, & + & 4.23251700_wp, 1.36528700_wp, 24.58106800_wp, 3.39502200_wp, & + & -0.37369100_wp, 24.13775200_wp, 4.85362800_wp, 1.16639200_wp, & + & 24.70277200_wp, 3.92847200_wp, 1.05413600_wp, 25.52550500_wp, & + & 3.23554900_wp, 5.32106800_wp, 18.73162300_wp, 3.79305200_wp, & + & 2.79291400_wp, 24.18579600_wp, 2.94717800_wp, 1.94024700_wp, & + & 23.86291600_wp, 4.43448000_wp, 3.22459100_wp, 25.13477300_wp, & + & 2.52947800_wp, 4.58752800_wp, 23.26479100_wp, 3.16343700_wp, & + & 5.18542000_wp, 23.96135100_wp, -0.15873700_wp, 5.45313400_wp, & + & 19.32719000_wp, 2.89173000_wp, 2.93569800_wp, 19.78178100_wp, & + & 1.28765300_wp, 1.82009900_wp, 19.85429400_wp, 2.56822600_wp, & + & 1.12117100_wp, 23.49362700_wp, 3.41794500_wp, 3.09023600_wp, & + & 23.73318100_wp, 2.61652800_wp, 4.36633800_wp, 23.20478600_wp, & + & 0.61628200_wp, 5.58097900_wp, 23.71365100_wp, 0.63607800_wp, & + & 3.56613800_wp, 20.18095700_wp, 2.24288100_wp, 2.00592500_wp, & + & 22.08947900_wp, 3.40641000_wp, 2.80220100_wp, 22.13492000_wp, & + & 1.59896600_wp, 1.78398800_wp, 23.13878600_wp, 1.22040000_wp, & + & 4.28426700_wp, 21.58638400_wp, 2.08607200_wp, 2.54268600_wp, & + & 21.12535800_wp, 1.76739800_wp, 4.63570700_wp, 21.69493000_wp, & + & 1.28559700_wp, 3.84101800_wp, 22.48645700_wp, -2.51052300_wp, & + & 5.92007900_wp, 15.71053100_wp, -0.14762400_wp, 4.75411000_wp, & + & 21.17429700_wp, -0.01410900_wp, 3.60705300_wp, 20.83533300_wp, & + & -0.11358500_wp, 5.56536100_wp, 22.10470200_wp, -2.36435100_wp, & + & 4.90938900_wp, 20.22750500_wp, -2.43966800_wp, 5.76185700_wp, & + & 20.93427900_wp, -4.69325200_wp, 3.31016400_wp, 16.30918000_wp, & + & -0.81479800_wp, 4.13436300_wp, 16.77896000_wp, -0.92162700_wp, & + & 2.18704000_wp, 16.85160800_wp, 0.41614500_wp, 2.76903900_wp, & + & 20.47214400_wp, -0.63082300_wp, 4.67745300_wp, 20.70450100_wp, & + & -2.13106200_wp, 4.83126700_wp, 20.17381200_wp, -4.31611900_wp, & + & 3.99293300_wp, 20.69962400_wp, -2.71502000_wp, 2.77621100_wp, & + & 17.17223500_wp, -0.48324000_wp, 3.05829300_wp, 19.07034000_wp, & + & -0.40463400_wp, 4.48079000_wp, 19.13030500_wp, -0.71114800_wp, & + & 2.42898300_wp, 20.11621900_wp, -2.92019300_wp, 3.67418800_wp, & + & 18.57420800_wp, -1.00836900_wp, 3.27506200_wp, 18.09783000_wp, & + & -2.85439600_wp, 4.30505500_wp, 18.67562400_wp, -2.52523900_wp, & + & 3.44099600_wp, 19.46565400_wp, -6.50034600_wp, 1.72711600_wp, & + & 12.69021600_wp, -4.10199200_wp, 2.82250000_wp, 18.16243700_wp, & + & -3.13601900_wp, 2.26807700_wp, 17.80804000_wp, -4.74206200_wp, & + & 3.38926700_wp, 19.09052100_wp, -5.61209900_wp, 1.21945200_wp, & + & 17.20700700_wp, -6.32289000_wp, 1.66878000_wp, 17.94266500_wp, & + & -5.77325900_wp, -1.61034100_wp, 13.29577700_wp, -4.02615900_wp, & + & 1.91990700_wp, 13.78138700_wp, -2.55582400_wp, 0.64454600_wp, & + & 13.84423100_wp, -2.19391400_wp, 2.05827900_wp, 17.45283600_wp, & + & -4.35782700_wp, 2.43341200_wp, 17.69020100_wp, -5.40066600_wp, & + & 1.34462100_wp, 17.17505500_wp, -6.07879000_wp, -0.89781400_wp, & + & 17.70426700_wp, -4.13705700_wp, -0.37842300_wp, 14.16649200_wp, & + & -2.97532500_wp, 1.52885300_wp, 16.05288100_wp, -4.05769200_wp, & + & 2.47937300_wp, 16.13064900_wp, -2.62703600_wp, 0.97828400_wp, & + & 17.11438800_wp, -4.96908900_wp, 0.00617400_wp, 15.56833200_wp, & + & -3.47525800_wp, 1.25815700_wp, 15.09108300_wp, -5.41991100_wp, & + & 0.43000900_wp, 15.67409200_wp, -4.53765900_wp, 0.16402400_wp, & + & 16.49440100_wp, -5.62872200_wp, -4.01951600_wp, 9.70023500_wp, & + & -4.99377500_wp, -1.50818600_wp, 15.17282500_wp, -3.98416000_wp, & + & -1.04311100_wp, 14.81597100_wp, -5.85391600_wp, -1.62505500_wp, & + & 16.11944200_wp, -4.68105800_wp, -3.63194900_wp, 14.23533300_wp, & + & -5.46394600_wp, -3.93404000_wp, 14.99467200_wp, -2.54220500_wp, & + & -5.50716300_wp, 10.31303800_wp, -4.23645200_wp, -1.99770200_wp, & + & 10.80313200_wp, -2.33012500_wp, -1.61575800_wp, 10.85312100_wp, & + & -3.22426500_wp, -0.46273500_wp, 14.46763400_wp, -4.86220400_wp, & + & -1.91117100_wp, 14.71761200_wp, -4.64380300_wp, -3.40046900_wp, & + & 14.22315200_wp, -3.28794000_wp, -5.31670800_wp, 14.73986500_wp, & + & -2.50889400_wp, -3.46050300_wp, 11.18314200_wp, -3.28678300_wp, & + & -1.40223700_wp, 13.06467600_wp, -4.70871500_wp, -1.65729900_wp, & + & 13.14975700_wp, -2.64664800_wp, -1.44883900_wp, 14.15033200_wp, & + & -3.32094900_wp, -3.88627700_wp, 12.58864800_wp, -3.38520300_wp, & + & -1.95124800_wp, 12.12636700_wp, -3.92327300_wp, -3.99787800_wp, & + & 12.70797900_wp, -3.17446200_wp, -3.46063400_wp, 13.56508900_wp, & + & -0.54543700_wp, -6.88385800_wp, 6.74884500_wp, -2.11073300_wp, & + & -4.89592300_wp, 12.21395000_wp, -1.88057600_wp, -3.76908300_wp, & + & 11.86845400_wp, -2.56727300_wp, -5.60515100_wp, 13.18408500_wp, & + & -0.26746600_wp, -5.90127600_wp, 11.30586800_wp, -0.50350700_wp, & + & -6.71877700_wp, 12.06585000_wp, 2.52938000_wp, -5.37282400_wp, & + & 7.36291100_wp, -1.26220800_wp, -4.59333200_wp, 7.84247900_wp, & + & -0.39511700_wp, -2.85035900_wp, 7.88645300_wp, -1.85542400_wp, & + & -2.84703200_wp, 11.51886500_wp, -1.73080100_wp, -5.00078200_wp, & + & 11.77952600_wp, -0.42212500_wp, -5.74049700_wp, 11.29584400_wp, & + & 1.92486400_wp, -5.85073600_wp, 11.79475000_wp, 0.93596100_wp, & + & -4.09200200_wp, 8.22369400_wp, -1.15259700_wp, -3.47125000_wp, & + & 10.11368000_wp, -1.83181200_wp, -4.73463000_wp, 10.18796700_wp, & + & -0.73083700_wp, -2.97840000_wp, 11.21181000_wp, 0.77605800_wp, & + & -4.99969400_wp, 9.63481100_wp, -0.78560000_wp, -3.87457900_wp, & + & 9.19051600_wp, 0.50206800_wp, -5.55927100_wp, 9.76506000_wp, & + & 0.53443100_wp, -4.63380400_wp, 10.63893700_wp, 4.84749100_wp, & + & -4.65224800_wp, 3.81312000_wp, 2.34401700_wp, -4.72289800_wp, & + & 9.26875100_wp, 1.57483300_wp, -3.80561400_wp, 8.94110200_wp, & + & 2.60382600_wp, -5.47720600_wp, 10.24974800_wp, 4.24413500_wp, & + & -3.83339800_wp, 8.37782000_wp, 4.75234500_wp, -4.53715500_wp, & + & 9.11578000_wp, 5.54862300_wp, -1.31009900_wp, 4.42191400_wp, & + & 2.62359900_wp, -3.86341900_wp, 4.88351800_wp, 1.77839100_wp, & + & -2.10425000_wp, 4.93361600_wp, 0.87991800_wp, -3.25401700_wp, & + & 8.58280300_wp, 2.64139400_wp, -4.44941000_wp, 8.84407700_wp, & + & 4.02784500_wp, -3.86918100_wp, 8.35142400_wp, 5.55799500_wp, & + & -2.08698700_wp, 8.83989900_wp, 3.56057300_wp, -1.78410400_wp, & + & 5.27322800_wp, 1.80192000_wp, -3.08056300_wp, 7.17563400_wp, & + & 2.37518700_wp, -4.37706300_wp, 7.23168300_wp, 1.66495500_wp, & + & -2.42854900_wp, 8.26549900_wp, 4.18078700_wp, -2.47192200_wp, & + & 6.68506200_wp, 2.34015600_wp, -3.02678500_wp, 6.24990100_wp, & + & 4.46266700_wp, -3.04839600_wp, 6.81661400_wp, 3.74964300_wp, & + & -2.44927100_wp, 7.67417600_wp, 6.40967700_wp, 0.94996100_wp, & + & 0.85880100_wp, 4.95418000_wp, -1.12486900_wp, 6.30960700_wp, & + & 3.73665700_wp, -1.12377100_wp, 5.99142400_wp, 5.68935400_wp, & + & -1.34115900_wp, 7.27951000_wp, 5.39295200_wp, 0.97384600_wp, & + & 5.41178500_wp, 6.26782200_wp, 0.92772400_wp, 6.12086600_wp, & + & 4.20750000_wp, 3.54310500_wp, 1.45958300_wp, 4.44507400_wp, & + & -0.37143800_wp, 1.91078700_wp, 2.53599400_wp, 0.04521500_wp, & + & 1.97360000_wp, 2.89181200_wp, -1.37001500_wp, 5.62443100_wp, & + & 4.90177400_wp, -0.68297400_wp, 5.87605600_wp, 5.29365700_wp, & + & 0.76991700_wp, 5.36289000_wp, 4.82921900_wp, 3.06701400_wp, & + & 5.85716800_wp, 3.36126300_wp, 1.68042800_wp, 2.30727300_wp, & + & 3.31944900_wp, -0.53260000_wp, 4.21861200_wp, 4.68726400_wp, & + & -0.86014500_wp, 4.26176400_wp, 2.71277800_wp, -0.22465700_wp, & + & 5.28547000_wp, 4.28743800_wp, 1.74289100_wp, 3.71773600_wp, & + & 3.60220300_wp, -0.06310900_wp, 3.27303400_wp, 4.92344100_wp, & + & 1.59536900_wp, 3.83785100_wp, 4.01096700_wp, 1.40517600_wp, & + & 4.65711400_wp, 2.95678200_wp, 5.59882200_wp, -2.13485200_wp, & + & 3.72822100_wp, 3.12138400_wp, 3.32042400_wp, 2.95880700_wp, & + & 2.20436300_wp, 2.99607200_wp, 4.32989400_wp, 3.61019600_wp, & + & 4.26774900_wp, 2.31591800_wp, 4.80773100_wp, 2.39691000_wp, & + & 2.89638000_wp, 5.45489100_wp, 3.09270100_wp, -0.43656500_wp, & + & 5.43921600_wp, -1.53852600_wp, 2.81785300_wp, 3.18612000_wp, & + & -1.08240200_wp, 1.31540800_wp, 1.93916500_wp, -1.01069100_wp, & + & 2.65051300_wp, 1.35119400_wp, 2.62756900_wp, 3.32838200_wp, & + & 3.38968600_wp, 2.86548500_wp, 2.42219100_wp, 4.59278900_wp, & + & 2.33577000_wp, 0.32480100_wp, 5.63224100_wp, 2.84661800_wp, & + & 0.51640400_wp, 3.62679700_wp, -0.68456100_wp, 2.25106300_wp, & + & 2.20540300_wp, 1.22400200_wp, 3.34247600_wp, 3.09904500_wp, & + & 1.26936000_wp, 1.62877100_wp, 1.93133700_wp, 2.27100300_wp, & + & 1.03781600_wp, 4.39067300_wp, 0.72080300_wp, 2.04825300_wp, & + & 2.72795500_wp, 0.25785400_wp, 1.55311600_wp, 4.78653200_wp, & + & 0.82721400_wp, 1.14063300_wp, 3.95364800_wp, 1.61790100_wp, & + & -2.81965400_wp, 5.70268800_wp, -5.15743300_wp, -0.36482400_wp, & + & 4.73491500_wp, 0.30790100_wp, -0.13437300_wp, 3.60909200_wp, & + & -0.03283900_wp, -0.40078100_wp, 5.55150800_wp, 1.23640200_wp, & + & -2.58753400_wp, 4.70848400_wp, -0.64139600_wp, -2.73470200_wp, & + & 5.54795400_wp, 0.06786100_wp, -4.77146800_wp, 2.91375500_wp, & + & -4.55802900_wp, -0.97747000_wp, 4.06143600_wp, -4.08595300_wp, & + & -0.91702800_wp, 2.11349400_wp, -4.01419200_wp, 0.36618600_wp, & + & 2.80724200_wp, -0.39617000_wp, -0.84017200_wp, 4.62334000_wp, & + & -0.16410600_wp, -2.34730700_wp, 4.64787700_wp, -0.69334500_wp, & + & -4.45329800_wp, 3.62660500_wp, -0.16755300_wp, -2.75493600_wp, & + & 2.55063100_wp, -3.69401700_wp, -0.55426300_wp, 3.01816200_wp, & + & -1.79756700_wp, -0.59739800_wp, 4.44483600_wp, -1.73548900_wp, & + & -0.72823100_wp, 2.37531500_wp, -0.75055800_wp, -3.03559900_wp, & + & 3.42690500_wp, -2.29212600_wp, -1.09656800_wp, 3.19109000_wp, & + & -2.76928600_wp, -3.02381700_wp, 4.05986500_wp, -2.19122900_wp, & + & -2.62162900_wp, 3.22723000_wp, -1.39962100_wp, -6.43736400_wp, & + & 1.18161600_wp, -8.17639500_wp, -4.14040700_wp, 2.47135600_wp, & + & -2.70329700_wp, -3.13043600_wp, 2.00525800_wp, -3.05911000_wp, & + & -4.82634600_wp, 2.98520100_wp, -1.77425600_wp, -5.50756400_wp, & + & 0.75119200_wp, -3.65793800_wp, -6.25425300_wp, 1.13600400_wp, & + & -2.91892700_wp, -5.42757000_wp, -2.08300800_wp, -7.56942700_wp, & + & -3.98650700_wp, 1.57937100_wp, -7.08203500_wp, -2.41334200_wp, & + & 0.43390500_wp, -7.02057900_wp, -2.17364500_wp, 1.87410100_wp, & + & -3.41273400_wp, -4.36108300_wp, 2.06527500_wp, -3.17484600_wp, & + & -5.30713400_wp, 0.89242000_wp, -3.68756000_wp, -5.79185700_wp, & + & -1.40060600_wp, -3.15970200_wp, -3.90198600_wp, -0.71618900_wp, & + & -6.69866700_wp, -2.90663900_wp, 1.27970000_wp, -4.81346200_wp, & + & -4.06594100_wp, 2.13563800_wp, -4.73409200_wp, -2.51326200_wp, & + & 0.76283400_wp, -3.74922600_wp, -4.76418600_wp, -0.40487700_wp, & + & -5.29626300_wp, -3.38120900_wp, 0.96847800_wp, -5.77243900_wp, & + & -5.24838500_wp, -0.02302900_wp, -5.18989100_wp, -4.34726400_wp, & + & -0.21251200_wp, -4.36622500_wp, -5.07790600_wp, -4.47305100_wp, & + & -11.16247300_wp, -4.65883700_wp, -1.92260100_wp, -5.68959400_wp, & + & -3.69298300_wp, -1.36750500_wp, -6.04577900_wp, -5.50638600_wp, & + & -2.10804500_wp, -4.74029000_wp, -4.16572500_wp, -4.00678000_wp, & + & -6.62520900_wp, -4.92051000_wp, -4.37494300_wp, -5.86365000_wp, & + & -1.87497700_wp, -5.69326500_wp, -10.54909200_wp, -3.86280400_wp, & + & -2.34516900_wp, -10.05851000_wp, -1.99461000_wp, -1.80246100_wp, & + & -10.00973000_wp, -2.98436200_wp, -0.72817200_wp, -6.39461600_wp, & + & -4.49318200_wp, -2.30876400_wp, -6.14340100_wp, -4.14901700_wp, & + & -3.77352100_wp, -6.63603000_wp, -2.63380700_wp, -5.56809200_wp, & + & -6.12056700_wp, -2.01580100_wp, -3.65205600_wp, -9.68006800_wp, & + & -2.96707400_wp, -1.67029000_wp, -7.79746000_wp, -4.36202300_wp, & + & -2.04347400_wp, -7.71258300_wp, -2.32521400_wp, -1.65983700_wp, & + & -6.70988300_wp, -2.78925000_wp, -4.14553200_wp, -8.27293200_wp, & + & -3.01762300_wp, -2.22396200_wp, -8.73460200_wp, -3.37959900_wp, & + & -4.30990600_wp, -8.15305700_wp, -2.67902700_wp, -3.70987700_wp, & + & -7.29212700_wp, 0.23236900_wp, -6.89547200_wp, -14.11014100_wp, & + & -1.49693000_wp, -5.05425100_wp, -8.64621500_wp, -1.36339900_wp, & + & -3.90713900_wp, -8.98948400_wp, -1.89066200_wp, -5.79559100_wp, & + & -7.67429000_wp, 0.42545300_wp, -5.89304300_wp, -9.55186600_wp, & + & 0.26018900_wp, -6.72960500_wp, -8.79247200_wp, 3.16737500_wp, & + & -5.12884300_wp, -13.49639800_wp, -0.67759800_wp, -4.68043700_wp, & + & -13.01836000_wp, 0.03875000_wp, -2.86852800_wp, -12.97433100_wp, & + & -1.41644700_wp, -2.98992000_wp, -9.34030600_wp, -1.10927800_wp, & + & -5.12237600_wp, -9.07884500_wp, 0.25702200_wp, -5.74799000_wp, & + & -9.56256200_wp, 2.60541300_wp, -5.65718500_wp, -9.06596600_wp, & + & 1.47037500_wp, -3.98927700_wp, -12.63709100_wp, -0.66451000_wp, & + & -3.55171900_wp, -10.74514100_wp, -1.23276700_wp, -4.86769600_wp, & + & -10.67252800_wp, -0.28581900_wp, -3.02267600_wp, -9.64757700_wp, & + & 1.38753700_wp, -4.90697700_wp, -11.22484500_wp, -0.26348800_wp, & + & -3.92100400_wp, -11.66856000_wp, 1.16334900_wp, -5.49090000_wp, & + & -11.09503800_wp, 1.11709900_wp, -4.56519900_wp, -10.22019500_wp, & + & 5.41592000_wp, -4.21463600_wp, -17.04609200_wp, 2.92798300_wp, & + & -4.50549000_wp, -11.59191100_wp, 2.08164500_wp, -3.65124600_wp, & + & -11.91805700_wp, 3.25055600_wp, -5.22962000_wp, -10.61134400_wp, & + & 4.74441000_wp, -3.45023900_wp, -12.48149100_wp, 5.31087600_wp, & + & -4.10944100_wp, -11.74691600_wp, 5.82835100_wp, -0.82618600_wp, & + & -16.43902200_wp, 3.13248900_wp, -3.62343700_wp, -15.97769300_wp, & + & 2.14048200_wp, -1.94275000_wp, -15.92692600_wp, 1.34293700_wp, & + & -3.16577100_wp, -12.27736000_wp, 3.20054100_wp, -4.20231800_wp, & + & -12.01614000_wp, 4.53208200_wp, -3.50596000_wp, -12.50985300_wp, & + & 5.90441800_wp, -1.60069300_wp, -12.02208000_wp, 3.88805200_wp, & + & -1.46816700_wp, -15.58837800_wp, 2.24644000_wp, -2.91278300_wp, & + & -13.68350500_wp, 2.92866200_wp, -4.15482600_wp, -13.62955200_wp, & + & 2.05432600_wp, -2.27351600_wp, -12.59623500_wp, 4.56502000_wp, & + & -2.10121400_wp, -14.17535500_wp, 2.77887200_wp, -2.81220900_wp, & + & -14.61134700_wp, 4.89512600_wp, -2.65379100_wp, -14.04559700_wp, & + & 4.13400900_wp, -2.11727700_wp, -13.19064800_wp, 6.49291100_wp, & + & 1.49785700_wp, -20.00373800_wp, 5.22197600_wp, -0.69994400_wp, & + & -14.55319500_wp, 4.00716200_wp, -0.79812600_wp, -14.87130800_wp, & + & 5.97170400_wp, -0.84835000_wp, -13.58450400_wp, 5.47924800_wp, & + & 1.43461600_wp, -15.45210700_wp, 6.35420800_wp, 1.46154200_wp, & + & -14.74580200_wp, 4.07747500_wp, 3.89191600_wp, -19.40399400_wp, & + & 4.64931100_wp, 0.00836300_wp, -18.95346000_wp, 2.71172700_wp, & + & 0.26118700_wp, -18.88901200_wp, 3.18678200_wp, -1.11914600_wp, & + & -15.23807400_wp, 5.13091900_wp, -0.25980800_wp, -14.98837900_wp, & + & 5.39844000_wp, 1.22130100_wp, -15.50281000_wp, 4.73890500_wp, & + & 3.47045100_wp, -15.00808000_wp, 3.39438300_wp, 1.96406600_wp, & + & -18.55572100_wp, 3.54077100_wp, -0.24788200_wp, -16.64473800_wp, & + & 4.93267100_wp, -0.45605400_wp, -16.60204400_wp, 2.91085600_wp, & + & 0.00856400_wp, -15.57981500_wp, 4.31256100_wp, 2.10443300_wp, & + & -17.14604600_wp, 3.78309300_wp, 0.24589100_wp, -17.59172700_wp, & + & 4.95899400_wp, 2.00971200_wp, -17.02716900_wp, 4.06540200_wp, & + & 1.74346400_wp, -16.21084900_wp, 2.65723100_wp, 5.83189100_wp, & + & -23.00076500_wp, 3.63740500_wp, 3.42390200_wp, -17.54507200_wp, & + & 2.94894600_wp, 2.44895600_wp, -17.87084700_wp, 4.19521400_wp, & + & 3.96689900_wp, -16.59999300_wp, 2.08646500_wp, 4.98888500_wp, & + & -18.47109000_wp, 2.60937900_wp, 5.68167400_wp, -17.77580200_wp, & + & -0.70956200_wp, 5.38227900_wp, -22.40469900_wp, 2.72521000_wp, & + & 3.41228000_wp, -21.94847200_wp, 1.33419500_wp, 2.04096800_wp, & + & -21.87506200_wp, 2.71438800_wp, 1.56911000_wp, -18.23881000_wp, & + & 3.21639900_wp, 3.66044300_wp, -18.00227900_wp, 2.21009000_wp, & + & 4.78265500_wp, -18.53231200_wp, 0.03262600_wp, 5.63851800_wp, & + & -18.01972500_wp, 0.39378300_wp, 3.65786100_wp, -21.54975500_wp, & + & 2.24333600_wp, 2.38663700_wp, -19.64292800_wp, 3.25503300_wp, & + & 3.37234700_wp, -19.59592600_wp, 1.64587800_wp, 2.06208100_wp, & + & -18.59595300_wp, 0.84863200_wp, 4.46305200_wp, -20.14556300_wp, & + & 1.99679300_wp, 2.89172200_wp, -20.60941600_wp, 1.32790400_wp, & + & 4.89898500_wp, -20.03953000_wp, 0.98781800_wp, 4.03531900_wp, & + & -19.24995200_wp, -3.10707400_wp, 5.44034000_wp, -26.02477700_wp, & + & -0.57818100_wp, 4.68075000_wp, -20.55854900_wp, -0.25228100_wp, & + & 3.58210600_wp, -20.90113500_wp, -0.68422200_wp, 5.49551400_wp, & + & -19.63140900_wp, -2.79089100_wp, 4.46936100_wp, -21.50944800_wp, & + & -3.00927800_wp, 5.29216100_wp, -20.79803300_wp, -4.81331600_wp, & + & 2.49370000_wp, -25.42498900_wp, -1.13095100_wp, 3.95769500_wp, & + & -24.95173600_wp, -0.90491700_wp, 2.02154200_wp, -24.88048600_wp, & + & 0.31540300_wp, 2.82263900_wp, -21.26305100_wp, -1.04245300_wp, & + & 4.53162400_wp, -21.03180100_wp, -2.54689300_wp, 4.42821500_wp, & + & -21.55906600_wp, -4.55730600_wp, 3.23071900_wp, -21.03261200_wp, & + & -2.77311200_wp, 2.30448600_wp, -24.56027100_wp, -0.62074900_wp, & + & 2.95510900_wp, -22.66412300_wp, -0.78564100_wp, 4.37382800_wp, & + & -22.60110300_wp, -0.73926100_wp, 2.30064000_wp, -21.61697000_wp, & + & -3.12811600_wp, 3.15309100_wp, -23.15815300_wp, -1.17638600_wp, & + & 3.08216600_wp, -23.63682500_wp, -3.17021400_wp, 3.78236800_wp, & + & -23.05679200_wp, -2.69891500_wp, 2.98827700_wp, -22.26378300_wp, & + & -6.32530400_wp, 0.62480100_wp, -29.04114000_wp, -4.14641800_wp, & + & 2.10009900_wp, -23.56805400_wp, -3.10121200_wp, 1.72726700_wp, & + & -23.92527700_wp, -4.87466100_wp, 2.55828200_wp, -22.63757500_wp, & + & -5.36265600_wp, 0.27587200_wp, -24.52180900_wp, -6.13930500_wp, & + & 0.59306700_wp, -23.78090400_wp, -5.04146200_wp, -2.54274500_wp, & + & -28.43439600_wp, -3.91791100_wp, 1.22423200_wp, -27.94628000_wp, & + & -2.25278700_wp, 0.21894500_wp, -27.88632100_wp, -2.13667100_wp, & + & 1.67364100_wp, -24.27752800_wp, -4.33324500_wp, 1.68078000_wp, & + & -24.03888900_wp, -5.17582100_wp, 0.43212100_wp, -24.54920000_wp, & + & -5.46212100_wp, -1.89510100_wp, -24.02203500_wp, -3.63735200_wp, & + & -1.05142000_wp, -27.56297500_wp, -2.81664000_wp, 1.01932200_wp, & + & -25.67829100_wp, -4.04540900_wp, 1.77521900_wp, -25.59856900_wp, & + & -2.38010400_wp, 0.53931100_wp, -24.61213700_wp, -4.52294400_wp, & + & -0.81449600_wp, -26.16078700_wp, -3.26331200_wp, 0.66929700_wp, & + & -26.63636600_wp, -5.03825300_wp, -0.47789400_wp, -26.05266200_wp, & + & -4.12413900_wp, -0.58845900_wp, -25.22514200_wp, -4.48814500_wp, & + & -4.89545000_wp, -32.02409300_wp, -4.28810700_wp, -2.32474200_wp, & + & -26.55146700_wp, -3.37355500_wp, -1.68561000_wp, -26.90768800_wp, & + & -5.11714000_wp, -2.57758800_wp, -25.60040600_wp, -3.61990100_wp, & + & -4.35350200_wp, -27.48422700_wp, -4.33964500_wp, -4.78662600_wp, & + & -26.72225700_wp, -1.19360800_wp, -5.83935500_wp, -31.40974900_wp, & + & -3.45929900_wp, -2.67726000_wp, -30.92103300_wp, -1.64474800_wp, & + & -1.97642300_wp, -30.87239700_wp, -2.72223200_wp, -0.99139200_wp, & + & -27.25585800_wp, -4.09091400_wp, -2.69153100_wp, -27.00324800_wp, & + & -3.62282900_wp, -4.12142400_wp, -27.49450000_wp, -1.96079100_wp, & + & -5.78018400_wp, -26.98158000_wp, -1.50846300_wp, -3.81723200_wp, & + & -30.54120100_wp, -2.62454900_wp, -1.92684800_wp, -28.65850200_wp, & + & -3.98252800_wp, -2.41761700_wp, -28.57498900_wp, -1.98620900_wp, & + & -1.86072700_wp, -27.56954400_wp, -2.23682600_wp, -4.37581800_wp, & + & -29.13471600_wp, -2.62881600_wp, -2.48213600_wp, -29.59360600_wp, & + & -2.81063400_wp, -4.59149600_wp, -29.01294800_wp, -2.16392800_wp, & + & -3.93354700_wp, -28.15040200_wp, 1.00854200_wp, -6.85815500_wp, & + & -34.96950700_wp, -0.87094400_wp, -5.17727300_wp, -29.50672300_wp, & + & -0.83666100_wp, -4.01878600_wp, -29.84797700_wp, -1.20098600_wp, & + & -5.94514100_wp, -28.53300000_wp, 1.11501500_wp, -5.84346300_wp, & + & -30.41061500_wp, 1.02202900_wp, -6.69290000_wp, -29.65242300_wp, & + & 3.78205400_wp, -4.84899100_wp, -34.35649000_wp, -0.08660800_wp, & + & -4.73491300_wp, -33.87930500_wp, 0.47210200_wp, -2.86799600_wp, & + & -33.83547100_wp, -0.96732100_wp, -3.11365400_wp, -30.20012000_wp, & + & -0.47963800_wp, -5.20802900_wp, -29.93751400_wp, 0.93558000_wp, & + & -5.71529000_wp, -30.42122900_wp, 3.26743300_wp, -5.42489600_wp, & + & -29.92634000_wp, 1.99453800_wp, -3.85913300_wp, -33.49743800_wp, & + & -0.16939700_wp, -3.60750000_wp, -31.60479500_wp, -0.62413300_wp, & + & -4.96649400_wp, -31.53363800_wp, 0.16229200_wp, -3.04740500_wp, & + & -30.50730100_wp, 1.99026800_wp, -4.78065400_wp, -32.08583400_wp, & + & 0.26045200_wp, -3.94054200_wp, -32.52718500_wp, 1.81574800_wp, & + & -5.38314900_wp, -31.95469900_wp, 1.69147500_wp, -4.46446900_wp, & + & -31.08024800_wp, 5.94457900_wp, -3.74855400_wp, -37.90584400_wp, & + & 3.48994300_wp, -4.25596500_wp, -32.45264200_wp, 2.57539100_wp, & + & -3.47189100_wp, -32.77715000_wp, 3.87363100_wp, -4.94605600_wp, & + & -31.47195700_wp, 5.21007000_wp, -3.04439600_wp, -33.34145100_wp, & + & 5.83071200_wp, -3.65413600_wp, -32.61001700_wp, 6.06624700_wp, & + & -0.33781300_wp, -37.29927800_wp, 3.62002000_wp, -3.35928200_wp, & + & -36.83981100_wp, 2.48746200_wp, -1.76814200_wp, -36.78768600_wp, & + & 1.79713300_wp, -3.05536400_wp, -33.13774200_wp, 3.73554700_wp, & + & -3.92562600_wp, -32.87739200_wp, 5.00356000_wp, -3.11824800_wp, & + & -33.37271500_wp, 6.20814100_wp, -1.10339300_wp, -32.88458300_wp, & + & 4.18909100_wp, -1.14376500_wp, -36.44937200_wp, 2.67639200_wp, & + & -2.72620400_wp, -34.54383300_wp, 3.46200300_wp, -3.90293700_wp, & + & -34.49100600_wp, 2.42948300_wp, -2.10406300_wp, -33.45815300_wp, & + & 4.91709900_wp, -1.71754400_wp, -35.03684300_wp, 3.19738000_wp, & + & -2.57942600_wp, -35.47244500_wp, 5.29270500_wp, -2.24148500_wp, & + & -34.90707800_wp, 4.48841500_wp, -1.77049000_wp, -34.05608200_wp, & + & 6.53098400_wp, 2.03354300_wp, -40.86668900_wp, 5.45093000_wp, & + & -0.27031600_wp, -35.41592900_wp, 4.25016600_wp, -0.46741000_wp, & + & -35.73471700_wp, 6.21114600_wp, -0.35020400_wp, -34.45033100_wp, & + & 5.52608500_wp, 1.88295200_wp, -36.31757400_wp, 6.39645000_wp, & + & 1.98295800_wp, -35.61250700_wp, 3.92012600_wp, 4.21067000_wp, & + & -40.26754900_wp, 4.82087700_wp, 0.38689000_wp, -39.81712300_wp, & + & 2.86867800_wp, 0.47370400_wp, -39.75188400_wp, 3.45937800_wp, & + & -0.86044600_wp, -36.10256100_wp, 5.32388800_wp, 0.16400700_wp, & + & -35.85324800_wp, 5.46256800_wp, 1.66263300_wp, -36.37008600_wp, & + & 4.61437500_wp, 3.84630700_wp, -35.87357800_wp, 3.40368600_wp, & + & 2.23212700_wp, -39.41875500_wp, 3.73861300_wp, 0.03768700_wp, & + & -37.50768700_wp, 5.14246100_wp, -0.04989500_wp, -37.46585500_wp, & + & 3.08822400_wp, 0.24148100_wp, -36.44556400_wp, 4.30659000_wp, & + & 2.44939500_wp, -38.01019100_wp, 3.93724700_wp, 0.55051600_wp, & + & -38.45748900_wp, 4.95831100_wp, 2.40898800_wp, -37.89173900_wp, & + & 4.09093600_wp, 2.06700200_wp, -37.07916500_wp, 2.33942900_wp, & + & 6.02199700_wp, -43.86708000_wp, 3.52162200_wp, 3.70027700_wp, & + & -38.41119600_wp, 2.91821200_wp, 2.67462900_wp, -38.73752700_wp, & + & 4.03129600_wp, 4.29242400_wp, -37.46826900_wp, 1.84263600_wp, & + & 5.13290300_wp, -39.33994700_wp, 2.30474600_wp, 5.86609800_wp, & + & -38.64351500_wp, -0.97660900_wp, 5.28503000_wp, -43.27124400_wp, & + & 2.61335900_wp, 3.61138500_wp, -42.81354300_wp, 1.34395100_wp, & + & 2.12632600_wp, -42.73978200_wp, 2.76086700_wp, 1.77472700_wp, & + & -39.10582400_wp, 3.08114400_wp, 3.90478200_wp, -38.86965800_wp, & + & 1.98281700_wp, 4.93697400_wp, -39.40078300_wp, -0.25985800_wp, & + & 5.60328800_wp, -38.88638700_wp, 0.26945400_wp, 3.66053500_wp, & + & -42.41604900_wp, 2.22111500_wp, 2.54864300_wp, -40.50925900_wp, & + & 3.14437600_wp, 3.61854300_wp, -40.46094300_wp, 1.65327700_wp, & + & 2.17646300_wp, -39.46304600_wp, 0.65386600_wp, 4.50121500_wp, & + & -41.01120800_wp, 1.93282800_wp, 3.03242300_wp, -41.47723300_wp, & + & 1.09429600_wp, 4.97478900_wp, -40.90599400_wp, 0.82924200_wp, & + & 4.08496300_wp, -40.11819800_wp, -3.37110400_wp, 5.13703200_wp, & + & -46.89265400_wp, -0.78520400_wp, 4.58975300_wp, -41.42536800_wp, & + & -0.36868600_wp, 3.52837000_wp, -41.76956100_wp, -0.96091700_wp, & + & 5.39762200_wp, -40.49813200_wp, -2.97308300_wp, 4.19612200_wp, & + & -42.37789400_wp, -3.26046400_wp, 4.99540900_wp, -41.66380700_wp, & + & -4.81921000_wp, 2.05506400_wp, -46.29169900_wp, -1.27524100_wp, & + & 3.82314100_wp, -45.81728700_wp, -0.88457300_wp, 1.91468400_wp, & + & -45.74585100_wp, 0.26237900_wp, 2.81621600_wp, -42.13083000_wp, & + & -1.23604300_wp, 4.40698900_wp, -41.89867900_wp, -2.72638900_wp, & + & 4.17531700_wp, -42.42641200_wp, -4.62719900_wp, 2.81004400_wp, & + & -41.89875600_wp, -2.77034200_wp, 2.03923400_wp, -45.42625600_wp, & + & -0.68162400_wp, 2.86825700_wp, -43.53180300_wp, -0.96649000_wp, & + & 4.26938300_wp, -43.46589200_wp, -0.74311800_wp, 2.20766500_wp, & + & -42.48402500_wp, -3.19650600_wp, 2.85395000_wp, -44.02461100_wp, & + & -1.24551000_wp, 2.94861500_wp, -44.50345700_wp, -3.29157300_wp, & + & 3.47658300_wp, -43.92353900_wp, -2.75422400_wp, 2.72575300_wp, & + & -43.12823800_wp, -6.16632900_wp, 0.06270100_wp, -49.90726400_wp, & + & -4.12059800_wp, 1.71158500_wp, -44.43352800_wp, -3.04800800_wp, & + & 1.43399800_wp, -44.79027700_wp, -4.88548900_wp, 2.11042400_wp, & + & -43.50144400_wp, -5.17788800_wp, -0.20434200_wp, -45.38597200_wp, & + & -5.97744400_wp, 0.04484300_wp, -44.64193100_wp, -4.61590800_wp, & + & -2.98577600_wp, -49.29857600_wp, -3.81881100_wp, 0.85999200_wp, & + & -48.80942800_wp, -2.07320100_wp, 0.00029100_wp, -48.75111900_wp, & + & -2.08181700_wp, 1.45892100_wp, -45.14283100_wp, -4.27116000_wp, & + & 1.28225400_wp, -44.90224800_wp, -5.00459000_wp, -0.03375800_wp, & + & -45.41122500_wp, -5.09196500_wp, -2.37666800_wp, -44.88455500_wp, & + & -3.34514400_wp, -1.38027800_wp, -48.42794300_wp, -2.70347100_wp, & + & 0.74952500_wp, -46.54385700_wp, -3.99192600_wp, 1.40025000_wp, & + & -46.46190300_wp, -2.22813700_wp, 0.31069700_wp, -45.47488800_wp, & + & -4.24751400_wp, -1.22092600_wp, -47.02441400_wp, -3.11893100_wp, & + & 0.36523500_wp, -47.49913700_wp, -4.78919000_wp, -0.93028900_wp, & + & -46.91572600_wp, -3.86941900_wp, -0.96225500_wp, -47.41420000_wp, & + & -3.02803900_wp, -1.99139700_wp, -47.94623500_wp, -3.62777100_wp, & + & -2.72830900_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine Amylose32 + +subroutine Amylose48(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 1011 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "H", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "O", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -71.55416900_wp, 2.81928200_wp, -0.32288500_wp, -73.21149800_wp, & + & 5.47707200_wp, -3.07031600_wp, -66.38883800_wp, 4.90981700_wp, & + & -0.62151900_wp, -71.84717700_wp, 3.84669600_wp, -0.10619600_wp, & + & -71.51451200_wp, 5.71986800_wp, -0.69154500_wp, -72.82402600_wp, & + & 4.53308700_wp, -2.68669700_wp, -70.95101900_wp, 5.33521000_wp, & + & -3.00506200_wp, -71.69561400_wp, 2.40548500_wp, -4.57087400_wp, & + & -66.99851000_wp, 4.14695800_wp, -1.10553500_wp, -67.46705300_wp, & + & 2.23586600_wp, -0.71870100_wp, -67.51494900_wp, 3.12966700_wp, & + & 0.43507800_wp, -71.15791900_wp, 4.73045500_wp, -0.98097300_wp, & + & -71.41946100_wp, 4.51049200_wp, -2.46780700_wp, -70.92977000_wp, & + & 3.15862300_wp, -4.38829500_wp, -71.42134500_wp, 2.37548300_wp, & + & -2.52806000_wp, -67.85379700_wp, 3.18842900_wp, -0.50193600_wp, & + & -69.75239300_wp, 4.59194400_wp, -0.73909300_wp, -69.81418300_wp, & + & 2.52819300_wp, -0.52976900_wp, -70.84440800_wp, 3.19293600_wp, & + & -2.95928600_wp, -69.26541000_wp, 3.27354500_wp, -1.03758000_wp, & + & -68.82618400_wp, 3.81561300_wp, -3.08880600_wp, -69.39576600_wp, & + & 3.06115100_wp, -2.54636900_wp, -70.25857400_wp, 0.42214100_wp, & + & -5.96152000_wp, -63.44000900_wp, 2.05667400_wp, -4.03497000_wp, & + & -68.89267700_wp, 1.77117200_wp, -2.85834100_wp, -68.57144000_wp, & + & 2.46207900_wp, -4.69771700_wp, -69.86664500_wp, 0.14890600_wp, & + & -4.98191500_wp, -67.99661500_wp, 0.40332800_wp, -5.81662500_wp, & + & -68.71508700_wp, -2.63663600_wp, -4.46349400_wp, -64.04306500_wp, & + & 1.20265500_wp, -3.72742300_wp, -64.49791400_wp, 0.32952200_wp, & + & -1.98006600_wp, -64.55687500_wp, 1.78945400_wp, -1.97678700_wp, & + & -68.20688700_wp, 1.62841600_wp, -4.09695200_wp, -68.46156900_wp, & + & 0.31748800_wp, -4.83475500_wp, -67.95547000_wp, -2.02469600_wp, & + & -4.94935400_wp, -68.44716800_wp, -1.04034100_wp, -3.18610500_wp, & + & -64.89276000_wp, 1.08436500_wp, -2.59707300_wp, -66.80116600_wp, & + & 1.74417900_wp, -3.84440400_wp, -66.84868600_wp, 0.64201000_wp, & + & -2.08698000_wp, -67.87459600_wp, -0.87466700_wp, -4.09818300_wp, & + & -66.30342100_wp, 0.70197400_wp, -2.98728000_wp, -65.86142500_wp, & + & -0.58043600_wp, -4.67730200_wp, -66.42715600_wp, -0.61908000_wp, & + & -3.74568700_wp, -67.25860500_wp, -4.94130300_wp, -3.75724900_wp, & + & -60.45917800_wp, -2.36782700_wp, -3.88997000_wp, -65.91288200_wp, & + & -1.65459000_wp, -2.92226800_wp, -65.59054500_wp, -2.67994900_wp, & + & -4.59757000_wp, -66.86676400_wp, -4.33305100_wp, -2.94112500_wp, & + & -64.99752200_wp, -4.82235800_wp, -3.66232400_wp, -65.69749000_wp, & + & -5.62589300_wp, -0.42876200_wp, -61.05657500_wp, -2.65461700_wp, & + & -3.02528100_wp, -61.51088800_wp, -1.81383100_wp, -1.26168400_wp, & + & -61.58131900_wp, -0.91521400_wp, -2.41133200_wp, -65.22224500_wp, & + & -2.71339500_wp, -3.57254700_wp, -65.46432300_wp, -4.10294400_wp, & + & -2.98986500_wp, -64.94108500_wp, -5.62758000_wp, -1.21328600_wp, & + & -65.44604600_wp, -3.63600000_wp, -0.90546200_wp, -61.90882100_wp, & + & -1.84105600_wp, -2.23395500_wp, -63.81754400_wp, -2.43350500_wp, & + & -3.51300200_wp, -63.86341900_wp, -1.72327600_wp, -1.56420800_wp, & + & -64.87213800_wp, -4.24948800_wp, -1.59938600_wp, -63.31590000_wp, & + & -2.39353700_wp, -2.16711300_wp, -62.85893800_wp, -4.51096000_wp, & + & -2.19342700_wp, -63.42700300_wp, -3.80421300_wp, -1.58925500_wp, & + & -64.22621100_wp, -6.47234700_wp, 1.81744200_wp, -57.44629000_wp, & + & -4.94893000_wp, -0.31875000_wp, -62.90808700_wp, -3.78623500_wp, & + & -0.26848900_wp, -62.57265200_wp, -5.73575200_wp, -0.48850400_wp, & + & -63.84267900_wp, -5.45283900_wp, 1.83734500_wp, -61.96728300_wp, & + & -6.30810300_wp, 1.77486700_wp, -62.67242300_wp, -4.25493000_wp, & + & 4.39713700_wp, -58.04407300_wp, -4.44594500_wp, 0.44019800_wp, & + & -58.51064700_wp, -2.54082800_wp, 0.86132100_wp, -58.58352600_wp, & + & -2.89734300_wp, -0.55317200_wp, -62.20781600_wp, -4.94415900_wp, & + & 0.16624800_wp, -62.44162900_wp, -5.33872600_wp, 1.62160700_wp, & + & -61.91298200_wp, -4.86904700_wp, 3.91411800_wp, -62.43409900_wp, & + & -3.40703000_wp, 2.53199500_wp, -58.90472200_wp, -3.32774800_wp, & + & 0.28694500_wp, -60.80524600_wp, -4.71570600_wp, -0.02389700_wp, & + & -60.86218100_wp, -2.74168600_wp, 0.61254500_wp, -61.85202000_wp, & + & -4.32706500_wp, 2.58903700_wp, -60.30812400_wp, -3.62511200_wp, & + & 0.76874100_wp, -59.83557500_wp, -4.94310700_wp, 2.42286000_wp, & + & -60.41076800_wp, -4.03564500_wp, 2.23802000_wp, -61.20327800_wp, & + & -2.98993400_wp, 6.43899400_wp, -54.42651000_wp, -3.69298700_wp, & + & 3.89967500_wp, -59.89697300_wp, -2.97855500_wp, 3.03223800_wp, & + & -59.54631100_wp, -4.34632600_wp, 4.43499800_wp, -60.82688800_wp, & + & -2.34534400_wp, 5.64487300_wp, -58.94453200_wp, -2.90672000_wp, & + & 6.27452000_wp, -59.67416300_wp, 0.41868300_wp, 6.26610200_wp, & + & -55.03076900_wp, -2.78862800_wp, 3.97079100_wp, -55.51316300_wp, & + & -1.28987500_wp, 2.72790800_wp, -55.57767600_wp, -2.62644300_wp, & + & 2.14078600_wp, -59.18921800_wp, -3.34066100_wp, 4.21144000_wp, & + & -59.42536400_wp, -2.43660400_wp, 5.41732200_wp, -58.90842700_wp, & + & -0.33463900_wp, 6.45172600_wp, -59.43490700_wp, -0.53147000_wp, & + & 4.45097300_wp, -55.89915300_wp, -2.22988700_wp, 2.99792600_wp, & + & -57.78791000_wp, -3.34050400_wp, 3.90889700_wp, -57.86229100_wp, & + & -1.62669200_wp, 2.74145900_wp, -58.84739100_wp, -1.04713600_wp, & + & 5.21018400_wp, -57.30205400_wp, -2.04164300_wp, 3.53367400_wp, & + & -56.82485700_wp, -1.54190700_wp, 5.58701100_wp, -57.40707500_wp, & + & -1.13440100_wp, 4.76004800_wp, -58.22097600_wp, 2.81751800_wp, & + & 6.51670600_wp, -51.43059900_wp, 0.43054500_wp, 5.48747200_wp, & + & -56.90342600_wp, 0.14503600_wp, 4.41111300_wp, -56.54762300_wp, & + & 0.41445200_wp, 6.35092000_wp, -57.84611200_wp, 2.58851100_wp, & + & 5.51872800_wp, -55.96296800_wp, 2.75430000_wp, 6.34165400_wp, & + & -56.71626800_wp, 4.78413800_wp, 3.71440000_wp, -52.04241300_wp, & + & 1.03691500_wp, 4.81936700_wp, -52.53120900_wp, 0.97205200_wp, & + & 2.87493900_wp, -52.58351700_wp, -0.31116200_wp, 3.56925600_wp, & + & -56.19750600_wp, 0.85776400_wp, 5.41860300_wp, -56.44425500_wp, & + & 2.36296400_wp, 5.44636400_wp, -55.94603600_wp, 4.47429500_wp, & + & 4.41943400_wp, -56.46421500_wp, 2.77050500_wp, 3.34836500_wp, & + & -52.91139500_wp, 0.60554400_wp, 3.78423800_wp, -54.79480700_wp, & + & 0.62976000_wp, 5.22772200_wp, -54.87752900_wp, 0.76004400_wp, & + & 3.15777300_wp, -55.87565300_wp, 3.05701500_wp, 4.21981000_wp, & + & -54.31678700_wp, 1.13370400_wp, 3.96891800_wp, -53.85089800_wp, & + & 3.06525400_wp, 4.83421300_wp, -54.43312900_wp, 2.65863600_wp, & + & 4.00728900_wp, -55.28251000_wp, 6.46495200_wp, 1.96925500_wp, & + & -48.47082000_wp, 4.23740800_wp, 3.19616500_wp, -53.93690300_wp, & + & 3.17189000_wp, 2.78035800_wp, -53.59088300_wp, 4.87169100_wp, & + & 3.75769100_wp, -54.90207200_wp, 5.53994700_wp, 1.53519600_wp, & + & -53.02287900_wp, 6.30510300_wp, 1.90326600_wp, -53.78231200_wp, & + & 5.47134400_wp, -1.30951900_wp, -49.08416200_wp, 4.07775900_wp, & + & 2.30984800_wp, -49.56611600_wp, 2.49939200_wp, 1.16930500_wp, & + & -49.61205300_wp, 2.25878800_wp, 2.60935800_wp, -53.24016700_wp, & + & 4.41031600_wp, 2.83401200_wp, -53.49878900_wp, 5.35412500_wp, & + & 1.66341700_wp, -53.01181700_wp, 5.84363300_wp, -0.63450500_wp, & + & -53.51360100_wp, 3.94828700_wp, 0.05451700_wp, -49.94629100_wp, & + & 2.98913900_wp, 2.01756500_wp, -51.83565600_wp, 4.12990000_wp, & + & 2.89158800_wp, -51.91114800_wp, 2.57526900_wp, 1.51900500_wp, & + & -52.93042000_wp, 4.81662000_wp, 0.36108600_wp, -51.35704800_wp, & + & 3.44929200_wp, 1.71963600_wp, -50.90857900_wp, 5.32062200_wp, & + & 0.72471700_wp, -51.48419300_wp, 4.41420000_wp, 0.54000400_wp, & + & -52.35410400_wp, 5.13678100_wp, -3.71311000_wp, -45.53114300_wp, & + & 4.78700900_wp, -1.22479300_wp, -50.98779200_wp, 3.76482700_wp, & + & -0.61939200_wp, -50.65631700_wp, 5.58219000_wp, -1.36286000_wp, & + & -51.96563400_wp, 4.22865900_wp, -3.25049300_wp, -50.09295700_wp, & + & 5.00264600_wp, -3.63537300_wp, -50.83427300_wp, 1.95004700_wp, & + & -4.94716300_wp, -46.13996800_wp, 3.98504200_wp, -1.64139400_wp, & + & -46.60559300_wp, 2.11228700_wp, -1.09404900_wp, -46.65465700_wp, & + & 3.10072200_wp, -0.01992600_wp, -50.30051500_wp, 4.57305300_wp, & + & -1.56666500_wp, -50.56103900_wp, 4.22675000_wp, -3.02934800_wp, & + & -50.06902800_wp, 2.71692200_wp, -4.82896600_wp, -50.56064000_wp, & + & 2.09351400_wp, -2.90850800_wp, -46.99369100_wp, 3.07957000_wp, & + & -0.95777400_wp, -48.89354500_wp, 4.45647200_wp, -1.31488500_wp, & + & -48.95406000_wp, 2.41761900_wp, -0.93039700_wp, -49.98430500_wp, & + & 2.87290800_wp, -3.40746300_wp, -48.40525800_wp, 3.11707500_wp, & + & -1.49967800_wp, -47.96738400_wp, 3.48393800_wp, -3.58978100_wp, & + & -48.53532400_wp, 2.77780900_wp, -2.98474800_wp, -49.39525300_wp, & + & -0.14238700_wp, -6.16322100_wp, -42.57894500_wp, 1.65562500_wp, & + & -4.38290800_wp, -48.03101800_wp, 1.46605700_wp, -3.18654600_wp, & + & -47.71002600_wp, 1.99868900_wp, -5.07822100_wp, -49.00243100_wp, & + & -0.33139000_wp, -5.16386500_wp, -47.13434300_wp, -0.14738000_wp, & + & -6.01737100_wp, -47.84952300_wp, -3.06186100_wp, -4.41045800_wp, & + & -43.18080000_wp, 0.83011400_wp, -4.00383600_wp, -43.63596800_wp, & + & 0.10868300_wp, -2.18822800_wp, -43.69538800_wp, 1.56304000_wp, & + & -2.30899600_wp, -47.34476200_wp, 1.22018300_wp, -4.40781900_wp, & + & -47.59864800_wp, -0.14884600_wp, -5.03168600_wp, -47.08985600_wp, & + & -2.49221100_wp, -4.94608300_wp, -47.58336200_wp, -1.36231700_wp, & + & -3.27313600_wp, -44.02981500_wp, 0.80739800_wp, -2.86731200_wp, & + & -45.93916700_wp, 1.35755000_wp, -4.16543200_wp, -45.98600400_wp, & + & 0.40918800_wp, -2.32092600_wp, -47.01064500_wp, -1.27383000_wp, & + & -4.19688400_wp, -45.44133200_wp, 0.39332700_wp, -3.22408900_wp, & + & -44.99788800_wp, -1.02844100_wp, -4.79845900_wp, -45.56319200_wp, & + & -0.98844900_wp, -3.86715400_wp, -46.39017400_wp, -5.29652300_wp, & + & -3.51091300_wp, -39.59357800_wp, -2.73745000_wp, -3.86141700_wp, & + & -45.04847700_wp, -1.94912900_wp, -2.95854500_wp, -44.72416500_wp, & + & -3.11335200_wp, -4.54047800_wp, -45.99999400_wp, -4.62087600_wp, & + & -2.74938800_wp, -44.12937700_wp, -5.16777100_wp, -3.42524600_wp, & + & -44.83006900_wp, -5.69408600_wp, -0.13605400_wp, -40.19145100_wp, & + & -2.94978100_wp, -2.97422000_wp, -40.64674400_wp, -1.96290600_wp, & + & -1.28913300_wp, -40.71657000_wp, -1.16565200_wp, -2.51160900_wp, & + & -44.35662400_wp, -3.05930300_wp, -3.51541800_wp, -44.59753200_wp, & + & -4.39455600_wp, -2.81661300_wp, -44.07260400_wp, -5.76214600_wp, & + & -0.91704300_wp, -44.57959000_wp, -3.75103700_wp, -0.77996000_wp, & + & -41.04364100_wp, -2.07282600_wp, -2.25625600_wp, -42.95231600_wp, & + & -2.77398900_wp, -3.48035600_wp, -42.99928700_wp, -1.90005200_wp, & + & -1.59918300_wp, -44.00498900_wp, -4.42168800_wp, -1.41867600_wp, & + & -42.44996500_wp, -2.61889600_wp, -2.14311900_wp, -41.99204000_wp, & + & -4.73064900_wp, -1.98859800_wp, -42.56081100_wp, -3.97546800_wp, & + & -1.44736800_wp, -43.35863200_wp, -6.34396100_wp, 2.17559200_wp, & + & -36.57878200_wp, -5.00267500_wp, -0.08321100_wp, -42.04153300_wp, & + & -3.84433500_wp, -0.13225200_wp, -41.70489000_wp, -5.80520400_wp, & + & -0.18558400_wp, -42.97552200_wp, -5.32604400_wp, 2.10807000_wp, & + & -41.09886700_wp, -6.18219600_wp, 2.11848600_wp, -41.80657700_wp, & + & -3.91304700_wp, 4.55595600_wp, -37.17780400_wp, -4.43714100_wp, & + & 0.63100400_wp, -37.64593300_wp, -2.50367100_wp, 0.88823400_wp, & + & -37.71739700_wp, -2.97923400_wp, -0.49094100_wp, -41.34058200_wp, & + & -4.96039500_wp, 0.40005400_wp, -41.57475600_wp, -5.23058200_wp, & + & 1.88338400_wp, -41.04620400_wp, -4.56663200_wp, 4.12679300_wp, & + & -41.56879000_wp, -3.22746500_wp, 2.62549400_wp, -38.03991200_wp, & + & -3.33706600_wp, 0.38234800_wp, -39.93842100_wp, -4.74796100_wp, & + & 0.19100900_wp, -39.99738200_wp, -2.72595300_wp, 0.65639800_wp, & + & -40.98673400_wp, -4.13841200_wp, 2.76150100_wp, -39.44241200_wp, & + & -3.59326400_wp, 0.88828100_wp, -38.96941600_wp, -4.76452700_wp, & + & 2.64781000_wp, -39.54544200_wp, -3.87676700_wp, 2.38693600_wp, & + & -40.33839400_wp, -2.47842500_wp, 6.48342800_wp, -33.56106400_wp, & + & -3.38912500_wp, 4.01348100_wp, -39.03294400_wp, -2.75523300_wp, & + & 3.08799100_wp, -38.68010000_wp, -3.99886700_wp, 4.60252200_wp, & + & -39.96279300_wp, -1.90324100_wp, 5.63730400_wp, -38.08049400_wp, & + & -2.40771900_wp, 6.31264300_wp, -38.81256000_wp, 0.90413500_wp, & + & 6.02004800_wp, -34.16650800_wp, -2.48234400_wp, 4.00738400_wp, & + & -34.64978600_wp, -1.09626100_wp, 2.64107700_wp, -34.71331400_wp, & + & -2.47742000_wp, 2.16945300_wp, -38.32404400_wp, -3.01617000_wp, & + & 4.29342800_wp, -38.56155000_wp, -2.01201700_wp, 5.41788600_wp, & + & -38.04609300_wp, 0.17049600_wp, 6.27034800_wp, -38.57241600_wp, & + & -0.19611300_wp, 4.29312200_wp, -35.03529000_wp, -2.00905500_wp, & + & 2.99002500_wp, -36.92378300_wp, -3.04013800_wp, 3.99225600_wp, & + & -36.99881100_wp, -1.43192300_wp, 2.68306500_wp, -37.98437200_wp, & + & -0.64470200_wp, 5.09377500_wp, -36.43817200_wp, -1.77716600_wp, & + & 3.50676900_wp, -35.96201300_wp, -1.10403800_wp, 5.51051900_wp, & + & -36.54455200_wp, -0.76982800_wp, 4.65171900_wp, -37.36132300_wp, & + & 3.31664100_wp, 6.06540500_wp, -30.56888200_wp, 0.85720500_wp, & + & 5.24415600_wp, -36.04162900_wp, 0.47627500_wp, 4.19481100_wp, & + & -35.68580600_wp, 0.91076400_wp, 6.10502100_wp, -36.98654800_wp, & + & 3.00450900_wp, 5.09116300_wp, -35.10306000_wp, 3.24190100_wp, & + & 5.89714900_wp, -35.85835900_wp, 5.03950400_wp, 3.10582600_wp, & + & -31.18094000_wp, 1.40452800_wp, 4.52658100_wp, -31.66903200_wp, & + & 1.17398800_wp, 2.59510200_wp, -31.72112800_wp, -0.04659200_wp, & + & 3.39690800_wp, -35.33612100_wp, 1.27316800_wp, 5.13885600_wp, & + & -35.58500800_wp, 2.77547700_wp, 5.03747400_wp, -35.08746700_wp, & + & 4.79107600_wp, 3.83593400_wp, -35.60433200_wp, 3.00215600_wp, & + & 2.91344500_wp, -32.04963300_wp, 0.88536600_wp, 3.53183400_wp, & + & -33.93368200_wp, 1.03125500_wp, 4.96781200_wp, -34.01564700_wp, & + & 0.98430300_wp, 2.89489500_wp, -35.01582300_wp, 3.36246500_wp, & + & 3.75668000_wp, -33.45550800_wp, 1.42652400_wp, 3.67132700_wp, & + & -32.99177500_wp, 3.42443900_wp, 4.36862200_wp, -33.57301900_wp, & + & 2.94782100_wp, 3.57984300_wp, -34.42555800_wp, 6.56703300_wp, & + & 1.22491000_wp, -27.61220400_wp, 4.45705400_wp, 2.63721600_wp, & + & -33.07823100_wp, 3.35586200_wp, 2.31365400_wp, -32.73212400_wp, & + & 5.13330700_wp, 3.14232000_wp, -34.04449400_wp, 5.60780300_wp, & + & 0.87111500_wp, -32.16593100_wp, 6.40395500_wp, 1.17213400_wp, & + & -32.92348100_wp, 5.29850600_wp, -1.95718400_wp, -28.22508100_wp, & + & 4.22274600_wp, 1.76792400_wp, -28.70538800_wp, 2.55249100_wp, & + & 0.76522900_wp, -28.75081900_wp, 2.43550300_wp, 2.22118400_wp, & + & -32.38181500_wp, 4.59480900_wp, 2.26094700_wp, -32.64059200_wp, & + & 5.43500900_wp, 1.01462900_wp, -32.15426000_wp, 5.72840100_wp, & + & -1.31615400_wp, -32.65479900_wp, 3.89741400_wp, -0.46805900_wp, & + & -29.08623600_wp, 3.11249500_wp, 1.56988100_wp, -30.97648100_wp, & + & 4.32120200_wp, 2.34342300_wp, -31.05110900_wp, 2.65611600_wp, & + & 1.10740400_wp, -32.07159000_wp, 4.78948200_wp, -0.23689900_wp, & + & -30.49743600_wp, 3.54429200_wp, 1.23361400_wp, -30.05017800_wp, & + & 5.32451900_wp, 0.08239600_wp, -30.62527800_wp, 4.40471800_wp, & + & -0.02437700_wp, -31.49460500_wp, 4.76163600_wp, -4.32355100_wp, & + & -24.67169800_wp, 4.63136400_wp, -1.81376400_wp, -30.12831100_wp, & + & 3.65964100_wp, -1.12488900_wp, -29.79820200_wp, 5.40692600_wp, & + & -2.02020100_wp, -31.10589600_wp, 3.89661800_wp, -3.78493400_wp, & + & -29.23335800_wp, 4.63700600_wp, -4.23456000_wp, -29.97277700_wp, & + & 1.48211200_wp, -5.28064200_wp, -25.28023700_wp, 3.79643000_wp, & + & -2.16031400_wp, -25.74464800_wp, 1.97683400_wp, -1.45625400_wp, & + & -25.79473300_wp, 3.05348500_wp, -0.47031800_wp, -29.44041800_wp, & + & 4.38471800_wp, -2.13736100_wp, -29.70135800_wp, 3.91461900_wp, & + & -3.56505400_wp, -29.20853600_wp, 2.25732700_wp, -5.22875000_wp, & + & -29.69929400_wp, 1.79972100_wp, -3.26164700_wp, -26.13302600_wp, & + & 2.95185300_wp, -1.40293000_wp, -28.03421200_wp, 4.29112100_wp, & + & -1.87557500_wp, -28.09273200_wp, 2.29230700_wp, -1.31956500_wp, & + & -29.12280100_wp, 2.53381600_wp, -3.82533100_wp, -27.54486200_wp, & + & 2.94149000_wp, -1.94563300_wp, -27.10632000_wp, 3.12920500_wp, & + & -4.05930400_wp, -27.67459200_wp, 2.47631000_wp, -3.39668500_wp, & + & -28.53141100_wp, -0.70434900_wp, -6.31351000_wp, -21.71725100_wp, & + & 1.24464600_wp, -4.69429500_wp, -27.16852700_wp, 1.15314100_wp, & + & -3.48577800_wp, -26.84794400_wp, 1.52196100_wp, -5.41574000_wp, & + & -28.13822300_wp, -0.80752000_wp, -5.30241400_wp, -26.27063800_wp, & + & -0.69533100_wp, -6.16847500_wp, -26.98292300_wp, -3.46316100_wp, & + & -4.31925800_wp, -22.31860900_wp, 0.45394600_wp, -4.24564000_wp, & + & -22.77196400_wp, -0.11002100_wp, -2.37475200_wp, -22.83302700_wp, & + & 1.32864700_wp, -2.61901100_wp, -26.48275800_wp, 0.80413900_wp, & + & -4.68116400_wp, -26.73498000_wp, -0.61313400_wp, -5.18618700_wp, & + & -26.22443900_wp, -2.94061200_wp, -4.90128400_wp, -26.71845400_wp, & + & -1.67268400_wp, -3.33008300_wp, -23.16819900_wp, 0.52787100_wp, & + & -3.11138500_wp, -25.07665000_wp, 0.96286600_wp, -4.45202400_wp, & + & -25.12287900_wp, 0.17512600_wp, -2.53330300_wp, -26.14630600_wp, & + & -1.66267300_wp, -4.25809800_wp, -24.57760400_wp, 0.08331000_wp, & + & -3.43194100_wp, -24.13285100_wp, -1.46703300_wp, -4.87826200_wp, & + & -24.69892800_wp, -1.34827400_wp, -3.95465400_wp, -25.52225200_wp, & + & -5.61068600_wp, -3.23100600_wp, -18.72751800_wp, -3.08573300_wp, & + & -3.79979800_wp, -24.18337700_wp, -2.22797100_wp, -2.96676700_wp, & + & -23.85817400_wp, -3.52218000_wp, -4.44362500_wp, -25.13258600_wp, & + & -4.87309400_wp, -2.53086200_wp, -23.26131600_wp, -5.47374300_wp, & + & -3.15794500_wp, -23.96155800_wp, -5.71822500_wp, 0.16537600_wp, & + & -19.32469600_wp, -3.22222000_wp, -2.89838100_wp, -19.78114900_wp, & + & -2.09517300_wp, -1.30271200_wp, -19.85186100_wp, -1.40528900_wp, & + & -2.58813100_wp, -23.49043700_wp, -3.38062300_wp, -3.42707700_wp, & + & -23.73083000_wp, -4.65109200_wp, -2.61700300_wp, -23.20391500_wp, & + & -5.85113600_wp, -0.60784600_wp, -23.71327400_wp, -3.83631900_wp, & + & -0.64226700_wp, -20.17920400_wp, -2.28749000_wp, -2.25674300_wp, & + & -22.08622600_wp, -3.09209900_wp, -3.41658600_wp, -22.13332100_wp, & + & -2.06145900_wp, -1.61685400_wp, -23.13775900_wp, -4.55839600_wp, & + & -1.22164900_wp, -21.58485500_wp, -2.82356200_wp, -2.09696300_wp, & + & -21.12373600_wp, -4.91437900_wp, -1.76332600_wp, -21.69367400_wp, & + & -4.11522300_wp, -1.28802000_wp, -22.48918900_wp, -6.16794100_wp, & + & 2.52290500_wp, -15.71137400_wp, -5.01735800_wp, 0.15763500_wp, & + & -21.17480800_wp, -3.87242400_wp, 0.01071200_wp, -20.83631000_wp, & + & -5.83103800_wp, 0.12474100_wp, -22.10725300_wp, -5.15898100_wp, & + & 2.36903200_wp, -20.23022800_wp, -6.00937700_wp, 2.45260400_wp, & + & -20.93962100_wp, -3.54151900_wp, 4.68803800_wp, -16.31027400_wp, & + & -4.39335300_wp, 0.82059500_wp, -16.78087400_wp, -2.44557000_wp, & + & 0.91194000_wp, -16.85190400_wp, -3.03754400_wp, -0.42196400_wp, & + & -20.47302300_wp, -4.93918700_wp, 0.63582000_wp, -20.70650000_wp, & + & -5.08173400_wp, 2.13671600_wp, -20.17939100_wp, -4.22758800_wp, & + & 4.31519300_wp, -20.70186300_wp, -3.02232400_wp, 2.70564100_wp, & + & -17.17329600_wp, -3.32001400_wp, 0.47927700_wp, -19.07048800_wp, & + & -4.74317800_wp, 0.40936600_wp, -19.13164000_wp, -2.68934200_wp, & + & 0.70073700_wp, -20.11956700_wp, -3.91862600_wp, 2.91795900_wp, & + & -18.57579000_wp, -3.53276700_wp, 1.00574100_wp, -18.10096800_wp, & + & -4.54941600_wp, 2.85867900_wp, -18.67857800_wp, -3.68872600_wp, & + & 2.52284600_wp, -19.47315600_wp, -1.94577400_wp, 6.48511900_wp, & + & -12.69394000_wp, -3.05739700_wp, 4.10177900_wp, -18.16612000_wp, & + & -2.51007400_wp, 3.12607200_wp, -17.81361800_wp, -3.62041900_wp, & + & 4.74075900_wp, -19.09806400_wp, -1.44468200_wp, 5.59228200_wp, & + & -17.21486100_wp, -1.88788600_wp, 6.30862900_wp, -17.95013900_wp, & + & 1.38673100_wp, 5.73454500_wp, -13.30086600_wp, -2.15546500_wp, & + & 4.01866100_wp, -13.78525300_wp, -0.89101900_wp, 2.53801600_wp, & + & -13.84641400_wp, -2.30775200_wp, 2.18696800_wp, -17.45835200_wp, & + & -2.66709000_wp, 4.34895600_wp, -17.69655800_wp, -1.57010100_wp, & + & 5.38363100_wp, -17.18289100_wp, 0.67696000_wp, 6.04660900_wp, & + & -17.70865300_wp, 0.14274200_wp, 4.10804700_wp, -14.16995000_wp, & + & -1.77197300_wp, 2.96429800_wp, -16.05762700_wp, -2.71505700_wp, & + & 4.05107700_wp, -16.13390300_wp, -1.22509000_wp, 2.60975700_wp, & + & -17.12084900_wp, -0.23589500_wp, 4.94327600_wp, -15.57284600_wp, & + & -1.49815300_wp, 3.45957600_wp, -15.09710400_wp, -0.65548400_wp, & + & 5.39894700_wp, -15.68022200_wp, -0.39576400_wp, 4.51483100_wp, & + & -16.50141600_wp, 3.79571200_wp, 5.57363200_wp, -9.70693000_wp, & + & 1.28031600_wp, 4.96553700_wp, -15.17815300_wp, 0.80692200_wp, & + & 3.95331300_wp, -14.82338500_wp, 1.40284600_wp, 5.81941500_wp, & + & -16.12558800_wp, 3.40126400_wp, 4.62945500_wp, -14.24238700_wp, & + & 3.70861000_wp, 5.41234600_wp, -14.99916200_wp, 5.25966400_wp, & + & 2.47828000_wp, -10.31895500_wp, 1.76390600_wp, 4.20377900_wp, & + & -10.80688300_wp, 1.36795200_wp, 2.29969400_wp, -10.85732500_wp, & + & 0.22131500_wp, 3.20191400_wp, -14.47414900_wp, 1.68187000_wp, & + & 4.82477700_wp, -14.72336600_wp, 3.16971500_wp, 4.59619200_wp, & + & -14.22837600_wp, 5.07552800_wp, 3.22659600_wp, -14.74353700_wp, & + & 3.21389100_wp, 2.45988400_wp, -11.18675100_wp, 1.16125300_wp, & + & 3.25697400_wp, -13.07097200_wp, 1.42701700_wp, 4.67532000_wp, & + & -13.15317600_wp, 1.20299700_wp, 2.61476300_wp, -14.15565600_wp, & + & 3.64541200_wp, 3.26981100_wp, -12.59324500_wp, 1.71044800_wp, & + & 3.35067400_wp, -12.13127300_wp, 3.76190900_wp, 3.87426300_wp, & + & -12.71219700_wp, 3.21818700_wp, 3.12812100_wp, -13.56692100_wp, & + & 6.62222500_wp, 0.47296900_wp, -6.75189200_wp, 4.64689200_wp, & + & 2.06122000_wp, -12.21651300_wp, 3.51732800_wp, 1.83252200_wp, & + & -11.87307800_wp, 5.35875000_wp, 2.50622600_wp, -13.18535900_wp, & + & 5.63766100_wp, 0.20259400_wp, -11.30681000_wp, 6.45772800_wp, & + & 0.43498200_wp, -12.06373200_wp, 5.08904900_wp, -2.58912300_wp, & + & -7.36461900_wp, 4.33766900_wp, 1.21441600_wp, -7.84380300_wp, & + & 2.58774700_wp, 0.35853300_wp, -7.88985200_wp, 2.59603800_wp, & + & 1.81868700_wp, -11.52138600_wp, 4.74805600_wp, 1.67427000_wp, & + & -11.78089500_wp, 5.47883200_wp, 0.36034300_wp, -11.29482300_wp, & + & 5.57144000_wp, -1.98665600_wp, -11.79445300_wp, 3.81992200_wp, & + & -0.98593700_wp, -8.22592800_wp, 3.21370700_wp, 1.11201900_wp, & + & -10.11657800_wp, 4.48344200_wp, 1.77892300_wp, -10.19002600_wp, & + & 2.71877800_wp, 0.69098100_wp, -11.21178200_wp, 4.72801800_wp, & + & -0.83131300_wp, -9.63621900_wp, 3.61496500_wp, 0.74013400_wp, & + & -9.19104700_wp, 5.29100200_wp, -0.55907700_wp, -9.76455400_wp, & + & 4.36469000_wp, -0.58660900_wp, -10.63442500_wp, 4.35228600_wp, & + & -4.90004200_wp, -3.81144700_wp, 4.44097400_wp, -2.38912400_wp, & + & -9.26738300_wp, 3.52895300_wp, -1.61996700_wp, -8.93860300_wp, & + & 5.19326600_wp, -2.66058400_wp, -10.24481300_wp, 3.53696300_wp, & + & -4.29002000_wp, -8.37335000_wp, 4.23672500_wp, -4.80111500_wp, & + & -9.10959500_wp, 1.00427800_wp, -5.57476100_wp, -4.41902200_wp, & + & 3.57890800_wp, -2.66238100_wp, -4.88171400_wp, 1.82623900_wp, & + & -1.80550700_wp, -4.93380000_wp, 2.98312200_wp, -0.91478000_wp, & + & -8.58017900_wp, 4.16453500_wp, -2.68995500_wp, -8.84009200_wp, & + & 3.57359600_wp, -4.07255100_wp, -8.34592700_wp, 1.78109200_wp, & + & -5.58855100_wp, -8.83661100_wp, 1.49292300_wp, -3.58950600_wp, & + & -5.27145100_wp, 2.80212700_wp, -1.83643600_wp, -7.17342500_wp, & + & 4.09514700_wp, -2.42187500_wp, -7.23014300_wp, 2.15132100_wp, & + & -1.69621500_wp, -8.26119200_wp, 2.17690600_wp, -4.21455500_wp, & + & -6.68346800_wp, 2.74467300_wp, -2.37641700_wp, -6.24541500_wp, & + & 2.75109700_wp, -4.49752900_wp, -6.81284300_wp, 2.15718400_wp, & + & -3.78174700_wp, -7.66697500_wp, -1.26221200_wp, -6.41670500_wp, & + & -0.85374200_wp, 0.82436300_wp, -4.96958300_wp, -6.30547500_wp, & + & 0.83199100_wp, -3.75735300_wp, -5.98457700_wp, 1.03430000_wp, & + & -5.71195800_wp, -7.27367500_wp, -1.27751600_wp, -5.40056200_wp, & + & -5.40515500_wp, -1.23855400_wp, -6.27293600_wp, -6.11618300_wp, & + & -3.83825500_wp, -4.19350000_wp, -1.45461100_wp, 0.07359700_wp, & + & -4.45531400_wp, -1.90790200_wp, -0.32852700_wp, -2.54313800_wp, & + & -1.97055100_wp, 1.08402900_wp, -2.90972700_wp, -5.61929300_wp, & + & 0.38194400_wp, -4.91937900_wp, -5.87022000_wp, -1.07340700_wp, & + & -5.30125800_wp, -5.35769100_wp, -3.36730300_wp, -4.81840800_wp, & + & -5.85309800_wp, -1.97044000_wp, -3.36169700_wp, -2.30376500_wp, & + & 0.24323800_wp, -3.33082000_wp, -4.21339800_wp, 0.56149800_wp, & + & -4.70392000_wp, -4.25885700_wp, -0.06007900_wp, -2.72499400_wp, & + & -5.28032100_wp, -2.03903500_wp, -4.28659200_wp, -3.71420300_wp, & + & -0.22829900_wp, -3.61187700_wp, -3.26815500_wp, -1.89583700_wp, & + & -4.92100900_wp, -3.83372000_wp, -1.69880100_wp, -4.01127200_wp, & + & -4.65461200_wp, -5.88431000_wp, -2.92651000_wp, 2.13794800_wp, & + & -3.41270700_wp, -3.70792000_wp, -3.31699700_wp, -2.49042200_wp, & + & -2.95107900_wp, -2.99180300_wp, -3.90608000_wp, -4.31335900_wp, & + & -4.26546700_wp, -5.08913900_wp, -2.29161400_wp, -2.39348100_wp, & + & -5.74011500_wp, -2.86499800_wp, -3.09364200_wp, -5.69999000_wp, & + & 0.46656400_wp, 1.54126600_wp, -3.47225200_wp, -2.79791900_wp, & + & 1.08395300_wp, -2.21350500_wp, -1.30486300_wp, 1.01272100_wp, & + & -1.63490100_wp, -2.64441800_wp, -2.62404400_wp, -3.67856900_wp, & + & -3.31236300_wp, -2.86309700_wp, -4.87535200_wp, -2.39641400_wp, & + & -2.33653500_wp, -5.89904100_wp, -0.29148700_wp, -2.84721900_wp, & + & -3.89433500_wp, -0.49836600_wp, 0.68661100_wp, -2.48688000_wp, & + & -2.23904200_wp, -1.21963400_wp, -3.38905000_wp, -3.32652900_wp, & + & -1.26854400_wp, -2.20774900_wp, -1.62106800_wp, -2.27005500_wp, & + & -4.66294100_wp, -1.01411400_wp, -0.71855900_wp, -3.00749200_wp, & + & -2.03438700_wp, -0.25613400_wp, -5.06221000_wp, -1.52322800_wp, & + & -0.82716600_wp, -4.22703200_wp, -1.11805900_wp, -1.62139300_wp, & + & -5.94634900_wp, 2.85395500_wp, 5.15592700_wp, -4.99734400_wp, & + & 0.39992100_wp, -0.30899600_wp, -3.87224500_wp, 0.15513400_wp, & + & 0.03194700_wp, -5.81406100_wp, 0.43614200_wp, -1.24065500_wp, & + & -4.95318100_wp, 2.61524000_wp, 0.63778800_wp, -5.79266900_wp, & + & 2.77080500_wp, -0.07409700_wp, -3.14315300_wp, 4.78724500_wp, & + & 4.55641600_wp, -4.31976300_wp, 1.00732600_wp, 4.08439200_wp, & + & -2.37148900_wp, 0.93183000_wp, 4.01449000_wp, -3.07479700_wp, & + & -0.34572300_wp, 0.39450200_wp, -4.88174800_wp, 0.86870900_wp, & + & 0.16014200_wp, -4.89508600_wp, 2.37635300_wp, 0.68702100_wp, & + & -3.85902500_wp, 4.47493100_wp, 0.16322700_wp, -2.79460800_wp, & + & 2.76806800_wp, 3.69272600_wp, -3.27956000_wp, 0.57617100_wp, & + & 1.79633900_wp, -4.70466500_wp, 0.62741200_wp, 1.73355700_wp, & + & -2.63463100_wp, 0.74223300_wp, 0.74657200_wp, -3.66983500_wp, & + & 3.05668000_wp, 2.29004100_wp, -3.44777000_wp, 1.11753100_wp, & + & 2.76564300_wp, -4.30224300_wp, 3.05172400_wp, 2.18736800_wp, & + & -3.47355300_wp, 2.64313500_wp, 1.39108600_wp, -1.39928400_wp, & + & 6.44145200_wp, 8.17063000_wp, -2.70551800_wp, 4.16268300_wp, & + & 2.69891700_wp, -2.24764000_wp, 3.14362500_wp, 3.05215900_wp, & + & -3.21460300_wp, 4.84655500_wp, 1.76649200_wp, -0.97609700_wp, & + & 5.50982400_wp, 3.64937600_wp, -1.35524600_wp, 6.26119900_wp, & + & 2.91213500_wp, 1.85773000_wp, 5.41041000_wp, 7.56383900_wp, & + & -1.81454700_wp, 4.00271600_wp, 7.07922700_wp, -0.68161000_wp, & + & 2.42068400_wp, 7.01725600_wp, -2.12263200_wp, 2.19092700_wp, & + & 3.40621000_wp, -2.29851000_wp, 4.37549300_wp, 3.16780300_wp, & + & -1.11825400_wp, 5.31282500_wp, 3.67867600_wp, 1.17853500_wp, & + & 5.78080500_wp, 3.15382200_wp, 0.47981400_wp, 3.89498600_wp, & + & 6.69452200_wp, -1.52254800_wp, 2.92024400_wp, 4.80772800_wp, & + & -2.37097700_wp, 4.08328300_wp, 4.73048900_wp, -1.00906500_wp, & + & 2.51909400_wp, 3.74286000_wp, 0.17466500_wp, 4.76028300_wp, & + & 5.29131100_wp, -1.20894600_wp, 3.39027600_wp, 5.76512800_wp, & + & -0.20312000_wp, 5.25023600_wp, 5.18265300_wp, -0.02067100_wp, & + & 4.34678400_wp, 4.35855900_wp, 4.24558800_wp, 5.04369500_wp, & + & 11.15574500_wp, 1.69220200_wp, 4.65329500_wp, 5.68468300_wp, & + & 1.13042000_wp, 3.68471400_wp, 6.03856100_wp, 1.88383200_wp, & + & 5.49280000_wp, 4.73413400_wp, 3.77196300_wp, 4.13716100_wp, & + & 6.61744300_wp, 4.14593200_wp, 4.89114800_wp, 5.86076200_wp, & + & 5.44127500_wp, 1.83450400_wp, 10.54328000_wp, 2.10949200_wp, & + & 3.85361500_wp, 10.05580800_wp, 1.55216700_wp, 1.98994600_wp, & + & 10.00571600_wp, 0.48584000_wp, 2.98694400_wp, 6.38792800_wp, & + & 2.07694100_wp, 4.47875800_wp, 6.13771000_wp, 3.53936600_wp, & + & 4.12369800_wp, 6.63151500_wp, 5.32296500_wp, 2.59671000_wp, & + & 6.11766400_wp, 3.40142800_wp, 1.99147900_wp, 9.67552900_wp, & + & 1.42658300_wp, 2.96144600_wp, 7.79109200_wp, 1.81126600_wp, & + & 4.35186000_wp, 7.70996600_wp, 1.41253800_wp, 2.31703100_wp, & + & 6.70531100_wp, 3.90083000_wp, 2.76228900_wp, 8.26889700_wp, & + & 1.98126000_wp, 3.00706300_wp, 8.72894200_wp, 4.07010600_wp, & + & 3.35398100_wp, 8.14888800_wp, 3.46451600_wp, 2.65697800_wp, & + & 7.29150300_wp, 6.62861400_wp, -0.27871400_wp, 14.10724200_wp, & + & 4.80138600_wp, 1.47287900_wp, 8.64435400_wp, 3.65243500_wp, & + & 1.34131500_wp, 8.98675300_wp, 5.54470600_wp, 1.85495900_wp, & + & 7.67397000_wp, 5.62411200_wp, -0.46374400_wp, 9.55209800_wp, & + & 6.46269700_wp, -0.30191000_wp, 8.79646200_wp, 4.84040800_wp, & + & -3.19907700_wp, 13.49454400_wp, 4.42101500_wp, 0.65569000_wp, & + & 13.01851200_wp, 2.60456100_wp, -0.04752200_wp, 12.97231100_wp, & + & 2.73633500_wp, 1.40670400_wp, 9.33846500_wp, 4.86589400_wp, & + & 1.07893900_wp, 9.07843000_wp, 5.48102700_wp, -0.29299000_wp, & + & 9.56593900_wp, 5.37377300_wp, -2.63940300_wp, 9.06696400_wp, & + & 3.71324400_wp, -1.49285700_wp, 12.63601500_wp, 3.29230500_wp, & + & 0.64916000_wp, 10.74341800_wp, 4.61174100_wp, 1.20514600_wp, & + & 10.67199500_wp, 2.76000800_wp, 0.27159300_wp, 9.64868900_wp, & + & 4.63197200_wp, -1.41669400_wp, 11.22461600_wp, 3.65861800_wp, & + & 0.24353300_wp, 11.66958100_wp, 5.21719500_wp, -1.19283600_wp, & + & 11.09575500_wp, 4.29269900_wp, -1.14121300_wp, 10.22724900_wp, & + & 3.91004000_wp, -5.43863100_wp, 17.04948800_wp, 4.21960900_wp, & + & -2.94374700_wp, 11.59446100_wp, 3.37113300_wp, -2.09942300_wp, & + & 11.92165800_wp, 4.94179400_wp, -3.27872300_wp, 10.61679000_wp, & + & 3.15027900_wp, -4.76046300_wp, 12.48785700_wp, 3.80576300_wp, & + & -5.32968100_wp, 11.75466200_wp, 0.51850200_wp, -5.82397200_wp, & + & 16.44199000_wp, 3.33705500_wp, -3.14345100_wp, 15.98103200_wp, & + & 1.66326800_wp, -2.13924200_wp, 15.92817100_wp, 2.89134600_wp, & + & -1.35085200_wp, 12.28101600_wp, 3.91381100_wp, -3.22049500_wp, & + & 12.02158200_wp, 3.20741900_wp, -4.54751900_wp, 12.51756600_wp, & + & 1.29289200_wp, -5.90510800_wp, 12.02698500_wp, 1.17473700_wp, & + & -3.88873800_wp, 15.59042400_wp, 2.63234900_wp, -2.25274200_wp, & + & 13.68707800_wp, 3.86894300_wp, -2.94672600_wp, 13.63161200_wp, & + & 1.99383900_wp, -2.05812600_wp, 12.60166400_wp, 1.80298500_wp, & + & -4.56880600_wp, 14.17882400_wp, 2.52773900_wp, -2.78630700_wp, & + & 14.61703200_wp, 2.35376300_wp, -4.90086800_wp, 14.05022600_wp, & + & 1.82258100_wp, -4.13615300_wp, 13.19919000_wp, -1.81004500_wp, & + & -6.47044900_wp, 20.01013100_wp, 0.39807900_wp, -5.20577000_wp, & + & 14.55816900_wp, 0.50431800_wp, -3.99881000_wp, 14.87884200_wp, & + & 0.54038000_wp, -5.96361300_wp, 13.59197100_wp, -1.73913200_wp, & + & -5.45541400_wp, 15.46060100_wp, -1.77281300_wp, -6.32881300_wp, & + & 14.75182500_wp, -4.18557900_wp, -4.03469400_wp, 19.40996100_wp, & + & -0.30625900_wp, -4.62959900_wp, 18.95652200_wp, -0.54468400_wp, & + & -2.68960700_wp, 18.89334200_wp, 0.83230400_wp, -3.17561400_wp, & + & 15.24518500_wp, -0.04213400_wp, -5.11771500_wp, 14.99536700_wp, & + & -1.52573400_wp, -5.37435100_wp, 15.50958000_wp, -3.76922600_wp, & + & -4.69754100_wp, 15.01222500_wp, -2.25303000_wp, -3.36568900_wp, & + & 18.56074200_wp, -0.04195400_wp, -3.52428100_wp, 16.65107600_wp, & + & 0.15525800_wp, -4.91954300_wp, 16.60558200_wp, -0.29387400_wp, & + & -2.89371000_wp, 15.58604500_wp, -2.39995500_wp, -4.28157000_wp, & + & 17.15070100_wp, -0.53675200_wp, -3.76356700_wp, 17.59876200_wp, & + & -2.30957400_wp, -4.92594100_wp, 17.03240400_wp, -2.03737800_wp, & + & -4.03560500_wp, 16.21584200_wp, -6.11561000_wp, -2.59789700_wp, & + & 23.00629200_wp, -3.71290200_wp, -3.58679200_wp, 17.54958200_wp, & + & -2.73386200_wp, -2.91288400_wp, 17.87683500_wp, -4.26124100_wp, & + & -4.14829300_wp, 16.60418700_wp, -5.26765800_wp, -2.03343300_wp, & + & 18.47592800_wp, -5.96385200_wp, -2.54853900_wp, 17.77588700_wp, & + & -5.64043600_wp, 0.76740400_wp, 22.40912300_wp, -3.69400100_wp, & + & -2.67533300_wp, 21.95039500_wp, -2.31315600_wp, -1.29525800_wp, & + & 21.87884800_wp, -1.85205000_wp, -2.67934300_wp, 18.24393100_wp, & + & -3.94848800_wp, -3.17006300_wp, 18.00598800_wp, -5.06271500_wp, & + & -2.15643900_wp, 18.53297700_wp, -5.90210500_wp, 0.02856500_wp, & + & 18.02094500_wp, -3.92383100_wp, -0.34916100_wp, 21.55393800_wp, & + & -2.66603600_wp, -2.20254600_wp, 19.64759700_wp, -3.65987900_wp, & + & -3.20957800_wp, 19.59892400_wp, -2.33754100_wp, -1.61080600_wp, & + & 18.59828400_wp, -4.73301500_wp, -0.79686900_wp, 20.14868300_wp, & + & -3.16940800_wp, -1.95424700_wp, 20.61307700_wp, -5.17195000_wp, & + & -1.27026500_wp, 20.04127100_wp, -4.30561600_wp, -0.93672400_wp, & + & 19.24787800_wp, -5.68004800_wp, 3.16686700_wp, 26.02508100_wp, & + & -4.93728800_wp, 0.64071500_wp, 20.55878000_wp, -3.84338500_wp, & + & 0.30028300_wp, 20.90197700_wp, -5.75345500_wp, 0.74639700_wp, & + & 19.62814600_wp, -4.71162700_wp, 2.84384800_wp, 21.50706300_wp, & + & -5.53262600_wp, 3.07060800_wp, 20.79249800_wp, -2.72122100_wp, & + & 4.85338500_wp, 25.42422400_wp, -4.21102800_wp, 1.18826500_wp, & + & 24.95142600_wp, -2.27711400_wp, 0.94691700_wp, 24.88156100_wp, & + & -3.08724300_wp, -0.26644700_wp, 21.26317700_wp, -4.78744900_wp, & + & 1.09826700_wp, 21.02907300_wp, -4.67190800_wp, 2.60190800_wp, & + & 21.55461600_wp, -3.45928200_wp, 4.60361400_wp, 21.02965800_wp, & + & -2.54611700_wp, 2.81195900_wp, 24.55968300_wp, -3.21310700_wp, & + & 0.66958100_wp, 22.66482800_wp, -4.63013400_wp, 0.84230100_wp, & + & 22.60049800_wp, -2.55697700_wp, 0.78032900_wp, 21.61401900_wp, & + & -3.39249600_wp, 3.17429800_wp, 23.15720700_wp, -3.33574000_wp, & + & 1.22389300_wp, 23.63291300_wp, -4.02115600_wp, 3.22278300_wp, & + & 23.05449400_wp, -3.23042900_wp, 2.74558100_wp, 22.25659700_wp, & + & -0.84094600_wp, 6.35337600_wp, 29.03738300_wp, -2.33097800_wp, & + & 4.19438600_wp, 23.56499100_wp, -1.96658200_wp, 3.13886200_wp, & + & 23.91849500_wp, -2.78437800_wp, 4.91911100_wp, 22.63111400_wp, & + & -0.49876300_wp, 5.38878600_wp, 24.51391200_wp, -0.81001300_wp, & + & 6.17007200_wp, 23.77374900_wp, 2.31797200_wp, 5.04746900_wp, & + & 28.42946400_wp, -1.45749400_wp, 3.95847100_wp, 27.94292000_wp, & + & -0.46344600_wp, 2.28467800_wp, 27.88361800_wp, -1.91892000_wp, & + & 2.17907000_wp, 24.27276500_wp, -1.91129300_wp, 4.37116400_wp, & + & 24.03271800_wp, -0.65585000_wp, 5.20501600_wp, 24.54211100_wp, & + & 1.67292000_wp, 5.47449400_wp, 24.01724900_wp, 0.81576200_wp, & + & 3.65629700_wp, 27.55944000_wp, -1.25955500_wp, 2.85415100_wp, & + & 25.67365000_wp, -2.00760900_wp, 4.08622000_wp, 25.59560500_wp, & + & -0.78415700_wp, 2.41168000_wp, 24.60648300_wp, 0.58654200_wp, & + & 4.54347800_wp, 26.15661000_wp, -0.90735300_wp, 3.29690800_wp, & + & 26.62925900_wp, 0.25325300_wp, 5.06337600_wp, 26.04744100_wp, & + & 0.35767400_wp, 4.14842700_wp, 25.21920300_wp, 4.66620200_wp, & + & 4.47928500_wp, 32.01833400_wp, 2.09591700_wp, 4.30734500_wp, & + & 26.54664000_wp, 1.44804600_wp, 3.39015700_wp, 26.90035900_wp, & + & 2.35322000_wp, 5.12755300_wp, 25.59480300_wp, 4.11820100_wp, & + & 3.61557900_wp, 27.47810100_wp, 4.55630200_wp, 4.33467900_wp, & + & 26.72007600_wp, 5.58576300_wp, 1.17961300_wp, 31.40498000_wp, & + & 2.44168900_wp, 3.47459800_wp, 30.91852700_wp, 1.72747400_wp, & + & 1.66568400_wp, 30.86979500_wp, 0.75001800_wp, 2.74986600_wp, & + & 27.25032800_wp, 2.45975300_wp, 4.10105900_wp, 26.99825300_wp, & + & 3.88614300_wp, 3.62245500_wp, 27.49011100_wp, 5.53256800_wp, & + & 1.94849700_wp, 26.97806200_wp, 3.56679100_wp, 1.51008800_wp, & + & 30.53876900_wp, 1.68566700_wp, 2.64425900_wp, 28.65318200_wp, & + & 2.18547100_wp, 3.99680600_wp, 28.57235200_wp, 1.61357600_wp, & + & 2.00329500_wp, 27.56559800_wp, 4.13030700_wp, 2.23465400_wp, & + & 29.13095000_wp, 2.24067400_wp, 2.64295700_wp, 29.59008600_wp, & + & 4.35137100_wp, 2.80978700_wp, 29.00948400_wp, 3.68892700_wp, & + & 2.16738500_wp, 28.15041900_wp, 6.58938000_wp, -1.02829900_wp, & + & 34.96754200_wp, 4.92444100_wp, 0.87269300_wp, 29.50453000_wp, & + & 3.76349300_wp, 0.83923700_wp, 29.84615700_wp, 5.69319900_wp, & + & 1.19037500_wp, 28.53333300_wp, 5.57433100_wp, -1.12720400_wp, & + & 30.40996100_wp, 6.42456800_wp, -1.03722400_wp, 29.65602600_wp, & + & 4.55956600_wp, -3.78458200_wp, 34.35499000_wp, 4.47541400_wp, & + & 0.09110100_wp, 33.88026000_wp, 2.60418200_wp, -0.45460000_wp, & + & 33.83329600_wp, 2.86026000_wp, 0.98216700_wp, 30.19744100_wp, & + & 4.95053800_wp, 0.47504300_wp, 29.93751600_wp, 5.44655400_wp, & + & -0.94476300_wp, 30.42455500_wp, 5.13941500_wp, -3.27349200_wp, & + & 29.92783600_wp, 3.58349300_wp, -1.98899300_wp, 33.49665700_wp, & + & 3.34881300_wp, 0.18098000_wp, 31.60297000_wp, 4.70959300_wp, & + & 0.62332300_wp, 31.53339300_wp, 2.78498200_wp, -0.14987600_wp, & + & 30.50831900_wp, 4.50558000_wp, -1.99110000_wp, 32.08531700_wp, & + & 3.67833600_wp, -0.25346600_wp, 32.52839300_wp, 5.10942500_wp, & + & -1.81877400_wp, 31.95607900_wp, 4.19149200_wp, -1.68766700_wp, & + & 31.08832200_wp, 3.44356500_wp, -5.93719900_wp, 37.90984300_wp, & + & 3.97022900_wp, -3.47683500_wp, 32.45560700_wp, 3.19229400_wp, & + & -2.56342900_wp, 32.78107300_wp, 4.65674900_wp, -3.87267200_wp, & + & 31.47818400_wp, 2.74552100_wp, -5.19679900_wp, 33.34937400_wp, & + & 3.35076400_wp, -5.81999600_wp, 32.61799600_wp, 0.03233500_wp, & + & -6.03187900_wp, 37.30355600_wp, 3.07311500_wp, -3.60062700_wp, & + & 36.84278300_wp, 1.49097900_wp, -2.45754400_wp, 36.79013300_wp, & + & 2.78249000_wp, -1.77747300_wp, 33.14187700_wp, 3.63816000_wp, & + & -3.72677600_wp, 32.88261700_wp, 2.82042100_wp, -4.98890000_wp, & + & 33.38083900_wp, 0.79799700_wp, -6.17842000_wp, 32.88936500_wp, & + & 0.85211700_wp, -4.15968800_wp, 36.45219200_wp, 2.44660800_wp, & + & -2.65387500_wp, 34.54788900_wp, 3.61756500_wp, -3.45040600_wp, & + & 34.49430700_wp, 1.82554900_wp, -2.40602700_wp, 33.46398300_wp, & + & 1.42097700_wp, -4.89142900_wp, 35.04064100_wp, 2.29552300_wp, & + & -3.17662200_wp, 35.47946300_wp, 1.94237900_wp, -5.26843700_wp, & + & 34.91199900_wp, 1.47764700_wp, -4.46182700_wp, 34.06513900_wp, & + & -2.34123600_wp, -6.47728900_wp, 40.87412100_wp, -0.02780800_wp, & + & -5.40568400_wp, 35.42170000_wp, 0.17642600_wp, -4.21209000_wp, & + & 35.74190400_wp, 0.04429100_wp, -6.17273400_wp, 34.45711800_wp, & + & -2.18378400_wp, -5.47251700_wp, 36.32608700_wp, -2.28949100_wp, & + & -6.33884200_wp, 35.61912600_wp, -4.50023400_wp, -3.84784800_wp, & + & 40.27418600_wp, -0.68069200_wp, -4.77069600_wp, 39.82130000_wp, & + & -0.75337100_wp, -2.81813000_wp, 39.75606100_wp, 0.57596500_wp, & + & -3.42000000_wp, 36.10942800_wp, -0.46266300_wp, -5.28074700_wp, & + & 35.86075100_wp, -1.96331300_wp, -5.40978200_wp, 36.37731100_wp, & + & -4.14032300_wp, -4.54371100_wp, 35.87853100_wp, -2.51701500_wp, & + & -3.34568300_wp, 39.42400100_wp, -0.32380800_wp, -3.69202700_wp, & + & 37.51485900_wp, -0.24753000_wp, -5.09897700_wp, 37.46903200_wp, & + & -0.52313600_wp, -3.04323100_wp, 36.45114400_wp, -2.74103600_wp, & + & -4.24566400_wp, 38.01478800_wp, -0.83912000_wp, -3.88902200_wp, & + & 38.46382700_wp, -2.70416400_wp, -4.89584400_wp, 37.89790400_wp, & + & -2.35636000_wp, -4.03214100_wp, 37.08414300_wp, -6.29822400_wp, & + & -2.25156100_wp, 43.87289800_wp, -3.98310800_wp, -3.44183700_wp, & + & 38.41528200_wp, -2.95567200_wp, -2.85358600_wp, 38.74401500_wp, & + & -4.58161500_wp, -3.95421700_wp, 37.47176300_wp, -5.40544500_wp, & + & -1.76174200_wp, 39.34444900_wp, -6.14186500_wp, -2.21515500_wp, & + & 38.64383900_wp, -5.53700400_wp, 1.06087700_wp, 43.27558200_wp, & + & -3.88815700_wp, -2.53578700_wp, 42.81560900_wp, -2.39428100_wp, & + & -1.27863000_wp, 42.74460100_wp, -2.05277500_wp, -2.69685800_wp, & + & 39.11124200_wp, -4.18591700_wp, -3.00650300_wp, 38.87377700_wp, & + & -5.20975100_wp, -1.90146300_wp, 39.40081500_wp, -5.86017300_wp, & + & 0.34697200_wp, 38.88765800_wp, -3.92156800_wp, -0.19726600_wp, & + & 42.41918800_wp, -2.82343100_wp, -2.15233200_wp, 40.51400300_wp, & + & -3.90052900_wp, -3.07057100_wp, 40.46349900_wp, -2.44688100_wp, & + & -1.59077900_wp, 39.46506600_wp, -4.76509100_wp, -0.57518300_wp, & + & 41.01416700_wp, -3.30494400_wp, -1.86198400_wp, 41.48052300_wp, & + & -5.24070100_wp, -1.00925400_wp, 40.90823400_wp, -4.34979000_wp, & + & -0.75129600_wp, 40.11556900_wp, -5.37100500_wp, 3.45533300_wp, & + & 46.89241900_wp, -4.84156300_wp, 0.87539000_wp, 41.42520400_wp, & + & -3.78388300_wp, 0.44240000_wp, 41.76946200_wp, -5.64822600_wp, & + & 1.04999700_wp, 40.49510300_wp, -4.43289000_wp, 3.05066100_wp, & + & 42.37430200_wp, -5.22993700_wp, 3.34685000_wp, 41.65816600_wp, & + & -2.27765700_wp, 4.88295600_wp, 46.29066600_wp, -4.07089300_wp, & + & 1.35833400_wp, 45.81626100_wp, -2.16460600_wp, 0.95266000_wp, & + & 45.74752600_wp, -3.07544700_wp, -0.18737800_wp, 42.13083700_wp, & + & -4.65541600_wp, 1.31782200_wp, 41.89548800_wp, -4.41301600_wp, & + & 2.80629400_wp, 42.41977900_wp, -3.03367100_wp, 4.69767200_wp, & + & 41.89467700_wp, -2.27666800_wp, 2.83478300_wp, 45.42579200_wp, & + & -3.12121600_wp, 0.75626300_wp, 43.53168500_wp, -4.52027500_wp, & + & 1.04886900_wp, 43.46623900_wp, -2.46022000_wp, 0.81083100_wp, & + & 42.48004700_wp, -3.08907700_wp, 3.26688000_wp, 44.02359800_wp, & + & -3.19674000_wp, 1.31921100_wp, 44.49941300_wp, -3.70987000_wp, & + & 3.36958600_wp, 43.92058400_wp, -2.96266400_wp, 2.82642200_wp, & + & 43.11997700_wp, -0.27469700_wp, 6.21758400_wp, 49.90219200_wp, & + & -1.93824500_wp, 4.19314500_wp, 44.42946300_wp, -1.66858900_wp, & + & 3.11136800_wp, 44.78436200_wp, -2.33242500_wp, 4.95421400_wp, & + & 43.49458800_wp, -0.01502100_wp, 5.22715600_wp, 45.37807000_wp, & + & -0.25802000_wp, 6.03200800_wp, 44.63535200_wp, 2.76209300_wp, & + & 4.64660600_wp, 49.29384800_wp, -1.08855300_wp, 3.88322500_wp, & + & 48.80720200_wp, -0.24136100_wp, 2.13131400_wp, 48.74790400_wp, & + & -1.70084200_wp, 2.15074200_wp, 45.13694400_wp, -1.50863000_wp, & + & 4.33337200_wp, 44.89551700_wp, -0.18629200_wp, 5.05732800_wp, & + & 45.40410200_wp, 2.15695500_wp, 5.12788700_wp, 44.87941200_wp, & + & 1.14727800_wp, 3.38821900_wp, 48.42442700_wp, -0.98667700_wp, & + & 2.76655700_wp, 46.53892400_wp, -1.62729700_wp, 4.05787700_wp, & + & 46.45920700_wp, -0.55102600_wp, 2.28515900_wp, 45.46870000_wp, & + & 0.99414600_wp, 4.29270500_wp, 47.02022000_wp, -0.59908900_wp, & + & 3.17739400_wp, 47.49254500_wp, 0.70869700_wp, 4.83980900_wp, & + & 46.91034200_wp, 0.73430300_wp, 3.91839200_wp, 46.07838700_wp, & + & 5.05502200_wp, 3.88016200_wp, 52.87957400_wp, 2.48493700_wp, & + & 3.92859000_wp, 47.40903600_wp, 1.75590400_wp, 3.06990300_wp, & + & 47.76163400_wp, 2.80732800_wp, 4.72421100_wp, 46.45513000_wp, & + & 4.43610300_wp, 3.06701600_wp, 48.33711500_wp, 4.93521800_wp, & + & 3.74570000_wp, 47.57862000_wp, 5.69081800_wp, 0.51440500_wp, & + & 52.26631300_wp, 2.75768800_wp, 3.06990100_wp, 51.78038800_wp, & + & 1.89103000_wp, 1.32727300_wp, 51.73211300_wp, 1.00984700_wp, & + & 2.49106300_wp, 48.11121900_wp, 2.82555800_wp, 3.69135200_wp, & + & 47.85839800_wp, 4.20552100_wp, 3.09317500_wp, 48.35016200_wp, & + & 5.70415400_wp, 1.28448500_wp, 47.83919300_wp, 3.70745600_wp, & + & 1.01622800_wp, 51.40000700_wp, 1.93219300_wp, 2.30659600_wp, & + & 49.51425000_wp, 2.54447900_wp, 3.61132300_wp, 49.43403900_wp, & + & 1.80517300_wp, 1.67461300_wp, 48.42531700_wp, 4.33196700_wp, & + & 1.68902100_wp, 49.99226600_wp, 2.48456900_wp, 2.25757500_wp, & + & 50.44917400_wp, 4.60204300_wp, 2.24426600_wp, 49.87023900_wp, & + & 3.88605500_wp, 1.66022700_wp, 49.00878300_wp, 6.50373600_wp, & + & -1.77075800_wp, 55.82680700_wp, 5.01199200_wp, 0.26473900_wp, & + & 50.36518200_wp, 3.84866000_wp, 0.33121000_wp, 50.70412000_wp, & + & 5.80079100_wp, 0.51609900_wp, 49.39228000_wp, 5.48310100_wp, & + & -1.78293100_wp, 51.26896900_wp, 6.33981500_wp, -1.76569000_wp, & + & 50.51641800_wp, 4.24758800_wp, -4.34477300_wp, 55.21570400_wp, & + & 4.49742500_wp, -0.47572500_wp, 54.74131300_wp, 2.58601100_wp, & + & -0.85944000_wp, 54.69483600_wp, 2.96419100_wp, 0.55123200_wp, & + & 51.05716400_wp, 5.00024000_wp, -0.13338000_wp, 50.79753100_wp, & + & 5.37357000_wp, -1.59005200_wp, 51.28477400_wp, 4.86915100_wp, & + & -3.88464300_wp, 50.78878600_wp, 3.42795300_wp, -2.47205500_wp, & + & 54.35756600_wp, 3.38242100_wp, -0.28954300_wp, 52.46315900_wp, & + & 4.77437600_wp, 0.03485800_wp, 52.39479300_wp, 2.79098200_wp, & + & -0.57113800_wp, 51.36891600_wp, 4.34675600_wp, -2.55269200_wp, & + & 52.94618000_wp, 3.67190700_wp, -0.75095200_wp, 53.38803600_wp, & + & 4.96426000_wp, -2.43250500_wp, 52.81623400_wp, 4.06140800_wp, & + & -2.22376900_wp, 51.94860800_wp, 2.95320200_wp, -6.39354600_wp, & + & 58.76961800_wp, 3.69283200_wp, -3.98838700_wp, 53.31656600_wp, & + & 2.99159400_wp, -3.01181200_wp, 53.64115500_wp, 4.33825700_wp, & + & -4.44050900_wp, 52.33999300_wp, 2.31997400_wp, -5.59674000_wp, & + & 54.21056100_wp, 2.87197100_wp, -6.26897400_wp, 53.48186000_wp, & + & -0.45315900_wp, -6.19761700_wp, 58.16443700_wp, 2.78739800_wp, & + & -4.03451600_wp, 57.70574600_wp, 1.30831700_wp, -2.76051900_wp, & + & 57.65079700_wp, 2.65268100_wp, -2.19233800_wp, 54.00246000_wp, & + & 3.33664200_wp, -4.20774200_wp, 53.74395400_wp, 2.41450800_wp, & + & -5.39600200_wp, 54.24337900_wp, 0.29724900_wp, -6.40866000_wp, & + & 53.75228100_wp, 0.52391200_wp, -4.40157800_wp, 57.31345200_wp, & + & 2.24387300_wp, -3.03789400_wp, 55.40809400_wp, 3.34082200_wp, & + & -3.93114600_wp, 55.35635800_wp, 1.64478700_wp, -2.73752500_wp, & + & 54.32666100_wp, 1.02860300_wp, -5.17881900_wp, 55.90230700_wp, & + & 2.04752500_wp, -3.54498400_wp, 56.34142000_wp, 1.51685000_wp, & + & -5.59934900_wp, 55.77471600_wp, 1.12303800_wp, -4.75641300_wp, & + & 54.93009000_wp, -2.85538000_wp, -6.43871600_wp, 61.73777300_wp, & + & -0.45339400_wp, -5.56843800_wp, 56.28511900_wp, -0.15168400_wp, & + & -4.39719300_wp, 56.60622600_wp, -0.45059400_wp, -6.33925200_wp, & + & 55.32300400_wp, -2.61178100_wp, -5.45126500_wp, 57.19127100_wp, & + & -2.79030400_wp, -6.30548800_wp, 56.48633700_wp, -4.77981300_wp, & + & -3.63464600_wp, 61.13876200_wp, -1.05088300_wp, -4.88063300_wp, & + & 60.68503200_wp, -0.95658900_wp, -2.92851500_wp, 60.61927800_wp, & + & 0.31744900_wp, -3.64175700_wp, 56.97325300_wp, -0.87930200_wp, & + & -5.40627300_wp, 56.72569000_wp, -2.38486600_wp, -5.40640700_wp, & + & 57.24399100_wp, -4.48072100_wp, -4.35884200_wp, 56.74452600_wp, & + & -2.76114800_wp, -3.30334300_wp, 60.28840400_wp, -0.60371800_wp, & + & -3.83636400_wp, 58.37864800_wp, -0.64804600_wp, -5.24425300_wp, & + & 58.33345900_wp, -0.74764400_wp, -3.17251700_wp, 57.31656200_wp, & + & -3.06061600_wp, -4.18126900_wp, 58.87997200_wp, -1.13424300_wp, & + & -3.98826000_wp, 59.32940900_wp, -3.07835100_wp, -4.83162400_wp, & + & 58.76358600_wp, -2.65880300_wp, -4.00079600_wp, 57.95241300_wp, & + & -6.43398500_wp, -1.89112600_wp, 64.73970400_wp, -4.22481800_wp, & + & -3.27447900_wp, 59.28168700_wp, -3.15419100_wp, -2.77557800_wp, & + & 59.61088900_wp, -4.86828600_wp, -3.73404400_wp, 58.33941200_wp, & + & -5.50261700_wp, -1.47770500_wp, 60.21221000_wp, -6.27355600_wp, & + & -1.86810600_wp, 59.51069500_wp, -5.39225000_wp, 1.34469400_wp, & + & 64.14204100_wp, -4.05271800_wp, -2.37947300_wp, 63.68134800_wp, & + & -2.45803400_wp, -1.25419900_wp, 63.60930800_wp, -2.23854400_wp, & + & -2.69634000_wp, 59.97740100_wp, -4.39266600_wp, -2.82326100_wp, & + & 59.74120800_wp, -5.31891800_wp, -1.63466200_wp, 60.26937000_wp, & + & -5.77464300_wp, 0.66142500_wp, 59.75431300_wp, -3.88990800_wp, & + & -0.04674100_wp, 63.28456900_wp, -2.96012100_wp, -2.08850600_wp, & + & 61.38079300_wp, -4.11302200_wp, -2.91136200_wp, 61.32914200_wp, & + & -2.53797500_wp, -1.56031400_wp, 60.33201400_wp, -4.76203300_wp, & + & -0.35074000_wp, 61.88061400_wp, -3.41599400_wp, -1.75753200_wp, & + & 62.34765300_wp, -5.27176400_wp, -0.74319600_wp, 61.77498500_wp, & + & -4.36251400_wp, -0.56257200_wp, 60.98261600_wp, -5.02168000_wp, & + & 3.71617800_wp, 67.75925300_wp, -4.70894500_wp, 1.10023500_wp, & + & 62.29245100_wp, -3.69650600_wp, 0.57891500_wp, 62.63681900_wp, & + & -5.50242000_wp, 1.34322900_wp, 61.36217600_wp, -4.12111100_wp, & + & 3.23285300_wp, 63.24192200_wp, -4.88864800_wp, 3.59581600_wp, & + & 62.52271700_wp, -1.81648600_wp, 4.87429600_wp, 67.15767600_wp, & + & -3.90084900_wp, 1.51611000_wp, 66.68161800_wp, -2.03585900_wp, & + & 0.94912500_wp, 66.61313800_wp, -3.04152600_wp, -0.10948700_wp, & + & 62.99728900_wp, -4.48967200_wp, 1.52570900_wp, 62.76280300_wp, & + & -4.12148600_wp, 2.98754900_wp, 63.28638300_wp, -2.58517300_wp, & + & 4.75425800_wp, 62.76024600_wp, -1.99040300_wp, 2.83371300_wp, & + & 66.29180600_wp, -3.00600800_wp, 0.83524700_wp, 64.39839000_wp, & + & -4.37667500_wp, 1.24657700_wp, 64.33123800_wp, -2.34426500_wp, & + & 0.83285500_wp, 63.34540900_wp, -2.76169800_wp, 3.33345300_wp, & + & 64.88953600_wp, -3.03563400_wp, 1.40199400_wp, 65.36556700_wp, & + & -3.37000200_wp, 3.48878400_wp, 64.78566400_wp, -2.67290800_wp, & + & 2.88425600_wp, 63.98278700_wp, 0.29428700_wp, 6.03319000_wp, & + & 70.76729000_wp, -1.53102700_wp, 4.15745000_wp, 65.29453400_wp, & + & -1.35908300_wp, 3.05717000_wp, 65.64956600_wp, -1.86277000_wp, & + & 4.95020000_wp, 64.35780100_wp, 0.46848400_wp, 5.02467500_wp, & + & 66.24192900_wp, 0.29714400_wp, 5.84665800_wp, 65.49683800_wp, & + & 3.18684400_wp, 4.20967600_wp, 70.15780100_wp, -0.71077900_wp, & + & 3.77706300_wp, 69.67112900_wp, -0.01726000_wp, 1.95990100_wp, & + & 69.61296300_wp, -1.46969700_wp, 2.10275100_wp, 66.00176400_wp, & + & -1.09463300_wp, 4.26209700_wp, 65.75951100_wp, 0.28409300_wp, & + & 4.86965400_wp, 66.26621100_wp, 2.62546500_wp, 4.74009800_wp, & + & 65.74314400_wp, 1.47058900_wp, 3.09293300_wp, 69.28848400_wp, & + & -0.70488200_wp, 2.65571100_wp, 67.40314300_wp, -1.23543600_wp, & + & 3.99632900_wp, 67.32285400_wp, -0.31484500_wp, 2.13864500_wp, & + & 66.33217600_wp, 1.39651800_wp, 4.00697500_wp, 67.88434900_wp, & + & -0.28520900_wp, 3.03162700_wp, 68.35570600_wp, 1.15938000_wp, & + & 4.57610200_wp, 67.77313300_wp, 1.10541100_wp, 3.65605200_wp, & + & 66.93854300_wp, 5.40724400_wp, 3.25045100_wp, 73.74124100_wp, & + & 2.85545900_wp, 3.51640300_wp, 68.27165700_wp, 2.05262000_wp, & + & 2.72369100_wp, 68.62321700_wp, 3.24044900_wp, 4.28145500_wp, & + & 67.31525000_wp, 4.72114400_wp, 2.49218300_wp, 69.19710100_wp, & + & 5.27753700_wp, 3.12613200_wp, 68.43847300_wp, 5.75478900_wp, & + & -0.15796600_wp, 73.12827100_wp, 3.05409100_wp, 2.63740800_wp, & + & 72.64195700_wp, 2.04105600_wp, 0.97594500_wp, 72.59466200_wp, & + & 1.26289800_wp, 2.21016900_wp, 68.97292000_wp, 3.17142800_wp, & + & 3.25164700_wp, 68.71825600_wp, 4.49562600_wp, 2.53797100_wp, & + & 69.20895500_wp, 5.83449700_wp, 0.60857800_wp, 68.69965800_wp, & + & 3.82142200_wp, 0.51009200_wp, 72.26263600_wp, 2.16573400_wp, & + & 1.94789900_wp, 70.37634400_wp, 2.88492400_wp, 3.19610100_wp, & + & 70.29602100_wp, 1.98393400_wp, 1.32886800_wp, 69.28611400_wp, & + & 4.50141300_wp, 1.12802300_wp, 70.85438200_wp, 2.71042200_wp, & + & 1.85143700_wp, 71.30943900_wp, 4.81938300_wp, 1.65765900_wp, & + & 70.73096900_wp, 4.05623900_wp, 1.13770600_wp, 71.22633400_wp, & + & 3.90528400_wp, -0.18417000_wp, 71.74939500_wp, 4.81198000_wp, & + & -0.48431500_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine Amylose48 + +subroutine Amylose4(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 87 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "H", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", & + & "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", & + & "C", "C", "O", "H", "C", "O", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & 7.63547100_wp, -4.13402300_wp, 0.17346000_wp, 8.86731300_wp, & + & 0.01088200_wp, 2.43255200_wp, 5.87034000_wp, -3.72544700_wp, & + & -2.77247100_wp, 6.75460500_wp, -3.55669700_wp, 0.45013500_wp, & + & 7.84915000_wp, -2.03394400_wp, -0.39722200_wp, 8.32207800_wp, & + & -0.82175000_wp, 1.98840900_wp, 6.91323100_wp, -2.10420000_wp, & + & 2.61584300_wp, 6.69606100_wp, -0.71218600_wp, 2.99821500_wp, & + & 6.67965700_wp, -3.08903100_wp, -2.41269600_wp, 5.01378600_wp, & + & -2.60868400_wp, -1.26565700_wp, 5.39624000_wp, -0.20803600_wp, & + & -3.95202000_wp, 6.81369000_wp, -2.27567900_wp, -0.15898800_wp, & + & 6.95417100_wp, -1.16429000_wp, 2.14785100_wp, 5.23739900_wp, & + & -1.50946400_wp, 1.04450300_wp, 6.02720400_wp, -2.25210100_wp, & + & -1.45002100_wp, 5.05340300_wp, -0.79674300_wp, -3.10143300_wp, & + & 6.94708900_wp, -0.52578000_wp, -2.33113500_wp, 6.23564200_wp, & + & -1.25363500_wp, 0.81935400_wp, 5.95622200_wp, -0.83837500_wp, & + & -2.00390600_wp, 6.32797000_wp, 0.04137200_wp, 0.20167700_wp, & + & 5.53056300_wp, 1.17138800_wp, -1.36837100_wp, 5.48842200_wp, & + & 0.16451900_wp, -0.95364200_wp, 4.07738300_wp, 2.07070600_wp, & + & 3.57722300_wp, 3.17647600_wp, 1.43757900_wp, -3.41035300_wp, & + & 4.13681600_wp, 0.02004500_wp, -0.53588200_wp, 4.09782600_wp, & + & 2.02204500_wp, -0.05960300_wp, 4.04980400_wp, 1.55512700_wp, & + & 2.61680900_wp, 3.67541400_wp, -0.31981500_wp, 2.01321700_wp, & + & 2.75450400_wp, 0.20038300_wp, 3.02053200_wp, 3.52197700_wp, & + & 2.01359800_wp, -2.55171400_wp, 2.00040000_wp, 0.78547500_wp, & + & -1.84672900_wp, 0.69571000_wp, 4.09503900_wp, -2.53391500_wp, & + & 3.40586800_wp, 1.21244400_wp, -0.29313000_wp, 3.13422800_wp, & + & 0.56614600_wp, 2.17317200_wp, 1.80325600_wp, 0.17033400_wp, & + & 0.63855900_wp, 2.61507900_wp, 1.62188400_wp, -1.51430100_wp, & + & 0.83050000_wp, 3.04287700_wp, -2.28317800_wp, 2.31489300_wp, & + & 3.68308200_wp, -1.00190300_wp, 2.45764900_wp, 0.96242600_wp, & + & 0.87924900_wp, 1.70826200_wp, 2.79787900_wp, -1.19123900_wp, & + & 1.74560600_wp, 2.18488400_wp, 1.13169700_wp, 0.29690300_wp, & + & 3.44384000_wp, 0.29818800_wp, 0.86822900_wp, 2.54750800_wp, & + & 0.05790300_wp, -0.89776100_wp, 0.26908300_wp, 4.28158100_wp, & + & -1.99474600_wp, 3.68039000_wp, -1.81673800_wp, -0.11882700_wp, & + & 1.53180400_wp, -0.06868500_wp, -1.22402400_wp, 2.46099000_wp, & + & 1.39770100_wp, -0.72882700_wp, 0.51952400_wp, 3.23493100_wp, & + & -0.04757800_wp, -0.45923300_wp, 1.62145600_wp, -0.99404300_wp, & + & -1.20764500_wp, 2.44656200_wp, -1.94669800_wp, 3.68601600_wp, & + & -0.72772700_wp, -2.43799700_wp, 1.74149200_wp, -1.27226200_wp, & + & -5.43432600_wp, 3.55841400_wp, -0.35130700_wp, -1.36299200_wp, & + & 1.75852500_wp, 0.57696200_wp, -0.97325400_wp, -0.27668500_wp, & + & 2.08611900_wp, -2.00150900_wp, -0.24934300_wp, 0.29065800_wp, & + & -2.36783900_wp, 2.36146800_wp, -0.37909000_wp, -4.70858500_wp, & + & 2.82152600_wp, -0.69625600_wp, -3.71667100_wp, 3.17618600_wp, & + & 1.07705200_wp, -1.88359200_wp, 0.41928400_wp, 1.09851900_wp, & + & -3.73833700_wp, 2.44217500_wp, 0.27154700_wp, -3.12753400_wp, & + & 0.66864000_wp, 1.77246000_wp, -5.10896100_wp, 1.23467200_wp, & + & 1.40731300_wp, -4.16102700_wp, 1.10995400_wp, 0.88313400_wp, & + & -3.90572800_wp, -3.74712900_wp, 2.46159400_wp, -7.34161400_wp, & + & 1.52865300_wp, -0.76377600_wp, -4.41681700_wp, 0.06731700_wp, & + & -0.04950100_wp, -5.69616100_wp, -0.79862500_wp, 1.30995900_wp, & + & -4.01491100_wp, -2.87098500_wp, 1.82260500_wp, -3.07107300_wp, & + & -2.15710400_wp, 0.20364100_wp, -3.34494800_wp, -3.59147800_wp, & + & 0.17716300_wp, -7.19343800_wp, 0.89387700_wp, 0.11016500_wp, & + & -6.56344800_wp, -0.22248800_wp, -1.52563800_wp, -9.94977900_wp, & + & -1.14796900_wp, -0.63279100_wp, -5.50091800_wp, -0.80272100_wp, & + & 0.23700600_wp, -3.88673900_wp, -2.78713100_wp, 0.41185000_wp, & + & -4.92999100_wp, -2.18830100_wp, -1.27082300_wp, -6.76222500_wp, & + & -0.34734800_wp, -0.46184600_wp, -8.97602700_wp, -1.03252900_wp, & + & -1.10882800_wp, -8.17884800_wp, -1.39968000_wp, 0.75767600_wp, & + & -5.12511100_wp, -2.20673200_wp, -0.23470000_wp, -7.86714500_wp, & + & -1.37495100_wp, -0.28630800_wp, -6.21880200_wp, -3.08238300_wp, & + & 0.08789800_wp, -8.20210300_wp, -3.49444800_wp, -0.43794100_wp, & + & -7.40634600_wp, -2.78100700_wp, -0.65667200_wp, -7.12782400_wp, & + & -2.98525000_wp, -2.03537400_wp, -6.33596100_wp, -2.30686500_wp, & + & -2.35100200_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine Amylose4 + +subroutine Amylose64(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 1347 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "H", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", & + & "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", & + & "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", & + & "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", & + & "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", & + & "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", & + & "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", & + & "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", & + & "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", & + & "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", & + & "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", & + & "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", & + & "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", "C", "H", "H", "O", "H", & + & "O", "H", "H", "O", "H", "H", "C", "C", "O", "H", "C", "O", "H", "C", "C", "H", & + & "C", "O", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & 95.38986300_wp, 2.20311300_wp, -2.12605400_wp, 97.01904000_wp, & + & 5.96431900_wp, -2.87516900_wp, 90.21641200_wp, 3.54433200_wp, & + & -3.73477800_wp, 95.68138800_wp, 2.57826200_wp, -3.10747200_wp, & + & 95.33940800_wp, 4.07983400_wp, -4.36804900_wp, 96.63751500_wp, & + & 5.12845600_wp, -2.28876200_wp, 94.75959200_wp, 5.81480900_wp, & + & -2.79595600_wp, 95.50023900_wp, 5.55607300_wp, 0.51704000_wp, & + & 90.82493700_wp, 3.54377200_wp, -2.83041200_wp, 91.30052300_wp, & + & 2.19001200_wp, -1.42815200_wp, 91.35487300_wp, 1.70151100_wp, & + & -2.80407100_wp, 94.98444400_wp, 3.78635900_wp, -3.38037400_wp, & + & 95.23456900_wp, 4.92116200_wp, -2.39106500_wp, 94.73373900_wp, & + & 5.80351400_wp, -0.21743800_wp, 95.24199700_wp, 3.81817200_wp, & + & -0.56148600_wp, 91.68615600_wp, 2.52468800_wp, -2.34779800_wp, & + & 93.58029700_wp, 3.49760900_wp, -3.39629000_wp, 93.64855900_wp, & + & 2.20715500_wp, -1.77256500_wp, 94.65875500_wp, 4.61824500_wp, & + & -1.01794900_wp, 93.09437500_wp, 3.03277900_wp, -2.12633500_wp, & + & 92.63845900_wp, 5.04804300_wp, -1.47612600_wp, 93.21377100_wp, & + & 4.18808400_wp, -1.13248900_wp, 94.05742700_wp, 5.64423500_wp, & + & 2.93361200_wp, 87.24980700_wp, 4.85214400_wp, 0.50541700_wp, & + & 92.71085500_wp, 3.75103800_wp, 0.11999400_wp, 92.37422800_wp, & + & 5.66959600_wp, 0.53265600_wp, 93.67290300_wp, 4.66944100_wp, & + & 2.63453000_wp, 91.79714600_wp, 5.49379500_wp, 2.86740000_wp, & + & 92.53358900_wp, 2.71927500_wp, 4.69649800_wp, 87.85757000_wp, & + & 4.13644100_wp, 1.05949700_wp, 88.32755600_wp, 2.19853000_wp, & + & 0.85151800_wp, 88.38285700_wp, 2.98413100_wp, -0.37896900_wp, & + & 92.01741500_wp, 4.71000800_wp, 0.90770600_wp, 92.26907900_wp, & + & 4.62529200_wp, 2.41024000_wp, 91.76829000_wp, 3.45214000_wp, & + & 4.44183800_wp, 92.27183500_wp, 2.50406500_wp, 2.66234500_wp, & + & 88.71502800_wp, 3.12780400_wp, 0.54994700_wp, 90.61240100_wp, & + & 4.54848300_wp, 0.67128100_wp, 90.67630700_wp, 2.47509900_wp, & + & 0.65036200_wp, 91.69186600_wp, 3.35650800_wp, 3.01497700_wp, & + & 90.12450900_wp, 3.26165000_wp, 1.08447100_wp, 89.67336300_wp, & + & 3.98684100_wp, 3.07631100_wp, 90.24601500_wp, 3.18735000_wp, & + & 2.60637400_wp, 91.08886800_wp, 0.86879900_wp, 6.25127500_wp, & + & 84.28161200_wp, 2.31589500_wp, 4.14567400_wp, 89.74071100_wp, & + & 1.93081300_wp, 3.03139400_wp, 89.40824100_wp, 2.78332500_wp, & + & 4.79981200_wp, 90.70158500_wp, 0.50689600_wp, 5.29793300_wp, & + & 88.82835500_wp, 0.83389000_wp, 6.09628000_wp, 89.55567700_wp, & + & -2.31493700_wp, 5.02601900_wp, 84.88610800_wp, 1.43863600_wp, & + & 3.91957900_wp, 85.35254000_wp, 0.41203900_wp, 2.26086300_wp, & + & 85.41046700_wp, 1.86523000_wp, 2.12591600_wp, 89.04773700_wp, & + & 1.90000800_wp, 4.27323000_wp, 89.29869900_wp, 0.66063300_wp, & + & 5.12825700_wp, 88.79265100_wp, -1.66143600_wp, 5.44999700_wp, & + & 89.29484700_wp, -0.84075900_wp, 3.60905100_wp, 85.74253000_wp, & + & 1.21912400_wp, 2.80958900_wp, 87.64319300_wp, 1.99086700_wp, & + & 4.00288200_wp, 87.70236400_wp, 0.73476600_wp, 2.35238100_wp, & + & 88.71631900_wp, -0.59325600_wp, 4.49862200_wp, 87.15092300_wp, & + & 0.87565900_wp, 3.24124100_wp, 86.69999300_wp, -0.24939000_wp, & + & 5.03696900_wp, 87.27085300_wp, -0.37266100_wp, 4.11626100_wp, & + & 88.10404400_wp, -4.67430200_wp, 4.52177000_wp, 81.30257100_wp, & + & -2.10612600_wp, 4.38169500_wp, 86.76243300_wp, -1.47745500_wp, & + & 3.38591900_wp, 86.43006700_wp, -2.34870500_wp, 5.14522500_wp, & + & 87.71674400_wp, -4.14285600_wp, 3.65195700_wp, 85.84280500_wp, & + & -4.56649700_wp, 4.40275100_wp, 86.56259600_wp, -5.65744600_wp, & + & 1.25853900_wp, 81.90543600_wp, -2.46920300_wp, 3.54920600_wp, & + & 82.37026600_wp, -1.79035600_wp, 1.72012900_wp, 82.43235900_wp, & + & -0.79124900_wp, 2.78426600_wp, 86.06833600_wp, -2.47489000_wp, & + & 4.12462900_wp, 86.31450000_wp, -3.91105200_wp, 3.67146400_wp, & + & 85.80090600_wp, -5.58939400_wp, 2.03556700_wp, 86.30821900_wp, & + & -3.63297100_wp, 1.55329100_wp, 82.76213300_wp, -1.72880500_wp, & + & 2.69413800_wp, 84.66338100_wp, -2.20194400_wp, 4.03224300_wp, & + & 84.72061200_wp, -1.66976500_wp, 2.02789400_wp, 85.72995300_wp, & + & -4.18265100_wp, 2.29532300_wp, 84.16966300_wp, -2.28435300_wp, & + & 2.68523300_wp, 83.71329200_wp, -4.39085100_wp, 2.89960500_wp, & + & 84.28505900_wp, -3.74139700_wp, 2.23779800_wp, 85.10492600_wp, & + & -6.70397900_wp, -0.91183200_wp, 78.31207300_wp, -5.00105200_wp, & + & 1.04040400_wp, 83.77388900_wp, -3.84191900_wp, 0.91656300_wp, & + & 83.43725700_wp, -5.76366700_wp, 1.30959500_wp, 84.72120100_wp, & + & -5.69050500_wp, -1.02563500_wp, 82.84535700_wp, -6.53924000_wp, & + & -0.89659800_wp, 83.56521500_wp, -4.72858400_wp, -3.68806100_wp, & + & 78.91430000_wp, -4.56713700_wp, 0.24321500_wp, 79.38277400_wp, & + & -2.70823500_wp, -0.34486800_wp, 79.44665600_wp, -2.93583600_wp, & + & 1.09632400_wp, 83.07670400_wp, -5.03579100_wp, 0.58471600_wp, & + & 83.31894500_wp, -5.56007200_wp, -0.82767700_wp, 82.80256900_wp, & + & -5.29791300_wp, -3.15652300_wp, 83.31575900_wp, -3.71707500_wp, & + & -1.90871600_wp, 79.77421900_wp, -3.43945400_wp, 0.30022600_wp, & + & 81.67315600_wp, -4.79194100_wp, 0.74542200_wp, 81.73277500_wp, & + & -2.88263600_wp, -0.06539600_wp, 82.73503500_wp, -4.63909000_wp, & + & -1.88624900_wp, 81.17959800_wp, -3.77736700_wp, -0.14504600_wp, & + & 80.71717600_wp, -5.23938700_wp, -1.67695600_wp, 81.29181400_wp, & + & -4.31864700_wp, -1.57121100_wp, 82.10681200_wp, -3.65468600_wp, & + & -5.84389000_wp, 75.31655400_wp, -4.13210000_wp, -3.29117600_wp, & + & 80.78119700_wp, -3.33683700_wp, -2.46044300_wp, 80.43945400_wp, & + & -4.82702900_wp, -3.73607300_wp, 81.72633100_wp, -2.94130200_wp, & + & -5.11335800_wp, 79.84820400_wp, -3.55921600_wp, -5.70089500_wp, & + & 80.57565000_wp, -0.24510600_wp, -5.98711100_wp, 75.92079600_wp, & + & -3.23750700_wp, -3.43931700_wp, 76.39460200_wp, -1.63280700_wp, & + & -2.33316000_wp, 76.45686100_wp, -2.91087100_wp, -1.62838700_wp, & + & 80.08047800_wp, -3.80533600_wp, -3.60507700_wp, 80.32372800_wp, & + & -3.01310300_wp, -4.88615200_wp, 79.81199800_wp, -1.01322000_wp, & + & -6.10884000_wp, 80.32655300_wp, -1.02845200_wp, -4.09545600_wp, & + & 76.78279400_wp, -2.59261000_wp, -2.51583700_wp, 78.67789600_wp, & + & -3.77926600_wp, -3.31234000_wp, 78.74429900_wp, -1.96761100_wp, & + & -2.30344900_wp, 79.74414600_wp, -1.61140600_wp, -4.80849500_wp, & + & 78.18892400_wp, -2.45196900_wp, -3.05735600_wp, 77.72371500_wp, & + & -2.13888600_wp, -5.15127700_wp, 78.30056900_wp, -1.65916500_wp, & + & -4.36055800_wp, 79.12364100_wp, 2.11953600_wp, -6.46048400_wp, & + & 72.32797800_wp, -0.17106500_wp, -5.26033200_wp, 77.79403700_wp, & + & -0.35389000_wp, -4.13072700_wp, 77.45005000_wp, -0.25966700_wp, & + & -6.08927600_wp, 78.74321200_wp, 1.98170200_wp, -5.44853200_wp, & + & 76.86375600_wp, 2.07129500_wp, -6.29426200_wp, 77.60162000_wp, & + & 4.32869800_wp, -3.85545300_wp, 72.93586400_wp, 0.49378500_wp, & + & -4.64692100_wp, 73.41252700_wp, 0.60407900_wp, -2.70207500_wp, & + & 73.46997100_wp, -0.73682800_wp, -3.27780100_wp, 77.09435900_wp, & + & 0.26499400_wp, -5.20207300_wp, 77.34070700_wp, 1.76182700_wp, & + & -5.36360800_wp, 76.83540800_wp, 3.95667000_wp, -4.53431500_wp, & + & 77.34779600_wp, 2.35625300_wp, -3.31061700_wp, 73.79886700_wp, & + & 0.15772200_wp, -3.57200700_wp, 75.69116900_wp, 0.05316700_wp, & + & -4.99979700_wp, 75.76086500_wp, 0.36843100_wp, -2.95037100_wp, & + & 76.76467800_wp, 2.56310900_wp, -4.20811400_wp, 75.20473900_wp, & + & 0.66893600_wp, -3.79548100_wp, 74.74345600_wp, 2.51437200_wp, & + & -4.83257100_wp, 75.32075600_wp, 2.18272900_wp, -3.96885800_wp, & + & 76.15622200_wp, 6.15868000_wp, -2.27690400_wp, 69.35328300_wp, & + & 3.82307500_wp, -3.33938200_wp, 74.81762300_wp, 2.80534700_wp, & + & -2.79652800_wp, 74.47538300_wp, 4.40924100_wp, -3.92434800_wp, & + & 75.77469700_wp, 5.27584100_wp, -1.76343100_wp, 73.89686100_wp, & + & 6.00383000_wp, -2.20941600_wp, 74.63713700_wp, 5.46261200_wp, & + & 1.06916400_wp, 69.96079900_wp, 3.74489200_wp, -2.43779400_wp, & + & 70.43661000_wp, 2.27615700_wp, -1.15706900_wp, 70.49134900_wp, & + & 1.90740900_wp, -2.57004300_wp, 74.12044900_wp, 4.03220100_wp, & + & -2.96530900_wp, 74.37134100_wp, 5.07803100_wp, -1.88293400_wp, & + & 73.87098900_wp, 5.77142500_wp, 0.35799400_wp, 74.37793500_wp, & + & 3.82214200_wp, -0.15438400_wp, 70.82284400_wp, 2.68797000_wp, & + & -2.04472100_wp, 72.71613000_wp, 3.74648200_wp, -3.00606000_wp, & + & 72.78486900_wp, 2.32157300_wp, -1.49892100_wp, 73.79560300_wp, & + & 4.65893500_wp, -0.54074100_wp, 72.23048600_wp, 3.17452600_wp, & + & -1.78070400_wp, 71.77580100_wp, 5.12734200_wp, -0.96055000_wp, & + & 72.35121200_wp, 4.24079800_wp, -0.69162800_wp, 73.19389200_wp, & + & 5.34271600_wp, 3.48480000_wp, 66.38642900_wp, 4.76539900_wp, & + & 0.99631300_wp, 71.84769100_wp, 3.69788500_wp, 0.51883300_wp, & + & 71.51121700_wp, 5.57487800_wp, 1.09396700_wp, 72.80968200_wp, & + & 4.39725800_wp, 3.10276300_wp, 70.93335200_wp, 5.20064600_wp, & + & 3.40547700_wp, 71.66867300_wp, 2.27823400_wp, 4.99045200_wp, & + & 66.99355100_wp, 4.00512100_wp, 1.48693800_wp, 67.46333600_wp, & + & 2.09152700_wp, 1.11325500_wp, 67.51889200_wp, 2.97913700_wp, & + & -0.04471500_wp, 71.15323500_wp, 4.58693900_wp, 1.38580100_wp, & + & 71.40590700_wp, 4.37387200_wp, 2.87532900_wp, 70.90362200_wp, & + & 3.03100100_wp, 4.79914000_wp, 71.40633200_wp, 2.23872800_wp, & + & 2.94552400_wp, 67.85143000_wp, 3.04321200_wp, 0.89256800_wp, & + & 69.74936600_wp, 4.44745900_wp, 1.13627300_wp, 69.81169400_wp, & + & 2.38274600_wp, 0.93663800_wp, 70.82685000_wp, 3.05883500_wp, & + & 3.36926300_wp, 69.25953600_wp, 3.12973700_wp, 1.43771700_wp, & + & 68.80879300_wp, 3.68236600_wp, 3.48299500_wp, 69.38184700_wp, & + & 2.92506000_wp, 2.94753600_wp, 70.22170500_wp, 0.30231300_wp, & + & 6.38059800_wp, 63.41649400_wp, 1.92915000_wp, 4.40602800_wp, & + & 68.87470600_wp, 1.63689200_wp, 3.26353700_wp, 68.54277000_wp, & + & 2.33583100_wp, 5.09789500_wp, 69.83531000_wp, 0.02420400_wp, & + & 5.40018600_wp, 67.96151000_wp, 0.28382500_wp, 6.22273200_wp, & + & 68.68672200_wp, -2.76321800_wp, 4.88767600_wp, 64.02043800_wp, & + & 1.07297500_wp, 4.10576400_wp, 64.48576800_wp, 0.19241400_wp, & + & 2.36440700_wp, 64.54547300_wp, 1.65244500_wp, 2.35446100_wp, & + & 68.18235800_wp, 1.49992800_wp, 4.49769300_wp, 68.43210000_wp, & + & 0.19324900_wp, 5.24349300_wp, 67.92407800_wp, -2.14890600_wp, & + & 5.36549700_wp, 68.42719600_wp, -1.17364300_wp, 3.60110200_wp, & + & 64.87691900_wp, 0.94925400_wp, 2.98080200_wp, 66.77757400_wp, & + & 1.61486400_wp, 4.23684800_wp, 66.83542000_wp, 0.50468600_wp, & + & 2.48388400_wp, 67.84937000_wp, -1.00234100_wp, 4.50875300_wp, & + & 66.28531400_wp, 0.56997600_wp, 3.38143000_wp, 65.83297700_wp, & + & -0.70491500_wp, 5.07405100_wp, 66.40403300_wp, -0.74864600_wp, & + & 4.14713900_wp, 67.23404200_wp, -5.07030200_wp, 4.18357300_wp, & + & 60.43506100_wp, -2.49526500_wp, 4.26307800_wp, 65.89470400_wp, & + & -1.78748700_wp, 3.32406500_wp, 65.56222400_wp, -2.80521500_wp, & + & 5.00313300_wp, 66.84794500_wp, -4.46617800_wp, 3.36211800_wp, & + & 64.97404500_wp, -4.95173400_wp, 4.07330800_wp, 65.69304000_wp, & + & -5.77098500_wp, 0.84841500_wp, 61.03761400_wp, -2.78619700_wp, & + & 3.40259100_wp, 61.50318300_wp, -1.95376200_wp, 1.63806600_wp, & + & 61.56566600_wp, -1.04965200_wp, 2.78410800_wp, 65.19963600_wp, & + & -2.84348900_wp, 3.97498600_wp, 65.44567300_wp, -4.23591700_wp, & + & 3.40100500_wp, 64.93194400_wp, -5.76836600_wp, 1.62812700_wp, & + & 65.43954600_wp, -3.77762600_wp, 1.31359200_wp, 61.89467100_wp, & + & -1.97626200_wp, 2.61265600_wp, 63.79575300_wp, -2.56320800_wp, & + & 3.90655900_wp, 63.85323600_wp, -1.86210100_wp, 1.95482600_wp, & + & 64.86076500_wp, -4.38864800_wp, 2.00739600_wp, 63.30201500_wp, & + & -2.52986300_wp, 2.55808700_wp, 62.84381700_wp, -4.64696800_wp, & + & 2.59143400_wp, 63.41620900_wp, -3.94342800_wp, 1.98687400_wp, & + & 64.23583600_wp, -6.62616200_wp, -1.40330700_wp, 57.44246400_wp, & + & -5.09246100_wp, 0.68544500_wp, 62.90497800_wp, -3.93082300_wp, & + & 0.66272900_wp, 62.56761900_wp, -5.87894700_wp, 0.89019800_wp, & + & 63.85179300_wp, -5.60678100_wp, -1.43042000_wp, 61.97552500_wp, & + & -6.46179300_wp, -1.37494600_wp, 62.69722400_wp, -4.41999000_wp, & + & -4.00156400_wp, 58.04561900_wp, -4.59263500_wp, -0.07182000_wp, & + & 58.51555000_wp, -2.68988000_wp, -0.49914000_wp, 58.57879300_wp, & + & -3.03951400_wp, 0.91762800_wp, 62.20694000_wp, -5.09084300_wp, & + & 0.22940200_wp, 62.45018500_wp, -5.49228800_wp, -1.22289500_wp, & + & 61.93463300_wp, -5.03258400_wp, -3.52068400_wp, 62.44782000_wp, & + & -3.56376700_wp, -2.14279500_wp, 58.90586800_wp, -3.47498400_wp, & + & 0.08144700_wp, 60.80344900_wp, -4.86090200_wp, 0.41051600_wp, & + & 60.86508600_wp, -2.89018200_wp, -0.23550800_wp, 61.86696700_wp, & + & -4.48426300_wp, -2.19837700_wp, 60.31159200_wp, -3.77379800_wp, & + & -0.39058500_wp, 59.84872300_wp, -5.09874900_wp, -2.04207000_wp, & + & 60.42357600_wp, -4.19189500_wp, -1.85724800_wp, 61.24045200_wp, & + & -3.16446300_wp, -6.05810000_wp, 54.44872700_wp, -3.85521200_wp, & + & -3.55612300_wp, 59.91409800_wp, -3.13749600_wp, -2.65927600_wp, & + & 59.57089300_wp, -4.51186400_wp, -4.05803100_wp, 60.85892400_wp, & + & -2.51608200_wp, -5.26897200_wp, 58.98047300_wp, -3.08055600_wp, & + & -5.90720500_wp, 59.71075500_wp, 0.24495000_wp, -5.90954900_wp, & + & 55.05373600_wp, -2.95043100_wp, -3.62744800_wp, 55.52832900_wp, & + & -1.44715800_wp, -2.38835200_wp, 55.58949400_wp, -2.78113200_wp, & + & -1.79484000_wp, 59.21335800_wp, -3.50491800_wp, -3.84090600_wp, & + & 59.45659400_wp, -2.60633300_wp, -5.04973700_wp, 58.94593500_wp, & + & -0.50867700_wp, -6.09622200_wp, 59.46084500_wp, -0.69672500_wp, & + & -4.09180200_wp, 55.91598700_wp, -2.38836200_wp, -2.65174300_wp, & + & 57.81043400_wp, -3.50389500_wp, -3.54691300_wp, 57.87725800_wp, & + & -1.78449900_wp, -2.38717200_wp, 58.87771600_wp, -1.21567100_wp, & + & -4.85190900_wp, 57.32170600_wp, -2.20242400_wp, -3.17943900_wp, & + & 56.85778500_wp, -1.71224800_wp, -5.23835700_wp, 57.43482500_wp, & + & -1.30195900_wp, -4.40936200_wp, 58.25985100_wp, 2.64256100_wp, & + & -6.17891000_wp, 51.46267500_wp, 0.26155800_wp, -5.18006900_wp, & + & 56.92868900_wp, -0.02011100_wp, -4.06932700_wp, 56.58481800_wp, & + & 0.24110000_wp, -6.01318300_wp, 57.87918200_wp, 2.41847800_wp, & + & -5.18311500_wp, 56.00032200_wp, 2.58112400_wp, -6.01776300_wp, & + & 56.73859700_wp, 4.62194400_wp, -3.39450800_wp, 52.07057500_wp, & + & 0.87116900_wp, -4.51130800_wp, 52.54796800_wp, 0.81467100_wp, & + & -2.56426500_wp, 52.60431600_wp, -0.47239000_wp, -3.25288200_wp, & + & 56.22896700_wp, 0.68890300_wp, -5.08458100_wp, 56.47626000_wp, & + & 2.19346500_wp, -5.11717600_wp, 55.97226600_wp, 4.30946600_wp, & + & -4.10407600_wp, 56.48383800_wp, 2.60998700_wp, -3.02247200_wp, & + & 52.93348300_wp, 0.44366000_wp, -3.46937200_wp, 54.82564700_wp, & + & 0.46159900_wp, -4.90118300_wp, 54.89529900_wp, 0.60056100_wp, & + & -2.83158900_wp, 55.90000300_wp, 2.89258500_wp, -3.89784000_wp, & + & 54.34016200_wp, 0.97063300_wp, -3.64824800_wp, 53.87970900_wp, & + & 2.89859400_wp, -4.52428200_wp, 54.45665200_wp, 2.49446900_wp, & + & -3.69203800_wp, 55.29329600_wp, 6.31100100_wp, -1.66588900_wp, & + & 48.48947200_wp, 4.07694200_wp, -2.92507100_wp, 53.95373100_wp, & + & 3.01401100_wp, -2.47079800_wp, 53.61253400_wp, 4.70999800_wp, & + & -3.45769700_wp, 54.91057800_wp, 5.38767300_wp, -1.23087100_wp, & + & 53.03340900_wp, 6.15124100_wp, -1.61365300_wp, 53.77344500_wp, & + & 5.33185400_wp, 1.60748000_wp, 49.09763700_wp, 3.92236100_wp, & + & -2.03405500_wp, 49.57237000_wp, 2.34888000_wp, -0.88303100_wp, & + & 49.62690800_wp, 2.10191400_wp, -2.32221800_wp, 53.25711800_wp, & + & 4.25259400_wp, -2.53446900_wp, 53.50757700_wp, 5.20131600_wp, & + & -1.36633400_wp, 53.00763900_wp, 5.70152500_wp, 0.92608000_wp, & + & 53.51332900_wp, 3.80255100_wp, 0.24851800_wp, 49.95848100_wp, & + & 2.83497500_wp, -1.73210600_wp, 51.85287800_wp, 3.97155900_wp, & + & -2.59961400_wp, 51.92069300_wp, 2.42317000_wp, -1.21995200_wp, & + & 52.93202400_wp, 4.66932500_wp, -0.06517400_wp, 51.36622800_wp, & + & 3.29670900_wp, -1.42718800_wp, 50.91164000_wp, 5.17257300_wp, & + & -0.44320100_wp, 51.48631000_wp, 4.26684400_wp, -0.25134700_wp, & + & 52.33102200_wp, 5.00809700_wp, 4.00347700_wp, 45.52254300_wp, & + & 4.64661200_wp, 1.47629700_wp, 50.98310900_wp, 3.62294600_wp, & + & 0.90958800_wp, 50.64761600_wp, 5.44286200_wp, 1.64147100_wp, & + & 51.94529900_wp, 4.09786300_wp, 3.54235800_wp, 50.06981000_wp, & + & 4.87334000_wp, 3.91297200_wp, 50.80473200_wp, 1.82702600_wp, & + & 5.24273300_wp, 46.12937800_wp, 3.84618500_wp, 1.90026000_wp, & + & 46.59901800_wp, 1.97115800_wp, 1.36402000_wp, 46.65462700_wp, & + & 2.95523800_wp, 0.28586700_wp, 50.28932200_wp, 4.43431000_wp, & + & 1.84776600_wp, 50.54167300_wp, 4.09449700_wp, 3.31450600_wp, & + & 50.04050900_wp, 2.59363700_wp, 5.11676300_wp, 50.54255800_wp, & + & 1.96116300_wp, 3.20110900_wp, 46.98661800_wp, 2.93886100_wp, & + & 1.22618400_wp, 48.88551100_wp, 4.31610800_wp, 1.58863300_wp, & + & 48.94703400_wp, 2.27665600_wp, 1.21330800_wp, 49.96374100_wp, & + & 2.74233600_wp, 3.69341600_wp, 48.39629100_wp, 2.97857200_wp, & + & 1.77612100_wp, 47.94526500_wp, 3.35432600_wp, 3.86195400_wp, & + & 48.51756700_wp, 2.64480900_wp, 3.26327400_wp, 49.35878700_wp, & + & -0.26041300_wp, 6.45945600_wp, 42.55214100_wp, 1.52969500_wp, & + & 4.63209100_wp, 48.01186000_wp, 1.33542400_wp, 3.46784000_wp, & + & 47.67951900_wp, 1.87482400_wp, 5.35481400_wp, 48.97182400_wp, & + & -0.45392400_wp, 5.45884600_wp, 47.09778500_wp, -0.26587400_wp, & + & 6.30076800_wp, 47.82260700_wp, -3.18806400_wp, 4.71080500_wp, & + & 43.15627800_wp, 0.70257000_wp, 4.25906600_wp, 43.62221900_wp, & + & -0.02702000_wp, 2.44955100_wp, 43.68131500_wp, 1.42817700_wp, & + & 2.56444600_wp, 47.31886100_wp, 1.09353400_wp, 4.68589900_wp, & + & 47.56814000_wp, -0.27197000_wp, 5.31742200_wp, 47.06025300_wp, & + & -2.61519700_wp, 5.23965800_wp, 47.56331600_wp, -1.49337000_wp, & + & 3.56433200_wp, 44.01265100_wp, 0.67472600_wp, 3.12796400_wp, & + & 45.91363500_wp, 1.23051800_wp, 4.43547800_wp, 45.97139700_wp, & + & 0.27351400_wp, 2.59518100_wp, 46.98502500_wp, -1.40077900_wp, & + & 4.48428800_wp, 45.42068400_wp, 0.26172200_wp, 3.49448200_wp, & + & 44.96868300_wp, -1.15302000_wp, 5.07271900_wp, 45.53987400_wp, & + & -1.11735500_wp, 4.14470100_wp, 46.36949000_wp, -5.42567500_wp, & + & 3.81224300_wp, 39.56992800_wp, -2.86678800_wp, 4.11104000_wp, & + & 45.03011600_wp, -2.08144700_wp, 3.23640700_wp, 44.69700800_wp, & + & -3.23893900_wp, 4.82168300_wp, 45.98315900_wp, -4.75406700_wp, & + & 3.04585000_wp, 44.10888500_wp, -5.29908100_wp, 3.71298700_wp, & + & 44.82810600_wp, -5.83892700_wp, 0.43000900_wp, 40.17261100_wp, & + & -3.08240600_wp, 3.22853300_wp, 40.63819400_wp, -2.10275100_wp, & + & 1.54152000_wp, 40.70079300_wp, -1.30040500_wp, 2.76103300_wp, & + & 44.33463000_wp, -3.18956300_wp, 3.79540900_wp, 44.58060600_wp, & + & -4.52700600_wp, 3.10367700_wp, 44.06741300_wp, -5.90325300_wp, & + & 1.20686700_wp, 44.57477300_wp, -3.89364600_wp, 1.06395100_wp, & + & 41.03033900_wp, -2.20816100_wp, 2.51183000_wp, 42.93110500_wp, & + & -2.90428700_wp, 3.75106400_wp, 42.98836600_wp, -2.03896500_wp, & + & 1.86534700_wp, 43.99640200_wp, -4.56112800_wp, 1.70202300_wp, & + & 42.43666400_wp, -2.75541600_wp, 2.40916000_wp, 41.97901800_wp, & + & -4.86845500_wp, 2.26172500_wp, 42.55224300_wp, -4.11531200_wp, & + & 1.71978300_wp, 43.37045600_wp, -6.49952000_wp, -1.88748200_wp, & + & 36.57765400_wp, -5.14838400_wp, 0.32604400_wp, 42.04078200_wp, & + & -3.98949600_wp, 0.40155800_wp, 41.70281300_wp, -5.94960200_wp, & + & 0.46151600_wp, 42.98688700_wp, -5.48126000_wp, -1.82691700_wp, & + & 41.11095000_wp, -6.33758200_wp, -1.84367900_wp, 41.83301000_wp, & + & -4.07948000_wp, -4.28744400_wp, 37.18117400_wp, -4.58610100_wp, & + & -0.38708400_wp, 37.65058600_wp, -2.65362600_wp, -0.64935100_wp, & + & 37.71423300_wp, -3.12363800_wp, 0.73167000_wp, 41.34273900_wp, & + & -5.10844000_wp, -0.12911300_wp, 41.58521100_wp, -5.38504500_wp, & + & -1.60970300_wp, 41.07010400_wp, -4.73025300_wp, -3.86022100_wp, & + & 41.58395500_wp, -3.38485400_wp, -2.36198000_wp, 38.04125600_wp, & + & -3.48479300_wp, -0.13852800_wp, 39.93921300_wp, -4.89466500_wp, & + & 0.06959800_wp, 40.00124500_wp, -2.87574900_wp, -0.40417300_wp, & + & 41.00218100_wp, -4.29680200_wp, -2.49660100_wp, 39.44644200_wp, & + & -3.74324800_wp, -0.63474500_wp, 38.98405600_wp, -4.92216700_wp, & + & -2.39239600_wp, 39.55904200_wp, -4.03445400_wp, -2.13139300_wp, & + & 40.37627800_wp, -2.65342900_wp, -6.22932000_wp, 33.58459200_wp, & + & -3.55166100_wp, -3.79634100_wp, 39.04922200_wp, -2.91528600_wp, & + & -2.84096100_wp, 38.70734400_wp, -4.16512900_wp, -4.35177300_wp, & + & 39.99521800_wp, -2.07422500_wp, -5.38718900_wp, 38.11729900_wp, & + & -2.58103600_wp, -6.07206500_wp, 38.84760200_wp, 0.73151300_wp, & + & -5.79046900_wp, 34.18921100_wp, -2.64571300_wp, -3.79033300_wp, & + & 34.66478600_wp, -1.25295100_wp, -2.42737900_wp, 34.72514200_wp, & + & -2.63203800_wp, -1.94953100_wp, 38.34931700_wp, -3.18092100_wp, & + & -4.04915600_wp, 38.59362300_wp, -2.18224200_wp, -5.17648800_wp, & + & 38.08309400_wp, -0.00331800_wp, -6.04096700_wp, 38.59806600_wp, & + & -0.36143900_wp, -4.06015300_wp, 35.05219300_wp, -2.16827200_wp, & + & -2.76951200_wp, 36.94641300_wp, -3.20351700_wp, -3.75719900_wp, & + & 37.01417300_wp, -1.59017700_wp, -2.45405200_wp, 38.01466000_wp, & + & -0.81320800_wp, -4.86134800_wp, 36.45837700_wp, -1.93881200_wp, & + & -3.27949900_wp, 35.99480000_wp, -1.27394000_wp, -5.28936700_wp, & + & 36.57158100_wp, -0.93625100_wp, -4.42807500_wp, 37.39842000_wp, & + & 3.14404200_wp, -5.85415900_wp, 30.60062100_wp, 0.68951300_wp, & + & -5.06379700_wp, 36.06556400_wp, 0.31188800_wp, -3.97989300_wp, & + & 35.72189000_wp, 0.73831600_wp, -5.89340900_wp, 37.01704700_wp, & + & 2.83653900_wp, -4.88033300_wp, 35.13847200_wp, 3.07044000_wp, & + & -5.69924500_wp, 35.87697700_wp, 4.87957000_wp, -2.91178600_wp, & + & 31.20835000_wp, 1.23937400_wp, -4.34530800_wp, 31.68428200_wp, & + & 1.01646300_wp, -2.40981800_wp, 31.74042300_wp, -0.20690100_wp, & + & -3.20574100_wp, 35.36683300_wp, 1.10514700_wp, -4.93116300_wp, & + & 35.61484400_wp, 2.60678400_wp, -4.83551300_wp, 35.11004800_wp, & + & 4.62844200_wp, -3.64495000_wp, 35.62175400_wp, 2.84340700_wp, & + & -2.71133100_wp, 32.07044100_wp, 0.72459100_wp, -3.34252100_wp, & + & 33.96333200_wp, 0.86273600_wp, -4.76800800_wp, 34.03260600_wp, & + & 0.82551300_wp, -2.69433600_wp, 35.03807500_wp, 3.19997300_wp, & + & -3.56068500_wp, 33.47721200_wp, 1.26498400_wp, -3.47667600_wp, & + & 33.01813800_wp, 3.26027300_wp, -4.18481500_wp, 33.59426100_wp, & + & 2.78649600_wp, -3.38985100_wp, 34.43214000_wp, 6.41502100_wp, & + & -1.04463200_wp, 27.62793200_wp, 4.29992800_wp, -2.49139100_wp, & + & 33.09173000_wp, 3.19987600_wp, -2.12861500_wp, 32.75093800_wp, & + & 4.97273500_wp, -2.96698300_wp, 34.04862300_wp, 5.45825700_wp, & + & -0.68982900_wp, 32.17176700_wp, 6.25297800_wp, -1.00620000_wp, & + & 32.91091800_wp, 5.16076700_wp, 2.13330000_wp, 28.23582900_wp, & + & 4.06809400_wp, -1.61628000_wp, 28.70884600_wp, 2.40280800_wp, & + & -0.60460700_wp, 28.76429100_wp, 2.27999000_wp, -2.05913600_wp, & + & 32.39504100_wp, 4.43848100_wp, -2.08594300_wp, 32.64571500_wp, & + & 5.28469600_wp, -0.84161000_wp, 32.14437800_wp, 5.58752900_wp, & + & 1.48508100_wp, 32.65113200_wp, 3.75339400_wp, 0.64767700_wp, & + & 29.09606900_wp, 2.95932500_wp, -1.40813600_wp, 30.99087200_wp, & + & 4.16513100_wp, -2.17539700_wp, 31.05738300_wp, 2.50485700_wp, & + & -0.93250600_wp, 32.06901300_wp, 4.64441200_wp, 0.40882100_wp, & + & 30.50455200_wp, 3.39332300_wp, -1.06533400_wp, 30.04939200_wp, & + & 5.17841500_wp, 0.07581200_wp, 30.62469900_wp, 4.25855200_wp, & + & 0.18899100_wp, 31.46769800_wp, 4.63398300_wp, 4.49161000_wp, & + & 24.66022700_wp, 4.49155100_wp, 1.94194100_wp, 30.11997000_wp, & + & 3.51795900_wp, 1.28990300_wp, 29.78539100_wp, 5.26954600_wp, & + & 2.17547200_wp, 31.08177400_wp, 3.76688000_wp, 3.95498200_wp, & + & 29.20725200_wp, 4.50822100_wp, 4.38959400_wp, 29.94013500_wp, & + & 1.35894400_wp, 5.45450700_wp, 25.26660600_wp, 3.65808600_wp, & + & 2.29531800_wp, 25.73502300_wp, 1.83548100_wp, 1.60180300_wp, & + & 25.79100400_wp, 2.90780400_wp, 0.61148000_wp, 29.42671800_wp, & + & 4.24675000_wp, 2.29503200_wp, 29.67829700_wp, 3.78353400_wp, & + & 3.72671200_wp, 29.17557300_wp, 2.13337700_wp, 5.39448200_wp, & + & 29.67846200_wp, 1.66660800_wp, 3.43227500_wp, 26.12312900_wp, & + & 2.81120300_wp, 1.54680100_wp, 28.02244400_wp, 4.15251100_wp, & + & 2.02557800_wp, 28.08394200_wp, 2.15191300_wp, 1.47750300_wp, & + & 29.09899100_wp, 2.40393900_wp, 3.98966300_wp, 27.53231900_wp, & + & 2.80284800_wp, 2.09832700_wp, 27.08114700_wp, 2.99953100_wp, & + & 4.20797700_wp, 27.65359700_wp, 2.34465200_wp, 3.55157800_wp, & + & 28.49333100_wp, -0.82372700_wp, 6.48764500_wp, 21.68763500_wp, & + & 1.11667800_wp, 4.81853000_wp, 27.14657300_wp, 1.02208400_wp, & + & 3.64333200_wp, 26.81483800_wp, 1.39797400_wp, 5.57006900_wp, & + & 28.10655500_wp, -0.93118700_wp, 5.47454000_wp, 26.23254500_wp, & + & -0.81553800_wp, 6.32973600_wp, 26.95777300_wp, -3.59117100_wp, & + & 4.49588300_wp, 22.29261300_wp, 0.32379800_wp, 4.37780300_wp, & + & 22.75763100_wp, -0.24816300_wp, 2.51226800_wp, 22.81635400_wp, & + & 1.19223300_wp, 2.75074500_wp, 26.45380700_wp, 0.67752200_wp, & + & 4.83634200_wp, 26.70338000_wp, -0.73832500_wp, 5.34853500_wp, & + & 26.19532300_wp, -3.06628700_wp, 5.07106700_wp, 26.69833000_wp, & + & -1.80492400_wp, 3.49756200_wp, 23.14793300_wp, 0.39294700_wp, & + & 3.24823200_wp, 25.04968700_wp, 0.83449400_wp, 4.59865900_wp, & + & 25.10726900_wp, 0.03900200_wp, 2.68283900_wp, 26.12025600_wp, & + & -1.79081600_wp, 4.42179400_wp, 24.55673200_wp, -0.05038700_wp, & + & 3.57859100_wp, 24.10310000_wp, -1.59394900_wp, 5.02938900_wp, & + & 24.67544300_wp, -1.47877800_wp, 4.10832400_wp, 25.50411600_wp, & + & -5.74445800_wp, 3.40837800_wp, 18.70546200_wp, -3.21803300_wp, & + & 3.92563500_wp, 24.16522700_wp, -2.36263900_wp, 3.12143800_wp, & + & 23.83226000_wp, -3.65089900_wp, 4.60141300_wp, 25.11822300_wp, & + & -5.00916700_wp, 2.70185500_wp, 23.24366700_wp, -5.60786900_wp, & + & 3.32137400_wp, 23.96296800_wp, -5.86662700_wp, 0.00350800_wp, & + & 19.30754300_wp, -3.35819300_wp, 3.02777500_wp, 19.77360200_wp, & + & -2.23765900_wp, 1.43046200_wp, 19.83696600_wp, -1.54247700_wp, & + & 2.71388400_wp, 23.47054400_wp, -3.51370500_wp, 3.58290700_wp, & + & 23.71544800_wp, -4.78867600_wp, 2.77990000_wp, 23.20077700_wp, & + & -5.99675000_wp, 0.77202800_wp, 23.70942800_wp, -3.98196100_wp, & + & 0.80134600_wp, 20.16538700_wp, -2.42609200_wp, 2.38843200_wp, & + & 22.06666100_wp, -3.22577300_wp, 3.56276600_wp, 22.12405400_wp, & + & -2.20234900_wp, 1.75898700_wp, 23.13058500_wp, -4.70113100_wp, & + & 1.37988600_wp, 21.57217300_wp, -2.96269200_wp, 2.23878000_wp, & + & 21.11410100_wp, -5.05503900_wp, 1.91219600_wp, 21.68636900_wp, & + & -4.25840200_wp, 1.43640700_wp, 22.50575200_wp, -6.32681300_wp, & + & -2.36133200_wp, 15.71264700_wp, -5.16706300_wp, -0.04153600_wp, & + & 21.17528000_wp, -4.02031900_wp, 0.13408900_wp, 20.83759200_wp, & + & -5.97904300_wp, 0.02574300_wp, 22.12118500_wp, -5.31698100_wp, & + & -2.21429100_wp, 20.24551200_wp, -6.16824300_wp, -2.30448600_wp, & + & 20.96722400_wp, -3.70972100_wp, -4.54622900_wp, 16.31606900_wp, & + & -4.54652200_wp, -0.70358700_wp, 16.78552000_wp, -2.59900700_wp, & + & -0.80042200_wp, 16.84947200_wp, -3.18514100_wp, 0.53575000_wp, & + & 20.47679500_wp, -5.09024600_wp, -0.49174600_wp, 20.72006500_wp, & + & -5.23896100_wp, -1.99032100_wp, 20.20507900_wp, -4.39490800_wp, & + & -4.17607900_wp, 20.71876600_wp, -3.18263300_wp, -2.56816700_wp, & + & 17.17668500_wp, -3.47084000_wp, -0.36156500_wp, 19.07400800_wp, & + & -4.89366800_wp, -0.27428000_wp, 19.13580600_wp, -2.84126200_wp, & + & -0.57464900_wp, 20.13707900_wp, -4.07941100_wp, -2.78005900_wp, & + & 18.58193800_wp, -3.68636800_wp, -0.87835600_wp, 18.11824000_wp, & + & -4.71125300_wp, -2.73039300_wp, 18.69332500_wp, -3.84830600_wp, & + & -2.39474000_wp, 19.51156400_wp, -2.12254800_wp, -6.35917800_wp, & + & 12.71957700_wp, -3.22514700_wp, -4.01120400_wp, 18.18461800_wp, & + & -2.67220000_wp, -3.00596800_wp, 17.84176000_wp, -3.78982900_wp, & + & -4.61785700_wp, 19.13095000_wp, -1.61763300_wp, -5.47203700_wp, & + & 17.25235900_wp, -2.06432000_wp, -6.19624100_wp, 17.98316500_wp, & + & 1.21233700_wp, -5.63330500_wp, 13.32525900_wp, -2.32235000_wp, & + & -3.92835800_wp, 13.80078500_wp, -1.05183100_wp, -2.45130700_wp, & + & 13.86087900_wp, -2.46658100_wp, -2.09316600_wp, 17.48388200_wp, & + & -2.83427300_wp, -4.23285100_wp, 17.72885300_wp, -1.74306900_wp, & + & -5.27046300_wp, 17.21900100_wp, 0.50192800_wp, -5.94609600_wp, & + & 17.73379400_wp, -0.02389300_wp, -4.00216600_wp, 14.18771500_wp, & + & -1.93430200_wp, -2.87100600_wp, 16.08125800_wp, -2.88183100_wp, & + & -3.94257100_wp, 16.14984900_wp, -1.38491300_wp, -2.50690500_wp, & + & 17.14953000_wp, -0.40594300_wp, -4.84006800_wp, 15.59327600_wp, & + & -1.66208700_wp, -3.35978800_wp, 15.12915900_wp, -0.82828600_wp, & + & -5.30527600_wp, 15.70667400_wp, -0.56468600_wp, -4.41799700_wp, & + & 16.53384700_wp, 3.62242500_wp, -5.49085100_wp, 9.73549300_wp, & + & 1.10913500_wp, -4.91228200_wp, 15.20142600_wp, 0.64083200_wp, & + & -3.86485300_wp, 14.85742700_wp, 1.22813600_wp, -5.73599300_wp, & + & 16.15245400_wp, 3.23172800_wp, -4.54702400_wp, 14.27369200_wp, & + & 3.53568700_wp, -5.34317500_wp, 15.01301300_wp, 5.09998800_wp, & + & -2.41051400_wp, 10.34384300_wp, 1.59573200_wp, -4.14945200_wp, & + & 10.82044300_wp, 1.20882900_wp, -2.24033300_wp, 10.87634100_wp, & + & 0.05764300_wp, -3.13685000_wp, 14.50204500_wp, 1.51111400_wp, & + & -4.74451300_wp, 14.74982500_wp, 2.99983400_wp, -4.52110500_wp, & + & 14.24613800_wp, 4.91240700_wp, -3.16230100_wp, 14.75739100_wp, & + & 3.05438500_wp, -2.38495300_wp, 11.20574000_wp, 0.99727200_wp, & + & -3.19512200_wp, 13.09830500_wp, 1.25696800_wp, -4.60288100_wp, & + & 13.16836300_wp, 1.04198600_wp, -2.54026800_wp, 14.17365700_wp, & + & 3.48237700_wp, -3.20091100_wp, 12.61297300_wp, 1.54600000_wp, & + & -3.28155700_wp, 12.15381400_wp, 3.59479900_wp, -3.81671000_wp, & + & 12.72958100_wp, 3.05556600_wp, -3.06596800_wp, 13.56812800_wp, & + & 6.47092600_wp, -0.42024500_wp, 6.76373500_wp, 4.48742100_wp, & + & -2.04088200_wp, 12.22761900_wp, 3.35970100_wp, -1.77365000_wp, & + & 11.88699700_wp, 5.19826500_wp, -2.45772000_wp, 13.18565400_wp, & + & 5.48646100_wp, -0.14782900_wp, 11.30850600_wp, 6.30625400_wp, & + & -0.39502400_wp, 12.04663300_wp, 4.94987400_wp, 2.63953800_wp, & + & 7.37182800_wp, 4.18253200_wp, -1.18861600_wp, 7.84455000_wp, & + & 2.43663200_wp, -0.32283200_wp, 7.89954600_wp, 2.43802300_wp, & + & -1.78310400_wp, 11.53108100_wp, 4.59135800_wp, -1.62580700_wp, & + & 11.78241900_wp, 5.32763900_wp, -0.31391600_wp, 11.28105700_wp, & + & 5.43055200_wp, 2.03090800_wp, 11.78733300_wp, 3.67442600_wp, & + & 1.03950500_wp, 8.23185800_wp, 3.05943300_wp, -1.07603700_wp, & + & 10.12631000_wp, 4.32597900_wp, -1.73800100_wp, 10.19283900_wp, & + & 2.56575600_wp, -0.64114400_wp, 11.20575400_wp, 4.58260100_wp, & + & 0.87863900_wp, 9.63954900_wp, 3.46175700_wp, -0.69783500_wp, & + & 9.18644200_wp, 5.14367500_wp, 0.59112800_wp, 9.76019800_wp, & + & 4.21765300_wp, 0.62641800_wp, 10.60329800_wp, 4.22380300_wp, & + & 4.94575600_wp, 3.79674800_wp, 4.30225100_wp, 2.39169800_wp, & + & 9.25656700_wp, 3.38558400_wp, 1.65983300_wp, 8.92171900_wp, & + & 5.05470900_wp, 2.69161400_wp, 10.21823100_wp, 3.40608200_wp, & + & 4.33675000_wp, 8.34340900_wp, 4.10800800_wp, 4.83323400_wp, & + & 9.07507500_wp, 0.87901400_wp, 5.62493500_wp, 4.40214100_wp, & + & 3.44143300_wp, 2.67385800_wp, 4.87062800_wp, 1.68515500_wp, & + & 1.82680900_wp, 4.92678700_wp, 2.83718200_wp, 0.93153000_wp, & + & 8.56331400_wp, 4.02637800_wp, 2.72312100_wp, 8.81449200_wp, & + & 3.44170100_wp, 4.10999000_wp, 8.31116600_wp, 1.65626800_wp, & + & 5.63092300_wp, 8.81393500_wp, 1.35880500_wp, 3.63638100_wp, & + & 5.25905700_wp, 2.66087000_wp, 1.85539500_wp, 7.15795300_wp, & + & 3.95601900_wp, 2.44628000_wp, 7.21932300_wp, 2.00912600_wp, & + & 1.73097200_wp, 8.23466100_wp, 2.04540900_wp, 4.25474200_wp, & + & 6.66833600_wp, 2.60490600_wp, 2.40421300_wp, 6.21699500_wp, & + & 2.62091800_wp, 4.52331200_wp, 6.78947300_wp, 2.02390500_wp, & + & 3.81301000_wp, 7.62737800_wp, -1.38338100_wp, 6.46845000_wp, & + & 0.82238800_wp, 0.69564000_wp, 4.96981100_wp, 6.28203100_wp, & + & 0.69851900_wp, 3.79107600_wp, 5.94964400_wp, 0.90964800_wp, & + & 5.74261500_wp, 7.24005600_wp, -1.40464400_wp, 5.44951600_wp, & + & 5.36603600_wp, -1.36051000_wp, 6.31016100_wp, 6.09040200_wp, & + & -3.96964900_wp, 4.24669800_wp, 1.42628000_wp, -0.05636200_wp, & + & 4.46252700_wp, 1.89183600_wp, -0.46741600_wp, 2.55501000_wp, & + & 1.95187000_wp, 0.94689200_wp, 2.91540000_wp, 5.58847300_wp, & + & 0.25417400_wp, 4.95106300_wp, 5.83671700_wp, -1.20058800_wp, & + & 5.34050000_wp, 5.32797500_wp, -3.49597600_wp, 4.86439600_wp, & + & 5.83263300_wp, -2.10476400_wp, 3.40540900_wp, 2.28306000_wp, & + & 0.10819900_wp, 3.34349700_wp, 4.18401300_wp, 0.43245200_wp, & + & 4.72653000_wp, 4.24169000_wp, -0.19827500_wp, 2.74999600_wp, & + & 5.25381000_wp, -2.16962100_wp, 4.32722100_wp, 3.69081700_wp, & + & -0.36206100_wp, 3.63502500_wp, 3.23734700_wp, -2.02482300_wp, & + & 4.94847200_wp, 3.80913300_wp, -1.83099700_wp, 4.04079000_wp, & + & 4.63552100_wp, -6.02121800_wp, 2.98014800_wp, -2.16190200_wp, & + & -3.54607700_wp, 3.70925700_wp, 3.29868500_wp, -2.62748700_wp, & + & 2.98238200_wp, 2.96471500_wp, -4.03688800_wp, 4.34652100_wp, & + & 4.25002300_wp, -5.22838500_wp, 2.33842200_wp, 2.37518700_wp, & + & -5.87726200_wp, 2.90394700_wp, 3.09544600_wp, -5.85262200_wp, & + & -0.42400900_wp, -1.55920500_wp, -3.60864100_wp, 2.80318300_wp, & + & -1.09220000_wp, -2.35657000_wp, 1.30767400_wp, -1.02938100_wp, & + & -1.77294500_wp, 2.64505600_wp, 2.60272700_wp, -3.81375600_wp, & + & 3.34337200_wp, 2.84816300_wp, -5.01406600_wp, 2.43455200_wp, & + & 2.33325500_wp, -6.04671800_wp, 0.33074800_wp, 2.84277800_wp, & + & -4.04242500_wp, 0.53244400_wp, -0.70107700_wp, -2.62579500_wp, & + & 2.24512200_wp, 1.19921000_wp, -3.52382800_wp, 3.34722800_wp, & + & 1.25817800_wp, -2.35064800_wp, 1.63772800_wp, 2.26376500_wp, & + & -4.80848600_wp, 1.04688000_wp, 0.70553900_wp, -3.14882500_wp, & + & 2.05150600_wp, 0.24627400_wp, -5.20482900_wp, 1.54639800_wp, & + & 0.81945100_wp, -4.37147100_wp, 1.14071500_wp, 1.63754200_wp, & + & -6.10820000_wp, -2.81961100_wp, -5.15447300_wp, -5.14837900_wp, & + & -0.40985900_wp, 0.30882700_wp, -4.02237900_wp, -0.13650800_wp, & + & -0.03027300_wp, -5.96543600_wp, -0.41140300_wp, 1.25514000_wp, & + & -5.11377500_wp, -2.58664700_wp, -0.62198400_wp, -5.95431800_wp, & + & -2.75013600_wp, 0.10151500_wp, -3.31351800_wp, -4.77288000_wp, & + & -4.55120100_wp, -4.47272100_wp, -1.01582000_wp, -4.07945700_wp, & + & -2.52451000_wp, -0.94681400_wp, -4.01699900_wp, -3.22284900_wp, & + & 0.33537500_wp, -0.39013700_wp, -5.03480700_wp, -0.85079500_wp, & + & -0.14691200_wp, -5.05525900_wp, -2.35695700_wp, -0.66147500_wp, & + & -4.02768600_wp, -4.46339500_wp, -0.14785800_wp, -2.95687500_wp, & + & -2.75762100_wp, -3.69012600_wp, -3.43091900_wp, -0.58331000_wp, & + & -1.79351400_wp, -4.85733500_wp, -0.61797900_wp, -1.72959500_wp, & + & -2.78652700_wp, -0.74180900_wp, -0.72942500_wp, -3.83285700_wp, & + & -3.04525200_wp, -2.28466400_wp, -3.60163600_wp, -1.11650100_wp, & + & -2.74848200_wp, -4.46486600_wp, -3.04915800_wp, -2.17239700_wp, & + & -3.63394300_wp, -2.64159900_wp, -1.35404100_wp, -1.57624400_wp, & + & -6.44446800_wp, -8.14627800_wp, -2.87304300_wp, -4.19926300_wp, & + & -2.68100000_wp, -2.41103500_wp, -3.14987800_wp, -3.02421800_wp, & + & -3.38577100_wp, -4.85115700_wp, -1.73460400_wp, -1.14915800_wp, & + & -5.51693200_wp, -3.61352300_wp, -1.53181000_wp, -6.27721200_wp, & + & -2.88101000_wp, 1.68536100_wp, -5.43574100_wp, -7.54095200_wp, & + & -1.98107400_wp, -4.03942000_wp, -7.06486800_wp, -0.84082600_wp, & + & -2.45927900_wp, -7.00516300_wp, -2.28149900_wp, -2.22332300_wp, & + & -3.38150900_wp, -2.46680800_wp, -4.38594100_wp, -3.13632700_wp, & + & -1.29027400_wp, -5.32697800_wp, -3.64572100_wp, 1.00363200_wp, & + & -5.80816600_wp, -3.13166000_wp, 0.31419600_wp, -3.91612000_wp, & + & -6.67782000_wp, -1.68487900_wp, -2.95285000_wp, -4.78400300_wp, & + & -2.53821300_wp, -4.10143000_wp, -4.71561400_wp, -1.16945100_wp, & + & -2.54300400_wp, -3.71510200_wp, 0.00468900_wp, -4.78415600_wp, & + & -5.27246900_wp, -1.37236800_wp, -3.41597900_wp, -5.73563900_wp, & + & -0.37535400_wp, -5.28330000_wp, -5.15839700_wp, -0.18895200_wp, & + & -4.37817600_wp, -4.33019900_wp, 4.07404300_wp, -5.08865500_wp, & + & -11.12838700_wp, 1.52246900_wp, -4.72659200_wp, -5.66346300_wp, & + & 0.96537900_wp, -3.72385000_wp, -6.00672300_wp, 1.70978500_wp, & + & -5.53681400_wp, -4.71068700_wp, 3.60503500_wp, -4.18233100_wp, & + & -6.58958700_wp, 3.97516500_wp, -4.94798100_wp, -5.85051400_wp, & + & 5.28430400_wp, -1.89416200_wp, -10.52104600_wp, 1.94260700_wp, & + & -3.92463100_wp, -10.04453300_wp, 1.39377200_wp, -2.05596100_wp, & + & -9.98824000_wp, 0.32296000_wp, -3.04793000_wp, -6.36205000_wp, & + & 1.90785300_wp, -4.52593600_wp, -6.11400200_wp, 3.37234400_wp, & + & -4.17567000_wp, -6.61714000_wp, 5.16178300_wp, -2.65903200_wp, & + & -6.10585500_wp, 3.24359600_wp, -2.04328000_wp, -9.65836700_wp, & + & 1.26498000_wp, -3.02490000_wp, -7.76602800_wp, 1.64197000_wp, & + & -4.40582600_wp, -7.69620100_wp, 1.25263300_wp, -2.36870900_wp, & + & -6.68913100_wp, 3.73981400_wp, -2.81866600_wp, -8.25117600_wp, & + & 1.81873100_wp, -3.06449700_wp, -8.70976300_wp, 3.90561500_wp, & + & -3.42355900_wp, -8.13425100_wp, 3.30369700_wp, -2.72068700_wp, & + & -7.29441600_wp, 6.48075900_wp, 0.20620100_wp, -14.09936800_wp, & + & 4.64452200_wp, -1.57669400_wp, -8.63623900_wp, 3.49653300_wp, & + & -1.40735800_wp, -8.97645600_wp, 5.38732100_wp, -1.93201200_wp, & + & -7.67695000_wp, 5.47733700_wp, 0.39352000_wp, -9.55406000_wp, & + & 6.31448900_wp, 0.21705500_wp, -8.81582000_wp, 4.70487700_wp, & + & 3.12541700_wp, -13.49133000_wp, 4.26843500_wp, -0.75409100_wp, & + & -13.01893000_wp, 2.45443100_wp, -0.04031900_wp, -12.96419900_wp, & + & 2.58102900_wp, -1.49433500_wp, -9.33285200_wp, 4.71059000_wp, & + & -1.15503900_wp, -9.08092300_wp, 5.33219700_wp, 0.21505500_wp, & + & -9.58150900_wp, 5.23570300_wp, 2.55978800_wp, -9.07617700_wp, & + & 3.57101000_wp, 1.42319600_wp, -12.63204900_wp, 3.13969000_wp, & + & -0.73762400_wp, -10.73725900_wp, 4.45717900_wp, -1.28965300_wp, & + & -10.67078800_wp, 2.60988700_wp, -0.34631800_wp, -9.65745000_wp, & + & 4.48869000_wp, 1.33970900_wp, -11.22400700_wp, 3.50773900_wp, & + & -0.32623900_wp, -11.67629300_wp, 5.07272000_wp, 1.10170300_wp, & + & -11.10250700_wp, 4.14761800_wp, 1.05657400_wp, -10.25873700_wp, & + & 3.78437300_wp, 5.36104500_wp, -17.06671600_wp, 4.08173600_wp, & + & 2.82488400_wp, -11.60674800_wp, 3.23024800_wp, 2.01617000_wp, & + & -11.94135800_wp, 4.80611500_wp, 3.18680300_wp, -10.64426100_wp, & + & 3.02223600_wp, 4.68433200_wp, -12.51946700_wp, 3.67949100_wp, & + & 5.23979400_wp, -11.78835400_wp, 0.39462700_wp, 5.75228900_wp, & + & -16.46077900_wp, 3.20101600_wp, 3.03193300_wp, -15.99324200_wp, & + & 1.52154800_wp, 2.03791100_wp, -15.93638400_wp, 2.74707900_wp, & + & 1.24476700_wp, -12.29951300_wp, 3.77824500_wp, 3.13042500_wp, & + & -12.04791100_wp, 3.07773200_wp, 4.46225100_wp, -12.55226600_wp, & + & 1.16899100_wp, 5.82569000_wp, -12.04959500_wp, 1.04243200_wp, & + & 3.81318200_wp, -15.60349800_wp, 2.49225500_wp, 2.15015200_wp, & + & -13.70488300_wp, 3.73202000_wp, 2.84915900_wp, -13.64430900_wp, & + & 1.85374100_wp, 1.96997200_wp, -12.62885600_wp, 1.67379700_wp, & + & 4.48689300_wp, -14.19551600_wp, 2.39014200_wp, 2.69157700_wp, & + & -14.64612400_wp, 2.22525500_wp, 4.80463000_wp, -14.07394600_wp, & + & 1.69030700_wp, 4.04524700_wp, -13.23646600_wp, -1.93167000_wp, & + & 6.40093800_wp, -20.04021300_wp, 0.27025600_wp, 5.08607600_wp, & + & -14.58153000_wp, 0.37238300_wp, 3.91168400_wp, -14.91386900_wp, & + & 0.41649300_wp, 5.87345000_wp, -13.62357900_wp, -1.86528500_wp, & + & 5.38387700_wp, -15.49775100_wp, -1.89454900_wp, 6.24579700_wp, & + & -14.77478800_wp, -4.31791500_wp, 3.96679600_wp, -19.43727300_wp, & + & -0.43598700_wp, 4.51649300_wp, -18.97214100_wp, -0.68253200_wp, & + & 2.58121200_wp, -18.91158500_wp, 0.69509600_wp, 3.06065800_wp, & + & -15.27550800_wp, -0.16980400_wp, 5.02889400_wp, -15.02728300_wp, & + & -1.65206100_wp, 5.29277300_wp, -15.53707300_wp, -3.89868100_wp, & + & 4.62319100_wp, -15.03234700_wp, -2.38821100_wp, 3.28762900_wp, & + & -18.58022800_wp, -0.17655100_wp, 3.41523600_wp, -16.67922500_wp, & + & 0.02703400_wp, 4.82039200_wp, -16.62263400_wp, -0.43135600_wp, & + & 2.79845000_wp, -15.61021100_wp, -2.53118200_wp, 4.20059000_wp, & + & -17.17289800_wp, -0.67065400_wp, 3.66508300_wp, -17.62705800_wp, & + & -2.43870500_wp, 4.83253300_wp, -17.05536600_wp, -2.16905300_wp, & + & 3.94404800_wp, -16.22966100_wp, -6.25400500_wp, 2.53003900_wp, & + & -23.02585100_wp, -3.84776800_wp, 3.46913300_wp, -17.56628300_wp, & + & -2.87171800_wp, 2.82175200_wp, -17.90013800_wp, -4.39235200_wp, & + & 4.06171200_wp, -16.61552800_wp, -5.40911100_wp, 1.95824500_wp, & + & -18.49029100_wp, -6.10373700_wp, 2.46656800_wp, -17.77087000_wp, & + & -5.79472400_wp, -0.84694500_wp, -22.42424600_wp, -3.83358800_wp, & + & 2.56127400_wp, -21.95711200_wp, -2.45860400_wp, 1.17771700_wp, & + & -21.89367600_wp, -1.99162200_wp, 2.56029800_wp, -18.26168300_wp, & + & -4.08445700_wp, 3.08017500_wp, -18.01718900_wp, -5.20330500_wp, & + & 2.07258200_wp, -18.53300100_wp, -6.05265100_wp, -0.11104800_wp, & + & -18.02266300_wp, -4.07310500_wp, 0.25987800_wp, -21.56566600_wp, & + & -2.80711000_wp, 2.08842000_wp, -19.66596100_wp, -3.79592800_wp, & + & 3.11007800_wp, -19.60690700_wp, -2.48132700_wp, 1.50657400_wp, & + & -18.60242600_wp, -4.87999900_wp, 0.70821500_wp, -20.15975000_wp, & + & -3.31088600_wp, 1.85020800_wp, -20.61958800_wp, -5.31635300_wp, & + & 1.17188700_wp, -20.04564400_wp, -4.45167300_wp, 0.83851000_wp, & + & -19.22882600_wp, -5.84452800_wp, -3.25541500_wp, -26.02099300_wp, & + & -5.09188500_wp, -0.77083500_wp, -20.55642800_wp, -3.99516900_wp, & + & -0.40430800_wp, -20.89595700_wp, -5.90694000_wp, -0.84373300_wp, & + & -19.61078500_wp, -4.87447100_wp, -2.93817200_wp, -21.48856400_wp, & + & -5.69670000_wp, -3.17218200_wp, -20.76370700_wp, -2.89332900_wp, & + & -4.96294500_wp, -25.41729000_wp, -4.36716600_wp, -1.31871200_wp, & + & -24.94460500_wp, -2.43230700_wp, -1.08250800_wp, -24.88235300_wp, & + & -3.23654100_wp, 0.13490300_wp, -21.25620800_wp, -4.94290000_wp, & + & -1.20214000_wp, -21.01335800_wp, -4.83440400_wp, -2.70468900_wp, & + & -21.52807200_wp, -3.63079400_wp, -4.71475800_wp, -21.01278100_wp, & + & -2.70907600_wp, -2.92426500_wp, -24.55536700_wp, -3.36681300_wp, & + & -0.79925800_wp, -22.65945100_wp, -4.78519300_wp, -0.95418000_wp, & + & -22.59552800_wp, -2.71199800_wp, -0.90135700_wp, -21.59564200_wp, & + & -3.55731800_wp, -3.28569200_wp, -23.15001800_wp, -3.49151900_wp, & + & -1.34410800_wp, -23.61374000_wp, -4.18646900_wp, -3.34385600_wp, & + & -23.03838600_wp, -3.39353400_wp, -2.86595200_wp, -22.21909300_wp, & + & -1.01935000_wp, -6.47922600_wp, -29.01271200_wp, -2.50020500_wp, & + & -4.35378400_wp, -23.54604300_wp, -2.13122300_wp, -3.26892800_wp, & + & -23.88992000_wp, -2.95675600_wp, -5.04686700_wp, -22.60009800_wp, & + & -0.67288900_wp, -5.51863900_wp, -24.47843900_wp, -0.98765400_wp, & + & -6.30957800_wp, -23.74485300_wp, 2.14421500_wp, -5.19658300_wp, & + & -28.40581700_wp, -1.62569600_wp, -4.11808800_wp, -27.92954000_wp, & + & -0.62474200_wp, -2.44610400_wp, -27.87056100_wp, -2.08062600_wp, & + & -2.33380000_wp, -24.24695800_wp, -2.08129500_wp, -4.50477800_wp, & + & -24.00201100_wp, -0.82962600_wp, -5.34246800_wp, -24.51029000_wp, & + & 1.49776400_wp, -5.62610400_wp, -23.99576400_wp, 0.64876700_wp, & + & -3.79954900_wp, -27.54322600_wp, -1.42349200_wp, -3.00943900_wp, & + & -25.64983600_wp, -2.17686000_wp, -4.22683600_wp, -25.58083000_wp, & + & -0.94525200_wp, -2.55766500_wp, -24.58031200_wp, 0.41491900_wp, & + & -4.69019700_wp, -26.13705000_wp, -1.07305700_wp, -3.44539900_wp, & + & -26.60041100_wp, 0.07974500_wp, -5.21966700_wp, -26.02312100_wp, & + & 0.18774900_wp, -4.30143700_wp, -25.19319900_wp, 4.49620900_wp, & + & -4.64685300_wp, -31.99307100_wp, 1.92474900_wp, -4.50355000_wp, & + & -26.52792100_wp, 1.28204000_wp, -3.55127800_wp, -26.87101300_wp, & + & 2.17957800_wp, -5.29539200_wp, -25.57442900_wp, 3.95169400_wp, & + & -3.78307500_wp, -27.45264200_wp, 4.38659300_wp, -4.51570300_wp, & + & -26.71303100_wp, 5.42946100_wp, -1.36064800_wp, -31.38476200_wp, & + & 2.27493900_wp, -3.66861500_wp, -30.90832500_wp, 1.56820100_wp, & + & -1.85323100_wp, -30.85285900_wp, 0.58621800_wp, -2.93316900_wp, & + & -27.22621600_wp, 2.28988000_wp, -4.27029700_wp, -26.97678100_wp, & + & 3.71891700_wp, -3.79700700_wp, -27.47967900_wp, 5.37282700_wp, & + & -2.13250000_wp, -26.97004300_wp, 3.40927600_wp, -1.68305000_wp, & + & -30.52253600_wp, 1.52200500_wp, -2.83045300_wp, -28.63003000_wp, & + & 2.01631600_wp, -4.17355300_wp, -28.55979200_wp, 1.45373600_wp, & + & -2.17778500_wp, -27.55270200_wp, 3.96960500_wp, -2.41385700_wp, & + & -29.11532800_wp, 2.07740900_wp, -2.82193200_wp, -29.57341000_wp, & + & 4.18761300_wp, -3.00159000_wp, -28.99717600_wp, 3.52752000_wp, & + & -2.35272800_wp, -28.15620700_wp, 6.44218100_wp, 0.83483100_wp, & + & -34.96255400_wp, 4.76820700_wp, -1.09814000_wp, -29.49999600_wp, & + & 3.60797500_wp, -1.02745300_wp, -29.83817600_wp, 5.53655900_wp, & + & -1.38934900_wp, -28.53959200_wp, 5.42682900_wp, 0.93606300_wp, & + & -30.41634600_wp, 6.27662700_wp, 0.83196400_wp, -29.67860300_wp, & + & 4.42475300_wp, 3.59147100_wp, -34.35477300_wp, 4.32240800_wp, & + & -0.31065400_wp, -33.88246700_wp, 2.45446600_wp, 0.24542300_wp, & + & -33.82765000_wp, 2.70367100_wp, -1.19279200_wp, -30.19500900_wp, & + & 4.79614500_wp, -0.67224500_wp, -29.94333800_wp, 5.29936800_wp, & + & 0.74553900_wp, -30.44373300_wp, 5.00192700_wp, 3.07364900_wp, & + & -29.93938800_wp, 3.44014800_wp, 1.79866400_wp, -33.49554300_wp, & + & 3.19635500_wp, -0.39025400_wp, -31.59972500_wp, 4.55498800_wp, & + & -0.82770900_wp, -31.53416200_wp, 2.63453900_wp, -0.04654200_wp, & + & -30.52054900_wp, 4.36230600_wp, 1.79339400_wp, -32.08703200_wp, & + & 3.52690200_wp, 0.05049600_wp, -32.53932600_wp, 4.96523900_wp, & + & 1.60673600_wp, -31.96496400_wp, 4.04699500_wp, 1.48352100_wp, & + & -31.12171400_wp, 3.31727400_wp, 5.74022900_wp, -37.92903900_wp, & + & 3.83340200_wp, 3.23944800_wp, -32.46941100_wp, 3.05189100_wp, & + & 2.36107700_wp, -32.80331800_wp, 4.52107600_wp, 3.66175400_wp, & + & -31.50823400_wp, 2.61589100_wp, 5.00163800_wp, -33.38231000_wp, & + & 3.22430200_wp, 5.61048500_wp, -32.65217100_wp, -0.09335600_wp, & + & 5.84127700_wp, -37.32380200_wp, 2.93612400_wp, 3.37087700_wp, & + & -36.85701700_wp, 1.34960100_wp, 2.23720400_wp, -36.79974600_wp, & + & 2.63784100_wp, 1.55059800_wp, -33.16294700_wp, 3.50232700_wp, & + & 3.51771400_wp, -32.91102100_wp, 2.69023400_wp, 4.78539300_wp, & + & -33.41611900_wp, 0.67249400_wp, 5.98056000_wp, -32.91403500_wp, & + & 0.71812400_wp, 3.96365300_wp, -36.46768000_wp, 2.30633900_wp, & + & 2.43145400_wp, -34.56730200_wp, 3.48086100_wp, 3.23362300_wp, & + & -34.50782800_wp, 1.68402000_wp, 2.19699500_wp, -33.49239200_wp, & + & 1.28999300_wp, 4.69005600_wp, -35.05846400_wp, 2.15752800_wp, & + & 2.96157800_wp, -35.50939500_wp, 1.81251600_wp, 5.05270000_wp, & + & -34.93800800_wp, 1.34443100_wp, 4.25143000_wp, -34.10171700_wp, & + & -2.46604400_wp, 6.28886900_wp, -40.90480800_wp, -0.15680500_wp, & + & 5.16675700_wp, -35.44627200_wp, 0.04265400_wp, 4.00568800_wp, & + & -35.77709700_wp, -0.08054500_wp, 5.96434800_wp, -34.48884000_wp, & + & -2.31155200_wp, 5.28114700_wp, -36.36243200_wp, -2.41435900_wp, & + & 6.13767500_wp, -35.64033000_wp, -4.63541900_wp, 3.66008800_wp, & + & -40.30145200_wp, -0.81275100_wp, 4.53972800_wp, -39.83723400_wp, & + & -0.89350300_wp, 2.59025100_wp, -39.77550700_wp, 0.43853200_wp, & + & 3.18556800_wp, -36.13928300_wp, -0.59181000_wp, 5.07205500_wp, & + & -35.89187500_wp, -2.09153400_wp, 5.20947000_wp, -36.40312800_wp, & + & -4.27282000_wp, 4.35020500_wp, -35.89744300_wp, -2.65437700_wp, & + & 3.14816100_wp, -39.44507600_wp, -0.46032400_wp, 3.46383200_wp, & + & -37.54385300_wp, -0.37749200_wp, 4.88228000_wp, -37.48646700_wp, & + & -0.66220900_wp, 2.82696000_wp, -36.47557400_wp, -2.87460100_wp, & + & 4.04521700_wp, -38.03725800_wp, -0.97390400_wp, 3.67095300_wp, & + & -38.49248400_wp, -2.83564500_wp, 4.68311400_wp, -37.92084600_wp, & + & -2.49105400_wp, 3.82164800_wp, -37.09659300_wp, -6.44097500_wp, & + & 2.06314400_wp, -43.89251400_wp, -4.12174700_wp, 3.20365900_wp, & + & -38.43102400_wp, -3.09475800_wp, 2.64268700_wp, -38.76662800_wp, & + & -4.71633600_wp, 3.74814000_wp, -37.48117400_wp, -5.54982300_wp, & + & 1.56624000_wp, -39.35700800_wp, -6.28408300_wp, 2.01320400_wp, & + & -38.63706600_wp, -5.69370200_wp, -1.26180200_wp, -43.28959700_wp, & + & -4.02866000_wp, 2.30038300_wp, -42.82216700_wp, -2.54138700_wp, & + & 1.03907700_wp, -42.75968300_wp, -2.19410000_wp, 2.45655000_wp, & + & -39.12764000_wp, -4.32493600_wp, 2.79740100_wp, -38.88412400_wp, & + & -5.35383900_wp, 1.69774800_wp, -39.39887500_wp, -6.01328900_wp, & + & -0.55078400_wp, -38.88845200_wp, -4.07245300_wp, -0.01220500_wp, & + & -42.43085900_wp, -2.96634600_wp, 1.91722100_wp, -40.53107300_wp, & + & -4.03972400_wp, 2.85057000_wp, -40.47218600_wp, -2.59238300_wp, & + & 1.36537200_wp, -39.46768800_wp, -4.91438800_wp, 0.36569800_wp, & + & -41.02483000_wp, -3.44927000_wp, 1.63701900_wp, -41.48539400_wp, & + & -5.38897900_wp, 0.78963800_wp, -40.91247400_wp, -4.49908200_wp, & + & 0.53210400_wp, -40.09468900_wp, -5.53821800_wp, -3.66568800_wp, & + & -46.88628900_wp, -4.99749600_wp, -1.12739900_wp, -41.42187900_wp, & + & -3.93774200_wp, -0.66753500_wp, -41.76275600_wp, -5.80497300_wp, & + & -1.26857700_wp, -40.47680200_wp, -4.59809800_wp, -3.26786000_wp, & + & -42.35396600_wp, -5.39673400_wp, -3.57026500_wp, -41.62864400_wp, & + & -2.45118100_wp, -5.11550500_wp, -46.28235800_wp, -4.22925600_wp, & + & -1.60989200_wp, -45.81002600_wp, -2.32165400_wp, -1.21023200_wp, & + & -45.74756700_wp, -3.22721400_wp, -0.06590400_wp, -42.12230100_wp, & + & -4.81326700_wp, -1.54320500_wp, -41.87844800_wp, -4.57779700_wp, & + & -3.03099600_wp, -42.39254200_wp, -3.20620700_wp, -4.93078700_wp, & + & -41.87795400_wp, -2.44122900_wp, -3.06857100_wp, -45.42115900_wp, & + & -3.27691600_wp, -1.00742500_wp, -43.52503900_wp, -4.67689600_wp, & + & -1.28347700_wp, -43.46055600_wp, -2.61599600_wp, -1.05362100_wp, & + & -42.46058800_wp, -3.25479400_wp, -3.50122700_wp, -44.01535900_wp, & + & -3.35567000_wp, -1.56177200_wp, -44.47918200_wp, -3.87677200_wp, & + & -3.61315200_wp, -43.90324600_wp, -3.12802600_wp, -3.06957400_wp, & + & -43.08249600_wp, -0.45409600_wp, -6.46703200_wp, -49.87755600_wp, & + & -2.10861100_wp, -4.47538700_wp, -44.41071500_wp, -1.83479200_wp, & + & -3.36219800_wp, -44.75461200_wp, -2.50644000_wp, -5.20527700_wp, & + & -43.46346400_wp, -0.19006100_wp, -5.48050400_wp, -45.34268200_wp, & + & -0.43613500_wp, -6.29522900_wp, -44.60728000_wp, 2.58966700_wp, & + & -4.91932800_wp, -49.27036000_wp, -1.25684100_wp, -4.16596200_wp, & + & -48.79384700_wp, -0.40314800_wp, -2.41530700_wp, -48.73541800_wp, & + & -1.86322000_wp, -2.42732700_wp, -45.11153200_wp, -1.67936500_wp, & + & -4.59057400_wp, -44.86577700_wp, -0.36144700_wp, -5.31710900_wp, & + & -45.37304800_wp, 1.98203400_wp, -5.40132800_wp, -44.85980700_wp, & + & 0.98053600_wp, -3.65441000_wp, -48.40766900_wp, -1.15102800_wp, & + & -3.04471200_wp, -46.51391800_wp, -1.79735000_wp, -4.32169200_wp, & + & -46.44491400_wp, -0.71357500_wp, -2.55346400_wp, -45.44330800_wp, & + & 0.82285600_wp, -4.56174400_wp, -47.00144300_wp, -0.76515200_wp, & + & -3.44828400_wp, -47.46360000_wp, 0.53546500_wp, -5.11852300_wp, & + & -46.88650600_wp, 0.56392900_wp, -4.19409000_wp, -46.05508200_wp, & + & 4.88606900_wp, -4.17062800_wp, -52.85602800_wp, 2.31542700_wp, & + & -4.24706600_wp, -47.39121200_wp, 1.59067000_wp, -3.35380300_wp, & + & -47.73357700_wp, 2.63425600_wp, -5.01415100_wp, -46.43659100_wp, & + & 4.27024400_wp, -3.35633500_wp, -48.31530500_wp, 4.76637400_wp, & + & -4.04879500_wp, -47.57525100_wp, 5.53663100_wp, -0.81622900_wp, & + & -52.24770700_wp, 2.59218700_wp, -3.38593700_wp, -51.77159700_wp, & + & 1.73291600_wp, -1.63703300_wp, -51.71668200_wp, 0.84653000_wp, & + & -2.79650600_wp, -48.08920900_wp, 2.65736500_wp, -3.98346300_wp, & + & -47.83963900_wp, 4.03966900_wp, -3.38944200_wp, -48.34151800_wp, & + & 5.54642700_wp, -1.59052900_wp, -47.83248100_wp, 3.55027300_wp, & + & -1.31054200_wp, -51.38589200_wp, 1.77008700_wp, -2.61427100_wp, & + & -49.49285900_wp, 2.37612000_wp, -3.91008500_wp, -49.42297400_wp, & + & 1.64535500_wp, -1.96966100_wp, -48.41524800_wp, 4.17186000_wp, & + & -1.99018700_wp, -49.97870000_wp, 2.32151800_wp, -2.55916500_wp, & + & -50.43566900_wp, 4.43998900_wp, -2.55767500_wp, -49.85964800_wp, & + & 3.72686500_wp, -1.96798900_wp, -49.01827000_wp, 6.35807900_wp, & + & 1.45766700_wp, -55.82436800_wp, 4.85767300_wp, -0.61209300_wp, & + & -50.36292000_wp, 3.69388000_wp, -0.64060400_wp, -50.70155000_wp, & + & 5.64581600_wp, -0.83625100_wp, -49.40283400_wp, 5.33851000_wp, & + & 1.47125900_wp, -51.27870100_wp, 6.19526900_wp, 1.44015800_wp, & + & -50.54120200_wp, 4.11332800_wp, 4.03212300_wp, -55.21756500_wp, & + & 4.34633500_wp, 0.13410500_wp, -54.74548900_wp, 2.43719300_wp, & + & 0.53009600_wp, -54.69070500_wp, 2.80871700_wp, -0.88212400_wp, & + & -51.05759300_wp, 4.84788500_wp, -0.18471500_wp, -50.80552900_wp, & + & 5.22732600_wp, 1.27119800_wp, -51.30690000_wp, 4.73345500_wp, & + & 3.56415900_wp, -50.80297300_wp, 3.28564000_wp, 2.16110300_wp, & + & -54.35866500_wp, 3.23031300_wp, -0.04175000_wp, -52.46190300_wp, & + & 4.62132200_wp, -0.36115100_wp, -52.39743300_wp, 2.64082700_wp, & + & 0.25409400_wp, -51.38323000_wp, 4.20524800_wp, 2.23504000_wp, & + & -52.94998600_wp, 3.52207400_wp, 0.42656000_wp, -53.40167300_wp, & + & 4.82274300_wp, 2.10000500_wp, -52.82845100_wp, 3.91701600_wp, & + & 1.89884000_wp, -51.98538000_wp, 2.82767500_wp, 6.07737500_wp, & + & -58.79237300_wp, 3.55674000_wp, 3.62946400_wp, -53.33337300_wp, & + & 2.85203300_wp, 2.68770800_wp, -53.66638000_wp, 4.20545400_wp, & + & 4.10934600_wp, -52.37152700_wp, 2.19158300_wp, 5.28175700_wp, & + & -54.24579000_wp, 2.74624100_wp, 5.94050100_wp, -53.51752100_wp, & + & -0.57881700_wp, 5.88774100_wp, -58.18719000_wp, 2.65161400_wp, & + & 3.68395600_wp, -57.72016500_wp, 1.16714500_wp, 2.41894200_wp, & + & -57.66318700_wp, 2.50924200_wp, 1.84528900_wp, -54.02575300_wp, & + & 3.20179000_wp, 3.87920500_wp, -53.77535900_wp, 2.28540600_wp, & + & 5.07232600_wp, -54.28081300_wp, 0.17223200_wp, 6.09116900_wp, & + & -53.77774800_wp, 0.38958900_wp, 4.08654600_wp, -57.33126900_wp, & + & 2.10428500_wp, 2.69367200_wp, -55.43146400_wp, 3.20503200_wp, & + & 3.59383000_wp, -55.37139300_wp, 1.50407600_wp, 2.40803500_wp, & + & -54.35594600_wp, 0.89750900_wp, 4.85785400_wp, -55.92210500_wp, & + & 1.90949400_wp, 3.21053600_wp, -56.37391300_wp, 1.38844400_wp, & + & 5.26472800_wp, -55.80219800_wp, 0.99010500_wp, 4.42598100_wp, & + & -54.96725600_wp, -2.98010800_wp, 6.13027700_wp, -61.76903600_wp, & + & -0.58249400_wp, 5.21039800_wp, -56.31014300_wp, -0.28590500_wp, & + & 4.06991300_wp, -56.64215900_wp, -0.57634600_wp, 6.01091800_wp, & + & -55.35382700_wp, -2.74108100_wp, 5.14043300_wp, -57.22760400_wp, & + & -2.91588600_wp, 5.98395200_wp, -56.50649300_wp, -4.91782000_wp, & + & 3.32630000_wp, -61.16641600_wp, -1.18254200_wp, 4.52822400_wp, & + & -60.70113000_wp, -1.09690700_wp, 2.57930800_wp, -60.63979500_wp, & + & 0.17997200_wp, 3.28647900_wp, -57.00439700_wp, -1.00978300_wp, & + & 5.07823000_wp, -56.75721900_wp, -2.51489500_wp, 5.08658300_wp, & + & -57.26803700_wp, -4.61437400_wp, 4.04498800_wp, -56.76225100_wp, & + & -2.89920800_wp, 2.98516100_wp, -60.30963400_wp, -0.74038300_wp, & + & 3.48702800_wp, -58.40837500_wp, -0.77930200_wp, 4.90677000_wp, & + & -58.35105300_wp, -0.88748900_wp, 2.83501500_wp, -57.34085000_wp, & + & -3.19519900_wp, 3.86085800_wp, -58.90190000_wp, -1.27038200_wp, & + & 3.64934500_wp, -59.35704000_wp, -3.21028100_wp, 4.49940600_wp, & + & -58.78550800_wp, -2.79389200_wp, 3.66997300_wp, -57.96230000_wp, & + & -6.57951100_wp, 1.58153300_wp, -64.75742800_wp, -4.36408400_wp, & + & 2.91594100_wp, -59.29630900_wp, -3.29557400_wp, 2.44402900_wp, & + & -59.63204100_wp, -5.00487800_wp, 3.40751700_wp, -58.34763800_wp, & + & -5.64986300_wp, 1.16261300_wp, -60.22249000_wp, -6.41899300_wp, & + & 1.54503900_wp, -59.50288000_wp, -5.55089900_wp, -1.66822400_wp, & + & -64.15489800_wp, -4.19594200_wp, 2.02359500_wp, -63.68731600_wp, & + & -2.60529200_wp, 0.89311700_wp, -63.62395800_wp, -2.38007400_wp, & + & 2.33523300_wp, -59.99303300_wp, -4.53379900_wp, 2.49315400_wp, & + & -59.74975600_wp, -5.46530600_wp, 1.30931100_wp, -60.26405600_wp, & + & -5.93034700_wp, -0.98673800_wp, -59.75411900_wp, -4.04278600_wp, & + & -0.28445300_wp, -63.29588400_wp, -3.10453200_wp, 1.73268500_wp, & + & -61.39700800_wp, -4.25395600_wp, 2.57128000_wp, -61.33739800_wp, & + & -2.68516200_wp, 1.21448100_wp, -60.33391900_wp, -4.91401500_wp, & + & 0.02022100_wp, -61.89017000_wp, -3.56166400_wp, 1.41258800_wp, & + & -62.35079100_wp, -5.42179300_wp, 0.40282100_wp, -61.77691800_wp, & + & -4.51368300_wp, 0.22134800_wp, -60.95978700_wp, -5.19061600_wp, & + & -4.05007100_wp, -67.75139800_wp, -4.86635100_wp, -1.47468900_wp, & + & -62.28778000_wp, -3.85175400_wp, -0.92663100_wp, -62.62866200_wp, & + & -5.66091200_wp, -1.68418700_wp, -61.34228900_wp, -4.28808400_wp, & + & -3.57226900_wp, -63.22009100_wp, -5.05678200_wp, -3.94349500_wp, & + & -62.49307500_wp, -1.99104400_wp, -5.23164800_wp, -67.14789300_wp, & + & -4.06030200_wp, -1.89039700_wp, -66.67494600_wp, -2.19358100_wp, & + & -1.32882900_wp, -66.61285000_wp, -3.19389600_wp, -0.26603800_wp, & + & -62.98717200_wp, -4.64925100_wp, -1.87348100_wp, -62.74408400_wp, & + & -4.28780300_wp, -3.33498700_wp, -63.25682600_wp, -2.75891800_wp, & + & -5.11203700_wp, -62.74290500_wp, -2.15564800_wp, -3.19118600_wp, & + & -66.28605500_wp, -3.16254700_wp, -1.20822400_wp, -64.39038000_wp, & + & -4.53521400_wp, -1.60222000_wp, -64.32534400_wp, -2.50123100_wp, & + & -1.19711500_wp, -63.32517800_wp, -2.92965500_wp, -3.69081200_wp, & + & -64.88012400_wp, -3.19414800_wp, -1.76733000_wp, -65.34423600_wp, & + & -3.53883300_wp, -3.85496700_wp, -64.76785100_wp, -2.83915700_wp, & + & -3.24997400_wp, -63.94686700_wp, 0.11481300_wp, -6.40687200_wp, & + & -70.74126400_wp, -1.70194200_wp, -4.56359000_wp, -65.27530700_wp, & + & -1.52602500_wp, -3.43157500_wp, -65.61895900_wp, -2.03753500_wp, & + & -5.32490100_wp, -64.32756900_wp, 0.29296700_wp, -5.40195300_wp, & + & -66.20649600_wp, 0.11809300_wp, -6.23469000_wp, -65.47120900_wp, & + & 3.01573000_wp, -4.60476600_wp, -70.13456400_wp, -0.88050600_wp, & + & -4.18321100_wp, -69.65845100_wp, -0.17875500_wp, -2.36540400_wp, & + & -69.59967400_wp, -1.63265100_wp, -2.50262200_wp, -65.97588500_wp, & + & -1.26672700_wp, -4.64192700_wp, -65.72966800_wp, 0.11001400_wp, & + & -5.25418300_wp, -66.23655200_wp, 2.45188100_wp, -5.13792100_wp, & + & -65.72335600_wp, 1.30456300_wp, -3.48279700_wp, -69.27181400_wp, & + & -0.87019800_wp, -3.05718400_wp, -67.37906600_wp, -1.40641600_wp, & + & -4.38406200_wp, -67.30904400_wp, -0.47744400_wp, -2.52971300_wp, & + & -66.30701500_wp, 1.22550900_wp, -4.39950500_wp, -67.86496600_wp, & + & -0.45194000_wp, -3.42628900_wp, -68.32761100_wp, 0.98612900_wp, & + & -4.97985800_wp, -67.75023900_wp, 0.93625400_wp, -4.05624600_wp, & + & -66.91861500_wp, 5.24003100_wp, -3.66305400_wp, -73.71970300_wp, & + & 2.68619800_wp, -3.95857800_wp, -68.25425500_wp, 1.88690200_wp, & + & -3.13038100_wp, -68.59691800_wp, 3.06888400_wp, -4.69581100_wp, & + & -67.29921700_wp, 4.55643500_wp, -2.90539400_wp, -69.17848200_wp, & + & 5.11065500_wp, -3.55267300_wp, -68.43808200_wp, 5.60196200_wp, & + & -0.26631900_wp, -73.11110100_wp, 2.88870000_wp, -3.07735700_wp, & + & -72.63582900_wp, 1.88361000_wp, -1.40848600_wp, -72.58046600_wp, & + & 1.09893000_wp, -2.63926700_wp, -68.95255000_wp, 3.00337300_wp, & + & -3.66800100_wp, -68.70296800_wp, 4.33106100_wp, -2.95759100_wp, & + & -69.20449100_wp, 5.67736000_wp, -1.03740700_wp, -68.69589500_wp, & + & 3.66562600_wp, -0.92738400_wp, -72.24970500_wp, 2.00394600_wp, & + & -2.37848100_wp, -70.35609400_wp, 2.71781600_wp, -3.61926900_wp, & + & -70.28681200_wp, 1.82423800_wp, -1.74738200_wp, -69.27834800_wp, & + & 4.34301400_wp, -1.55150400_wp, -70.84252000_wp, 2.54840600_wp, & + & -2.27687400_wp, -71.29807200_wp, 4.65880600_wp, -2.09429900_wp, & + & -70.72314500_wp, 3.89742300_wp, -1.56758700_wp, -69.88105900_wp, & + & 6.22828500_wp, 2.06881500_wp, -76.68778500_wp, 4.91030000_wp, & + & -0.12062400_wp, -71.22577400_wp, 3.75228200_wp, -0.24805000_wp, & + & -71.56332300_wp, 5.71388500_wp, -0.27683400_wp, -70.26507000_wp, & + & 5.21046200_wp, 1.99632700_wp, -72.14147100_wp, 6.06650400_wp, & + & 2.03838500_wp, -71.40376800_wp, 3.77171800_wp, 4.44328300_wp, & + & -76.08021100_wp, 4.33690300_wp, 0.57930400_wp, -75.60881100_wp, & + & 2.40101300_wp, 0.81109700_wp, -75.55365800_wp, 2.89188600_wp, & + & -0.56422000_wp, -71.92120700_wp, 4.86324300_wp, 0.30394100_wp, & + & -71.66816000_wp, 5.11687300_wp, 1.78714000_wp, -72.16910000_wp, & + & 4.42965400_wp, 4.03034000_wp, -71.66553600_wp, 3.10654000_wp, & + & 2.50873700_wp, -75.22182700_wp, 3.24051000_wp, 0.30981400_wp, & + & -73.32548300_wp, 4.65284600_wp, 0.10990700_wp, -73.26069300_wp, & + & 2.62649400_wp, 0.55277800_wp, -72.24636000_wp, 4.01629100_wp, & + & 2.66067800_wp, -73.81291300_wp, 3.49062800_wp, 0.80050300_wp, & + & -74.26414900_wp, 4.64363300_wp, 2.57890200_wp, -73.69204300_wp, & + & 3.75905000_wp, 2.30140500_wp, -72.84927200_wp, 2.31626000_wp, & + & 6.37191800_wp, -79.65574200_wp, 3.25274900_wp, 3.99516900_wp, & + & -74.19667300_wp, 2.62967000_wp, 2.99644800_wp, -74.53012400_wp, & + & 3.85730700_wp, 4.52756800_wp, -73.23486200_wp, 1.74997000_wp, & + & 5.52489700_wp, -75.10924500_wp, 2.24801900_wp, 6.22835600_wp, & + & -74.38100500_wp, -1.06108300_wp, 5.89173900_wp, -79.05140300_wp, & + & 2.34680300_wp, 3.97173300_wp, -78.58408300_wp, 0.97512400_wp, & + & 2.58490400_wp, -78.52676000_wp, 2.36165100_wp, 2.12747800_wp, & + & -74.88921500_wp, 2.87735300_wp, 4.21294200_wp, -74.63896600_wp, & + & 1.86224300_wp, 5.32343500_wp, -75.14388600_wp, -0.32948800_wp, & + & 6.15878600_wp, -74.64155600_wp, 0.05822900_wp, 4.17933900_wp, & + & -78.19467700_wp, 1.88504000_wp, 2.93873100_wp, -76.29397000_wp, & + & 2.90521000_wp, 3.92983800_wp, -76.23550900_wp, 1.31059700_wp, & + & 2.60220600_wp, -75.21994000_wp, 0.49828800_wp, 4.99229900_wp, & + & -76.78551400_wp, 1.64741000_wp, 3.43732400_wp, -77.23658100_wp, & + & 0.95243100_wp, 5.43896800_wp, -76.66600300_wp, 0.62763900_wp, & + & 4.56970000_wp, -75.83195800_wp, -3.47398000_wp, 5.92948900_wp, & + & -82.63315700_wp, -1.00546700_wp, 5.21664000_wp, -77.17432900_wp, & + & -0.61331900_wp, 4.10512700_wp, -77.50608000_wp, -1.06829200_wp, & + & 6.01522800_wp, -76.21854900_wp, -3.15087400_wp, 4.96181900_wp, & + & -78.09142400_wp, -3.39690900_wp, 5.78883100_wp, -77.37117600_wp, & + & -5.16423700_wp, 2.96999300_wp, -82.03006500_wp, -1.54448100_wp, & + & 4.48654400_wp, -81.56491400_wp, -1.29351300_wp, 2.55187800_wp, & + & -81.50367500_wp, -0.08161500_wp, 3.36455100_wp, -77.86813500_wp, & + & -1.41976000_wp, 5.04913300_wp, -77.62121300_wp, -2.92126400_wp, & + & 4.92867600_wp, -78.13288600_wp, -4.92411000_wp, 3.71103700_wp, & + & -77.62687300_wp, -3.12547500_wp, 2.80227900_wp, -81.17360100_wp, & + & -1.01544500_wp, 3.48663000_wp, -79.27218500_wp, -1.17582900_wp, & + & 4.89747400_wp, -79.21583000_wp, -1.10725600_wp, 2.82477900_wp, & + & -78.20572900_wp, -3.49469100_wp, 3.64923500_wp, -79.76673200_wp, & + & -1.55783300_wp, 3.60307000_wp, -80.22232500_wp, -3.56369200_wp, & + & 4.28410700_wp, -79.64992300_wp, -3.07802200_wp, 3.49331800_wp, & + & -78.82760600_wp, -6.67172200_wp, 1.08906100_wp, -85.62270200_wp, & + & -4.57617500_wp, 2.60787600_wp, -80.16081300_wp, -3.47225900_wp, & + & 2.22918400_wp, -80.49700000_wp, -5.25806300_wp, 3.04277700_wp, & + & -79.21260800_wp, -5.70932300_wp, 0.75092000_wp, -81.08803400_wp, & + & -6.50826300_wp, 1.06657700_wp, -80.36831400_wp, -5.36982700_wp, & + & -2.05983300_wp, -85.02005700_wp, -4.33317800_wp, 1.73372100_wp, & + & -84.55168300_wp, -2.65209100_wp, 0.74372200_wp, -84.48855900_wp, & + & -2.55130900_wp, 2.19961100_wp, -80.85792300_wp, -4.71118900_wp, & + & 2.17252900_wp, -80.61482000_wp, -5.53756200_wp, 0.91393500_wp, & + & -81.13004200_wp, -5.80564900_wp, -1.41348700_wp, -80.61781200_wp, & + & -3.98487800_wp, -0.55274800_wp, -84.16043900_wp, -3.22038600_wp, & + & 1.53661500_wp, -82.26150500_wp, -4.43834600_wp, 2.27440100_wp, & + & -82.20151700_wp, -2.75903600_wp, 1.05550100_wp, -81.19829500_wp, & + & -4.87866300_wp, -0.32386100_wp, -82.75499800_wp, -3.64909600_wp, & + & 1.17807100_wp, -83.21593000_wp, -5.41719400_wp, 0.01372100_wp, & + & -82.64243400_wp, -4.49629400_wp, -0.08871900_wp, -81.82555900_wp, & + & -4.80691300_wp, -4.40186000_wp, -88.61739500_wp, -4.70221800_wp, & + & -1.80929100_wp, -83.15197000_wp, -3.73969700_wp, -1.17575300_wp, & + & -83.49326200_wp, -5.47721500_wp, -2.08611100_wp, -82.20718500_wp, & + & -3.94780100_wp, -3.85011800_wp, -84.08472000_wp, -4.68270900_wp, & + & -4.28475000_wp, -83.35802700_wp, -1.51705700_wp, -5.30659800_wp, & + & -88.01271100_wp, -3.86379000_wp, -2.15462000_wp, -87.53925500_wp, & + & -2.05183100_wp, -1.43565500_wp, -87.47660600_wp, -3.13902100_wp, & + & -0.46182100_wp, -83.85231700_wp, -4.45267800_wp, -2.18754200_wp, & + & -83.60918100_wp, -3.96716800_wp, -3.61378300_wp, -84.12195200_wp, & + & -2.29306500_wp, -5.25373100_wp, -83.60696300_wp, -1.85613500_wp, & + & -3.28730500_wp, -87.15040800_wp, -3.02813100_wp, -1.39844700_wp, & + & -85.25562600_wp, -4.36254600_wp, -1.90812400_wp, -85.18937000_wp, & + & -2.37039000_wp, -1.33112400_wp, -84.18956500_wp, -2.58429700_wp, & + & -3.85216300_wp, -85.74466700_wp, -3.01138000_wp, -1.95757300_wp, & + & -86.20930500_wp, -3.17670500_wp, -4.06745800_wp, -85.63306800_wp, & + & -2.53166800_wp, -3.40474500_wp, -84.81095100_wp, 0.68103400_wp, & + & -6.29832200_wp, -91.60593700_wp, -1.28459100_wp, -4.61658100_wp, & + & -86.13945900_wp, -1.20700900_wp, -3.47397600_wp, -86.48382800_wp, & + & -1.55478000_wp, -5.40333200_wp, -85.19111700_wp, 0.77247700_wp, & + & -5.28111300_wp, -87.07002400_wp, 0.66963200_wp, -6.12576000_wp, & + & -86.33451000_wp, 3.41779700_wp, -4.25496400_wp, -90.99904300_wp, & + & -0.49977500_wp, -4.16698400_wp, -90.52262100_wp, 0.04477800_wp, & + & -2.29668300_wp, -90.46394300_wp, -1.39200200_wp, -2.55683600_wp, & + & -86.83970700_wp, -0.84509800_wp, -4.65711600_wp, -86.59351500_wp, & + & 0.57764600_wp, -5.14976900_wp, -87.10022000_wp, 2.90124800_wp, & + & -4.83388600_wp, -86.58681700_wp, 1.61679200_wp, -3.28286900_wp, & + & -90.13555200_wp, -0.58474400_wp, -3.04421000_wp, -88.24306100_wp, & + & -1.00640500_wp, -4.41320100_wp, -88.17342200_wp, -0.23888600_wp, & + & -2.48549200_wp, -87.17069300_wp, 1.61622200_wp, -4.20385200_wp, & + & -88.72993300_wp, -0.13684000_wp, -3.37659200_wp, -89.19114800_wp, & + & 1.42802200_wp, -4.80180000_wp, -88.61446500_wp, 1.29932400_wp, & + & -3.88570400_wp, -87.78099700_wp, 5.55320500_wp, -3.12776900_wp, & + & -94.58269900_wp, 3.03611700_wp, -3.63986300_wp, -89.11781300_wp, & + & 2.16876900_wp, -2.88225400_wp, -89.46009500_wp, 3.47883400_wp, & + & -4.34166600_wp, -88.16204500_wp, 4.80892400_wp, -2.42989400_wp, & + & -90.04046700_wp, 5.41677400_wp, -3.02739200_wp, -89.30033800_wp, & + & 5.62547900_wp, 0.28831100_wp, -93.97400800_wp, 3.16284800_wp, & + & -2.74408900_wp, -93.49906100_wp, 2.01927900_wp, -1.16720300_wp, & + & -93.44416000_wp, 1.34304600_wp, -2.46008800_wp, -89.81546400_wp, & + & 3.32687100_wp, -3.32275300_wp, -89.56531500_wp, 4.58877700_wp, & + & -2.50195200_wp, -90.06715800_wp, 5.76730800_wp, -0.47346200_wp, & + & -89.55913800_wp, 3.75273200_wp, -0.53579600_wp, -93.11298900_wp, & + & 2.22158100_wp, -2.12293100_wp, -91.21911300_wp, 3.03797500_wp, & + & -3.29766100_wp, -91.15027300_wp, 1.98801000_wp, -1.50943300_wp, & + & -90.14158200_wp, 4.48112400_wp, -1.09981900_wp, -91.70507900_wp, & + & 2.75541000_wp, -1.97511200_wp, -92.16143300_wp, 4.84246700_wp, & + & -1.61406400_wp, -91.58580900_wp, 4.03893200_wp, -1.15386400_wp, & + & -90.74358800_wp, 6.05079500_wp, 2.66842400_wp, -97.55043400_wp, & + & 4.92614000_wp, 0.37472800_wp, -92.08886200_wp, 3.78189700_wp, & + & 0.14840300_wp, -92.42595900_wp, 5.73846000_wp, 0.28763200_wp, & + & -91.12758600_wp, 5.04340300_wp, 2.50930900_wp, -93.00404000_wp, & + & 5.89341400_wp, 2.62379400_wp, -92.26779700_wp, 3.40161200_wp, & + & 4.82399900_wp, -96.94348500_wp, 4.29514300_wp, 1.02378500_wp, & + & -96.47243400_wp, 2.34592900_wp, 1.08842400_wp, -96.41799800_wp, & + & 2.95186800_wp, -0.24011500_wp, -92.78343100_wp, 4.84189700_wp, & + & 0.79354600_wp, -92.53076900_wp, 4.96869200_wp, 2.29280300_wp, & + & -93.03239400_wp, 4.09227100_wp, 4.46907900_wp, -92.52882500_wp, & + & 2.90288200_wp, 2.84017400_wp, -96.08517100_wp, 3.22506000_wp, & + & 0.66026400_wp, -94.18793200_wp, 4.64900900_wp, 0.58155700_wp, & + & -94.12415300_wp, 2.59251300_wp, 0.85051600_wp, -93.10901300_wp, & + & 3.79680400_wp, 3.06918000_wp, -94.67632400_wp, 3.43225100_wp, & + & 1.17152700_wp, -95.12757600_wp, 4.42931400_wp, 3.04090800_wp, & + & -94.55485500_wp, 3.57183700_wp, 2.68863900_wp, -95.06034700_wp, & + & 2.38717500_wp, 3.28578400_wp, -95.58408800_wp, 2.63759400_wp, & + & 4.20786400_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine Amylose64 + +subroutine Amylose8(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 171 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "H", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", & + & "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", & + & "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", & + & "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", & + & "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", & + & "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", & + & "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", & + & "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", "C", "O", "H", "C", "H", & + & "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", "H", "C", "O", "H", "C", & + & "C", "O", "H", "C", "H", "H", "O", "H", "O", "H", "H", "O", "H", "H", "C", "C", & + & "H", "C", "O", "H", "C", "C", "O", "H", "C", "O", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -11.05255700_wp, 3.25827500_wp, 5.73222600_wp, -14.02612300_wp, & + & 4.19941500_wp, 1.98078200_wp, -7.75180300_wp, 4.16955100_wp, & + & 5.24670900_wp, -10.74120300_wp, 2.72371000_wp, 4.83608000_wp, & + & -11.01844100_wp, 4.57883300_wp, 3.98963400_wp, -13.23860600_wp, & + & 3.80877200_wp, 2.62501300_wp, -12.61861200_wp, 1.98289000_wp, & + & 3.17724800_wp, -12.92083800_wp, 2.12933800_wp, 1.75658400_wp, & + & -8.62889700_wp, 4.71245400_wp, 4.89256500_wp, -8.42972700_wp, & + & 3.06087300_wp, 3.64590300_wp, -6.97784500_wp, 5.98080000_wp, & + & 2.06729800_wp, -10.48011100_wp, 3.65184900_wp, 3.79400600_wp, & + & -12.40986300_wp, 2.67597100_wp, 2.41554900_wp, -10.41559800_wp, & + & 2.13267200_wp, 2.30803600_wp, -9.00677000_wp, 3.98275100_wp, & + & 3.71883800_wp, -7.31072500_wp, 4.97694500_wp, 2.33012300_wp, & + & -9.16717900_wp, 5.82374700_wp, 2.62900500_wp, -10.94059700_wp, & + & 3.03219300_wp, 2.47497400_wp, -8.71591200_wp, 4.84093400_wp, & + & 2.49843900_wp, -10.69684900_wp, 3.99308400_wp, 1.43364400_wp, & + & -9.13970800_wp, 4.92467800_wp, 0.39187200_wp, -9.30040700_wp, & + & 4.23953700_wp, 1.22392900_wp, -11.94025900_wp, 1.10960000_wp, & + & -1.84005500_wp, -6.10056900_wp, 4.80822000_wp, -0.33774800_wp, & + & -8.69677300_wp, 3.02622900_wp, 0.79294700_wp, -9.25810000_wp, & + & 3.46392600_wp, -1.13829500_wp, -11.15111800_wp, 1.51576800_wp, & + & -1.20660300_wp, -10.23659000_wp, 0.93855400_wp, 0.48169900_wp, & + & -10.43241900_wp, -0.11837600_wp, -0.50719600_wp, -7.03220300_wp, & + & 4.69992900_wp, -0.89340900_wp, -6.40124000_wp, 2.77074600_wp, & + & -0.44549400_wp, -5.41666000_wp, 3.63757000_wp, -3.82290000_wp, & + & -8.53183800_wp, 2.84927800_wp, -0.60580600_wp, -10.10021300_wp, & + & 0.82157700_wp, -0.55324700_wp, -8.03668200_wp, 0.79160800_wp, & + & -0.39791100_wp, -7.15258900_wp, 3.28087900_wp, -1.04811900_wp, & + & -5.56799700_wp, 3.15740900_wp, -2.85614000_wp, -7.57448900_wp, & + & 3.54665800_wp, -3.13439900_wp, -8.74129400_wp, 1.37021600_wp, & + & -0.92923600_wp, -6.92858700_wp, 2.93013800_wp, -2.50978100_wp, & + & -8.59958600_wp, 1.21096700_wp, -2.35039700_wp, -7.17075600_wp, & + & 1.28722700_wp, -3.87718400_wp, -7.26647300_wp, 1.47209300_wp, & + & -2.80749900_wp, -8.95293500_wp, -3.30560500_wp, -2.11552000_wp, & + & -4.11485900_wp, 1.24692400_wp, -4.54423700_wp, -6.39957200_wp, & + & 0.51499800_wp, -2.21217700_wp, -6.86081500_wp, -0.80289500_wp, & + & -3.72397900_wp, -8.32010700_wp, -2.41909000_wp, -2.09662000_wp, & + & -7.46331100_wp, -1.30295300_wp, -0.66641000_wp, -7.35859300_wp, & + & -2.74780200_wp, -0.47106800_wp, -4.95355600_wp, 0.57471700_wp, & + & -4.72644500_wp, -3.99707300_wp, -0.14433700_wp, -3.02727900_wp, & + & -2.90582300_wp, -2.00627600_wp, -5.93755400_wp, -6.07924400_wp, & + & -0.63250600_wp, -2.98472600_wp, -7.21499200_wp, -2.14117100_wp, & + & -1.25107800_wp, -5.20877300_wp, -1.64010500_wp, -1.32694700_wp, & + & -4.77694300_wp, -0.43867700_wp, -3.72886000_wp, -3.04515900_wp, & + & -1.59071200_wp, -4.93926300_wp, -5.05572700_wp, -1.95388100_wp, & + & -5.22214500_wp, -5.96289900_wp, -1.82899800_wp, -2.04054300_wp, & + & -4.35945600_wp, -1.72860700_wp, -4.41434600_wp, -5.66630200_wp, & + & -2.98598300_wp, -2.83878100_wp, -4.14957600_wp, -3.83032900_wp, & + & -4.00771100_wp, -4.37540900_wp, -2.91658600_wp, -3.45728400_wp, & + & -5.14225200_wp, -5.64696600_wp, 0.79770700_wp, -1.09867500_wp, & + & -3.77264900_wp, -4.69580000_wp, -3.39374700_wp, -2.88144500_wp, & + & -2.42896800_wp, -3.44988600_wp, -4.93667600_wp, -2.34187500_wp, & + & -4.70006000_wp, -4.96600000_wp, 0.07065300_wp, -4.21180300_wp, & + & -3.02111400_wp, 0.04781100_wp, -3.84244000_wp, -3.73689600_wp, & + & 1.26615600_wp, -1.76880800_wp, -4.48737300_wp, -4.21751100_wp, & + & -0.84538300_wp, -3.44345300_wp, -2.67591300_wp, 0.84685500_wp, & + & -6.60087100_wp, -3.21253900_wp, -2.78517400_wp, -4.11403000_wp, & + & -2.07583600_wp, -3.75136300_wp, -3.93424200_wp, 0.29232400_wp, & + & -1.88568100_wp, -3.29573400_wp, -0.33209300_wp, -1.48584700_wp, & + & -4.31221800_wp, -2.82358300_wp, 0.54012800_wp, -5.60878500_wp, & + & -2.88115200_wp, -1.32564000_wp, -6.43859600_wp, -2.59053900_wp, & + & -2.52058900_wp, -4.10309300_wp, -0.57089100_wp, -0.76291300_wp, & + & -5.54724000_wp, -2.31396000_wp, -1.93169700_wp, -5.36755000_wp, & + & -0.22253800_wp, -0.18011700_wp, -6.48617600_wp, -0.46836800_wp, & + & -0.62936900_wp, -5.54710100_wp, -0.79453000_wp, -1.21992400_wp, & + & -4.11693500_wp, 4.07975300_wp, 2.84786600_wp, -6.38527200_wp, & + & -1.24403900_wp, 0.22978700_wp, -4.54866100_wp, -0.26060100_wp, & + & 0.57349700_wp, -5.75449000_wp, 1.37132800_wp, -0.85739900_wp, & + & -4.16935600_wp, 3.05306900_wp, -0.76212800_wp, -2.89792900_wp, & + & 1.50388300_wp, -0.36859700_wp, -2.33350600_wp, 2.79280800_wp, & + & 2.29229400_wp, -6.58828400_wp, -0.32857100_wp, 2.85044800_wp, & + & -4.58833900_wp, -0.23287300_wp, 5.17283800_wp, -6.60996500_wp, & + & 1.67649700_wp, 1.03509600_wp, -4.91778000_wp, 0.84855400_wp, & + & -0.15527200_wp, -3.18274200_wp, 2.31421000_wp, 1.59756500_wp, & + & -2.90613800_wp, 1.24918900_wp, 2.41016700_wp, -5.35938300_wp, & + & 0.39903100_wp, 4.64872400_wp, -5.80645800_wp, 1.15869500_wp, & + & 2.96459300_wp, -6.45563400_wp, 2.15741700_wp, 1.15732400_wp, & + & -3.70732100_wp, 1.77454500_wp, 3.31415300_wp, -5.58704900_wp, & + & 1.59807600_wp, 1.95031600_wp, -4.10293500_wp, 2.90668500_wp, & + & 3.90294400_wp, -4.63818600_wp, 3.43572500_wp, 3.30812900_wp, & + & -4.39839800_wp, 2.55467500_wp, 2.01529000_wp, 0.09419300_wp, & + & 4.62516700_wp, 6.90854600_wp, -4.58346400_wp, 2.57433800_wp, & + & 3.90358100_wp, -3.21038100_wp, 2.04945100_wp, 4.32971300_wp, & + & -2.63549500_wp, 3.97825200_wp, 2.47024100_wp, -0.65338900_wp, & + & 3.97530200_wp, 2.45161200_wp, -1.03933200_wp, 2.00731200_wp, & + & 2.60890500_wp, 0.36988500_wp, 2.35997700_wp, 6.32505000_wp, & + & -4.11487800_wp, 3.36650100_wp, 6.46707400_wp, -2.70567500_wp, & + & 1.84508100_wp, 8.96271000_wp, -2.03505900_wp, 4.38502500_wp, & + & 4.66364400_wp, -2.43169600_wp, 2.96049800_wp, 3.02824600_wp, & + & -0.47610600_wp, 2.68299800_wp, 4.77920900_wp, -0.78194700_wp, & + & 1.62473000_wp, 6.13178500_wp, -2.78057300_wp, 2.88008400_wp, & + & 8.33774600_wp, -2.03955800_wp, 3.49146000_wp, 6.73210400_wp, & + & -2.00016300_wp, 4.78490000_wp, 4.46054900_wp, -0.95660300_wp, & + & 2.61478100_wp, 6.95292700_wp, -1.82798700_wp, 3.73199500_wp, & + & 5.21248000_wp, -0.18018200_wp, 3.56227900_wp, 7.17626900_wp, & + & 0.27505200_wp, 4.12147000_wp, 6.62693500_wp, -0.36729300_wp, & + & 3.43329900_wp, 4.29454400_wp, 3.72464900_wp, 1.44331800_wp, & + & 10.17749700_wp, 0.23302400_wp, 3.24097300_wp, 7.01919800_wp, & + & 0.09114300_wp, 2.14545900_wp, 7.14925000_wp, 2.00298100_wp, & + & 2.89525800_wp, 4.94378900_wp, 2.85741500_wp, 1.55689800_wp, & + & 5.17710500_wp, 1.11016700_wp, 0.59858900_wp, 5.02155600_wp, & + & 2.27632000_wp, -0.26805300_wp, 9.44384900_wp, 1.01344600_wp, & + & 3.44378600_wp, 9.44111600_wp, 0.74302500_wp, 1.38336700_wp, & + & 11.51800600_wp, 3.58062100_wp, 2.25110200_wp, 7.52602400_wp, & + & 1.41399800_wp, 2.05954200_wp, 5.56863400_wp, 2.08487300_wp, & + & 0.54411800_wp, 7.43335500_wp, 1.42664900_wp, -0.06508500_wp, & + & 9.03561300_wp, 1.42237600_wp, 2.13313400_wp, 10.98949700_wp, & + & 2.77314400_wp, 1.74375800_wp, 9.29796600_wp, 3.47630000_wp, & + & 2.69368500_wp, 7.06836400_wp, 2.01527700_wp, 0.73033200_wp, & + & 9.57312100_wp, 2.81911100_wp, 1.86903100_wp, 7.56414800_wp, & + & 3.36311600_wp, 0.66890700_wp, 9.34255000_wp, 4.45123800_wp, & + & 0.48831100_wp, 8.99481500_wp, 3.42397100_wp, 0.59389300_wp, & + & 6.08747800_wp, 3.96095200_wp, -3.57822400_wp, 12.35917200_wp, & + & 4.33353400_wp, -0.32838000_wp, 9.40175800_wp, 2.79610500_wp, & + & -0.61482600_wp, 9.08554800_wp, 4.56847300_wp, -1.61139400_wp, & + & 6.88307500_wp, 3.64120600_wp, -2.90545600_wp, 7.54039900_wp, & + & 1.88067500_wp, -2.20372300_wp, 7.23631500_wp, 1.90303800_wp, & + & -3.63289300_wp, 11.47103900_wp, 4.82610300_wp, -0.72553200_wp, & + & 11.70534500_wp, 3.08240600_wp, -1.83192300_wp, 13.09738600_wp, & + & 5.89117800_wp, -3.64794200_wp, 9.64372100_wp, 3.63964100_wp, & + & -1.73077900_wp, 7.73582500_wp, 2.51248600_wp, -3.02108600_wp, & + & 9.74036800_wp, 2.00437700_wp, -3.08587900_wp, 11.10853700_wp, & + & 3.99449200_wp, -1.83450800_wp, 12.78409700_wp, 4.90544500_wp, & + & -3.30269800_wp, 10.91032600_wp, 5.73591100_wp, -3.07151700_wp, & + & 9.19706300_wp, 2.90398200_wp, -2.99330300_wp, 11.38213700_wp, & + & 4.75391100_wp, -3.12178800_wp, 9.42062800_wp, 3.77963100_wp, & + & -4.11037900_wp, 10.95778800_wp, 4.65516800_wp, -5.22834500_wp, & + & 10.81199900_wp, 4.03744200_wp, -4.34147900_wp, 11.44067100_wp, & + & 2.80597400_wp, -4.67160300_wp, 11.34711900_wp, 2.11434000_wp, & + & -3.83506500_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine Amylose8 + +end module mstore_amylose diff --git a/src/mstore/large.f90 b/src/mstore/large.f90 deleted file mode 100644 index 354f33e..0000000 --- a/src/mstore/large.f90 +++ /dev/null @@ -1,1433 +0,0 @@ -module mstore_large - use mctc_env_accuracy, only : wp - use mctc_io_structure, only : structure_type, new - use mstore_data_record, only : record_type, new_record - implicit none - private - public :: get_large_records -contains -subroutine get_large_records(records) - type(record_type), allocatable, intent(out) :: records(:) - records = [ & - new_record('hs13l_12alcb', hs13l_12alcb), & - new_record('hs13l_6ab', hs13l_6ab), & - new_record('lnci16_brcap', lnci16_brcap), & - new_record('lnci16_dna', lnci16_dna) & - ] -end subroutine get_large_records - -subroutine hs13l_12alcb(self) - type(structure_type), intent(out) :: self - integer, parameter :: nat = 165 - character(len=*), parameter :: sym(nat) = [ character(len=4) :: & - & "C", "C", "C", "C", "H", "C", "C", "H", "H", "O", "H", "H", "O", "O", "C", "H", & - & "O", "C", "C", "H", "H", "O", "H", "C", "C", "C", "O", "H", "H", "H", "O", "H", & - & "O", "C", "C", "C", "C", "H", "C", "C", "H", "H", "O", "H", "O", "H", "O", "C", & - & "C", "C", "H", "C", "C", "C", "O", "H", "H", "H", "H", "O", "H", "O", "C", "C", & - & "C", "C", "H", "C", "C", "H", "O", "H", "H", "H", "O", "O", "C", "H", "O", "C", & - & "C", "H", "C", "C", "H", "O", "H", "O", "H", "H", "O", "C", "H", "O", "H", "H", & - & "H", "H", "O", "H", "H", "O", "H", "H", "O", "H", "O", "H", "H", "H", "H", "O", & - & "H", "O", "H", "H", "H", "H", "H", "H", "O", "H", "H", "O", "H", "H", "H", "C", & - & "C", "C", "C", "C", "C", "N", "N", "C", "C", "C", "C", "C", "C", "H", "H", "As", & - & "O", "O", "O", "H", "H", "H", "H", "H", "O", "H", "C", "H", "H", "C", "C", "H", & - & "H", "H", "H", "H", "Na" ] - real(wp), parameter :: xyz(3, nat) = reshape([ & - & -0.61480950_wp, 4.96219740_wp, -0.99796760_wp, -1.61281410_wp, & - & 4.84983600_wp, 0.15599380_wp, -2.19799670_wp, 3.44115060_wp, & - & 0.19570670_wp, -2.77282610_wp, 3.04787580_wp, -1.15647920_wp, & - & -3.69168060_wp, 3.61953370_wp, -1.34833980_wp, -1.75562830_wp, & - & 3.29020970_wp, -2.27756450_wp, -2.32241500_wp, 3.09140960_wp, & - & -3.66897950_wp, -1.52935540_wp, 3.30086670_wp, -4.40084560_wp, & - & -2.62494270_wp, 2.04608680_wp, -3.78094670_wp, -3.48201020_wp, & - & 3.88782210_wp, -3.93496510_wp, -3.21211550_wp, 4.81536860_wp, & - & -3.90655480_wp, -0.92118720_wp, 2.58289160_wp, -2.15482890_wp, & - & -1.26089120_wp, 4.64596800_wp, -2.22010590_wp, -3.05680090_wp, & - & 1.64559400_wp, -1.07998780_wp, -4.31380730_wp, 1.14732730_wp, & - & -1.50000780_wp, -4.99411810_wp, 1.96279690_wp, -1.77377430_wp, & - & -4.18083900_wp, 0.33958450_wp, -2.65815570_wp, -3.26047730_wp, & - & -0.76198570_wp, -2.49625410_wp, -3.21203470_wp, -1.48152790_wp, & - & -3.82912280_wp, -2.44360460_wp, -2.25811430_wp, -3.78671880_wp, & - & -2.92628740_wp, -0.75664410_wp, -4.60487970_wp, -4.43970730_wp, & - & -2.13336340_wp, -4.17073590_wp, -5.12022270_wp, -1.45082010_wp, & - & -4.24430160_wp, -3.69530970_wp, -1.65452260_wp, -1.32905510_wp, & - & -3.91701980_wp, -0.84230890_wp, -0.06073570_wp, -4.87571040_wp, & - & 0.31374070_wp, -0.34664530_wp, -5.10694350_wp, 1.12373050_wp, & - & 0.80078510_wp, -4.31828980_wp, 1.68380380_wp, 0.94464450_wp, & - & -5.85037330_wp, -0.08851440_wp, -0.65038750_wp, -2.95073430_wp, & - & -0.42981120_wp, 0.26772360_wp, -4.42408410_wp, -1.72513870_wp, & - & 0.94273780_wp, -4.22036990_wp, -1.33471120_wp, 1.82239030_wp, & - & -2.64364510_wp, -2.58664950_wp, -1.04992180_wp, -2.86288570_wp, & - & -3.96725100_wp, -1.25759770_wp, -2.32435800_wp, -4.69063650_wp, & - & -0.02311410_wp, -0.82516540_wp, -4.43263570_wp, 0.08740530_wp, & - & -0.11282580_wp, -4.82116720_wp, -1.19824020_wp, -0.11032200_wp, & - & -5.91490640_wp, -1.30438230_wp, -0.77542870_wp, -4.16992890_wp, & - & -2.41561190_wp, -0.23004470_wp, -4.66606090_wp, -3.73931650_wp, & - & -0.78754900_wp, -4.17706230_wp, -4.55096690_wp, 0.82074930_wp, & - & -4.37259290_wp, -3.82055340_wp, -0.27186060_wp, -6.08991400_wp, & - & -3.87945720_wp, -1.20047530_wp, -6.35734170_wp, -3.87291250_wp, & - & -2.19469170_wp, -4.43583270_wp, -2.41930090_wp, -0.60134770_wp, & - & -3.08377100_wp, -2.36787070_wp, 1.22630800_wp, -4.32081830_wp, & - & -1.08893830_wp, 2.32889410_wp, -5.18618940_wp, -1.27588010_wp, & - & 3.27011670_wp, -4.95162450_wp, -0.09191460_wp, 3.75406480_wp, & - & -3.50788350_wp, -0.13054220_wp, 2.87915820_wp, -2.85473450_wp, & - & -0.00654730_wp, 4.39822940_wp, -3.19241030_wp, -1.47399370_wp, & - & 3.44480940_wp, -3.54210940_wp, -2.62196110_wp, 4.05756530_wp, & - & -3.41467700_wp, -4.00237030_wp, 5.25172210_wp, -4.18481500_wp, & - & -4.17313630_wp, 5.00778810_wp, -5.11819080_wp, -4.11682040_wp, & - & 4.32514580_wp, -2.36761670_wp, -4.17724850_wp, 3.30025230_wp, & - & -3.69987500_wp, -4.74641790_wp, 2.57794530_wp, -2.86404220_wp, & - & -2.57824180_wp, 3.00257940_wp, -4.91310070_wp, -2.49136810_wp, & - & 5.33861640_wp, -3.75161750_wp, -1.57239780_wp, 4.65721420_wp, & - & -1.77931810_wp, -1.46709960_wp, 5.87330530_wp, -1.30906780_wp, & - & -2.04121220_wp, 6.72265960_wp, -0.65378470_wp, -0.95622610_wp, & - & 5.99769360_wp, 0.55636530_wp, -0.37229140_wp, 5.46003710_wp, & - & 1.50384990_wp, -1.44125770_wp, 6.27835070_wp, 2.14493430_wp, & - & -1.80237350_wp, 4.81449210_wp, 0.76191930_wp, -2.62098470_wp, & - & 4.67717990_wp, 1.64393540_wp, -3.84489170_wp, 5.67993340_wp, & - & 1.90684170_wp, -4.21473890_wp, 3.90249210_wp, 1.01817280_wp, & - & -4.87348200_wp, 4.37690700_wp, 0.22124310_wp, -5.14658070_wp, & - & 4.15848890_wp, 2.56545280_wp, -3.57369930_wp, 3.82020350_wp, & - & 0.40835230_wp, -2.31410550_wp, 5.60977760_wp, -0.36236430_wp, & - & -3.05376100_wp, 4.43688480_wp, 2.30274970_wp, -0.81702340_wp, & - & 4.57801920_wp, 3.70189290_wp, -0.78375540_wp, 5.63307220_wp, & - & 3.99474890_wp, -0.85167600_wp, 3.93718430_wp, 4.33845830_wp, & - & -1.88742530_wp, 2.52586810_wp, 4.05024570_wp, -1.98545830_wp, & - & 1.79900460_wp, 4.54391970_wp, -0.73034870_wp, 1.81582010_wp, & - & 5.64173850_wp, -0.68706550_wp, 2.44497850_wp, 3.97023200_wp, & - & 0.51665840_wp, 3.95257310_wp, 4.20709150_wp, 0.52213320_wp, & - & 4.14263320_wp, 5.28738430_wp, 0.57066200_wp, 4.56145070_wp, & - & 3.62645530_wp, 1.66629390_wp, 4.22151670_wp, 2.70548400_wp, & - & 1.75878190_wp, 1.82568740_wp, 4.59112720_wp, 1.65278690_wp, & - & 2.13011500_wp, 4.12351230_wp, 2.44342090_wp, 2.24836410_wp, & - & 2.88614140_wp, 0.53669100_wp, 0.44728800_wp, 4.06263500_wp, & - & -0.73785320_wp, 2.03236170_wp, 4.69247220_wp, -3.26666430_wp, & - & 0.98613090_wp, 4.41245940_wp, -3.41987240_wp, 2.07818890_wp, & - & 6.12334360_wp, -3.24443680_wp, 3.00639560_wp, 6.38465330_wp, & - & -3.18186010_wp, 2.62046420_wp, 4.29768950_wp, -4.10743510_wp, & - & 2.37122440_wp, 2.96284600_wp, -2.07545350_wp, 5.14402800_wp, & - & 0.19197750_wp, 0.21759100_wp, 6.86379820_wp, 1.31989000_wp, & - & 0.47576040_wp, 7.02290910_wp, 0.79675840_wp, 1.27291930_wp, & - & 7.66374140_wp, -0.33076150_wp, -1.41818930_wp, 7.07044800_wp, & - & -1.58923280_wp, 0.06418010_wp, 6.25180200_wp, -2.03436750_wp, & - & 0.35319040_wp, 6.41656830_wp, -2.13227600_wp, -2.52010270_wp, & - & 4.67182470_wp, -3.25812340_wp, 0.94355520_wp, 4.33987880_wp, & - & -2.43563710_wp, 1.38941770_wp, 2.60960000_wp, -5.23936470_wp, & - & 1.14910850_wp, 1.64059790_wp, -5.11914050_wp, 1.03217230_wp, & - & 4.12267700_wp, -5.63695090_wp, -0.17502760_wp, 2.00924670_wp, & - & -6.23376310_wp, -1.33273090_wp, -0.65671670_wp, -3.36177500_wp, & - & 0.27303720_wp, -0.23778230_wp, -5.19925320_wp, 1.15125460_wp, & - & -0.49879670_wp, -4.78799790_wp, 1.98730760_wp, -3.01475240_wp, & - & -4.28757690_wp, 1.15678770_wp, -3.25892220_wp, -3.34454120_wp, & - & 1.06027600_wp, -2.49799790_wp, -5.76691280_wp, -0.15008670_wp, & - & -3.92715200_wp, -4.18143500_wp, -1.41392140_wp, -4.62090830_wp, & - & -2.18842720_wp, -1.58631060_wp, -2.25062020_wp, -0.37580660_wp, & - & -2.28807940_wp, -1.40096470_wp, 2.72750580_wp, 0.45771940_wp, & - & -3.25832430_wp, 3.34690840_wp, 1.15797100_wp, -2.86567860_wp, & - & 3.44327630_wp, 2.03684960_wp, -2.42109410_wp, 5.57079030_wp, & - & -0.01973980_wp, -1.01065480_wp, 5.20062910_wp, 1.39866160_wp, & - & -0.13826950_wp, 4.76171950_wp, 1.45051740_wp, -0.24582090_wp, & - & 5.98942590_wp, -1.10414820_wp, -4.92646070_wp, 1.61334710_wp, & - & 5.11570260_wp, -5.63661710_wp, 0.81350050_wp, 4.93171420_wp, & - & -6.89151690_wp, 0.88298210_wp, 5.50903450_wp, -7.79718070_wp, & - & -0.17307820_wp, 5.25622570_wp, -7.44264110_wp, -1.25792610_wp, & - & 4.45141550_wp, -6.18357600_wp, -1.30577840_wp, 3.88202400_wp, & - & -5.26721600_wp, -0.27138240_wp, 4.11588140_wp, -4.01452110_wp, & - & -0.42392050_wp, 3.50936410_wp, -3.16091390_wp, 0.47412550_wp, & - & 3.74805870_wp, -1.88417840_wp, 0.26292120_wp, 3.18794410_wp, & - & -1.03985580_wp, 1.37982000_wp, 3.18387590_wp, 0.27282550_wp, & - & 1.26403350_wp, 2.74796450_wp, 0.75349970_wp, 0.02308020_wp, & - & 2.33434140_wp, -0.08647070_wp, -1.09624400_wp, 2.32929350_wp, & - & -1.40363260_wp, -0.98100450_wp, 2.74498220_wp, -2.04507730_wp, & - & -1.85649900_wp, 2.76740200_wp, 0.29556130_wp, -2.06709910_wp, & - & 2.02151520_wp, 2.60829720_wp, -0.16810000_wp, 1.85163040_wp, & - & 3.50317450_wp, 1.16958250_wp, 2.28219780_wp, 3.23757870_wp, & - & -1.61295920_wp, 2.43263820_wp, 2.41961420_wp, -0.28487200_wp, & - & 0.07706340_wp, 3.22383240_wp, -0.65121800_wp, -0.33487910_wp, & - & 0.92453190_wp, 2.13314150_wp, 2.75348980_wp, -1.42041450_wp, & - & 2.33228530_wp, 3.54256070_wp, -5.89333300_wp, -2.14963120_wp, & - & 3.26311300_wp, -8.15884610_wp, -2.05800550_wp, 4.28297070_wp, & - & -9.02313350_wp, -0.08780330_wp, 5.83904350_wp, -9.54989150_wp, & - & -0.86725450_wp, 5.60675160_wp, -7.30160720_wp, 2.05845890_wp, & - & 6.35051710_wp, -7.87623430_wp, 1.71472470_wp, 7.21929350_wp, & - & -6.40053870_wp, 2.55354950_wp, 6.73073550_wp, -8.14064630_wp, & - & 3.08031990_wp, 5.56644740_wp, -8.58226080_wp, 4.24401430_wp, & - & 6.44719220_wp, -7.71692510_wp, 4.76896850_wp, 6.86837100_wp, & - & -9.19792270_wp, 3.89059180_wp, 7.28245690_wp, -9.17183720_wp, & - & 4.97106340_wp, 5.87890730_wp, -9.01886310_wp, 2.58099410_wp, & - & 5.13872230_wp, -7.54483400_wp, 3.45041410_wp, 4.72210300_wp, & - & 3.18228530_wp, -3.80592780_wp, 2.86368570_wp & - & ], & - & shape(xyz)) - call new(self, sym, xyz) -end subroutine hs13l_12alcb - -subroutine hs13l_6ab(self) - type(structure_type), intent(out) :: self - integer, parameter :: nat = 234 - character(len=*), parameter :: sym(nat) = [ character(len=4) :: & - & "C", "C", "C", "C", "C", "C", "H", "O", "C", "C", "C", "C", "C", "C", "H", "H", & - & "H", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "O", "C", "C", "C", & - & "C", "C", "C", "H", "C", "O", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "O", "H", "O", "C", "C", "C", "C", "C", "C", "H", "C", "C", "C", & - & "C", "C", "C", "H", "H", "H", "O", "H", "C", "C", "C", "C", "C", "C", "H", "O", & - & "H", "H", "H", "H", "O", "C", "C", "C", "C", "C", "C", "C", "H", "C", "C", "C", & - & "C", "C", "C", "C", "O", "C", "O", "H", "H", "O", "C", "O", "H", "C", "H", "C", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "C", "H", "H", "C", "H", "C", "C", "H", "H", "H", "C", "H", "H", "C", "H", & - & "H", "C", "C", "C", "O", "O", "H", "O", "O", "H", "H", "H", "C", "C", "H", "C", & - & "H", "C", "H", "C", "H", "C", "H", "H", "H", "C", "C", "H", "C", "H", "C", "H", & - & "C", "H", "C", "H", "H", "H", "C", "C", "H", "C", "H", "C", "H", "C", "H", "C", & - & "H", "H", "H", "C", "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", "H", "H", & - & "C", "C", "C", "H", "H", "C", "C", "H", "H", "C", "H", "C", "H", "H", "H", "C", & - & "H", "H", "C", "H", "H", "H", "H", "H", "C", "I" ] - real(wp), parameter :: xyz(3, nat) = reshape([ & - & -2.06305600_wp, -4.21975850_wp, 1.96098110_wp, -1.03112390_wp, & - & -4.95620000_wp, 2.53959670_wp, -1.11837360_wp, -5.27787100_wp, & - & 3.89355060_wp, -2.20374110_wp, -4.88175390_wp, 4.66643580_wp, & - & -3.21418220_wp, -4.13929260_wp, 4.06305960_wp, -3.15968280_wp, & - & -3.79955090_wp, 2.71304340_wp, -3.94244860_wp, -3.20745050_wp, & - & 2.25641320_wp, -4.23773280_wp, -3.75711640_wp, 4.89598470_wp, & - & -5.22501730_wp, -2.90726470_wp, 4.41221370_wp, -5.15098520_wp, & - & -1.56147850_wp, 4.74883280_wp, -6.20347160_wp, -0.73360030_wp, & - & 4.37389380_wp, -7.29796030_wp, -1.21659980_wp, 3.66939370_wp, & - & -7.33663780_wp, -2.56835760_wp, 3.33406560_wp, -6.30431000_wp, & - & -3.42502340_wp, 3.70512270_wp, -6.33569250_wp, -4.48239740_wp, & - & 3.46001220_wp, -8.18843740_wp, -2.96063660_wp, 2.78619240_wp, & - & -8.10524200_wp, -0.54464420_wp, 3.39409550_wp, -5.52079590_wp, & - & 1.50811140_wp, 4.01006870_wp, -5.10997590_wp, 1.22799790_wp, & - & 2.70920300_wp, -4.45809630_wp, 2.22330360_wp, 1.98288340_wp, & - & -4.19945290_wp, 3.46879350_wp, 2.54687590_wp, -4.62310540_wp, & - & 3.71508370_wp, 3.85143760_wp, -3.35308270_wp, 5.70350460_wp, & - & 4.05283600_wp, -3.56816450_wp, 6.89089580_wp, 3.36630380_wp, & - & -2.47372680_wp, 7.69559730_wp, 3.05393180_wp, -1.18630920_wp, & - & 7.32801080_wp, 3.43176970_wp, -1.00812740_wp, 6.13540400_wp, & - & 4.12536530_wp, -2.07534910_wp, 5.30264020_wp, 4.43446920_wp, & - & 0.24231030_wp, 5.81193970_wp, 4.63812970_wp, 1.18211020_wp, & - & 5.23197080_wp, 3.82216410_wp, 2.37910940_wp, 4.89569620_wp, & - & 4.44564470_wp, 3.36580770_wp, 4.26535600_wp, 3.69623500_wp, & - & 3.18033580_wp, 3.97301230_wp, 2.34578550_wp, 1.97278410_wp, & - & 4.32822360_wp, 1.74633630_wp, 0.96351100_wp, 4.95957230_wp, & - & 2.47304640_wp, 0.02223920_wp, 5.21290250_wp, 2.00214540_wp, & - & 1.65357230_wp, 3.80198760_wp, 0.36706320_wp, 0.72248140_wp, & - & 4.65827610_wp, -0.29120330_wp, -0.30008660_wp, 3.96013400_wp, & - & -0.92302820_wp, -1.53013460_wp, 3.91102310_wp, -0.28492950_wp, & - & -2.55472020_wp, 3.15761540_wp, -0.83931340_wp, -2.38565050_wp, & - & 2.45917400_wp, -2.03656990_wp, -1.13723550_wp, 2.54285040_wp, & - & -2.65616960_wp, -0.08137240_wp, 3.29198750_wp, -2.13225780_wp, & - & 1.28199140_wp, 3.34651980_wp, -2.80344210_wp, 2.15690180_wp, & - & 2.23136230_wp, -2.25126090_wp, 2.20209630_wp, 0.96029880_wp, & - & -2.83058510_wp, 2.95548310_wp, -0.08805060_wp, -2.29776520_wp, & - & 3.68200050_wp, 0.17259210_wp, -1.13046900_wp, 3.66744940_wp, & - & 1.42297470_wp, -0.53080860_wp, 2.89569130_wp, 2.43504970_wp, & - & -1.08243290_wp, 2.84434280_wp, 3.64589870_wp, -0.40035020_wp, & - & 4.22496370_wp, 1.59364990_wp, 0.38549610_wp, 4.42437140_wp, & - & -0.82112150_wp, -0.50620810_wp, 3.63928630_wp, -1.73209700_wp, & - & 0.25692040_wp, 4.32711190_wp, -2.03276810_wp, 1.56649370_wp, & - & 4.05076680_wp, -3.23255020_wp, 2.21942980_wp, 4.58993720_wp, & - & -3.44400020_wp, 3.48638230_wp, 5.63404210_wp, -1.29521180_wp, & - & 3.43499970_wp, 5.11003780_wp, -1.05011640_wp, 2.16713760_wp, & - & 5.31466500_wp, -0.11898510_wp, 1.65354390_wp, 6.41856020_wp, & - & 0.93195560_wp, 3.66682500_wp, 5.39904030_wp, 1.75653660_wp, & - & 4.13091250_wp, 5.44858340_wp, 3.10613540_wp, 3.80434460_wp, & - & 6.46810230_wp, 3.63119560_wp, 3.01860470_wp, 7.46675050_wp, & - & 2.77788500_wp, 2.55799620_wp, 7.45368130_wp, 1.42296910_wp, & - & 2.88224560_wp, 8.23700970_wp, 0.75404430_wp, 2.53904650_wp, & - & 8.27269210_wp, 3.17496880_wp, 1.94775010_wp, 6.48194900_wp, & - & 4.69168730_wp, 2.78579530_wp, 4.51483990_wp, 3.95718730_wp, & - & 4.38391640_wp, 4.60489160_wp, 1.36310260_wp, 4.75914270_wp, & - & 3.36819490_wp, -5.45967030_wp, 3.78850750_wp, 3.66558230_wp, & - & -6.56281380_wp, 2.99882670_wp, 2.64824590_wp, -7.46478340_wp, & - & 2.69539300_wp, 1.35650100_wp, -7.27367010_wp, 3.17865860_wp, & - & 1.09389480_wp, -6.15797000_wp, 3.96437320_wp, 2.08506910_wp, & - & -5.23409580_wp, 4.27405500_wp, 1.87149420_wp, -4.37743940_wp, & - & 4.90641130_wp, -0.15654360_wp, -6.00619610_wp, 4.55317520_wp, & - & 0.56333150_wp, -7.98211610_wp, 2.95940060_wp, 2.86824190_wp, & - & -8.33443320_wp, 2.08327430_wp, 4.67786970_wp, -6.71385350_wp, & - & 2.63629760_wp, 3.43604560_wp, -3.98750340_wp, 1.74548190_wp, & - & 3.42061060_wp, -2.94234850_wp, -0.46159160_wp, 2.16828350_wp, & - & -3.01811290_wp, -1.05501440_wp, 1.20218750_wp, -3.76973440_wp, & - & -0.40326610_wp, -0.08140670_wp, -3.82630210_wp, -0.92502660_wp, & - & -0.41630300_wp, -3.16639150_wp, -2.11046010_wp, 0.58531540_wp, & - & -2.42344620_wp, -2.73981670_wp, 1.88613030_wp, -2.33212880_wp, & - & -2.24054600_wp, 2.96166110_wp, -1.48319970_wp, -2.90315350_wp, & - & 0.33969510_wp, -1.89445520_wp, -3.65632220_wp, -1.84425900_wp, & - & -3.22034260_wp, -2.63384420_wp, -2.65330480_wp, -2.10258050_wp, & - & -1.99337460_wp, -2.76248660_wp, -0.83535520_wp, -2.57161070_wp, & - & -3.45682850_wp, 0.21761090_wp, -1.97037190_wp, -4.05842740_wp, & - & -0.03361140_wp, -0.73231510_wp, -3.97920470_wp, -1.28154220_wp, & - & -0.13156060_wp, -3.26706970_wp, -2.29786130_wp, -0.75164060_wp, & - & -3.15340770_wp, -3.50438890_wp, -0.06955770_wp, -1.88743010_wp, & - & -3.67230810_wp, 0.56478450_wp, -1.03865230_wp, -4.52385510_wp, & - & -0.19902710_wp, -1.40880950_wp, -2.68237480_wp, 0.64305580_wp, & - & -4.43959030_wp, -1.44836900_wp, 0.83770870_wp, -4.74025000_wp, & - & 0.96014530_wp, -0.04158460_wp, -3.89215340_wp, 1.89251070_wp, & - & 0.62346060_wp, -3.74916300_wp, 3.08789920_wp, -0.13729050_wp, & - & -2.89812070_wp, 1.43384090_wp, 0.75038070_wp, -3.51953560_wp, & - & 1.60627590_wp, -2.58937470_wp, -2.27716100_wp, -0.65624640_wp, & - & -3.52578870_wp, -1.93567690_wp, -3.23125000_wp, -4.16452450_wp, & - & -2.27362370_wp, -4.16260570_wp, -2.27142250_wp, 1.43911680_wp, & - & -4.27208540_wp, 0.53021420_wp, 2.66242270_wp, -1.26560980_wp, & - & 0.46662300_wp, 1.61768150_wp, 0.77770410_wp, -3.72755990_wp, & - & -0.97790500_wp, 1.99901790_wp, -3.58214080_wp, -1.67946250_wp, & - & 4.42232710_wp, 0.66140030_wp, 1.18560210_wp, 2.81080130_wp, & - & 0.48433540_wp, 3.94769840_wp, 3.46388720_wp, 1.77638840_wp, & - & 2.53117190_wp, 5.10049250_wp, 5.50059400_wp, -0.33147970_wp, & - & 7.95932440_wp, 3.20846510_wp, -2.62987890_wp, 8.62749640_wp, & - & 2.51833520_wp, -4.57627850_wp, 7.17970580_wp, 3.08551950_wp, & - & -3.68905730_wp, 4.23702490_wp, 1.97900720_wp, -5.29954830_wp, & - & 0.25895470_wp, 2.26441700_wp, -2.25158240_wp, -5.12571310_wp, & - & 5.72292860_wp, -0.17517530_wp, -5.26208820_wp, 1.95131910_wp, & - & -2.99702580_wp, -3.23002830_wp, -4.44487490_wp, -1.25120890_wp, & - & -4.45891300_wp, -4.78339560_wp, -1.49953160_wp, -2.32483280_wp, & - & -4.59938070_wp, -4.45311710_wp, 2.06276520_wp, -2.23712610_wp, & - & -3.56183800_wp, 1.57703410_wp, -4.12157690_wp, 1.74572220_wp, & - & 4.29213280_wp, -2.49634610_wp, 1.17986630_wp, 3.35254010_wp, & - & -4.33295060_wp, 2.88624170_wp, -1.47693010_wp, -4.43537520_wp, & - & 3.92182610_wp, -1.93388100_wp, -2.62425120_wp, -4.36878300_wp, & - & 0.90109670_wp, -4.43287230_wp, -2.63579460_wp, 1.16372840_wp, & - & -4.53719190_wp, -3.80107580_wp, 2.96501450_wp, -4.73347270_wp, & - & 0.48247170_wp, 4.14851780_wp, -4.62497630_wp, 0.75313520_wp, & - & 2.41508790_wp, -4.70725520_wp, 2.52884960_wp, 3.59096390_wp, & - & -5.02586030_wp, 3.67861800_wp, -0.81506540_wp, -4.80848230_wp, & - & 1.93719810_wp, -1.05822470_wp, -4.78868880_wp, 3.06493210_wp, & - & -2.87552760_wp, -5.05166840_wp, -5.28813620_wp, 2.75021360_wp, & - & 4.59697710_wp, 5.38577900_wp, -2.48658340_wp, 4.10825370_wp, & - & -4.44902870_wp, 4.94587310_wp, 4.44677900_wp, 4.39241410_wp, & - & -4.60889930_wp, 4.19044080_wp, -4.30699100_wp, -1.17221460_wp, & - & 5.31093240_wp, 6.44958740_wp, -0.39494200_wp, 4.08075720_wp, & - & -6.18857840_wp, 0.59343280_wp, 4.79008310_wp, -1.91995020_wp, & - & 4.38108230_wp, 4.98802440_wp, 5.79282680_wp, -2.66144330_wp, & - & 5.09905320_wp, -5.60789300_wp, 2.95341000_wp, 5.61400560_wp, & - & 4.38046600_wp, -3.50962870_wp, -4.67970990_wp, 4.45173720_wp, & - & -4.50328500_wp, -3.69953870_wp, 3.53624150_wp, -4.85137430_wp, & - & -3.22510280_wp, 5.67790450_wp, -5.04748770_wp, -3.32141690_wp, & - & 5.71290390_wp, -5.81882730_wp, -2.55605160_wp, 6.85405470_wp, & - & -4.60695600_wp, -3.92299600_wp, 7.81085140_wp, -5.03293540_wp, & - & -3.63293330_wp, 6.79495910_wp, -3.61921760_wp, -4.90552780_wp, & - & 7.70723210_wp, -3.27507720_wp, -5.38639600_wp, 5.56893670_wp, & - & -3.07534180_wp, -5.27731050_wp, 5.53004930_wp, -2.30522940_wp, & - & -6.04554960_wp, 2.99811720_wp, -2.77787480_wp, -6.14225400_wp, & - & 2.24226850_wp, -3.52726910_wp, -4.73390480_wp, 2.36990800_wp, & - & 3.52557720_wp, -6.52124380_wp, 2.43312340_wp, 2.29575680_wp, & - & -7.18497820_wp, 2.65934630_wp, 1.39467790_wp, -6.61753180_wp, & - & 2.21239150_wp, 2.21360790_wp, -8.55708870_wp, 2.27023950_wp, & - & 1.25009390_wp, -9.05706360_wp, 1.92313660_wp, 3.36380100_wp, & - & -9.28912440_wp, 1.75282590_wp, 3.30178400_wp, -10.36048970_wp, & - & 1.85957970_wp, 4.59434430_wp, -8.63891070_wp, 1.63991190_wp, & - & 5.49728020_wp, -9.20286960_wp, 2.08031910_wp, 4.67278840_wp, & - & -7.26565280_wp, 2.02841060_wp, 5.63655520_wp, -6.76279860_wp, & - & 3.24887310_wp, 2.83077960_wp, -4.69876580_wp, 2.92255720_wp, & - & 4.57040360_wp, -4.72724740_wp, -3.72095670_wp, 2.91302050_wp, & - & -6.23562340_wp, -2.47817270_wp, 2.96109590_wp, -6.87733450_wp, & - & -1.57440750_wp, 3.08750110_wp, -6.28341910_wp, -2.38564060_wp, & - & 2.85014470_wp, -8.26169500_wp, -1.41129680_wp, 2.89373910_wp, & - & -8.74294630_wp, -3.53845670_wp, 2.68894650_wp, -9.02895570_wp, & - & -3.46880980_wp, 2.60395780_wp, -10.10994070_wp, -4.78088900_wp, & - & 2.64171220_wp, -8.40090880_wp, -5.68535180_wp, 2.51995510_wp, & - & -8.99130130_wp, -4.86957080_wp, 2.75249610_wp, -7.01486330_wp, & - & -5.84270800_wp, 2.71422290_wp, -6.52931470_wp, -3.04764500_wp, & - & 3.66576860_wp, -4.35347900_wp, -4.78406110_wp, 3.33666720_wp, & - & -4.41902710_wp, -1.31871220_wp, -4.42802620_wp, -6.28713160_wp, & - & -0.47766730_wp, -3.57539570_wp, -7.01186970_wp, 0.24939760_wp, & - & -2.96390750_wp, -6.48000800_wp, -0.55918870_wp, -3.50206350_wp, & - & -8.39909470_wp, 0.10499940_wp, -2.83693530_wp, -8.94517800_wp, & - & -1.48668970_wp, -4.28272430_wp, -9.08812590_wp, -1.55041190_wp, & - & -4.22817540_wp, -10.17158630_wp, -2.32781030_wp, -5.13547970_wp, & - & -8.37798660_wp, -3.05160810_wp, -5.75055920_wp, -8.90673390_wp, & - & -2.24358860_wp, -5.20604020_wp, -6.98836040_wp, -2.90379410_wp, & - & -5.87530460_wp, -6.44030320_wp, -1.72925140_wp, -5.37104590_wp, & - & -4.40573700_wp, -0.20070060_wp, -4.48388870_wp, -4.46642100_wp, & - & 0.22661530_wp, -1.40808820_wp, 3.00315120_wp, 0.31791930_wp, & - & -1.41802280_wp, 4.54570970_wp, 1.51450950_wp, -0.56502130_wp, & - & 4.98726450_wp, 1.60975910_wp, -0.58786890_wp, 6.08121360_wp, & - & 2.44369350_wp, -0.97760560_wp, 4.56674580_wp, 1.31577650_wp, & - & 0.87842910_wp, 4.50718540_wp, 0.01873140_wp, 1.45285070_wp, & - & 5.09517930_wp, 0.07807880_wp, 1.46774230_wp, 6.19174180_wp, & - & -0.11520620_wp, 2.49069670_wp, 4.75845550_wp, -1.17416930_wp, & - & 0.59580090_wp, 4.64833030_wp, -2.10961300_wp, 1.00999450_wp, & - & 5.05012490_wp, -1.26269050_wp, 0.60822340_wp, 3.10554420_wp, & - & -1.40793620_wp, 1.63494530_wp, 2.74455670_wp, -2.11750150_wp, & - & 0.00536230_wp, 2.77163740_wp, 2.16983880_wp, 1.49951600_wp, & - & 4.80976920_wp, 1.22241730_wp, 0.89893870_wp, 2.96399690_wp, & - & 1.07273820_wp, 1.92851190_wp, 2.62252130_wp, 2.15240770_wp, & - & 0.52124290_wp, 2.51854960_wp, -0.98193830_wp, -0.84807730_wp, & - & 5.13162650_wp, -0.94286540_wp, -0.87451910_wp, 6.22882830_wp, & - & -1.83369420_wp, -1.46732610_wp, 4.81664490_wp, 0.45152380_wp, & - & -2.45681060_wp, 4.87665200_wp, 1.13974500_wp, -1.83495260_wp, & - & 2.56683280_wp, -0.62489930_wp, -2.01775840_wp, 2.68380630_wp, & - & 0.03762940_wp, 0.03489280_wp, 2.55987200_wp, -0.09765060_wp, & - & 0.05986120_wp, 0.30590250_wp & - & ], & - & shape(xyz)) - call new(self, sym, xyz) -end subroutine hs13l_6ab - -subroutine lnci16_brcap(self) - type(structure_type), intent(out) :: self - integer, parameter :: nat = 380 - character(len=*), parameter :: sym(nat) = [ character(len=4) :: & - & "C", "C", "C", "C", "C", "C", "H", "H", "O", "C", "C", "C", "C", "O", "C", "C", & - & "C", "C", "C", "C", "H", "H", "C", "C", "C", "C", "C", "C", "H", "H", "O", "O", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "H", "H", "O", "C", "H", "C", & - & "H", "C", "H", "C", "H", "C", "C", "C", "C", "O", "O", "O", "C", "H", "H", "C", & - & "H", "H", "C", "H", "H", "C", "H", "H", "H", "H", "H", "H", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "H", "H", "O", "C", "C", "C", "C", "O", "C", "C", & - & "C", "C", "C", "C", "H", "H", "C", "C", "C", "C", "C", "C", "H", "H", "O", "O", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "H", "H", "O", "C", "H", "C", & - & "H", "C", "H", "C", "H", "C", "C", "C", "C", "O", "O", "O", "C", "H", "H", "C", & - & "H", "H", "C", "H", "H", "C", "H", "H", "H", "H", "H", "H", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "F", "F", "F", "F", "C", "C", "C", "C", "C", "C", & - & "F", "F", "F", "F", "C", "C", "C", "C", "C", "C", "F", "F", "F", "F", "C", "C", & - & "C", "C", "C", "C", "F", "F", "F", "F", "C", "H", "C", "H", "C", "H", "C", "H", & - & "C", "H", "C", "H", "C", "H", "C", "H", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", "C", "H", & - & "N", "N", "N", "N", "N", "N", "N", "N", "N", "H", "N", "H", "N", "H", "N", "H", & - & "N", "H", "N", "H", "N", "H", "N", "H", "Br", "Br", "Br", "Br", "C", "C", "C", "C", & - & "H", "C", "C", "C", "C", "H", "C", "C", "C", "C", "C", "C", "C", "H", "C", "H", & - & "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", & - & "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", & - & "N", "N", "N", "N", "C", "H", "C", "H", "C", "H", "C", "H", "O", "H", "O", "H", & - & "O", "H", "O", "H", "C", "H", "H", "H", "C", "H", "H", "H", "C", "H", "H", "H", & - & "C", "H", "H", "H", "O", "H", "C", "H", "H", "H", "O", "H", "C", "H", "H", "H", & - & "O", "H", "C", "H", "H", "H", "O", "H", "C", "H", "H", "H" ] - real(wp), parameter :: xyz(3, nat) = reshape([ & - & -13.10634300_wp, 2.26940450_wp, -3.32597310_wp, -14.22740000_wp, & - & 3.10448990_wp, -0.90182230_wp, -14.21375990_wp, 1.58747540_wp, & - & -2.82964730_wp, -12.58908480_wp, 3.36138980_wp, -2.65406320_wp, & - & -13.12340150_wp, 3.75690790_wp, -1.44191080_wp, -14.74406370_wp, & - & 2.03449240_wp, -1.62403890_wp, -11.78469680_wp, 3.92825980_wp, & - & -3.09715670_wp, -15.60547270_wp, 1.51681440_wp, -1.22245710_wp, & - & -12.57883870_wp, 4.83849160_wp, -0.78913890_wp, -11.37531200_wp, & - & 4.63988430_wp, -0.16980950_wp, -11.36961680_wp, 4.47116470_wp, & - & 1.23435050_wp, -11.34132020_wp, 1.23435040_wp, -4.45745600_wp, & - & -11.34969020_wp, -0.16933610_wp, -4.63092770_wp, -12.55234910_wp, & - & -0.78509470_wp, -4.84737220_wp, -13.12424410_wp, 3.31287000_wp, & - & 2.25939650_wp, -14.22529410_wp, 0.87894050_wp, 3.09176550_wp, & - & -12.59801960_wp, 2.64123720_wp, 3.34742600_wp, -14.22778240_wp, & - & 2.80853510_wp, 1.57683940_wp, -14.74870360_wp, 1.59879260_wp, & - & 2.02343600_wp, -13.12178310_wp, 1.42375500_wp, 3.74109570_wp, & - & -11.79482250_wp, 3.08819190_wp, 3.91301180_wp, -15.60822040_wp, & - & 1.19171430_wp, 1.50694840_wp, -13.11148170_wp, -1.43779340_wp, & - & -3.77275990_wp, -14.22619860_wp, -2.82173130_wp, -1.61245530_wp, & - & -12.59040190_wp, -2.65596360_wp, -3.37764420_wp, -14.21662450_wp, & - & -0.89193680_wp, -3.12706210_wp, -14.74426650_wp, -1.61129090_wp, & - & -2.06048330_wp, -13.12118240_wp, -3.32735260_wp, -2.29165230_wp, & - & -11.78581590_wp, -3.10361710_wp, -3.94070380_wp, -15.60493310_wp, & - & -1.20328250_wp, -1.54667290_wp, -12.56670250_wp, 0.77053210_wp, & - & 4.81752230_wp, -12.57299120_wp, -4.53210240_wp, -1.91875070_wp, & - & -11.36380800_wp, 0.15401030_wp, 4.60453880_wp, -11.35591980_wp, & - & -1.24951940_wp, 4.42986260_wp, -11.37136790_wp, -4.48847000_wp, & - & -1.26182530_wp, -11.38116970_wp, -4.65706040_wp, 0.14232620_wp, & - & -13.11838240_wp, -2.28337320_wp, 3.29310050_wp, -14.23346020_wp, & - & -3.11767060_wp, 0.86592200_wp, -14.22381400_wp, -1.60048740_wp, & - & 2.79365640_wp, -12.60034820_wp, -3.37600190_wp, 2.62281220_wp, & - & -13.13171600_wp, -3.77124610_wp, 1.40925050_wp, -14.75112010_wp, & - & -2.04709330_wp, 1.58659040_wp, -11.79783680_wp, -3.94365220_wp, & - & 3.06830830_wp, -15.61094840_wp, -1.52869390_wp, 1.18257780_wp, & - & -12.55653010_wp, -1.90748270_wp, 4.49061700_wp, -14.83051500_wp, & - & -0.43414920_wp, 3.55072060_wp, -14.56290050_wp, -0.56029660_wp, & - & 4.59937150_wp, -14.83833150_wp, 3.56149550_wp, 0.40953740_wp, & - & -14.57745040_wp, 4.61190230_wp, 0.53519060_wp, -14.81925530_wp, & - & 0.42155680_wp, -3.58827940_wp, -14.54834580_wp, 0.54713950_wp, & - & -4.63615080_wp, -14.84122770_wp, -3.57410360_wp, -0.44712300_wp, & - & -14.58124770_wp, -4.62482220_wp, -0.57201110_wp, -9.01737700_wp, & - & 0.18300970_wp, 4.35746870_wp, -8.99344860_wp, -1.20332860_wp, & - & 4.17901900_wp, -9.00397410_wp, -0.19956580_wp, -4.37741860_wp, & - & -8.97953560_wp, 1.18691310_wp, -4.20016870_wp, -12.54134490_wp, & - & 1.89304330_wp, -4.52186400_wp, -12.57304240_wp, 4.51667040_wp, & - & 1.88788510_wp, -12.58669360_wp, -4.85377730_wp, 0.75838990_wp, & - & -16.36519590_wp, 3.50555430_wp, 0.40226050_wp, -16.75719570_wp, & - & 4.11237480_wp, -0.41355520_wp, -16.77081110_wp, 2.50117630_wp, & - & 0.28070140_wp, -16.35780680_wp, -0.42908800_wp, 3.50447320_wp, & - & -16.74711590_wp, 0.38568630_wp, 4.11440830_wp, -16.74711930_wp, & - & -1.36628210_wp, 3.90130000_wp, -16.36802190_wp, -3.51624670_wp, & - & -0.44433360_wp, -16.75897020_wp, -3.91095350_wp, -1.38173660_wp, & - & -16.77273930_wp, -2.51135550_wp, -0.32405790_wp, -16.34668530_wp, & - & 0.41794900_wp, -3.54661730_wp, -16.73389250_wp, 1.35538020_wp, & - & -3.94493460_wp, -16.76191100_wp, 0.29696120_wp, -2.54610670_wp, & - & -16.76989890_wp, -0.30732660_wp, 2.50276110_wp, -16.76317980_wp, & - & -4.12250930_wp, 0.37037050_wp, -16.73493670_wp, -0.39666420_wp, & - & -4.15744080_wp, -16.75841620_wp, 3.90067140_wp, 1.33854110_wp, & - & -9.00474850_wp, -4.28475180_wp, -1.21864300_wp, -9.03052030_wp, & - & -4.45266000_wp, 0.16905260_wp, -9.00305020_wp, 4.26498690_wp, & - & 1.19777460_wp, -9.02487290_wp, 4.43284880_wp, -0.18998970_wp, & - & 12.42220880_wp, 3.76601520_wp, -1.41261700_wp, 13.51038000_wp, & - & 1.59946410_wp, -2.80645230_wp, 13.52917070_wp, 3.11425180_wp, & - & -0.87756950_wp, 11.88230390_wp, 3.37096130_wp, -2.62260100_wp, & - & 12.40520420_wp, 2.28536730_wp, -3.30205380_wp, 14.04147690_wp, & - & 2.04306560_wp, -1.60003030_wp, 11.07411710_wp, 3.93707750_wp, & - & -3.06056140_wp, 14.90278780_wp, 1.52394370_wp, -1.20035050_wp, & - & 11.85229340_wp, 1.92283620_wp, -4.50862550_wp, 10.64750910_wp, & - & 1.27362020_wp, -4.46511420_wp, 10.64725900_wp, -0.13253190_wp, & - & -4.60979720_wp, 10.69040630_wp, 4.71016040_wp, -0.13685390_wp, & - & 10.68742020_wp, 4.55361170_wp, 1.26903330_wp, 11.89420300_wp, & - & 4.54197560_wp, 1.91397650_wp, 12.39771710_wp, -1.41940180_wp, & - & -3.73890360_wp, 13.52433040_wp, -2.81836600_wp, -1.59673700_wp, & - & 11.87518240_wp, -2.63888070_wp, -3.34819870_wp, 13.50913090_wp, & - & -0.87971140_wp, -3.09903770_wp, 14.04035200_wp, -1.60483230_wp, & - & -2.03881620_wp, 12.41704170_wp, -3.32135330_wp, -2.27419370_wp, & - & 11.06711550_wp, -3.08269160_wp, -3.90987970_wp, 14.90483060_wp, & - & -1.20171510_wp, -1.52775600_wp, 12.41812760_wp, 3.32059130_wp, & - & 2.26825060_wp, 13.50608240_wp, 0.87829720_wp, 3.09520300_wp, & - & 11.87157020_wp, 2.63770920_wp, 3.33968730_wp, 13.52632150_wp, & - & 2.81680110_wp, 1.59313300_wp, 14.04041080_wp, 1.60287340_wp, & - & 2.03614270_wp, 12.39268440_wp, 1.41804130_wp, 3.73175120_wp, & - & 11.06112110_wp, 3.08067730_wp, 3.89862690_wp, 14.90580770_wp, & - & 1.19912120_wp, 1.52715890_wp, 11.88841500_wp, -4.54109140_wp, & - & -1.92078400_wp, 11.83723570_wp, 0.76086310_wp, 4.80468010_wp, & - & 10.68184610_wp, -4.54859780_wp, -1.27484960_wp, 10.68613610_wp, & - & -4.70550240_wp, 0.13087410_wp, 10.64005420_wp, 0.13262460_wp, & - & 4.60569480_wp, 10.64092270_wp, -1.27399310_wp, 4.46200000_wp, & - & 12.41776810_wp, -3.76519010_wp, 1.40807870_wp, 13.50644070_wp, & - & -1.60033220_wp, 2.80355700_wp, 13.52600990_wp, -3.11465330_wp, & - & 0.87450610_wp, 11.87651710_wp, -3.36983810_wp, 2.61736490_wp, & - & 12.39969260_wp, -2.28485450_wp, 3.29752960_wp, 14.03876100_wp, & - & -2.04422350_wp, 1.59773320_wp, 11.06709660_wp, -3.93495030_wp, & - & 3.05426180_wp, 14.90108450_wp, -1.52587750_wp, 1.19920480_wp, & - & 11.89087980_wp, -4.85595220_wp, 0.75710650_wp, 14.14214590_wp, & - & -3.57178430_wp, -0.43417120_wp, 13.88664180_wp, -4.62338000_wp, & - & -0.56010620_wp, 14.11469650_wp, 0.43180540_wp, -3.56340150_wp, & - & 13.84460610_wp, 0.55546950_wp, -4.61163860_wp, 14.14563970_wp, & - & 3.57025580_wp, 0.43141890_wp, 13.89134390_wp, 4.62209530_wp, & - & 0.55770140_wp, 14.11037760_wp, -0.43311030_wp, 3.56134410_wp, & - & 13.83845710_wp, -0.55622630_wp, 4.60916920_wp, 8.30417730_wp, & - & -4.50273540_wp, -1.26230910_wp, 8.32814930_wp, -4.64513060_wp, & - & 0.12753880_wp, 8.31093650_wp, 4.51532830_wp, 1.25866510_wp, & - & 8.33180010_wp, 4.65657640_wp, -0.13098790_wp, 11.89529650_wp, & - & 4.85803190_wp, -0.76360440_wp, 11.84389040_wp, -0.76090040_wp, & - & -4.81193730_wp, 11.84627490_wp, -1.92214640_wp, 4.50378800_wp, & - & 15.64208820_wp, 0.42545350_wp, -3.52153480_wp, 16.03083680_wp, & - & 1.36122810_wp, -3.92205430_wp, 16.05759760_wp, 0.30593830_wp, & - & -2.52098770_wp, 15.66847100_wp, -3.50823070_wp, -0.42663280_wp, & - & 16.06362400_wp, -3.90062660_wp, -1.36317300_wp, 16.06316520_wp, & - & -4.11443010_wp, 0.38826000_wp, 15.63781990_wp, -0.42776360_wp, & - & 3.52195480_wp, 16.02422490_wp, 0.38880550_wp, 4.13124820_wp, & - & 16.05507820_wp, -0.30936230_wp, 2.52200880_wp, 15.67186740_wp, & - & 3.50483270_wp, 0.42429670_wp, 16.06717940_wp, 3.89689990_wp, & - & 1.36091440_wp, 16.06759460_wp, 4.11041410_wp, -0.39055090_wp, & - & 16.06996850_wp, -2.50241170_wp, -0.30367580_wp, 16.02526660_wp, & - & -1.36349480_wp, 3.92383210_wp, 16.07219190_wp, 2.49850940_wp, & - & 0.30166020_wp, 16.02892220_wp, -0.39090630_wp, -4.13083170_wp, & - & 8.29109960_wp, 0.13282150_wp, 4.39871600_wp, 8.27157260_wp, & - & -1.25869430_wp, 4.27569040_wp, 8.29888170_wp, -0.13611330_wp, & - & -4.38959990_wp, 8.27904950_wp, 1.25585440_wp, -4.26779530_wp, & - & -2.71204000_wp, 4.05870730_wp, 0.57510730_wp, -3.44587370_wp, & - & 3.06674340_wp, 1.20533480_wp, -4.82704740_wp, 3.07215970_wp, & - & 1.16158150_wp, -5.52458760_wp, 4.07035150_wp, 0.49469810_wp, & - & -4.77728210_wp, 5.04549310_wp, -0.15234040_wp, -3.39723200_wp, & - & 5.04241710_wp, -0.11867870_wp, -2.82636270_wp, 2.09821320_wp, & - & 1.86521070_wp, -5.48402970_wp, 2.09208210_wp, 1.76996430_wp, & - & -5.39321390_wp, 6.03326170_wp, -0.79307060_wp, -2.73673780_wp, & - & 6.01015910_wp, -0.73706890_wp, -2.71594470_wp, -4.06234530_wp, & - & -0.57588130_wp, -3.45175540_wp, -3.07361400_wp, -1.20872090_wp, & - & -4.83290590_wp, -3.08450890_wp, -1.16986100_wp, -5.52865690_wp, & - & -4.08556300_wp, -0.50545510_wp, -4.77966080_wp, -5.05793350_wp, & - & 0.14376300_wp, -3.39943700_wp, -5.04921900_wp, 0.11500820_wp, & - & -2.83385430_wp, -2.10229540_wp, -1.86597380_wp, -5.49153630_wp, & - & -2.10658750_wp, -1.77989510_wp, -5.39403020_wp, -6.04810500_wp, & - & 0.78230940_wp, -2.73705560_wp, -6.01425850_wp, 0.73565440_wp, & - & -2.71040530_wp, 0.42991010_wp, -3.65388880_wp, -3.48948940_wp, & - & 1.09326330_wp, -2.71980520_wp, -4.86777180_wp, 1.10044960_wp, & - & -2.82445980_wp, -5.51607180_wp, 0.45196980_wp, -3.86753140_wp, & - & -4.72415310_wp, -0.21845940_wp, -4.79010580_wp, -3.34773180_wp, & - & -0.23607640_wp, -4.68764890_wp, -2.91653400_wp, 1.73059730_wp, & - & -1.70764050_wp, -5.57054590_wp, 1.73138040_wp, -1.89174540_wp, & - & -5.29198430_wp, -0.84002790_wp, -5.81844160_wp, -2.64233340_wp, & - & -0.88164930_wp, -5.60482530_wp, -2.72239270_wp, -0.45706780_wp, & - & 3.65046720_wp, -3.36098410_wp, 0.21040390_wp, 4.68250860_wp, & - & -4.73781630_wp, 0.19676070_wp, 4.78061230_wp, -5.52875660_wp, & - & -0.47107140_wp, 3.85533540_wp, -4.87917480_wp, -1.12007940_wp, & - & 2.81341610_wp, -3.50062140_wp, -1.11670440_wp, 2.71306090_wp, & - & -2.65659160_wp, 0.85267570_wp, 5.60270180_wp, -5.30708230_wp, & - & 0.81894800_wp, 5.80776620_wp, -5.58084880_wp, -1.74841010_wp, & - & 1.87812740_wp, -2.92632650_wp, -1.75511370_wp, 1.70234960_wp, & - & -10.20184170_wp, 4.64598530_wp, -0.89408060_wp, -10.19358230_wp, & - & 4.81906000_wp, -1.96028390_wp, -10.18890190_wp, 4.30843620_wp, & - & 1.92771080_wp, -10.17494840_wp, 4.22216350_wp, 3.00496660_wp, & - & -10.19255300_wp, 0.88179270_wp, 4.59666640_wp, -10.18435780_wp, & - & 1.94759440_wp, 4.77216510_wp, -10.17566100_wp, -1.93773870_wp, & - & 4.24254920_wp, -10.15949020_wp, -3.01424080_wp, 4.14837760_wp, & - & -10.20968850_wp, -4.66464590_wp, 0.86983610_wp, -10.20468630_wp, & - & -4.83746760_wp, 1.93610500_wp, -10.18855350_wp, -4.32716060_wp, & - & -1.95189290_wp, -10.17150260_wp, -4.24069850_wp, -3.02908500_wp, & - & -10.17895090_wp, -0.89787180_wp, -4.61905830_wp, -10.17091160_wp, & - & -1.96384830_wp, -4.79351870_wp, -10.16113290_wp, 1.92199790_wp, & - & -4.26753250_wp, -10.14457560_wp, 2.99858310_wp, -4.17435020_wp, & - & -6.98658680_wp, 4.14631130_wp, 0.51923340_wp, -6.98443090_wp, & - & -0.51339190_wp, 4.00641130_wp, -6.99031510_wp, -4.16559210_wp, & - & -0.53437850_wp, -6.97136290_wp, 0.49580740_wp, -4.02210750_wp, & - & 6.27154840_wp, 4.54302840_wp, 0.60749840_wp, 6.25587660_wp, & - & 0.58764900_wp, -4.10690000_wp, 6.24535940_wp, -0.59237670_wp, & - & 4.12764720_wp, 6.26722080_wp, -4.52543100_wp, -0.60412890_wp, & - & 9.51204050_wp, 4.77632260_wp, -0.85139360_wp, 9.50344430_wp, & - & 4.92684440_wp, -1.92107330_wp, 9.50513380_wp, 4.47605330_wp, & - & 1.97541300_wp, 9.50024990_wp, 4.40214310_wp, 3.05401850_wp, & - & 9.46924530_wp, 1.97701870_wp, -4.32135340_wp, 9.46550020_wp, & - & 3.05552550_wp, -4.24850510_wp, 9.46991290_wp, -0.85089260_wp, & - & -4.59266330_wp, 9.45668280_wp, -1.92115860_wp, -4.73818010_wp, & - & 9.46222270_wp, 0.85017250_wp, 4.59316150_wp, 9.44602970_wp, & - & 1.92111490_wp, 4.73325400_wp, 9.46302060_wp, -1.97871620_wp, & - & 4.32270790_wp, 9.46047300_wp, -3.05718660_wp, 4.24943640_wp, & - & 9.50853880_wp, -4.76910130_wp, 0.84633050_wp, 9.50030480_wp, & - & -4.92057690_wp, 1.91583210_wp, 9.49843450_wp, -4.46839770_wp, & - & -1.97990210_wp, 9.49399570_wp, -4.39948890_wp, -3.05886780_wp, & - & 7.00114680_wp, -4.43038280_wp, -1.68951800_wp, 6.97514620_wp, & - & -1.68458710_wp, 4.11367000_wp, 6.98306730_wp, 1.68120420_wp, & - & -4.09906750_wp, 7.00952700_wp, 4.44741810_wp, 1.69004910_wp, & - & -7.70906030_wp, 4.08962400_wp, 1.61261930_wp, -7.68905740_wp, & - & 1.59309250_wp, -3.98210380_wp, -7.70272410_wp, -1.61019390_wp, & - & 3.96389950_wp, -7.70965060_wp, -4.10913040_wp, -1.62981840_wp, & - & -7.72079790_wp, 0.59149670_wp, 4.24709090_wp, -7.41697440_wp, & - & 1.58602240_wp, 4.24854150_wp, -7.73024920_wp, -4.37484290_wp, & - & 0.57410030_wp, -7.42187590_wp, -4.35718370_wp, 1.56754450_wp, & - & -7.70797210_wp, -0.60881210_wp, -4.26347280_wp, -7.40510730_wp, & - & -1.60358560_wp, -4.26383930_wp, -7.72349930_wp, 4.35499820_wp, & - & -0.59136510_wp, -7.41251890_wp, 4.33815590_wp, -1.58399290_wp, & - & 7.01934330_wp, 4.67299040_wp, -0.51421770_wp, 6.71783060_wp, & - & 4.67486770_wp, -1.49367790_wp, 6.99590060_wp, -0.53011070_wp, & - & -4.28291150_wp, 6.67756730_wp, -1.51342040_wp, -4.25322150_wp, & - & 7.01727430_wp, -4.65854890_wp, 0.51503820_wp, 6.71868890_wp, & - & -4.66152310_wp, 1.49557770_wp, 6.98679830_wp, 0.52521220_wp, & - & 4.30199710_wp, 6.68175510_wp, 1.50969220_wp, 4.28380440_wp, & - & -0.86277050_wp, -0.46150130_wp, 3.54565790_wp, -0.85588390_wp, & - & -4.09954810_wp, -0.66870040_wp, -0.85132690_wp, 0.42287630_wp, & - & -3.54053180_wp, -0.85267320_wp, 4.10805900_wp, 0.67629720_wp, & - & 4.80018780_wp, 4.51908920_wp, 0.61164970_wp, 4.09503290_wp, & - & 3.62143100_wp, -0.19421840_wp, 4.09371830_wp, 5.38611780_wp, & - & 1.45493810_wp, 2.70968760_wp, 3.60586570_wp, -0.07219940_wp, & - & 2.12640160_wp, 2.91028630_wp, -0.66860670_wp, 4.79386910_wp, & - & 0.52739360_wp, -3.95402780_wp, 4.22945180_wp, -0.20308520_wp, & - & -2.90568010_wp, 3.96408440_wp, 1.19925800_wp, -4.85572140_wp, & - & 2.84105220_wp, -0.22737000_wp, -2.82236600_wp, 2.35775950_wp, & - & -0.78283150_wp, -2.02415340_wp, 4.78304920_wp, -0.54135940_wp, & - & 3.97673460_wp, 4.20828850_wp, 0.22005660_wp, 2.95565460_wp, & - & 3.96067010_wp, -1.26129030_wp, 4.84844310_wp, 4.79602130_wp, & - & -4.49565810_wp, -0.60381030_wp, 4.09648470_wp, -3.58909020_wp, & - & 0.19672560_wp, 4.08516960_wp, -5.36862960_wp, -1.43748650_wp, & - & 2.71094900_wp, -3.56730710_wp, 0.07455800_wp, 2.13091750_wp, & - & -2.86564450_wp, 0.66704660_wp, 5.04573050_wp, -0.88611920_wp, & - & -1.85183620_wp, 5.37679170_wp, -1.87694060_wp, -2.16188070_wp, & - & 5.93492540_wp, -0.31336420_wp, -1.58760310_wp, 4.45396500_wp, & - & -1.01457580_wp, -0.94802450_wp, 4.49195250_wp, 1.98961260_wp, & - & -6.01411710_wp, 3.68653060_wp, 2.25620840_wp, -6.69669730_wp, & - & 4.97065190_wp, 2.91196810_wp, -5.68700100_wp, 5.23758560_wp, & - & 1.43019950_wp, -6.57890270_wp, 4.74236360_wp, 2.67996360_wp, & - & -1.15923770_wp, 4.96651110_wp, 3.16705120_wp, -2.10807440_wp, & - & 5.67371000_wp, 2.25738820_wp, -0.78317640_wp, 4.06789160_wp, & - & 1.85813190_wp, -1.38681140_wp, 4.75276780_wp, 6.44261140_wp, & - & 2.29003130_wp, 5.27520880_wp, 6.02331490_wp, 3.14739840_wp, & - & 5.48914740_wp, 7.00625140_wp, 1.71781290_wp, 4.01149800_wp, & - & 7.14754130_wp, 2.66404060_wp, 4.74063360_wp, -6.44224480_wp, & - & -2.25362640_wp, 3.99319200_wp, -7.12984370_wp, -2.64695320_wp, & - & 5.30041120_wp, -6.04052590_wp, -3.09563580_wp, 5.44482230_wp, & - & -7.02251320_wp, -1.65746910_wp, 4.74945210_wp, -2.65124200_wp, & - & 1.16184920_wp, 4.96252860_wp, -3.13973230_wp, 2.11261930_wp, & - & 5.68787190_wp, -2.24037680_wp, 0.79062650_wp, 4.08361370_wp, & - & -1.82097830_wp, 1.38494580_wp, 4.49303280_wp, -2.08238100_wp, & - & 5.98319850_wp, 3.68970150_wp, -2.36469860_wp, 6.66198680_wp, & - & 4.96725230_wp, -2.99739200_wp, 5.63053680_wp, 5.24257940_wp, & - & -1.54010240_wp, 6.55901460_wp, 5.01064490_wp, 0.97118760_wp, & - & 1.93783510_wp, 5.91668240_wp, 0.43720030_wp, 1.65084300_wp, & - & 4.41817330_wp, 1.12660610_wp, 1.03859250_wp, 5.30979740_wp, & - & 1.95662770_wp, 2.29479650_wp, 2.70872440_wp, 5.26495400_wp, & - & 1.47086290_wp, 2.11979230_wp, 5.91537890_wp, 2.10910300_wp, & - & 2.03222230_wp, 4.39296160_wp, 0.74250290_wp, 2.03102450_wp, & - & -0.46512420_wp, 3.67290370_wp, 2.02973490_wp, -4.35673880_wp, & - & -0.73466570_wp, 2.04375840_wp, 0.40803200_wp, -3.66220190_wp, & - & 2.58920660_wp, -1.18018620_wp, 4.63492340_wp, 1.90992640_wp, & - & -1.72181000_wp, 5.28525060_wp, 2.70104790_wp, -5.23956890_wp, & - & -1.45518060_wp, 2.10812270_wp, -5.89297810_wp, -2.08668370_wp, & - & 2.82026930_wp, 0.21864690_wp, 2.86422800_wp, 2.33058690_wp, & - & 0.79562850_wp, 2.08548890_wp, 2.59317050_wp, 1.09927850_wp, & - & -4.64655710_wp, 1.90709560_wp, 1.60396850_wp, -5.31908910_wp, & - & 6.42725810_wp, -3.21230840_wp, -4.15221630_wp, 6.59853430_wp, & - & -3.69084720_wp, -3.30900410_wp, 6.90465760_wp, 4.35286200_wp, & - & -3.29694830_wp, 6.84584840_wp, 3.40806970_wp, -3.56835790_wp, & - & 6.66630630_wp, 3.25562100_wp, 4.18674240_wp, 6.72576650_wp, & - & 3.70780000_wp, 3.31360980_wp, 6.90845690_wp, -4.35237180_wp, & - & 3.29425720_wp, 6.84074700_wp, -3.41169790_wp, 3.57739750_wp, & - & 5.27312070_wp, -3.73009080_wp, -4.77198360_wp, 5.04914570_wp, & - & -3.11779890_wp, -5.64540110_wp, 5.41929840_wp, -4.75768980_wp, & - & -5.11882240_wp, 4.39638390_wp, -3.70872900_wp, -4.11632410_wp, & - & 6.45718460_wp, 5.16455590_wp, -4.35572320_wp, 5.38334040_wp, & - & 5.05856210_wp, -4.54559670_wp, 6.64529410_wp, 6.20603920_wp, & - & -4.09666820_wp, 6.98868390_wp, 4.95272940_wp, -5.28845660_wp, & - & 5.87884890_wp, 4.02146290_wp, 5.06639030_wp, 4.84451500_wp, & - & 4.12847050_wp, 4.72287510_wp, 5.85695120_wp, 3.51953880_wp, & - & 6.03342030_wp, 6.29373950_wp, 5.02208360_wp, 5.22369580_wp, & - & 6.49320430_wp, -5.18701310_wp, 4.34821760_wp, 5.41840050_wp, & - & -5.11438890_wp, 4.54765000_wp, 6.70931500_wp, -6.21995310_wp, & - & 4.07697440_wp, 7.02597170_wp, -4.96921960_wp, 5.27880870_wp, & - & -7.27029250_wp, 4.19305250_wp, -3.23776410_wp, -7.36601880_wp, & - & 3.25001170_wp, -3.51705010_wp, -6.23695710_wp, 4.79274610_wp, & - & -3.97957640_wp, -6.18623810_wp, 5.84795430_wp, -3.71405240_wp, & - & -5.25599990_wp, 4.34870470_wp, -3.77521780_wp, -6.41923780_wp, & - & 4.72608540_wp, -5.05607600_wp, -7.30778550_wp, -3.27119910_wp, & - & -4.20122150_wp, -7.39490140_wp, -3.59408080_wp, -3.27169890_wp, & - & -6.31118670_wp, -4.01531130_wp, -4.85780430_wp, -6.27689180_wp, & - & -3.70527730_wp, -5.90141140_wp, -5.31458890_wp, -3.85954640_wp, & - & -4.42950420_wp, -6.52448800_wp, -5.08785470_wp, -4.83341770_wp, & - & -7.28230880_wp, -4.21026350_wp, 3.22112080_wp, -7.37892890_wp, & - & -3.26710260_wp, 3.49972480_wp, -6.25056700_wp, -4.80932430_wp, & - & 3.96564850_wp, -6.19790510_wp, -5.86429850_wp, 3.69957530_wp, & - & -5.26947250_wp, -4.36410170_wp, 3.76452930_wp, -6.43614050_wp, & - & -4.74356700_wp, 5.04164050_wp, -7.31596040_wp, 3.25298220_wp, & - & 4.18561040_wp, -7.39948600_wp, 3.57541040_wp, 3.25559850_wp, & - & -6.31981910_wp, 3.99535850_wp, 4.84485870_wp, -6.28983590_wp, & - & 3.68628850_wp, 5.88888460_wp, -5.32214600_wp, 3.83677060_wp, & - & 4.42013610_wp, -6.53050210_wp, 5.06837720_wp, 4.81867800_wp & - & ], & - & shape(xyz)) - call new(self, sym, xyz) -end subroutine lnci16_brcap - -subroutine lnci16_dna(self) - type(structure_type), intent(out) :: self - integer, parameter :: nat = 910 - character(len=*), parameter :: sym(nat) = [ character(len=4) :: & - & "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", & - & "P", "P", "P", "P", "P", "P", "P", "P", "P", "P", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", & - & "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "O", "N", "N", & - & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & - & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & - & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & - & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & - & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & - & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", & - & "N", "N", "N", "N", "N", "N", "N", "N", "N", "N", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", "C", & - & "C", "C", "C", "C", "C", "C", "C", "C", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", & - & "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H", "H" ] - real(wp), parameter :: xyz(3, nat) = reshape([ & - & 18.08558277_wp, -5.10686976_wp, -6.62572227_wp, 15.87607995_wp, & - & -8.86345290_wp, -1.32672576_wp, 12.96989554_wp, -7.99847606_wp, & - & 4.19927174_wp, 9.66560312_wp, -4.63454978_wp, 8.64895448_wp, & - & 5.57545602_wp, 0.88379427_wp, 10.02684957_wp, 1.78697521_wp, & - & 4.56859362_wp, 6.82096694_wp, 0.05232934_wp, 7.57803417_wp, & - & 2.04777988_wp, -3.34921718_wp, 9.34754856_wp, -3.91967457_wp, & - & -6.28541506_wp, 5.05375495_wp, -7.65836437_wp, -9.94499141_wp, & - & -0.25389290_wp, -8.60037092_wp, -12.98875920_wp, -5.36714892_wp, & - & -6.33567040_wp, -15.65848196_wp, -8.75961662_wp, -1.32448508_wp, & - & -19.14820552_wp, -7.90919645_wp, 4.26068727_wp, -18.04267114_wp, & - & 6.51691851_wp, -5.99352630_wp, -15.52758632_wp, 8.67809683_wp, & - & -0.54085380_wp, -12.00766574_wp, 8.31742224_wp, 4.84604025_wp, & - & -7.90192653_wp, 4.82651320_wp, 9.15739471_wp, -5.18302816_wp, & - & -0.79214371_wp, 8.83428734_wp, -2.92606929_wp, -6.12879086_wp, & - & 5.70479170_wp, -0.56285937_wp, -9.00093995_wp, 0.82683112_wp, & - & 2.64175036_wp, -8.97778101_wp, -4.75732066_wp, 6.55582486_wp, & - & -4.85809798_wp, -8.31283487_wp, 8.83815104_wp, 0.58719490_wp, & - & -8.14252321_wp, 11.62663870_wp, 5.95365524_wp, -5.97274253_wp, & - & 15.66621512_wp, 9.01446680_wp, -1.69198788_wp, 18.73117287_wp, & - & 8.28770040_wp, 3.60074931_wp, -19.81059031_wp, -9.30977876_wp, & - & 3.70973505_wp, -16.18242565_wp, -9.59777030_wp, -2.63822559_wp, & - & -13.71402434_wp, -5.01781505_wp, -7.77050649_wp, -10.57200829_wp, & - & 0.88456934_wp, -9.61133029_wp, -6.82598351_wp, 6.54323341_wp, & - & -8.11075467_wp, -3.99803122_wp, 10.80198721_wp, -3.50125967_wp, & - & -0.45173051_wp, 7.86499999_wp, 3.58536656_wp, 17.58058843_wp, & - & 8.38159203_wp, 4.49594541_wp, 18.52876449_wp, 7.11852580_wp, & - & 2.47563747_wp, 0.99365081_wp, 4.16874654_wp, 8.20970321_wp, & - & 4.96052017_wp, 0.35217641_wp, 11.45612122_wp, 18.20923303_wp, & - & 5.94089257_wp, -0.48975517_wp, 9.20427063_wp, -6.20780261_wp, & - & 8.80265428_wp, 17.13680457_wp, 8.67706840_wp, -1.04483661_wp, & - & 12.50868088_wp, -9.34571915_wp, 3.37019813_wp, 15.18558107_wp, & - & -9.88959971_wp, -2.41409909_wp, 17.28695134_wp, -4.80420678_wp, & - & -8.02825721_wp, -17.23606480_wp, 6.50907610_wp, -7.42711119_wp, & - & 16.86623178_wp, 3.03620895_wp, -0.95860494_wp, -15.14229570_wp, & - & 9.48482717_wp, -1.92113221_wp, -11.54281764_wp, 9.68561460_wp, & - & 4.06091938_wp, -7.02284760_wp, 6.07815604_wp, 9.76740164_wp, & - & -4.34153417_wp, 0.18075610_wp, 9.86387261_wp, -2.22794958_wp, & - & -6.20948600_wp, 7.19334633_wp, -0.15012653_wp, -9.53375581_wp, & - & 2.32792517_wp, 2.65847422_wp, -10.08541408_wp, -5.95959497_wp, & - & 7.22623636_wp, -6.06603623_wp, -9.20884740_wp, 9.45292355_wp, & - & -0.32042898_wp, -9.36983783_wp, 11.89804063_wp, 5.71013385_wp, & - & -7.57640129_wp, 16.29433216_wp, 9.71946469_wp, -3.04048881_wp, & - & 19.13546668_wp, 9.55266431_wp, 2.62875693_wp, 19.84274887_wp, & - & 1.28774243_wp, -3.22977832_wp, 18.25991655_wp, -0.62903843_wp, & - & -8.67896799_wp, 17.76930128_wp, -0.44633261_wp, -5.47737058_wp, & - & 18.17250982_wp, -3.62025383_wp, -5.95312039_wp, 19.41595123_wp, & - & -5.71039395_wp, -6.62354519_wp, 14.66136175_wp, 9.70298348_wp, & - & -0.89033957_wp, 15.05168893_wp, 7.60904391_wp, -2.26388667_wp, & - & 22.39205035_wp, 4.92856333_wp, 6.63485217_wp, 17.60134565_wp, & - & -1.49607649_wp, 1.98428978_wp, 14.54752421_wp, 4.80722881_wp, & - & -3.58809298_wp, 16.85840280_wp, -5.97161317_wp, -5.95687467_wp, & - & 13.10400018_wp, 6.56569750_wp, -5.61995732_wp, 15.91756862_wp, & - & -4.76157915_wp, -3.34196915_wp, 16.11152732_wp, -7.52336078_wp, & - & -2.22753160_wp, 17.10559774_wp, -9.22730893_wp, -0.62869338_wp, & - & 14.38402064_wp, -2.89901919_wp, -0.67696040_wp, 14.49567875_wp, & - & -8.68014237_wp, -0.45821731_wp, 13.33417562_wp, -5.88034831_wp, & - & -0.04828353_wp, 13.16482561_wp, -6.93870250_wp, 2.96872798_wp, & - & 14.17293836_wp, 1.72065191_wp, 2.22253909_wp, 14.15925080_wp, & - & -8.05492907_wp, 5.04885458_wp, 10.83690304_wp, 1.23761738_wp, & - & 2.78540464_wp, 11.53769664_wp, -7.71820041_wp, 4.93882914_wp, & - & 10.23464250_wp, -5.20839271_wp, 3.98129816_wp, 10.00371051_wp, & - & -4.57410881_wp, 7.05120829_wp, 10.75840313_wp, -4.12706053_wp, & - & 9.47560036_wp, 21.92870397_wp, 5.48696680_wp, 4.15088856_wp, & - & 7.74714353_wp, 2.01243899_wp, 2.55299971_wp, 7.91806774_wp, & - & -2.42576801_wp, 3.70419544_wp, 8.17664275_wp, -3.97688141_wp, & - & 8.82043190_wp, 6.46847761_wp, -1.91104213_wp, 6.95908094_wp, & - & 6.39777067_wp, -0.44395234_wp, 9.53131940_wp, 6.36867462_wp, & - & 2.11353561_wp, 10.01746493_wp, 4.16783251_wp, 0.85654136_wp, & - & 9.17946717_wp, 3.12985246_wp, -0.09863627_wp, 6.31497813_wp, & - & 2.63525063_wp, 3.19594257_wp, 6.52004906_wp, 2.60438137_wp, & - & 5.77982382_wp, 6.82777434_wp, 10.45490551_wp, 6.70480461_wp, & - & -5.52510904_wp, 11.55575997_wp, 4.40985997_wp, -5.44339147_wp, & - & 20.20647464_wp, 8.08242350_wp, 4.28509790_wp, 1.48223065_wp, & - & 0.34856805_wp, 2.06533379_wp, 11.64140789_wp, 1.30093081_wp, & - & -5.20859593_wp, 0.50086465_wp, 4.47467014_wp, 5.81203952_wp, & - & 10.23166171_wp, 1.42808661_wp, -7.90482987_wp, -0.34247205_wp, & - & 3.05190304_wp, 3.28184394_wp, -0.07787318_wp, 5.94998318_wp, & - & 1.99865660_wp, 1.37343167_wp, 8.01819640_wp, 1.60690211_wp, & - & -1.52185028_wp, 0.37336297_wp, -3.29624716_wp, 10.90157166_wp, & - & -0.18270984_wp, -2.49770248_wp, -1.24667715_wp, 8.21119992_wp, & - & 1.27425933_wp, -2.86726526_wp, 6.46349685_wp, -0.93422803_wp, & - & -2.66481730_wp, 8.91573532_wp, -2.49527898_wp, -2.44083798_wp, & - & 9.27508166_wp, -5.06220493_wp, -4.77238969_wp, 8.53040915_wp, & - & -3.99691750_wp, -6.12405759_wp, 5.87309701_wp, -3.00604093_wp, & - & -5.96280067_wp, 5.30084525_wp, -6.07419009_wp, -5.15783178_wp, & - & 4.43072431_wp, -8.34302979_wp, -7.78721313_wp, -1.93512844_wp, & - & -1.74253149_wp, -8.07630306_wp, 2.58413910_wp, -2.30181145_wp, & - & -7.75684267_wp, 4.33392505_wp, -7.78282871_wp, -8.95672670_wp, & - & 3.08350765_wp, -5.27815367_wp, -9.34175441_wp, 0.67618556_wp, & - & -7.39879704_wp, -8.95653470_wp, -1.21263684_wp, -9.08304620_wp, & - & -10.82885079_wp, -1.93010945_wp, 1.08543989_wp, -11.40382972_wp, & - & -0.82367121_wp, -8.10383758_wp, -12.43828454_wp, -0.74746640_wp, & - & -5.26483997_wp, 7.59697993_wp, 1.33249136_wp, -8.30382477_wp, & - & 8.71163594_wp, -0.50924177_wp, -6.93313217_wp, -12.60644111_wp, & - & -3.88330214_wp, -5.76104342_wp, -11.82834742_wp, -6.24713560_wp, & - & -6.27881405_wp, 9.32093508_wp, -3.07299240_wp, -5.02309654_wp, & - & -14.10392260_wp, -1.70014970_wp, -1.94480667_wp, 7.93608704_wp, & - & -4.31406338_wp, -7.60572463_wp, -14.38128832_wp, -5.83604675_wp, & - & -5.59881873_wp, -15.54104872_wp, -4.49779518_wp, -3.02607372_wp, & - & -15.50039206_wp, -7.24662580_wp, -1.91760631_wp, -14.42823537_wp, & - & -9.12369296_wp, -0.62584104_wp, -16.93422828_wp, -0.27506641_wp, & - & 2.99558090_wp, -17.07594461_wp, -8.89407318_wp, -0.50311969_wp, & - & -18.16894850_wp, -6.10217837_wp, -0.01633849_wp, -18.59449652_wp, & - & -7.24908259_wp, 2.87171608_wp, -18.09543641_wp, -7.91431880_wp, & - & 5.27241889_wp, -20.16979351_wp, -3.01472057_wp, 0.98649653_wp, & - & -20.58246675_wp, -7.20129072_wp, 4.62679606_wp, -21.74598427_wp, & - & -4.45697970_wp, 3.60390834_wp, -22.41324496_wp, -3.19452034_wp, & - & 5.74341441_wp, -20.20939174_wp, 2.39278919_wp, 0.01943054_wp, & - & -19.10199850_wp, 2.90168942_wp, -9.11424637_wp, -18.21630437_wp, & - & 1.65333192_wp, -6.17699469_wp, -18.47409981_wp, 4.94497608_wp, & - & -5.87498321_wp, -19.16365186_wp, 7.43744006_wp, -5.81286595_wp, & - & 20.87268979_wp, -0.58791773_wp, 1.75855992_wp, -17.03382370_wp, & - & 1.90630030_wp, -1.94796583_wp, -16.71569929_wp, 6.71686237_wp, & - & -5.05705236_wp, -15.77148326_wp, 4.67720295_wp, -3.00497931_wp, & - & -15.66574858_wp, 7.15460651_wp, -1.10867334_wp, -16.71181174_wp, & - & 9.05614613_wp, 0.22924617_wp, 5.69057910_wp, -3.89399485_wp, & - & -8.99187788_wp, 5.80659548_wp, -5.71937092_wp, -7.13624483_wp, & - & -13.61965488_wp, 0.08323217_wp, 3.19537541_wp, -14.06909696_wp, & - & 8.84764567_wp, 0.18961228_wp, 6.05493827_wp, -5.62905269_wp, & - & -4.16727641_wp, -12.75567850_wp, 6.17933324_wp, 0.66245404_wp, & - & 4.16129829_wp, -8.38341652_wp, -4.83024384_wp, -12.43405487_wp, & - & 7.36666168_wp, 3.58450882_wp, -13.04881946_wp, 8.40555044_wp, & - & 5.86707300_wp, -10.43157091_wp, 3.47725442_wp, 2.00650256_wp, & - & -10.51250298_wp, 7.80921961_wp, 5.27562722_wp, 5.15699333_wp, & - & -4.05535276_wp, -1.00931554_wp, -8.92061078_wp, 4.91388538_wp, & - & 4.97754544_wp, -8.71730516_wp, 5.51687302_wp, 7.91273677_wp, & - & 4.30876061_wp, 0.10777928_wp, -2.70176992_wp, -8.79420294_wp, & - & 4.05878191_wp, 10.01564129_wp, -6.58749908_wp, 4.08787284_wp, & - & 8.48728520_wp, -5.66297513_wp, 2.90216897_wp, 5.75629860_wp, & - & -5.65811691_wp, 0.30331891_wp, 7.71433379_wp, -6.30671266_wp, & - & -1.58364744_wp, 9.32866353_wp, -4.86180478_wp, -2.86003362_wp, & - & -0.25676159_wp, -4.25953118_wp, 0.32368707_wp, 2.96365722_wp, & - & -3.87664935_wp, -1.58681012_wp, 8.25150278_wp, -2.99708848_wp, & - & -1.40128977_wp, 5.37259959_wp, -3.21067302_wp, -4.52827211_wp, & - & 5.54203095_wp, -4.11904254_wp, -6.90952980_wp, 5.39980093_wp, & - & -1.62790984_wp, -1.80909393_wp, 1.68215507_wp, -1.52723658_wp, & - & -6.44827273_wp, 4.90033679_wp, -0.33609125_wp, -4.67556387_wp, & - & 2.72887792_wp, -0.48999274_wp, -7.38377771_wp, 1.05646485_wp, & - & -1.84038995_wp, -9.37848687_wp, 0.22765350_wp, 1.47692662_wp, & - & -8.06940897_wp, -4.77713361_wp, 2.75081823_wp, -9.97242612_wp, & - & -3.45632381_wp, 1.33749177_wp, -1.02174205_wp, -3.15046772_wp, & - & 0.81137086_wp, -9.48116975_wp, 0.07473717_wp, 2.51439466_wp, & - & -7.32455954_wp, -1.68375116_wp, 16.93238515_wp, 4.46160901_wp, & - & 0.85197569_wp, 17.14911367_wp, 2.04232480_wp, 1.09216627_wp, & - & 17.50501416_wp, 1.08038606_wp, 3.18820724_wp, 20.84637774_wp, & - & -2.34216012_wp, -0.50678928_wp, 1.00010520_wp, -5.60310303_wp, & - & -2.25834421_wp, 20.28542712_wp, -0.50090712_wp, -1.84524570_wp, & - & 0.83147110_wp, -4.04135117_wp, -3.93100940_wp, 19.77221214_wp, & - & -0.79489620_wp, -4.22202487_wp, 17.21434596_wp, -1.86750687_wp, & - & -2.15869906_wp, 17.14437982_wp, 0.49041173_wp, -2.21546536_wp, & - & 1.56431288_wp, -1.75977947_wp, -1.01044514_wp, 17.26246519_wp, & - & -0.59758103_wp, -0.07755441_wp, 1.66077374_wp, -2.41446269_wp, & - & 1.30283658_wp, 1.36997370_wp, -4.09589261_wp, -0.32852214_wp, & - & 17.89996484_wp, -4.27692067_wp, 0.48926755_wp, 17.62060399_wp, & - & -4.27416695_wp, -1.79081609_wp, 13.43668180_wp, 4.43463268_wp, & - & -1.52888681_wp, 14.54122402_wp, -0.82726809_wp, 3.48046308_wp, & - & 14.42509230_wp, -1.85933173_wp, 1.37476738_wp, 13.69906376_wp, & - & 4.48116224_wp, 0.75507255_wp, 14.63158351_wp, -4.28653158_wp, & - & 1.15402229_wp, 14.10697561_wp, 0.78240505_wp, 0.15349233_wp, & - & 11.41375125_wp, -2.77341077_wp, 1.76567443_wp, 11.60451587_wp, & - & -2.00947887_wp, -0.46798946_wp, 11.18641466_wp, -0.39795924_wp, & - & 1.24697663_wp, 14.02862337_wp, -0.33829057_wp, -1.96978283_wp, & - & 11.13267646_wp, -1.03489356_wp, 4.96261259_wp, 11.43395615_wp, & - & -3.18389124_wp, 4.20568383_wp, 13.68053689_wp, 2.00031921_wp, & - & -1.91949596_wp, 7.81019601_wp, -0.19214602_wp, 3.10365919_wp, & - & 7.89987897_wp, -0.87000188_wp, 5.41438824_wp, 4.68431404_wp, & - & -1.39175402_wp, 3.09990502_wp, 4.76231478_wp, -0.84788069_wp, & - & 0.72532881_wp, 4.72091134_wp, 1.36365296_wp, -0.14071365_wp, & - & 4.41069968_wp, 2.23841927_wp, 2.86450503_wp, 4.51443664_wp, & - & 0.65495829_wp, 4.53561310_wp, -1.78847843_wp, -3.99028962_wp, & - & 0.96446493_wp, 1.79969601_wp, 1.71232924_wp, -2.36426162_wp, & - & 1.60805643_wp, 0.99790920_wp, -0.13753798_wp, -1.71801919_wp, & - & -2.11556120_wp, -0.60086563_wp, 1.34802893_wp, 2.62236318_wp, & - & 1.66907669_wp, -1.95996362_wp, -2.45636244_wp, -2.90980508_wp, & - & 10.39545179_wp, 1.93051484_wp, -3.27612589_wp, -1.64700016_wp, & - & 2.96636486_wp, -0.02793121_wp, -1.52315215_wp, 1.03343049_wp, & - & 1.31565361_wp, -1.53383325_wp, 0.75551663_wp, -1.06037722_wp, & - & 10.75738202_wp, 1.46682331_wp, -0.90443353_wp, -1.13668705_wp, & - & 3.51656918_wp, -3.59223696_wp, -1.38836016_wp, 4.78010981_wp, & - & -1.69077822_wp, 10.48083606_wp, 3.15392236_wp, 0.68997700_wp, & - & -4.87107088_wp, 3.21116866_wp, -0.65594323_wp, -4.71071360_wp, & - & 0.79285111_wp, -0.45686005_wp, -4.69788084_wp, -0.70511591_wp, & - & -2.27843865_wp, -4.55397047_wp, 1.91321540_wp, -4.05143374_wp, & - & -4.70102711_wp, 3.97377520_wp, -3.03355344_wp, 20.54208613_wp, & - & 3.62084662_wp, 3.80585875_wp, -7.92499228_wp, 0.30537775_wp, & - & -2.04047911_wp, -7.76714797_wp, 1.31003854_wp, -4.22155933_wp, & - & -10.92195578_wp, 0.56111664_wp, -2.26467929_wp, -10.76642226_wp, & - & 2.36672719_wp, -0.74391226_wp, -10.88340002_wp, 0.13345808_wp, & - & 0.13942305_wp, -10.98793577_wp, -3.06622677_wp, -1.85209136_wp, & - & -10.97759748_wp, -1.54331438_wp, -3.57851579_wp, 20.95467934_wp, & - & 1.40050416_wp, 4.23049538_wp, -13.63525398_wp, -2.70104146_wp, & - & 2.56132311_wp, -4.59030772_wp, -1.85798156_wp, 3.68333666_wp, & - & -13.87432960_wp, -2.17331539_wp, 0.29525307_wp, -13.93968181_wp, & - & -3.93591304_wp, -1.39373460_wp, -4.57245832_wp, -1.28819952_wp, & - & 1.34902304_wp, 7.82145381_wp, -1.80052316_wp, -3.68511618_wp, & - & 7.48548369_wp, 0.42299437_wp, -3.18298945_wp, -16.95989601_wp, & - & -2.85405117_wp, -0.29127798_wp, -17.01110586_wp, -0.91236099_wp, & - & -1.63264325_wp, -16.96048083_wp, -0.64725113_wp, 0.75621840_wp, & - & -16.87694551_wp, -3.41227807_wp, 3.31082590_wp, -16.90211634_wp, & - & -4.67588131_wp, 1.38867288_wp, 7.72990160_wp, 1.41359144_wp, & - & -0.22813799_wp, 8.06062427_wp, -0.87713810_wp, 0.31588098_wp, & - & -20.08261343_wp, 1.32456618_wp, 2.64039794_wp, -20.06937104_wp, & - & -0.85864051_wp, 1.78058144_wp, 8.27473605_wp, -2.63783652_wp, & - & -1.36061319_wp, -20.14387286_wp, -2.77779636_wp, 3.28612105_wp, & - & -19.88529078_wp, -0.12767044_wp, -3.30026023_wp, -20.08881914_wp, & - & -1.92210942_wp, -1.75730491_wp, -20.11923660_wp, 0.31427366_wp, & - & -0.90431084_wp, -20.23518145_wp, 3.48980827_wp, -2.91454431_wp, & - & 20.20236752_wp, 3.51547980_wp, 1.35575170_wp, -20.00104869_wp, & - & 1.97574208_wp, -4.63733516_wp, -17.12841559_wp, 2.56137047_wp, & - & 2.66338651_wp, -17.05941762_wp, 2.21227909_wp, 0.33559287_wp, & - & -17.21328438_wp, 4.09022056_wp, -1.22513053_wp, 20.42394578_wp, & - & 1.24571553_wp, 0.49430889_wp, -14.04341941_wp, 2.92623437_wp, & - & 0.15864803_wp, -14.27539348_wp, 1.08013865_wp, -1.30389935_wp, & - & -13.87176977_wp, 0.64130364_wp, 1.01106372_wp, -13.67008467_wp, & - & 3.19491636_wp, 3.77746624_wp, -7.22632068_wp, 1.45030026_wp, & - & 4.72232508_wp, -13.93235467_wp, 4.60002846_wp, 1.97620480_wp, & - & -7.56333689_wp, -0.76863095_wp, 4.20883184_wp, 4.68807182_wp, & - & -3.91297172_wp, -3.27418037_wp, -10.78051175_wp, -0.83246948_wp, & - & 3.69209432_wp, -7.83022572_wp, -1.62715595_wp, 1.16944667_wp, & - & -7.81989807_wp, 0.69984787_wp, 0.74206330_wp, -10.63396103_wp, & - & 1.33297746_wp, 2.81595343_wp, -7.35713719_wp, 2.40244832_wp, & - & 2.41567253_wp, -10.45288524_wp, 3.25561969_wp, 4.31101838_wp, & - & 4.80207351_wp, -1.95047174_wp, -1.88646646_wp, 19.99133739_wp, & - & 3.12047887_wp, -0.96186233_wp, 19.42033525_wp, 7.04653763_wp, & - & 1.32677059_wp, 18.60510044_wp, 7.22547622_wp, 0.04351487_wp, & - & 17.27211783_wp, 7.99945084_wp, 0.23061172_wp, 16.24270426_wp, & - & 6.89799881_wp, 0.50155606_wp, 16.85566908_wp, 5.61007735_wp, & - & -0.07830973_wp, 1.03833118_wp, -9.20348465_wp, -1.33738052_wp, & - & 16.97449439_wp, 3.12223028_wp, 0.26100552_wp, 0.26125788_wp, & - & -8.01539541_wp, -1.90226350_wp, 17.25414245_wp, 2.19788359_wp, & - & 2.45524650_wp, 1.14056546_wp, -6.82667283_wp, -1.49519539_wp, & - & 3.59435450_wp, -0.90125936_wp, -5.32189583_wp, 4.11467290_wp, & - & -1.75859099_wp, -4.22415123_wp, -7.93173281_wp, 6.09930503_wp, & - & 6.83939764_wp, -8.87742072_wp, 6.20169591_wp, 5.64445733_wp, & - & 4.40026782_wp, -1.08357382_wp, -2.94508608_wp, -10.34701667_wp, & - & 6.56835196_wp, 6.01078669_wp, 17.18230444_wp, 3.51474629_wp, & - & 3.04966733_wp, -11.18586508_wp, 5.39409675_wp, 5.50615403_wp, & - & -10.28078499_wp, 4.70277859_wp, 4.46796635_wp, 17.03901317_wp, & - & 4.60148666_wp, 2.23566328_wp, -10.49931171_wp, 2.69754248_wp, & - & 2.94224206_wp, 4.90678604_wp, -3.34640829_wp, -1.96336516_wp, & - & -7.37924112_wp, 1.37961701_wp, 3.33153573_wp, -10.77173283_wp, & - & 0.51750172_wp, 3.90764189_wp, -7.60441022_wp, 1.99448015_wp, & - & 1.15037894_wp, -10.81579886_wp, 1.07327742_wp, 5.24654643_wp, & - & -10.67406702_wp, 2.41872419_wp, 5.40731106_wp, 19.93349498_wp, & - & -2.17080138_wp, -4.07444439_wp, 20.32210047_wp, -2.71480551_wp, & - & -2.88206894_wp, 0.76791438_wp, -5.34205102_wp, -3.66238414_wp, & - & 20.47075780_wp, -1.85114076_wp, -1.73393565_wp, 1.12312186_wp, & - & -3.38890025_wp, -2.71659145_wp, 19.96658437_wp, 0.08658362_wp, & - & -3.05502363_wp, 1.33595150_wp, -1.99651522_wp, -2.42220443_wp, & - & 19.19281333_wp, -0.19427745_wp, -5.45218164_wp, 19.77468819_wp, & - & -0.75642491_wp, -6.75797644_wp, 18.59694917_wp, -1.38889017_wp, & - & -7.52234494_wp, 17.40794620_wp, -1.37978372_wp, -6.52650947_wp, & - & 20.17716543_wp, 2.61606321_wp, 0.31839709_wp, -7.78090427_wp, & - & -0.34258289_wp, 1.64803721_wp, 4.82249931_wp, -5.37330923_wp, & - & -3.41514239_wp, -11.54367088_wp, 7.31862716_wp, 2.43035704_wp, & - & -12.41553109_wp, 7.48366550_wp, 1.17829419_wp, 3.69304703_wp, & - & -6.03413165_wp, -4.21576530_wp, -13.78232789_wp, 8.17449220_wp, & - & 1.44163534_wp, 4.34965540_wp, -6.98536767_wp, -5.20467520_wp, & - & -14.69694085_wp, 7.00268175_wp, 1.81736324_wp, -14.07269544_wp, & - & 5.77934095_wp, 1.11848391_wp, -7.58443333_wp, -0.01140251_wp, & - & 3.02568234_wp, -13.74248133_wp, 4.47104807_wp, 3.39868792_wp, & - & -7.36555069_wp, 0.10562731_wp, 5.20020734_wp, -13.76695352_wp, & - & 2.42928930_wp, 2.60345575_wp, -13.73453947_wp, 1.00601881_wp, & - & 2.40293623_wp, 5.87744279_wp, -6.79144316_wp, -5.01333176_wp, & - & -7.06276258_wp, 2.70582765_wp, 5.47512320_wp, -14.03327926_wp, & - & 1.56755940_wp, -0.04208395_wp, -7.79405127_wp, 2.67265140_wp, & - & 6.82930918_wp, 4.24891451_wp, -3.10163955_wp, -4.34649608_wp, & - & -13.89727217_wp, 3.29269683_wp, 1.46863833_wp, 17.02594758_wp, & - & -2.72751418_wp, -5.90946564_wp, 15.85255006_wp, 6.80612609_wp, & - & -3.17144902_wp, 14.86190476_wp, 6.11468481_wp, -4.11609600_wp, & - & 17.43830016_wp, -2.95051785_wp, -1.35337679_wp, 2.52460548_wp, & - & -8.73265366_wp, -1.33357443_wp, 1.51506625_wp, -2.76021580_wp, & - & -0.02315189_wp, 17.16815045_wp, -0.67516054_wp, -1.47795166_wp, & - & 1.22364678_wp, -4.34391227_wp, -1.66650953_wp, 13.49672465_wp, & - & 6.84148856_wp, -4.25069284_wp, 17.52146424_wp, -1.73053734_wp, & - & 0.79283551_wp, 17.63017802_wp, -2.96577626_wp, 0.06117740_wp, & - & -6.70690494_wp, 2.76307507_wp, 7.90555144_wp, 6.65879868_wp, & - & -6.55700967_wp, -6.30692217_wp, 17.87642833_wp, -5.04539107_wp, & - & -0.60002136_wp, -14.67971227_wp, 6.63870589_wp, -2.04862834_wp, & - & -15.42558307_wp, 6.05815788_wp, -3.25075503_wp, 17.36221234_wp, & - & -4.62814873_wp, -3.18187807_wp, -16.76552614_wp, 6.75660229_wp, & - & -3.61088475_wp, 17.99173321_wp, -5.92808298_wp, -3.69515399_wp, & - & -17.83923212_wp, 5.89738258_wp, -2.93446141_wp, -17.16521634_wp, & - & 4.54507788_wp, -2.64233846_wp, 12.64405066_wp, 6.20787064_wp, & - & -3.14678588_wp, -17.09626185_wp, 2.64964513_wp, -0.98147560_wp, & - & 16.91565317_wp, -6.51487275_wp, -4.61266637_wp, -5.36236218_wp, & - & 2.62953237_wp, 7.14365100_wp, -17.11429066_wp, 3.08873587_wp, & - & 1.37344374_wp, -4.67549367_wp, 1.26146248_wp, 7.23340301_wp, & - & -17.22654653_wp, 4.50402843_wp, 1.14274380_wp, -17.27815877_wp, & - & 4.96254652_wp, -0.14898468_wp, 13.25207338_wp, 4.81064478_wp, & - & -2.93223776_wp, 15.58729473_wp, -6.01033640_wp, -3.98082890_wp, & - & 14.97886028_wp, -6.97024136_wp, -2.95286447_wp, 13.49770825_wp, & - & 5.23124885_wp, -0.32836480_wp, 22.70298628_wp, 6.27277769_wp, & - & 6.26408144_wp, 14.67756091_wp, -4.39358556_wp, 2.54052794_wp, & - & 14.60475467_wp, -3.28973546_wp, 3.34434187_wp, 14.50449086_wp, & - & -1.98619529_wp, 2.73037759_wp, 14.46816479_wp, -2.96168359_wp, & - & 0.53971714_wp, 14.69128720_wp, -5.46402097_wp, 0.24828202_wp, & - & 15.41067305_wp, -6.69794260_wp, 0.82567425_wp, 13.81643293_wp, & - & 3.15719289_wp, 0.30373912_wp, 14.41169106_wp, -7.85373599_wp, & - & 0.72935932_wp, 14.03409957_wp, 1.93355811_wp, 1.02997202_wp, & - & -17.43752365_wp, 3.93678262_wp, -6.02176605_wp, -17.95533669_wp, & - & 2.84030087_wp, -6.96453247_wp, 13.03542990_wp, -7.15861545_wp, & - & 0.55409102_wp, -19.27437564_wp, 3.15248491_wp, -7.72330714_wp, & - & 12.23773326_wp, -6.95846608_wp, 1.84591926_wp, -20.34100441_wp, & - & 2.23348929_wp, -7.09673319_wp, -19.63387943_wp, 1.46500552_wp, & - & -5.96892283_wp, 13.89573651_wp, 0.83004705_wp, -1.23650452_wp, & - & -20.14111489_wp, 3.35893985_wp, -4.23375058_wp, 21.92251204_wp, & - & 6.66654886_wp, 4.99927302_wp, -20.13984000_wp, 2.19011988_wp, & - & -2.38791286_wp, -20.17065764_wp, 1.75513199_wp, -1.02129756_wp, & - & 11.32161065_wp, -2.36747302_wp, 3.07188110_wp, 11.36260260_wp, & - & -1.74052554_wp, 0.86382949_wp, -19.99486210_wp, -0.55880613_wp, & - & -2.00395669_wp, 11.03915411_wp, 0.04727351_wp, 2.61608881_wp, & - & 11.16362695_wp, -1.03199108_wp, 3.55871940_wp, -19.97716028_wp, & - & 1.23633044_wp, -3.44246731_wp, 3.45558090_wp, -9.46335673_wp, & - & -2.30118031_wp, 11.27073140_wp, -2.30812336_wp, 5.33556278_wp, & - & 11.56093578_wp, -4.63938801_wp, 4.11191943_wp, 12.22169691_wp, & - & -5.30658149_wp, 5.33290682_wp, 0.54447840_wp, -6.79235683_wp, & - & 1.89372529_wp, 11.30229289_wp, -6.48558360_wp, 5.66904135_wp, & - & 13.67154838_wp, 3.11254170_wp, -1.11860203_wp, 9.91974923_wp, & - & -6.02602734_wp, 5.12731360_wp, 9.08070428_wp, -5.20887668_wp, & - & 6.11726333_wp, 8.08950232_wp, 0.47799208_wp, 5.79330338_wp, & - & 8.29251767_wp, 2.90547650_wp, 5.24211809_wp, 8.06139257_wp, & - & 1.48031816_wp, 4.88287519_wp, 7.87653991_wp, 1.19474036_wp, & - & 3.44735739_wp, -22.82432419_wp, -4.56157318_wp, 5.73947612_wp, & - & -22.01624368_wp, -5.36158021_wp, 4.70119335_wp, -0.11695326_wp, & - & -6.06606535_wp, 3.06756234_wp, -20.64382150_wp, -5.87240024_wp, & - & 5.20961291_wp, 7.99278914_wp, -1.67286106_wp, -2.29913443_wp, & - & -19.62854602_wp, -4.87152213_wp, 4.66184874_wp, -20.30957231_wp, & - & -4.23417216_wp, 3.44221419_wp, 7.88434558_wp, -1.25116952_wp, & - & 4.01702660_wp, -20.13983135_wp, -2.22934168_wp, 1.92000864_wp, & - & 7.82816347_wp, -1.95086467_wp, 6.39957703_wp, 8.75688237_wp, & - & -1.84106002_wp, 7.61948973_wp, -19.98249903_wp, -0.02699315_wp, & - & 2.86093451_wp, 7.98540066_wp, -2.53902891_wp, 8.73601399_wp, & - & -19.88671370_wp, -0.56873736_wp, 4.20143801_wp, -19.97865078_wp, & - & -1.91651441_wp, 4.37783140_wp, 6.49327259_wp, -2.47065532_wp, & - & 8.29384546_wp, 5.60712552_wp, -1.62126575_wp, 9.20388402_wp, & - & 20.43147588_wp, 7.02198909_wp, 5.25550711_wp, 4.57717794_wp, & - & -0.04171378_wp, 3.32054152_wp, -1.51157773_wp, -6.62074670_wp, & - & 3.46270520_wp, 4.78442988_wp, -1.71954592_wp, 1.78926575_wp, & - & -2.48917462_wp, -5.74037003_wp, 2.68000888_wp, 4.64633188_wp, & - & 0.50779024_wp, 0.94205662_wp, 4.54805661_wp, 0.96256119_wp, & - & 2.28955334_wp, -1.72489942_wp, -4.44044550_wp, 2.37563726_wp, & - & 4.39446487_wp, 2.04523968_wp, 4.18349783_wp, -1.70898538_wp, & - & -2.54427319_wp, 0.70968703_wp, 20.70663654_wp, 0.61554039_wp, & - & 1.77723808_wp, 8.26771413_wp, -2.17519125_wp, -0.08725543_wp, & - & 4.49385813_wp, 0.03335926_wp, 5.87203507_wp, -19.48241789_wp, & - & -7.17475777_wp, 1.72275151_wp, -18.61050786_wp, -7.38457680_wp, & - & 0.47807602_wp, 5.21481348_wp, 0.90976549_wp, 6.91004096_wp, & - & -17.30260433_wp, -8.18237183_wp, 0.73754047_wp, 7.81832525_wp, & - & 0.10469337_wp, -0.62780785_wp, -16.28266058_wp, -7.09649187_wp, & - & 1.09391948_wp, -16.82995767_wp, -5.80546754_wp, 0.45488068_wp, & - & 4.13677852_wp, 1.44943061_wp, 7.85206261_wp, -16.85858922_wp, & - & -4.65489168_wp, 2.82854062_wp, 2.79321021_wp, 0.91454716_wp, & - & 7.29142704_wp, -16.93826318_wp, -2.56118075_wp, 2.19737205_wp, & - & -16.93991532_wp, -1.12504541_wp, 2.11989519_wp, 7.75305657_wp, & - & -0.28844982_wp, -1.99986789_wp, 1.89241217_wp, 1.94596368_wp, & - & 6.59557446_wp, -16.94826067_wp, -1.48459522_wp, -0.37445184_wp, & - & -4.95049936_wp, -3.17157902_wp, 3.33456644_wp, -5.61833813_wp, & - & -4.91094940_wp, 1.66339238_wp, -16.96006234_wp, -3.33357047_wp, & - & 0.99109224_wp, 12.54530828_wp, 3.44922547_wp, -5.91168154_wp, & - & 11.79367445_wp, 2.18686965_wp, -6.33885095_wp, 1.36440082_wp, & - & 3.65310438_wp, 0.73402008_wp, 1.53913186_wp, 3.39632788_wp, & - & -0.59763568_wp, 1.62380896_wp, 2.02730757_wp, -1.04541834_wp, & - & -1.83589473_wp, -2.99002068_wp, -1.64396161_wp, 10.35168051_wp, & - & 2.42763872_wp, -6.86464872_wp, 1.48147994_wp, 1.23099476_wp, & - & 1.21753886_wp, -1.88961850_wp, -4.41398105_wp, -1.40012239_wp, & - & 1.08536122_wp, 2.86236308_wp, 3.11044522_wp, 1.77653838_wp, & - & 4.11038564_wp, 3.68994721_wp, 20.72655966_wp, 1.57168976_wp, & - & 2.85484125_wp, -5.12208501_wp, -3.55986837_wp, 2.04430746_wp, & - & 7.53256995_wp, -0.47538052_wp, -4.16729495_wp, -16.51976014_wp, & - & -6.70400583_wp, -2.80188392_wp, -15.78351662_wp, -5.73412391_wp, & - & -3.73057974_wp, 9.46421994_wp, 2.22371495_wp, -5.63210043_wp, & - & -14.40036245_wp, -6.25361364_wp, -4.21107105_wp, 7.99205546_wp, & - & -3.04241700_wp, -4.46336956_wp, -13.39680246_wp, -5.55794502_wp, & - & -3.28938180_wp, -14.11660991_wp, -4.28290208_wp, -2.81895484_wp, & - & -4.88039110_wp, -2.61782076_wp, 0.93953791_wp, -13.97175419_wp, & - & -2.51432084_wp, -1.03513765_wp, 7.01019234_wp, -3.11340622_wp, & - & -5.64285475_wp, 0.67966145_wp, 4.88238720_wp, 4.42445623_wp, & - & -13.75197917_wp, -3.13226077_wp, 1.26801113_wp, -4.45981625_wp, & - & -0.84324008_wp, 2.66752699_wp, -13.71732242_wp, -4.53539083_wp, & - & 0.92105474_wp, -13.79859960_wp, -4.89412760_wp, -0.39593975_wp, & - & 10.30534592_wp, 1.38429545_wp, -4.65423199_wp, -0.63742438_wp, & - & 4.37654422_wp, 3.78084736_wp, -1.17863341_wp, 5.25563055_wp, & - & 2.64872463_wp, -1.83363560_wp, -4.87268151_wp, -0.11372633_wp, & - & 10.70698347_wp, 0.99013104_wp, -2.19555166_wp, 19.69197916_wp, & - & 5.71427794_wp, 4.96768895_wp, -1.51358382_wp, 3.43155963_wp, & - & -1.30667685_wp, -1.60816155_wp, 1.59115801_wp, 0.06990503_wp, & - & -1.48057170_wp, 1.22935874_wp, -2.43539381_wp, -1.36264121_wp, & - & 2.66272799_wp, -2.50096108_wp, -1.15249162_wp, 4.75910503_wp, & - & -3.11668643_wp, -4.41871745_wp, -1.40549664_wp, 5.08476084_wp, & - & 7.84772894_wp, -3.03115533_wp, -6.92045542_wp, 9.30150574_wp, & - & -2.79808437_wp, -6.44477146_wp, -13.56845996_wp, -2.80091594_wp, & - & -5.87660874_wp, -12.81448026_wp, -1.56833882_wp, -6.39210359_wp, & - & 9.84184030_wp, -1.37596011_wp, -6.65539316_wp, -11.48709327_wp, & - & -1.89218923_wp, -7.12864427_wp, -1.54185329_wp, 5.86299795_wp, & - & -0.73934245_wp, -10.43711978_wp, -1.84750084_wp, -6.01422219_wp, & - & -11.04507064_wp, -0.95275269_wp, -4.91680576_wp, -5.08898046_wp, & - & -2.29067792_wp, 6.15068888_wp, -11.02176292_wp, -2.92916066_wp, & - & -3.17634122_wp, -0.57294490_wp, 7.04978305_wp, -0.86841380_wp, & - & -10.96991357_wp, -1.76357667_wp, -1.32432883_wp, -10.89929641_wp, & - & -1.30491332_wp, 0.03485926_wp, 10.52056993_wp, 2.79028406_wp, & - & -0.62071092_wp, -3.99959237_wp, -2.56830849_wp, 7.18792397_wp, & - & -10.82227644_wp, 1.00462550_wp, -0.97533206_wp, -1.34172338_wp, & - & 8.17733292_wp, -0.17718670_wp, -2.67548223_wp, -2.35333359_wp, & - & 6.40650114_wp, -10.97858035_wp, -0.80625386_wp, -2.38662836_wp, & - & -2.84031434_wp, 7.81098508_wp, -0.39798041_wp, -3.57460600_wp, & - & 8.72837300_wp, -1.37558733_wp, 10.27050771_wp, 3.73342995_wp, & - & -1.69047648_wp, 10.22493294_wp, 3.27823781_wp, -2.97812039_wp, & - & 20.55356053_wp, 5.07289143_wp, 3.86980646_wp, -4.78038016_wp, & - & 3.01774844_wp, -2.01395994_wp, -4.80019452_wp, 2.06497871_wp, & - & 0.05547367_wp, -4.67876551_wp, 0.58181252_wp, -1.82330428_wp, & - & -4.68462562_wp, 1.73752790_wp, -2.66303420_wp, -4.55878478_wp, & - & 3.23201305_wp, -4.25688690_wp, 20.49168884_wp, 2.94729473_wp, & - & 2.57133343_wp, 20.86581427_wp, 2.60546989_wp, 4.78628169_wp, & - & -4.76532532_wp, 5.42646018_wp, -2.80362135_wp, -3.87138900_wp, & - & 6.21867782_wp, -3.77170673_wp, -10.18808488_wp, 1.73076897_wp, & - & -6.86227203_wp, -9.30954625_wp, 2.97315426_wp, -6.67398675_wp, & - & -4.79497245_wp, 7.17525301_wp, -4.52587364_wp, -7.95622731_wp, & - & 2.94201518_wp, -7.43167356_wp, -6.23550872_wp, 6.72414747_wp, & - & -4.16620443_wp, -6.97585810_wp, 2.35303216_wp, -6.41373246_wp, & - & -7.63342500_wp, 2.54998051_wp, -5.03462907_wp, -2.09860510_wp, & - & -3.61338529_wp, 5.75173603_wp, -7.93679970_wp, 1.48058592_wp, & - & -2.80108984_wp, -6.97739062_wp, 5.97314626_wp, -5.27511102_wp, & - & -7.61928400_wp, 0.02233285_wp, -4.76829820_wp, -7.75372666_wp, & - & -1.01981518_wp, -2.54450947_wp, -7.37505778_wp, -2.46207802_wp, & - & -4.56613278_wp, -7.59245410_wp, -1.09951534_wp, -4.00503211_wp, & - & -20.54576460_wp, -9.71554163_wp, 4.23652025_wp, 9.19111262_wp, & - & 3.22322275_wp, -5.21577445_wp, -10.52617677_wp, 1.35531304_wp, & - & -5.85786828_wp, -11.06113527_wp, 1.94018487_wp, -7.50691506_wp, & - & -9.87670628_wp, 3.91321063_wp, -6.87162499_wp, -7.97426280_wp, & - & 2.40086242_wp, -8.40290923_wp, -6.80150293_wp, 1.27563888_wp, & - & -6.65992194_wp, -5.94369712_wp, 2.75423525_wp, -6.43307780_wp, & - & -7.16323524_wp, 3.34362305_wp, -4.39013049_wp, -7.95322442_wp, & - & 0.40659635_wp, -0.97585386_wp, -7.39454390_wp, -2.48920784_wp, & - & -5.66135144_wp, -6.39504133_wp, -2.85492841_wp, -4.24347532_wp, & - & -8.12418585_wp, -3.17182045_wp, -4.17825643_wp, -7.50783559_wp, & - & -0.01846647_wp, -5.86807901_wp, 3.74216994_wp, -1.32969939_wp, & - & -6.31951272_wp, 10.20002980_wp, 3.40126107_wp, -7.37887260_wp, & - & 12.40317295_wp, 1.58432155_wp, -7.05412281_wp, 4.87588626_wp, & - & -1.50546096_wp, -0.91497589_wp, 8.47086663_wp, 1.76394296_wp, & - & -5.80649393_wp, 13.17002118_wp, 3.85463763_wp, -6.72775568_wp, & - & 10.00047763_wp, 0.30036617_wp, -4.57960553_wp, 13.17507752_wp, & - & 3.23016581_wp, -5.00790236_wp, 10.65272208_wp, 2.44225308_wp, & - & 1.42327794_wp, 10.56605596_wp, 4.11605502_wp, 0.97848076_wp, & - & 10.11167739_wp, 4.78108527_wp, -1.45749481_wp, -10.31831600_wp, & - & 2.93262784_wp, -1.46963917_wp, -1.83432923_wp, -5.95209006_wp, & - & 0.11986388_wp, -10.60437616_wp, 2.69914912_wp, 0.21641162_wp, & - & -10.75757146_wp, 0.53686708_wp, 1.10720101_wp, -1.97140716_wp, & - & -5.09987071_wp, -2.23906434_wp, -1.61433887_wp, -3.00742031_wp, & - & -3.69422229_wp, -11.03904162_wp, -3.72024189_wp, -3.91579854_wp, & - & -1.76296566_wp, -1.44109828_wp, -3.01926964_wp, -10.62957746_wp, & - & 0.09810060_wp, -4.87748004_wp, -7.61375360_wp, 5.17295880_wp, & - & -4.82609335_wp, -7.59294173_wp, 6.65797065_wp, -5.88988758_wp, & - & -6.85000478_wp, 7.58327635_wp, -3.79817427_wp, -4.59587571_wp, & - & 7.22910306_wp, -5.61874761_wp, -3.33129782_wp, 5.56249563_wp, & - & -4.48782234_wp, -3.06796167_wp, 6.71353071_wp, -3.18226888_wp, & - & -4.57979519_wp, 5.62129240_wp, -1.70664313_wp, -4.43784403_wp, & - & 3.74010500_wp, -5.20907579_wp, -4.66452167_wp, -1.48384301_wp, & - & -1.59887044_wp, -4.43083524_wp, -0.90511200_wp, -3.23315484_wp, & - & -4.80926094_wp, 2.13757661_wp, 1.16487027_wp, -9.43184002_wp, & - & -1.49313403_wp, -6.30556347_wp, -10.24999452_wp, -2.88736145_wp, & - & -5.65415536_wp, -11.49324521_wp, -2.83918862_wp, -7.71040936_wp, & - & -13.48009299_wp, -0.90092041_wp, -6.98746447_wp, -14.42476603_wp, & - & -3.06380767_wp, -6.52118715_wp, -2.01175261_wp, -3.56959936_wp, & - & 3.03712388_wp, -13.91689308_wp, -2.61692051_wp, -4.82306499_wp, & - & 4.98682526_wp, -5.82649598_wp, -2.40013627_wp, 10.02390736_wp, & - & 3.95745514_wp, -3.82784828_wp, 3.00440474_wp, -6.54594087_wp, & - & -3.50190004_wp, -3.45686916_wp, -5.52689234_wp, 3.17415280_wp, & - & 20.21921039_wp, 7.45994246_wp, 6.25193000_wp, -2.80371609_wp, & - & -6.27726460_wp, 1.75492310_wp, -13.75505442_wp, -5.94960794_wp, & - & -0.71854548_wp, -13.56195413_wp, -5.27750204_wp, 1.69819000_wp, & - & -1.64540532_wp, -7.71119197_wp, 3.29659943_wp, 0.57465401_wp, & - & -6.00403680_wp, 3.94195958_wp, -13.88180845_wp, -3.30970545_wp, & - & 3.32706712_wp, 1.28478972_wp, -7.53691489_wp, 2.23332909_wp, & - & 1.02812398_wp, -6.04176149_wp, 1.20440884_wp, -13.69138677_wp, & - & -1.68524670_wp, 2.75377052_wp, -4.53168442_wp, 8.26147868_wp, & - & -1.69904332_wp, -3.76647047_wp, 9.72573223_wp, -0.93063699_wp, & - & -3.38652468_wp, 7.76091265_wp, 0.57793365_wp, -1.06254777_wp, & - & 9.19630291_wp, -0.51955952_wp, -0.40630963_wp, 7.32617399_wp, & - & -1.93451876_wp, 0.44185781_wp, 6.83540372_wp, -0.48701141_wp, & - & -1.56368345_wp, 5.41456363_wp, 0.29741201_wp, -0.98729326_wp, & - & 5.66942779_wp, -3.67519881_wp, -1.57913530_wp, -0.29340829_wp, & - & -0.93771878_wp, -1.68513451_wp, 0.02403605_wp, 1.44616843_wp, & - & -1.63476381_wp, 1.63102039_wp, 2.13409207_wp, -13.87634506_wp, & - & -3.36345784_wp, -3.43599377_wp, -12.40491581_wp, -5.33093407_wp, & - & -3.72390428_wp, -13.15192765_wp, -6.24275894_wp, -2.44118332_wp, & - & -14.30563524_wp, -7.36069557_wp, -4.22738941_wp, -16.43652898_wp, & - & -5.43668395_wp, -4.58652867_wp, -17.03756731_wp, -7.50037106_wp, & - & -3.36740337_wp, -17.23882141_wp, -6.14582407_wp, -2.15323378_wp, & - & 3.04860460_wp, -5.30013028_wp, -4.74750790_wp, 4.02129021_wp, & - & -6.85531250_wp, -6.26016765_wp, -16.60459817_wp, -1.45610768_wp, & - & -2.39556332_wp, -16.85009261_wp, 0.10902366_wp, -1.70697239_wp, & - & -16.95614752_wp, 0.40545902_wp, 0.62645366_wp, -16.81752781_wp, & - & -5.57536064_wp, 3.39769923_wp, -16.30484470_wp, -5.46431096_wp, & - & -0.48296215_wp, -15.23183636_wp, -7.30481443_wp, 0.81440554_wp, & - & 2.50317490_wp, -0.74541005_wp, -5.18160122_wp, -16.23533168_wp, & - & -7.02359778_wp, 2.20790225_wp, -17.39494282_wp, -8.98652331_wp, & - & 1.49860033_wp, -1.58399663_wp, 4.60567158_wp, 1.82128578_wp, & - & -1.95903311_wp, 5.95057495_wp, 3.00238870_wp, -1.43119031_wp, & - & 4.18356033_wp, 4.54487511_wp, 0.80303797_wp, 5.98621728_wp, & - & 4.42051558_wp, 2.23837674_wp, 4.75049260_wp, 2.90487100_wp, & - & 2.64629508_wp, 3.82081387_wp, 4.31314784_wp, 1.30120930_wp, & - & 1.91023922_wp, 3.67115493_wp, 1.76720016_wp, 0.71490759_wp, & - & -2.63881845_wp, 1.47895077_wp, 2.35410651_wp, -3.08308353_wp, & - & 1.58558405_wp, 4.20359567_wp, -1.32241689_wp, 1.24556367_wp, & - & 4.68247062_wp, 1.11471780_wp, -19.20405261_wp, -7.80091665_wp, & - & -0.36798716_wp, -20.29960600_wp, -7.91567055_wp, 1.78157645_wp, & - & 19.66899355_wp, 5.08949487_wp, 5.88911333_wp, -19.89278618_wp, & - & -6.12846579_wp, 1.72025156_wp, -1.71495853_wp, -3.36006593_wp, & - & 4.72944944_wp, 13.51914559_wp, -0.37229833_wp, -2.85286259_wp, & - & -1.29675290_wp, -4.06544431_wp, 6.36213975_wp, 14.03403693_wp, & - & -1.23618644_wp, -1.45120734_wp, -1.90613443_wp, -1.82516404_wp, & - & 7.01834474_wp, -4.08810411_wp, -3.55366178_wp, 7.69151267_wp, & - & -5.43728901_wp, -3.26845999_wp, 5.73110386_wp, -22.33227738_wp, & - & -2.89052696_wp, 4.79480174_wp, -19.93588906_wp, -2.37745613_wp, & - & 5.37884686_wp, -19.73407166_wp, 0.10139054_wp, 5.04525629_wp, & - & -19.57907600_wp, 1.95707847_wp, 3.25124364_wp, -20.12540245_wp, & - & 1.65842404_wp, 1.65682067_wp, 4.05554112_wp, 0.09901204_wp, & - & -5.30877499_wp, -20.05169045_wp, -4.73689624_wp, 2.46167088_wp, & - & -18.63375607_wp, -5.28500507_wp, 4.40460750_wp, -19.37620838_wp, & - & -4.12068054_wp, 5.44745592_wp, 1.70668829_wp, 1.63504643_wp, & - & 5.53908953_wp, 0.92624258_wp, 2.06246579_wp, 7.12502424_wp, & - & 2.23111396_wp, 0.34929431_wp, 8.07321953_wp, 4.16800243_wp, & - & 2.55569814_wp, 7.97952443_wp, 5.79579490_wp, 1.73718123_wp, & - & 6.45188588_wp, 5.99149393_wp, 0.28403022_wp, 7.40568603_wp, & - & 4.86249999_wp, -1.02881817_wp, 5.79422105_wp, 4.31162249_wp, & - & 2.81050676_wp, 4.95018271_wp, 4.57155900_wp, 0.95140426_wp, & - & -1.07871147_wp, 4.33560076_wp, 2.29371725_wp, -0.01576698_wp, & - & 4.88264790_wp, -2.79194288_wp, 1.52918490_wp, -20.58301610_wp, & - & -6.01568522_wp, 6.30950138_wp, 14.23210615_wp, -0.15624263_wp, & - & 0.62900963_wp, 13.36455039_wp, 6.30382495_wp, -0.36209335_wp, & - & -22.61042402_wp, -6.18942311_wp, 4.25020075_wp, -22.66145382_wp, & - & -4.89882825_wp, 6.77806911_wp, 12.70628589_wp, 3.96724924_wp, & - & -3.44666282_wp, -23.90644291_wp, -4.59893836_wp, 5.50813643_wp, & - & 11.55392924_wp, 6.18253544_wp, -3.33060958_wp, -6.02666652_wp, & - & -1.83945286_wp, 6.52668131_wp, -4.68952726_wp, -0.30888936_wp, & - & 5.14416695_wp, 4.00623359_wp, -3.62726935_wp, -5.28139082_wp, & - & -4.56213955_wp, -0.52771363_wp, 0.57771319_wp, 12.73913562_wp, & - & 6.84646832_wp, -2.23454177_wp, -5.51723980_wp, -5.65392781_wp, & - & 2.46367842_wp, 10.27644589_wp, -0.99165075_wp, -5.69510707_wp, & - & 13.55400886_wp, 7.95058561_wp, -4.20056053_wp, 10.60316338_wp, & - & -1.34400411_wp, -7.45465769_wp, -19.65552494_wp, -2.54554686_wp, & - & -2.43093698_wp, -20.00756117_wp, -2.24819723_wp, -0.78199259_wp, & - & 4.66366813_wp, -1.34800061_wp, 8.68245030_wp, 5.38257627_wp, & - & -2.14606551_wp, 10.15455770_wp, 6.06564159_wp, -3.50174490_wp, & - & 8.19855891_wp, 8.17760704_wp, -2.12331741_wp, 9.74978425_wp, & - & 8.95176169_wp, -0.78147911_wp, 7.90498821_wp, 9.76898292_wp, & - & -2.23405896_wp, 7.39717905_wp, 7.92153904_wp, -2.94517184_wp, & - & 5.86675672_wp, 7.89501125_wp, -0.43707976_wp, 2.06245513_wp, & - & 8.06920984_wp, 3.13024412_wp, 6.29103616_wp, 9.35137729_wp, & - & 3.17081331_wp, 5.06281948_wp, 7.69100657_wp, 3.57808866_wp, & - & 4.60760518_wp, 8.26075426_wp, 0.65884320_wp, 6.86479418_wp, & - & 15.32641390_wp, 5.89430052_wp, -5.10441641_wp, 16.59070259_wp, & - & 7.41630425_wp, -3.72168606_wp, 16.36952511_wp, 6.03756594_wp, & - & -2.54134108_wp, -20.09505275_wp, -0.07753288_wp, 0.07631062_wp, & - & -20.19243404_wp, 4.15189135_wp, -4.97205988_wp, -19.75435821_wp, & - & 0.35351822_wp, -5.98189722_wp, -20.75488169_wp, 1.53608895_wp, & - & -7.84890701_wp, -21.21499715_wp, 2.81017643_wp, -6.73554358_wp, & - & -18.97406123_wp, 1.94822305_wp, -9.30003004_wp, -19.55816520_wp, & - & 4.22798958_wp, -7.70967514_wp, 22.43342257_wp, 6.87093024_wp, & - & 7.15222211_wp, -17.14904842_wp, 2.51613031_wp, -7.66208055_wp, & - & -16.48458175_wp, 4.36702259_wp, -6.38220053_wp, -17.29494462_wp, & - & 3.51488923_wp, -4.99316999_wp, -6.68939120_wp, -4.86088398_wp, & - & 1.39759726_wp, 23.79436735_wp, 6.34328007_wp, 6.09057023_wp, & - & 1.27402359_wp, -3.06628107_wp, 1.98806828_wp, -5.10406753_wp, & - & -5.28546964_wp, 0.76343781_wp, 1.59433870_wp, -1.41226961_wp, & - & 1.56033835_wp, 1.64803850_wp, -0.73822977_wp, -0.71730445_wp, & - & -5.09752305_wp, -3.86716081_wp, 4.18041702_wp, 8.58888465_wp, & - & -4.35298155_wp, 5.57652103_wp, 8.32570711_wp, -5.83046140_wp, & - & 6.63180520_wp, 9.33118926_wp, -6.86707318_wp, 4.69106815_wp, & - & 11.31173024_wp, -6.78659557_wp, 6.73634045_wp, 12.25517237_wp, & - & -4.62069891_wp, 6.21278945_wp, 13.28540989_wp, -5.55016932_wp, & - & 5.15852865_wp, 12.04605776_wp, -4.88002789_wp, 3.11886013_wp, & - & 11.27824191_wp, -2.69269353_wp, 6.34861426_wp, 11.03960828_wp, & - & 0.33871785_wp, 0.49874144_wp, 11.22582518_wp, -1.36927567_wp, & - & -1.18887894_wp, 11.68072004_wp, -2.98611237_wp, -0.74378141_wp, & - & 9.99458053_wp, -3.56544326_wp, -6.86593420_wp, 6.31355459_wp, & - & -7.65671256_wp, -4.45263243_wp, 0.56999788_wp, -6.15882627_wp, & - & -4.35931540_wp, 6.82136286_wp, -7.50809083_wp, -6.85497830_wp, & - & 7.48212577_wp, -2.26814857_wp, -7.64631092_wp, 6.25529436_wp, & - & -2.29883543_wp, -5.62791890_wp, 6.42106151_wp, -4.05756353_wp, & - & -5.55187645_wp, 7.96506534_wp, -3.92035127_wp, -3.76498328_wp, & - & 7.35564564_wp, -0.28980802_wp, -5.22410506_wp, -17.38414959_wp, & - & 6.03877021_wp, -0.37534347_wp, 1.06631321_wp, -6.56211704_wp, & - & -0.39905799_wp, -17.31616275_wp, 5.18558077_wp, 1.98240345_wp, & - & -0.79468848_wp, -7.92358413_wp, -1.59255880_wp, 0.19168190_wp, & - & -8.10119900_wp, -3.01951561_wp, -16.64497761_wp, 3.09622525_wp, & - & 3.37918019_wp, 0.86322070_wp, -10.16781316_wp, -1.85873857_wp, & - & -16.93780665_wp, 1.54286357_wp, 2.74266004_wp, -17.52472451_wp, & - & 3.69765297_wp, -3.29482061_wp, 11.78629897_wp, -5.92825948_wp, & - & 1.85576616_wp, 11.44246035_wp, -7.71563681_wp, 1.96654186_wp, & - & 12.41172354_wp, -7.66468835_wp, -0.22134870_wp, 14.47380101_wp, & - & -8.57315205_wp, 1.57304174_wp, 15.71992259_wp, -6.55791568_wp, & - & 1.88977231_wp, 16.38470116_wp, -6.86390754_wp, 0.32698240_wp, & - & 15.07681419_wp, -5.11230471_wp, -0.75019613_wp, 14.12637584_wp, & - & -0.84492534_wp, 4.40418639_wp, 14.38757877_wp, 0.06497031_wp, & - & 2.97834485_wp, 14.69313206_wp, -3.36986764_wp, 4.42347709_wp, & - & 14.78363227_wp, -5.40939630_wp, 2.96303583_wp, -18.77775645_wp, & - & 5.74860502_wp, -3.50686280_wp, -18.20744989_wp, 6.40615937_wp, & - & -2.01483638_wp, 2.94196768_wp, -8.78024330_wp, -0.29411789_wp, & - & -16.81787281_wp, 7.83475744_wp, -3.34749289_wp, -14.74556701_wp, & - & 5.99355171_wp, -4.13678211_wp, -13.94167757_wp, 7.40443774_wp, & - & -2.34704324_wp, -14.17022955_wp, 5.81427229_wp, -1.48247224_wp, & - & 7.66925449_wp, 1.61946875_wp, 0.78187595_wp, 7.63021822_wp, & - & -6.06122739_wp, -6.08737734_wp, 7.23188897_wp, 2.05747864_wp, & - & -0.83166645_wp, 3.83568806_wp, -10.40541763_wp, -1.84579329_wp, & - & 8.45119052_wp, -2.90694759_wp, 0.72462411_wp, 4.31659400_wp, & - & -8.81918542_wp, -2.58516160_wp, 22.43217719_wp, 7.46010616_wp, & - & 4.40840106_wp, -14.27661436_wp, 1.73465861_wp, -2.08089775_wp, & - & -14.04479898_wp, 0.10059867_wp, -1.53275824_wp, -13.90258966_wp, & - & -0.39485714_wp, 0.79619935_wp, -13.68176942_wp, 5.34612817_wp, & - & 4.03527312_wp, -14.58921662_wp, 5.46008903_wp, 0.16574010_wp, & - & -15.76788384_wp, 7.12581130_wp, 1.57492252_wp, -14.69640987_wp, & - & 6.89483326_wp, 2.92799717_wp, 14.34778247_wp, -6.40287109_wp, & - & -2.22816450_wp, 14.39365888_wp, -7.77275025_wp, -3.43900973_wp, & - & 14.83124926_wp, -5.72646832_wp, -4.75057025_wp, 16.98021266_wp, & - & -7.61408897_wp, -4.75134738_wp, 18.18328792_wp, -6.65063738_wp, & - & -2.86550285_wp, 18.98760469_wp, -5.78363805_wp, -4.15571020_wp, & - & 17.61393600_wp, -3.71600015_wp, -3.80307432_wp, 18.05610716_wp, & - & -6.11097896_wp, -0.64733054_wp, 17.24446428_wp, 0.35232406_wp, & - & 0.39217477_wp, 16.87938252_wp, 1.37437157_wp, -1.74998131_wp, & - & 16.87873917_wp, 0.41198610_wp, -3.19525359_wp, -13.75692908_wp, & - & 8.99226247_wp, 2.19200752_wp, -11.84985243_wp, 7.95489706_wp, & - & 0.34272318_wp, 18.62987050_wp, 5.80242093_wp, 4.67805809_wp, & - & -10.74507775_wp, 8.08142018_wp, 2.48208232_wp, -11.09971553_wp, & - & 6.28768737_wp, 2.45221681_wp, 16.98755255_wp, 5.62867499_wp, & - & 2.63836007_wp, -10.72534022_wp, 2.89366848_wp, 6.40007722_wp, & - & 17.22257553_wp, 3.62185896_wp, 4.12860789_wp, -11.00466496_wp, & - & 0.41771682_wp, 6.09294831_wp, -11.18484375_wp, -1.45035716_wp, & - & 4.37917193_wp, -10.82419486_wp, -1.17652007_wp, 2.71618416_wp, & - & -10.32949078_wp, 5.19054258_wp, 3.45062535_wp, 17.46538397_wp, & - & 1.08609956_wp, 4.19431673_wp, -12.17414166_wp, 5.64344223_wp, & - & 5.06989451_wp, -11.44271415_wp, 4.72462526_wp, 6.35595232_wp, & - & -10.50035845_wp, 6.80075048_wp, 7.08881864_wp, -8.47185559_wp, & - & 6.92547809_wp, 4.89172241_wp, -7.60454545_wp, 7.10672858_wp, & - & 7.17263290_wp, 16.83240818_wp, -2.59799531_wp, -4.80733335_wp, & - & 16.14138594_wp, -3.16855529_wp, -6.39861544_wp, 16.50001766_wp, & - & -0.90623625_wp, -6.97409945_wp, 18.82683875_wp, -2.38702654_wp, & - & -7.95486519_wp, 18.07850906_wp, 0.30794228_wp, -8.45756804_wp, & - & 20.58504411_wp, -1.49156695_wp, -6.59047512_wp, 20.24697157_wp, & - & 0.04561015_wp, -7.35774945_wp, 19.25548065_wp, 0.92308774_wp, & - & -5.34970465_wp, 20.84107471_wp, -1.69043176_wp, 0.30148256_wp, & - & 20.60617218_wp, -3.29702526_wp, -0.26914350_wp, 20.51327486_wp, & - & -3.77877039_wp, -2.78555334_wp, 19.75781232_wp, -2.79835431_wp, & - & -4.96521761_wp, 17.47772974_wp, 0.15006488_wp, 2.73242462_wp, & - & 19.43538518_wp, 10.39578488_wp, 3.04987411_wp, 16.37687530_wp, & - & 5.26062629_wp, -1.04175479_wp, 17.22639431_wp, 10.06391450_wp, & - & -2.97313144_wp, 15.22929795_wp, 7.07498739_wp, 0.09256719_wp, & - & 12.01727196_wp, 6.50195387_wp, -8.15726790_wp, 16.05932353_wp, & - & 6.82585198_wp, 1.60043994_wp, 10.15346998_wp, 0.09290266_wp, & - & -9.93672873_wp, 17.29875499_wp, 8.80536566_wp, 0.99324417_wp, & - & 7.27987660_wp, -5.92987473_wp, -10.18926958_wp, 19.23031087_wp, & - & 7.65455474_wp, -0.77521422_wp, 1.80762909_wp, -10.22630927_wp, & - & -6.45846904_wp, 20.24780962_wp, 7.77528564_wp, 1.39322053_wp, & - & 0.09788012_wp, -10.48495185_wp, 2.43824839_wp, 19.82153385_wp, & - & 5.99300476_wp, 1.38116730_wp, -1.43152042_wp, -6.79486412_wp, & - & 7.28941244_wp, -7.05586405_wp, 5.46297947_wp, 6.58368333_wp, & - & -3.97730128_wp, -0.21914506_wp, 10.69041810_wp, -4.39977283_wp, & - & 0.91234049_wp, 6.20257843_wp, -6.04652014_wp, 5.92338336_wp, & - & 9.87857391_wp, -3.77273959_wp, 1.29389433_wp, 7.87296983_wp, & - & -11.46489795_wp, 10.52216120_wp, 4.58517920_wp, -4.65477444_wp, & - & 3.45054735_wp, 7.41685690_wp, -14.88672950_wp, 10.43812093_wp, & - & -1.84816430_wp, -7.63548506_wp, 2.76719698_wp, 0.35205848_wp, & - & -17.09608555_wp, 7.37278074_wp, -7.88822676_wp, -8.21405136_wp, & - & -2.34911275_wp, 1.76945591_wp, 16.61505860_wp, -5.47075742_wp, & - & -8.32770582_wp, -7.97342156_wp, -1.76378914_wp, 0.15346804_wp, & - & 14.47229766_wp, -10.49161950_wp, -2.07564101_wp, -7.29458115_wp, & - & -0.12424793_wp, 6.25912047_wp, 12.49073918_wp, -10.20637154_wp, & - & 3.85649819_wp, -7.32687428_wp, 3.57224358_wp, 4.80193820_wp, & - & 9.15769353_wp, -6.59390682_wp, 9.71189546_wp, -8.53581214_wp, & - & 3.50042869_wp, 6.84931819_wp, 4.74016868_wp, 1.03118060_wp, & - & 12.14308027_wp, -8.40346258_wp, 1.75724299_wp, 6.97033857_wp, & - & 0.91680105_wp, 4.86864518_wp, 8.90628183_wp, -6.83750858_wp, & - & 2.03758416_wp, 8.73860650_wp, -0.52003864_wp, 8.80166537_wp, & - & 3.89482291_wp, 20.32366580_wp, 5.47581463_wp, 2.83888302_wp, & - & -4.34256350_wp, 11.37998888_wp, -4.22552303_wp, 22.41675920_wp, & - & 4.36284483_wp, 5.81101812_wp, -7.36853411_wp, 6.60256902_wp, & - & -8.93684344_wp, 19.43077032_wp, 3.97477399_wp, -1.01761121_wp, & - & -11.33019297_wp, 0.61895350_wp, -10.18974798_wp, 19.79983326_wp, & - & 2.44029387_wp, -1.71487217_wp, -14.53785914_wp, -5.52489580_wp, & - & -7.99941313_wp, 20.34058274_wp, 0.58473253_wp, -0.32938141_wp, & - & -16.80106037_wp, -10.35888725_wp, -2.47794884_wp, 20.99031614_wp, & - & 2.85490831_wp, 5.83140116_wp & - & ], & - & shape(xyz)) - call new(self, sym, xyz) -end subroutine lnci16_dna -end module mstore_large diff --git a/src/mstore/meson.build b/src/mstore/meson.build index 850efaa..0d55be3 100644 --- a/src/mstore/meson.build +++ b/src/mstore/meson.build @@ -23,7 +23,8 @@ srcs += files( 'ice10.f90', 'il16.f90', 'mb16_43.f90', - 'large.f90', + 'amylose.f90', + 'polyalanine.f90', 'upu23.f90', 'x23.f90', ) diff --git a/src/mstore/polyalanine.f90 b/src/mstore/polyalanine.f90 new file mode 100644 index 0000000..2b2c2aa --- /dev/null +++ b/src/mstore/polyalanine.f90 @@ -0,0 +1,10969 @@ +! This file is part of mstore. +! SPDX-Identifier: Apache-2.0 +! +! Licensed under the Apache License, Version 2.0 (the "License"); +! you may not use this file except in compliance with the License. +! You may obtain a copy of the License at +! +! http://www.apache.org/licenses/LICENSE-2.0 +! +! Unless required by applicable law or agreed to in writing, software +! distributed under the License is distributed on an "AS IS" BASIS, +! WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +! See the License for the specific language governing permissions and +! limitations under the License. + +! Structures of polyalanine-chains as used in the following publication: + +! - L. Wittmann, M. Garcia‐Ratés, and C. Riplinger +! "Analytical First Derivatives of the SCF Energy for the Conductor‐Like +! Polarizable Continuum Model With Non‐Static Radii. +! J Comput Chem, 46 (11), e70099 (2025) +! https://doi.org/10.1002/jcc.70099. + +module mstore_polyalanine + use mctc_env_accuracy, only : wp + use mctc_io_structure, only : structure_type, new + use mstore_data_record, only : record_type, new_record + implicit none + private + public :: get_polyalanine_records +contains +subroutine get_polyalanine_records(records) + type(record_type), allocatable, intent(out) :: records(:) + records = [ & + new_record('polyala_04', polyala_04 ), & + new_record('polyala_08', polyala_08 ), & + new_record('polyala_12', polyala_12 ), & + new_record('polyala_16', polyala_16 ), & + new_record('polyala_20', polyala_20 ), & + new_record('polyala_24', polyala_24 ), & + new_record('polyala_28', polyala_28 ), & + new_record('polyala_32', polyala_32 ), & + new_record('polyala_36', polyala_36 ), & + new_record('polyala_40', polyala_40 ), & + new_record('polyala_44', polyala_44 ), & + new_record('polyala_48', polyala_48 ), & + new_record('polyala_52', polyala_52 ), & + new_record('polyala_56', polyala_56 ), & + new_record('polyala_60', polyala_60 ), & + new_record('polyala_64', polyala_64 ), & + new_record('polyala_68', polyala_68 ), & + new_record('polyala_72', polyala_72 ), & + new_record('polyala_76', polyala_76 ), & + new_record('polyala_80', polyala_80 ), & + new_record('polyala_84', polyala_84 ), & + new_record('polyala_88', polyala_88 ), & + new_record('polyala_92', polyala_92 ), & + new_record('polyala_96', polyala_96 ), & + new_record('polyala_100', polyala_100) & + ] +end subroutine get_polyalanine_records + +subroutine polyala_04(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 43 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.91568398_wp, 0.16184210_wp, -0.48009989_wp, 0.52956996_wp, & + & 0.10885109_wp, -0.51179430_wp, 1.01759788_wp, -0.24805062_wp, & + & 0.89439510_wp, 0.30635092_wp, -0.08360420_wp, 1.87863740_wp, & + & -1.30339492_wp, 0.60173514_wp, 0.34419317_wp, 0.81063359_wp, & + & -0.66464941_wp, -1.23300560_wp, 1.11735795_wp, 1.46438902_wp, & + & -0.91471834_wp, 0.76213566_wp, 1.73693889_wp, -1.90440291_wp, & + & 0.80810690_wp, 2.22640226_wp, -0.20342810_wp, 2.20205785_wp, & + & 1.42510829_wp, -0.92082591_wp, 2.25290336_wp, -0.76106460_wp, & + & 0.95532696_wp, 2.92914053_wp, -0.92328687_wp, 2.22483211_wp, & + & 3.36585851_wp, 0.44449557_wp, 2.74695824_wp, 3.29147252_wp, & + & 1.46432269_wp, 2.09953955_wp, 2.82825793_wp, -0.76143679_wp, & + & 0.12576830_wp, 2.20254949_wp, -1.31928775_wp, 2.94384209_wp, & + & 4.12534639_wp, -1.85961831_wp, 2.09554191_wp, 3.79330142_wp, & + & -2.83038398_wp, 1.74125795_wp, 4.85067316_wp, -1.45138635_wp, & + & 1.39615387_wp, 4.59862023_wp, -1.97751377_wp, 3.06524098_wp, & + & 3.83508780_wp, 0.38292289_wp, 3.97400589_wp, -6.03676079_wp, & + & -0.04929212_wp, -4.82946716_wp, -4.90010770_wp, -0.78244697_wp, & + & -4.29625483_wp, -4.42943098_wp, -0.11843888_wp, -3.00750908_wp, & + & -4.46466571_wp, 1.09884077_wp, -2.85617709_wp, -5.89807663_wp, & + & 0.93995311_wp, -4.63947299_wp, -5.22608763_wp, -1.80834635_wp, & + & -4.08983097_wp, -3.67349861_wp, -0.81451913_wp, -5.22761538_wp, & + & -3.91500767_wp, -1.34414257_wp, -6.14581222_wp, -3.37356254_wp, & + & 0.20370664_wp, -5.47113135_wp, -2.83575674_wp, -1.30877377_wp, & + & -4.74020925_wp, -3.96212201_wp, -0.96158778_wp, -2.07485597_wp, & + & -3.19388343_wp, -0.50303456_wp, -0.93706894_wp, -1.70220156_wp, & + & -0.54348646_wp, -1.29670431_wp, -1.28784078_wp, -1.18012149_wp, & + & -2.25941013_wp, -3.83112689_wp, -1.93141772_wp, -2.32535534_wp, & + & -3.49366004_wp, 0.53246149_wp, -0.74902184_wp, -3.45832430_wp, & + & -1.38818706_wp, 0.27910550_wp, -4.51377946_wp, -1.36002866_wp, & + & 0.53242405_wp, -3.17365982_wp, -2.41412333_wp, 0.05796410_wp, & + & -2.87923263_wp, -1.04459903_wp, 1.13142903_wp, -6.08705811_wp, & + & -0.16950025_wp, -5.83511548_wp, 4.12500799_wp, 1.24970866_wp, & + & 4.32247319_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_04 + +subroutine polyala_08(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 83 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.74141798_wp, -0.09176639_wp, -0.64788884_wp, 0.69237175_wp, & + & 0.08131421_wp, -0.56555910_wp, 1.14095473_wp, -0.46763561_wp, & + & 0.78991535_wp, 0.33950224_wp, -0.65396436_wp, 1.69867692_wp, & + & -1.21809312_wp, -0.04472346_wp, 0.24475682_wp, 1.14565648_wp, & + & -0.48075388_wp, -1.38828891_wp, 1.07284855_wp, 1.56266678_wp, & + & -0.66225963_wp, 0.71968966_wp, 1.96566064_wp, -1.60722788_wp, & + & 0.61842257_wp, 2.11628188_wp, 0.15567068_wp, 2.14918363_wp, & + & 1.68728108_wp, -0.60173309_wp, 2.44739422_wp, -0.73803314_wp, & + & 0.89160837_wp, 3.04721123_wp, -1.02953730_wp, 2.17641538_wp, & + & 3.06548570_wp, 0.23935375_wp, 3.02766986_wp, 2.78889769_wp, & + & 1.33739432_wp, 2.60111049_wp, 3.06951994_wp, -0.45577899_wp, & + & 0.14832938_wp, 2.40609166_wp, -1.75058167_wp, 2.69657687_wp, & + & 4.45720454_wp, -1.58410499_wp, 2.00885915_wp, 4.42612798_wp, & + & -2.48836404_wp, 1.40943607_wp, 5.09548822_wp, -0.85137788_wp, & + & 1.52148566_wp, 4.87233675_wp, -1.81902858_wp, 2.98392885_wp, & + & 3.42202786_wp, 0.00023919_wp, 4.27088413_wp, -6.53624706_wp, & + & -0.63883561_wp, -4.67297504_wp, -5.09222329_wp, -0.69777294_wp, & + & -4.60753584_wp, -4.71321045_wp, -0.62560846_wp, -3.12585912_wp, & + & -5.53048771_wp, -0.27801853_wp, -2.27890281_wp, -6.96724283_wp, & + & -0.21999993_wp, -3.85543422_wp, -4.76420966_wp, -1.64573116_wp, & + & -5.04649614_wp, -4.45522161_wp, 0.47034821_wp, -5.36827592_wp, & + & -4.75245250_wp, 0.42010947_wp, -6.41225907_wp, -4.79066703_wp, & + & 1.41563635_wp, -4.94962089_wp, -3.37249823_wp, 0.41961281_wp, & + & -5.30615532_wp, -3.45324622_wp, -0.95128985_wp, -2.85001178_wp, & + & -2.86055137_wp, -0.82872078_wp, -1.53590167_wp, -1.37475185_wp, & + & -0.52472627_wp, -1.73641303_wp, -0.83343254_wp, -0.68713861_wp, & + & -2.82517649_wp, -2.79171518_wp, -1.18230899_wp, -3.58306197_wp, & + & -3.35796661_wp, -0.00850267_wp, -1.00807229_wp, -3.01818733_wp, & + & -2.12817345_wp, -0.73770614_wp, -4.07579946_wp, -2.34125423_wp, & + & -0.60833116_wp, -2.55302012_wp, -2.95210969_wp, -1.27279235_wp, & + & -2.55411923_wp, -2.03466569_wp, 0.23966454_wp, -12.41431215_wp, & + & -1.22375044_wp, -8.57281097_wp, -11.00624184_wp, -1.52344545_wp, & + & -8.43367512_wp, -10.59400082_wp, -1.10028398_wp, -7.02145365_wp, & + & -11.31015687_wp, -0.37208101_wp, -6.34148963_wp, -12.74080094_wp, & + & -0.48007155_wp, -7.96641022_wp, -10.87162661_wp, -2.60116314_wp, & + & -8.57269094_wp, -10.17121364_wp, -0.75977329_wp, -9.46746910_wp, & + & -10.49647191_wp, -1.03978635_wp, -10.46596032_wp, -10.30841083_wp, & + & 0.31100319_wp, -9.33948700_wp, -9.11771138_wp, -0.99882536_wp, & + & -9.35775315_wp, -9.41559173_wp, -1.56751345_wp, -6.61692367_wp, & + & -8.77903009_wp, -1.18210537_wp, -5.37620385_wp, -7.26729715_wp, & + & -1.23786008_wp, -5.60913626_wp, -6.79521484_wp, -1.81287004_wp, & + & -6.58502682_wp, -8.82687561_wp, -2.12217646_wp, -7.22869792_wp, & + & -9.09690064_wp, -0.16445121_wp, -5.12703753_wp, -9.16397927_wp, & + & -2.13670869_wp, -4.24029149_wp, -10.24155775_wp, -2.11012379_wp, & + & -4.10295904_wp, -8.86281395_wp, -3.15127109_wp, -4.48846236_wp, & + & -8.68199863_wp, -1.84007560_wp, -3.31375304_wp, -17.02436899_wp, & + & -1.77925267_wp, -13.42108758_wp, -16.14386196_wp, -2.51326993_wp, & + & -12.52687486_wp, -15.65865556_wp, -1.58494935_wp, -11.41989816_wp, & + & -15.42159263_wp, -0.39899448_wp, -11.62900293_wp, -16.67522077_wp, & + & -0.82787368_wp, -13.50396847_wp, -16.71454411_wp, -3.34395147_wp, & + & -12.09637339_wp, -14.87171127_wp, -3.06302898_wp, -13.19984587_wp, & + & -15.13556608_wp, -3.79979382_wp, -13.95439674_wp, -14.32752245_wp, & + & -2.24653969_wp, -13.67260566_wp, -14.21791956_wp, -3.52460933_wp, & + & -12.46269343_wp, -15.49420454_wp, -2.16631995_wp, -10.22226172_wp, & + & -14.73786568_wp, -1.53266782_wp, -9.16275680_wp, -13.26742600_wp, & + & -1.95883439_wp, -9.28628814_wp, -12.92745322_wp, -2.90749958_wp, & + & -9.98596606_wp, -15.57067590_wp, -3.17161517_wp, -10.16159665_wp, & + & -14.81290151_wp, -0.45275439_wp, -9.32423314_wp, -15.29062871_wp, & + & -1.92862428_wp, -7.79606893_wp, -16.33643166_wp, -1.64495528_wp, & + & -7.72693410_wp, -15.20457634_wp, -3.00382433_wp, -7.65834664_wp, & + & -14.73607559_wp, -1.43093453_wp, -7.00618674_wp, -17.00931654_wp, & + & -2.19847787_wp, -14.34432877_wp, 3.44433328_wp, 0.80412324_wp, & + & 4.82697826_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_08 + +subroutine polyala_100(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 1003 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.25273943_wp, -0.07828512_wp, -0.03697728_wp, 0.95332697_wp, & + & 0.64062877_wp, 0.31103758_wp, 1.81759425_wp, -0.30710232_wp, & + & 1.14445203_wp, 1.35368283_wp, -1.33698830_wp, 1.62112626_wp, & + & -0.51339437_wp, -0.79531319_wp, 0.63008681_wp, 1.45933813_wp, & + & 0.92193121_wp, -0.61822157_wp, 0.62803828_wp, 1.89208849_wp, & + & 1.13403511_wp, -0.05804136_wp, 2.52127616_wp, 0.57404636_wp, & + & 0.16675938_wp, 1.60826557_wp, 2.07668900_wp, 1.52940478_wp, & + & 2.45624154_wp, 1.34979176_wp, 3.09565994_wp, 0.06096881_wp, & + & 1.29141177_wp, 3.94692204_wp, -0.60379907_wp, 2.25552432_wp, & + & 3.46049669_wp, -0.27904003_wp, 3.66743484_wp, 2.60589636_wp, & + & 0.54268383_wp, 3.90959383_wp, 3.38508296_wp, 0.97555367_wp, & + & 0.97717310_wp, 3.83182810_wp, -1.68582189_wp, 2.12413214_wp, & + & 5.40331181_wp, -0.19213255_wp, 2.07795860_wp, 5.73464388_wp, & + & -0.44172850_wp, 1.07528682_wp, 5.51604353_wp, 0.87687390_wp, & + & 2.23834194_wp, 6.01956239_wp, -0.72243979_wp, 2.79711545_wp, & + & 4.08166828_wp, -0.98855046_wp, 4.58409279_wp, -5.99840497_wp, & + & -0.58124156_wp, -4.12185219_wp, -4.67013839_wp, -0.03212681_wp, & + & -3.95620029_wp, -4.06107500_wp, -0.70427821_wp, -2.72286505_wp, & + & -4.76111174_wp, -1.32622587_wp, -1.92971410_wp, -6.39847136_wp, & + & -0.95232810_wp, -3.26670876_wp, -4.08687222_wp, -0.26412099_wp, & + & -4.85318934_wp, -4.72173391_wp, 1.48560845_wp, -3.75001156_wp, & + & -5.17329574_wp, 1.94951945_wp, -4.62264917_wp, -5.31910349_wp, & + & 1.72235877_wp, -2.87335048_wp, -3.72137013_wp, 1.88535948_wp, & + & -3.61501573_wp, -2.74685937_wp, -0.54706979_wp, -2.58664151_wp, & + & -2.00081972_wp, -0.98734409_wp, -1.42794431_wp, -0.85430469_wp, & + & 0.00479154_wp, -1.22169571_wp, -0.52996332_wp, 0.79511597_wp, & + & -2.10193907_wp, -2.21193416_wp, 0.02291424_wp, -3.23245142_wp, & + & -2.67445182_wp, -0.98715706_wp, -0.56486003_wp, -1.43261191_wp, & + & -2.39509785_wp, -1.64083784_wp, -2.25209236_wp, -3.09195904_wp, & + & -1.79411701_wp, -0.78751154_wp, -2.40766756_wp, -2.51556273_wp, & + & -0.85862280_wp, -2.70940316_wp, -0.77423131_wp, -11.71753380_wp, & + & -1.38073822_wp, -8.22105092_wp, -10.31269315_wp, -1.04448204_wp, & + & -8.13926610_wp, -9.86005714_wp, -1.36892083_wp, -6.71321354_wp, & + & -10.67692590_wp, -1.57876133_wp, -5.82167424_wp, -12.18732677_wp, & + & -1.40364447_wp, -7.32214760_wp, -9.76732854_wp, -1.65361654_wp, & + & -8.86758611_wp, -10.08346456_wp, 0.44173155_wp, -8.43538990_wp, & + & -10.43347649_wp, 0.66279046_wp, -9.44010365_wp, -10.63453040_wp, & + & 1.05274684_wp, -7.72504576_wp, -9.02751870_wp, 0.68498109_wp, & + & -8.36807728_wp, -8.54243126_wp, -1.38739674_wp, -6.53195362_wp, & + & -7.90681651_wp, -1.54404985_wp, -5.24183593_wp, -6.57720251_wp, & + & -0.78838286_wp, -5.30179688_wp, -6.10048302_wp, -0.42584585_wp, & + & -6.37276297_wp, -7.89974105_wp, -1.16076030_wp, -7.28327558_wp, & + & -8.56336225_wp, -1.11538275_wp, -4.47769651_wp, -7.64797374_wp, & + & -3.02246524_wp, -4.92985303_wp, -8.59557385_wp, -3.55376662_wp, & + & -4.90929140_wp, -7.01253893_wp, -3.45926728_wp, -5.69599048_wp, & + & -7.16213303_wp, -3.12889585_wp, -3.96464730_wp, -17.42213205_wp, & + & -2.43958027_wp, -12.32038086_wp, -15.98640446_wp, -2.27894999_wp, & + & -12.23574205_wp, -15.63300391_wp, -2.25133407_wp, -10.74665694_wp, & + & -16.50263627_wp, -2.11011421_wp, -9.89200635_wp, -17.90883099_wp, & + & -2.23691087_wp, -11.45289455_wp, -15.50679721_wp, -3.13011477_wp, & + & -12.73076832_wp, -15.53413663_wp, -0.97763222_wp, -12.90761198_wp, & + & -15.82420626_wp, -1.00145450_wp, -13.95466305_wp, -16.00692698_wp, & + & -0.12488743_wp, -12.42717967_wp, -14.45584973_wp, -0.87000708_wp, & + & -12.84273418_wp, -14.33747452_wp, -2.37433528_wp, -10.47421808_wp, & + & -13.77125445_wp, -2.24858849_wp, -9.14872561_wp, -12.31818102_wp, & + & -1.80251123_wp, -9.33002784_wp, -11.77221865_wp, -1.85381864_wp, & + & -10.42803651_wp, -13.64274195_wp, -2.45347232_wp, -11.20995420_wp, & + & -14.34125169_wp, -1.49525058_wp, -8.59472587_wp, -13.81918237_wp, & + & -3.58331414_wp, -8.39667683_wp, -14.85442928_wp, -3.89949898_wp, & + & -8.30083801_wp, -13.26527458_wp, -4.34106056_wp, -8.94486765_wp, & + & -13.38911467_wp, -3.47796434_wp, -7.40534200_wp, -23.15830793_wp, & + & -3.16481613_wp, -16.45671724_wp, -21.71536101_wp, -3.13812931_wp, & + & -16.35113486_wp, -21.38668810_wp, -3.03024865_wp, -14.86010468_wp, & + & -22.24899616_wp, -2.71951133_wp, -14.04358543_wp, -23.63474023_wp, & + & -2.86506178_wp, -15.61164779_wp, -21.31191412_wp, -4.06528117_wp, & + & -16.77178873_wp, -21.12539553_wp, -1.93849548_wp, -17.10125190_wp, & + & -21.39509145_wp, -2.01091539_wp, -18.15152678_wp, -21.52321938_wp, & + & -1.01191505_wp, -16.69532000_wp, -20.04344191_wp, -1.93010450_wp, & + & -17.01369493_wp, -20.11844807_wp, -3.27284515_wp, -14.54436037_wp, & + & -19.56549646_wp, -3.09842569_wp, -13.21845539_wp, -18.05824347_wp, & + & -2.89747883_wp, -13.39399210_wp, -17.50423857_wp, -3.16862668_wp, & + & -14.45529639_wp, -19.42665120_wp, -3.51078636_wp, -15.24830615_wp, & + & -20.02502887_wp, -2.21646194_wp, -12.75991012_wp, -19.82780840_wp, & + & -4.32601787_wp, -12.33896536_wp, -20.90032493_wp, -4.48109817_wp, & + & -12.25750570_wp, -19.37328705_wp, -5.20809944_wp, -12.78246413_wp, & + & -19.41613549_wp, -4.17554765_wp, -11.34584573_wp, -28.93574452_wp, & + & -3.68989280_wp, -20.60159564_wp, -27.49224736_wp, -3.67744791_wp, & + & -20.49964647_wp, -27.15965665_wp, -3.54605970_wp, -19.01129024_wp, & + & -28.01417459_wp, -3.19641209_wp, -18.20224978_wp, -29.40677171_wp, & + & -3.36922604_wp, -19.76112165_wp, -27.10046150_wp, -4.61647007_wp, & + & -20.90465107_wp, -26.88974308_wp, -2.49805903_wp, -21.27141363_wp, & + & -27.16695070_wp, -2.58235922_wp, -22.31883388_wp, -27.27111427_wp, & + & -1.55970726_wp, -20.87692335_wp, -25.80738225_wp, -2.50512349_wp, & + & -21.19030315_wp, -25.89675215_wp, -3.80875472_wp, -18.69087558_wp, & + & -25.34419130_wp, -3.64262511_wp, -17.36362245_wp, -23.82265898_wp, & + & -3.59694804_wp, -17.52371970_wp, -23.28554582_wp, -3.96292313_wp, & + & -18.56507420_wp, -25.21514126_wp, -4.10237966_wp, -19.38374352_wp, & + & -25.71849983_wp, -2.70483689_wp, -16.93951790_wp, -25.73480411_wp, & + & -4.80782843_wp, -16.44744491_wp, -26.81831344_wp, -4.85491031_wp, & + & -16.37778689_wp, -25.36329841_wp, -5.74459297_wp, -16.85484260_wp, & + & -25.32273949_wp, -4.66325618_wp, -15.45371541_wp, -34.74188055_wp, & + & -4.28383483_wp, -24.70509693_wp, -33.29808163_wp, -4.24406578_wp, & + & -24.61459928_wp, -32.95639823_wp, -4.09825536_wp, -23.12964769_wp, & + & -33.81000046_wp, -3.75543882_wp, -22.31671904_wp, -35.21228811_wp, & + & -3.96718699_wp, -23.86279042_wp, -32.89205736_wp, -5.17776437_wp, & + & -25.01784982_wp, -32.72369507_wp, -3.05776275_wp, -25.39710464_wp, & + & -33.00847007_wp, -3.15207985_wp, -26.44164081_wp, -33.11848379_wp, & + & -2.12458126_wp, -25.00350666_wp, -31.64074329_wp, -3.04521584_wp, & + & -25.32543039_wp, -31.68720705_wp, -4.33952398_wp, -22.81737340_wp, & + & -31.12832205_wp, -4.16540202_wp, -21.49376611_wp, -29.60722988_wp, & + & -4.13168706_wp, -21.66015199_wp, -29.07670437_wp, -4.51690958_wp, & + & -22.69795392_wp, -31.00828214_wp, -4.63560803_wp, -23.51188220_wp, & + & -31.49519109_wp, -3.22229052_wp, -21.07512132_wp, -31.52088453_wp, & + & -5.32156459_wp, -20.56688692_wp, -32.60430161_wp, -5.36238691_wp, & + & -20.49209191_wp, -31.15616989_wp, -6.26322489_wp, -20.96925505_wp, & + & -31.10343015_wp, -5.17167859_wp, -19.57622007_wp, -40.56046392_wp, & + & -4.97665961_wp, -28.77375461_wp, -39.11691405_wp, -4.91883919_wp, & + & -28.68905363_wp, -38.77038043_wp, -4.76560386_wp, -27.20607474_wp, & + & -39.62459830_wp, -4.43311331_wp, -26.38953419_wp, -41.03177393_wp, & + & -4.66526186_wp, -27.93004224_wp, -38.70078558_wp, -5.84802386_wp, & + & -29.09240547_wp, -38.56082839_wp, -3.72669776_wp, -29.47599538_wp, & + & -38.84878217_wp, -3.82636269_wp, -30.51916098_wp, -38.96572337_wp, & + & -2.79793407_wp, -29.08218830_wp, -37.47782288_wp, -3.70029834_wp, & + & -29.40893309_wp, -37.49633053_wp, -4.98845546_wp, -26.89991027_wp, & + & -36.93211572_wp, -4.80133135_wp, -25.58037164_wp, -35.41295125_wp, & + & -4.74138708_wp, -25.75717874_wp, -34.88299295_wp, -5.12098287_wp, & + & -26.79736055_wp, -36.81681762_wp, -5.27557493_wp, -27.59764338_wp, & + & -37.31273427_wp, -3.86371525_wp, -25.16168183_wp, -37.29857943_wp, & + & -5.96184441_wp, -24.64833166_wp, -38.38058842_wp, -6.02040579_wp, & + & -24.56536580_wp, -36.92139170_wp, -6.89815366_wp, -25.05167549_wp, & + & -36.87624916_wp, -5.80299880_wp, -23.66113964_wp, -46.37092318_wp, & + & -5.69951574_wp, -32.84642108_wp, -44.92773504_wp, -5.63885788_wp, & + & -32.75806426_wp, -44.58490746_wp, -5.48488654_wp, -31.27430046_wp, & + & -45.44179570_wp, -5.15566128_wp, -30.45925120_wp, -46.84508243_wp, & + & -5.39035939_wp, -32.00348968_wp, -44.50878520_wp, -6.56732216_wp, & + & -33.16019152_wp, -44.37189645_wp, -4.44586984_wp, -33.54390523_wp, & + & -44.65676199_wp, -4.54655258_wp, -34.58781997_wp, -44.77975880_wp, & + & -3.51776681_wp, -33.15160939_wp, -43.28912567_wp, -4.41719612_wp, & + & -33.47388090_wp, -43.31069742_wp, -5.70377655_wp, -30.96608675_wp, & + & -42.74770368_wp, -5.51298163_wp, -29.64657579_wp, -41.22923106_wp, & + & -5.43941402_wp, -29.82498249_wp, -40.69748155_wp, -5.81297273_wp, & + & -30.86646911_wp, -42.62900379_wp, -5.98675761_wp, -31.66344409_wp, & + & -43.13601697_wp, -4.57887034_wp, -29.22711073_wp, -43.10423031_wp, & + & -6.67712627_wp, -28.71531527_wp, -44.18571614_wp, -6.74489857_wp, & + & -28.63240411_wp, -42.71916268_wp, -7.60996244_wp, -29.11921661_wp, & + & -42.68331578_wp, -6.51528933_wp, -27.72801333_wp, -52.17042109_wp, & + & -6.41958591_wp, -36.93354778_wp, -50.72730813_wp, -6.36125968_wp, & + & -36.84275756_wp, -50.38728940_wp, -6.20858009_wp, -35.35819043_wp, & + & -51.24568615_wp, -5.87942202_wp, -34.54467837_wp, -52.64518436_wp, & + & -6.11001464_wp, -36.09107185_wp, -50.30901188_wp, -7.29019640_wp, & + & -37.24447137_wp, -50.16832023_wp, -5.16876478_wp, -37.62709536_wp, & + & -50.45171041_wp, -5.26847049_wp, -38.67150827_wp, -50.57536751_wp, & + & -4.24021734_wp, -37.23500324_wp, -49.08561808_wp, -5.14178419_wp, & + & -37.55537709_wp, -49.11399189_wp, -6.42868574_wp, -35.04716303_wp, & + & -48.55461855_wp, -6.23910315_wp, -33.72593355_wp, -47.03588780_wp, & + & -6.16203541_wp, -33.90018485_wp, -46.50053124_wp, -6.53288383_wp, & + & -34.94078676_wp, -48.43051993_wp, -6.71069225_wp, -35.74313644_wp, & + & -48.94607720_wp, -5.30660268_wp, -33.30582087_wp, -48.91108460_wp, & + & -7.40571725_wp, -32.79773316_wp, -49.99261926_wp, -7.47568221_wp, & + & -32.71735077_wp, -48.52335236_wp, -8.33704033_wp, -33.20256492_wp, & + & -48.49265401_wp, -7.24502521_wp, -31.80919019_wp, -57.96975533_wp, & + & -7.13164054_wp, -41.02230423_wp, -56.52655494_wp, -7.07461040_wp, & + & -40.93202572_wp, -56.18611323_wp, -6.92201539_wp, -39.44754998_wp, & + & -57.04407502_wp, -6.59175707_wp, -38.63401516_wp, -58.44385938_wp, & + & -6.82152062_wp, -40.17964746_wp, -56.10923289_wp, -8.00403089_wp, & + & -41.33363826_wp, -55.96667051_wp, -5.88282667_wp, -41.71678193_wp, & + & -56.25026799_wp, -5.98261736_wp, -42.76113066_wp, -56.37289458_wp, & + & -4.95382060_wp, -41.32492464_wp, -54.88393953_wp, -5.85674149_wp, & + & -41.64518876_wp, -54.91305938_wp, -7.14347272_wp, -39.13649134_wp, & + & -54.35403945_wp, -6.95496644_wp, -37.81496763_wp, -52.83503814_wp, & + & -6.88084347_wp, -37.98806069_wp, -52.29944012_wp, -7.25261122_wp, & + & -39.02819716_wp, -54.22987136_wp, -7.42659779_wp, -39.83226442_wp, & + & -54.74387175_wp, -6.02164989_wp, -37.39513971_wp, -54.71348891_wp, & + & -8.12076841_wp, -36.88689004_wp, -55.79523131_wp, -8.18880324_wp, & + & -36.80763025_wp, -54.32695798_wp, -9.05286589_wp, -37.29109068_wp, & + & -54.29584515_wp, -7.96057447_wp, -35.89793172_wp, -63.77233862_wp, & + & -7.84221570_wp, -45.10698029_wp, -62.32910491_wp, -7.78459248_wp, & + & -45.01747277_wp, -61.98762391_wp, -7.63235925_wp, -43.53322281_wp, & + & -62.84491783_wp, -7.30211047_wp, -42.71899366_wp, -64.24630153_wp, & + & -7.53183166_wp, -44.26436653_wp, -61.91165291_wp, -8.71365505_wp, & + & -45.41976120_wp, -61.77030793_wp, -6.59221569_wp, -45.80212593_wp, & + & -62.05476038_wp, -6.69158900_wp, -46.84628266_wp, -62.17651882_wp, & + & -5.66354807_wp, -45.40945134_wp, -60.68752611_wp, -6.56578977_wp, & + & -45.73144819_wp, -60.71431835_wp, -7.85397276_wp, -43.22324692_wp, & + & -60.15418360_wp, -7.66619417_wp, -41.90209931_wp, -58.63527678_wp, & + & -7.59278727_wp, -42.07629002_wp, -58.10056146_wp, -7.96513017_wp, & + & -43.11667127_wp, -60.03182394_wp, -8.13733130_wp, -43.91960344_wp, & + & -60.54330834_wp, -6.73291208_wp, -41.48155796_wp, -60.51325911_wp, & + & -8.83228313_wp, -40.97421685_wp, -61.59495081_wp, -8.89994920_wp, & + & -40.89398549_wp, -60.12744636_wp, -9.76433628_wp, -41.37921212_wp, & + & -60.09461691_wp, -8.67271300_wp, -39.98557847_wp, -69.57162700_wp, & + & -8.55026979_wp, -49.19669838_wp, -68.12849853_wp, -8.49358497_wp, & + & -49.10498727_wp, -67.78895991_wp, -8.34164830_wp, -47.62025116_wp, & + & -68.64698590_wp, -8.01042937_wp, -46.80720075_wp, -70.04671622_wp, & + & -8.23945622_wp, -48.35488899_wp, -67.71107154_wp, -9.42285901_wp, & + & -49.50680244_wp, -67.56771172_wp, -7.30143312_wp, -49.88857529_wp, & + & -67.85034952_wp, -7.40056465_wp, -50.93324381_wp, -67.97415545_wp, & + & -6.37259746_wp, -49.49653404_wp, -66.48504216_wp, -7.27555434_wp, & + & -49.81594827_wp, -66.51627389_wp, -8.56459095_wp, -47.30867431_wp, & + & -65.95690085_wp, -8.37627127_wp, -45.98727613_wp, -64.43788159_wp, & + & -8.30335592_wp, -46.16095236_wp, -63.90302176_wp, -8.67593726_wp, & + & -47.20118600_wp, -65.83327476_wp, -8.84851927_wp, -48.00432607_wp, & + & -66.34586932_wp, -7.44255906_wp, -45.56753251_wp, -66.31697480_wp, & + & -9.54160631_wp, -45.05886272_wp, -67.39874379_wp, -9.60878881_wp, & + & -44.97924295_wp, -65.93129866_wp, -10.47408657_wp, -45.46299613_wp, & + & -65.89888113_wp, -9.38154231_wp, -44.07007187_wp, -75.36805983_wp, & + & -9.25612788_wp, -53.29074857_wp, -73.92485921_wp, -9.20080468_wp, & + & -53.19913647_wp, -73.58553608_wp, -9.04831745_wp, -51.71436790_wp, & + & -74.44371022_wp, -8.71636609_wp, -50.90175407_wp, -75.84256424_wp, & + & -8.94459763_wp, -52.44884470_wp, -73.50829740_wp, -10.13077096_wp, & + & -53.60025366_wp, -73.36283272_wp, -8.00975721_wp, -53.98349130_wp, & + & -73.64562749_wp, -8.10924461_wp, -55.02808550_wp, -73.76825584_wp, & + & -7.08023169_wp, -53.59203151_wp, -72.28013299_wp, -7.98499589_wp, & + & -53.91094071_wp, -72.31310984_wp, -9.27167961_wp, -51.40201529_wp, & + & -71.75506778_wp, -9.08377092_wp, -50.07996955_wp, -70.23582685_wp, & + & -9.01128443_wp, -50.25161280_wp, -69.69960209_wp, -9.38422092_wp, & + & -51.29100484_wp, -71.62975354_wp, -9.55624646_wp, -52.09701990_wp, & + & -72.14438280_wp, -8.15010630_wp, -49.66045606_wp, -72.11643722_wp, & + & -10.24930372_wp, -49.15228147_wp, -73.19830440_wp, -10.31629658_wp, & + & -49.07386897_wp, -71.73048238_wp, -11.18174056_wp, -49.55625489_wp, & + & -71.69939751_wp, -10.08960890_wp, -48.16298543_wp, -81.16910860_wp, & + & -9.95945684_wp, -57.37883751_wp, -79.72579050_wp, -9.90457369_wp, & + & -57.28850189_wp, -79.38480003_wp, -9.75266116_wp, -55.80407266_wp, & + & -80.24190424_wp, -9.42047567_wp, -54.99043705_wp, -81.64291283_wp, & + & -9.64791163_wp, -56.53656455_wp, -79.30991114_wp, -10.83448517_wp, & + & -57.69044421_wp, -79.16421087_wp, -8.71333417_wp, -58.07290248_wp, & + & -79.44787853_wp, -8.81237938_wp, -59.11730027_wp, -79.56915572_wp, & + & -7.78388893_wp, -57.68075336_wp, -78.08144887_wp, -8.68878543_wp, & + & -58.00122149_wp, -78.11208408_wp, -9.97661452_wp, -55.49319971_wp, & + & -77.55243782_wp, -9.78881519_wp, -54.17181559_wp, -76.03329666_wp, & + & -9.71732133_wp, -54.34493311_wp, -75.49820574_wp, -10.09118414_wp, & + & -55.38456546_wp, -77.42971278_wp, -10.26158532_wp, -56.18899449_wp, & + & -77.94076625_wp, -8.85485750_wp, -53.75204518_wp, -77.91339316_wp, & + & -10.95396551_wp, -53.24347628_wp, -78.99520208_wp, -11.02035682_wp, & + & -53.16379082_wp, -77.52840222_wp, -11.88669376_wp, -53.64770128_wp, & + & -77.49510909_wp, -10.79428051_wp, -52.25470066_wp, -86.97039702_wp, & + & -10.66114033_wp, -61.46741862_wp, -85.52711917_wp, -10.60631847_wp, & + & -61.37640246_wp, -85.18666559_wp, -10.45467719_wp, -59.89180500_wp, & + & -86.04400356_wp, -10.12248761_wp, -59.07842340_wp, -87.44461813_wp, & + & -10.34970877_wp, -60.62534388_wp, -85.11111234_wp, -11.53615682_wp, & + & -61.77838074_wp, -84.96512431_wp, -9.41492900_wp, -62.16028439_wp, & + & -85.24821494_wp, -9.51376762_wp, -63.20485713_wp, -85.37028411_wp, & + & -8.48555980_wp, -61.76817717_wp, -83.88239995_wp, -9.39039277_wp, & + & -62.08800066_wp, -83.91406752_wp, -10.67887430_wp, -59.58062291_wp, & + & -83.35425561_wp, -10.49085488_wp, -58.25932644_wp, -81.83510555_wp, & + & -10.41997206_wp, -58.43284765_wp, -81.30057671_wp, -10.79367883_wp, & + & -59.47283588_wp, -83.23160853_wp, -10.96377690_wp, -60.27638393_wp, & + & -83.74212254_wp, -9.55657752_wp, -57.83983003_wp, -83.71559047_wp, & + & -11.65551447_wp, -57.33053510_wp, -84.79741871_wp, -11.72139482_wp, & + & -57.25067242_wp, -83.33108927_wp, -12.58855934_wp, -57.73449163_wp, & + & -83.29709737_wp, -11.49567885_wp, -56.34187345_wp, -92.77035560_wp, & + & -11.36467386_wp, -65.55764069_wp, -91.32710153_wp, -11.30949731_wp, & + & -65.46647261_wp, -90.98697183_wp, -11.15760202_wp, -63.98181544_wp, & + & -91.84461784_wp, -10.82566525_wp, -63.16864994_wp, -93.24468540_wp, & + & -11.05344685_wp, -64.71554276_wp, -90.91082242_wp, -12.23930138_wp, & + & -65.86825301_wp, -90.76525221_wp, -10.11810074_wp, -66.25043919_wp, & + & -91.04815080_wp, -10.21715882_wp, -67.29504345_wp, -91.17068121_wp, & + & -9.18876141_wp, -65.85854172_wp, -89.68254504_wp, -10.09331409_wp, & + & -66.17798246_wp, -89.71437791_wp, -11.38132940_wp, -63.67028088_wp, & + & -89.15507857_wp, -11.19302787_wp, -62.34879990_wp, -87.63587722_wp, & + & -11.12179687_wp, -62.52170721_wp, -87.10084426_wp, -11.49539350_wp, & + & -63.56147404_wp, -89.03161696_wp, -11.66603934_wp, -64.36582025_wp, & + & -89.54336401_wp, -10.25882042_wp, -61.92953587_wp, -89.51643983_wp, & + & -12.35770491_wp, -61.42003582_wp, -90.59827746_wp, -12.42385845_wp, & + & -61.34053475_wp, -89.13156076_wp, -13.29068259_wp, -61.82378946_wp, & + & -89.09832282_wp, -12.19768379_wp, -60.43124443_wp, -98.57123062_wp, & + & -12.07151967_wp, -69.64587441_wp, -97.12796591_wp, -12.01557486_wp, & + & -69.55539349_wp, -96.78726952_wp, -11.86345325_wp, -68.07090077_wp, & + & -97.64476322_wp, -11.53200386_wp, -67.25737163_wp, -99.04532641_wp, & + & -11.76059204_wp, -68.80353128_wp, -96.71138399_wp, -12.94517262_wp, & + & -69.95734012_wp, -96.56710638_wp, -10.82391658_wp, -70.33966807_wp, & + & -96.85042745_wp, -10.92317016_wp, -71.38413924_wp, -96.97284548_wp, & + & -9.89477501_wp, -69.94762584_wp, -95.48437951_wp, -10.79855726_wp, & + & -70.26770316_wp, -95.51443058_wp, -12.08646547_wp, -67.75986173_wp, & + & -94.95486164_wp, -11.89776429_wp, -66.43855684_wp, -93.43573989_wp, & + & -11.82578113_wp, -66.61179209_wp, -92.90070849_wp, -12.19920123_wp, & + & -67.65161996_wp, -94.83174149_wp, -12.37076532_wp, -68.45563433_wp, & + & -95.34354216_wp, -10.96372924_wp, -66.01927172_wp, -95.31538093_wp, & + & -13.06255562_wp, -65.50960553_wp, -96.39716023_wp, -13.12917453_wp, & + & -65.42970693_wp, -94.93024482_wp, -13.99538327_wp, -65.91346138_wp, & + & -94.89697023_wp, -12.90230696_wp, -64.52097521_wp, -104.37275187_wp, & + & -12.78101370_wp, -73.73241331_wp, -102.92951718_wp, -12.72446878_wp, & + & -73.64202595_wp, -102.58871679_wp, -12.57235548_wp, -72.15757438_wp, & + & -103.44618470_wp, -12.24121025_wp, -71.34389843_wp, -104.84698332_wp, & + & -12.47029732_wp, -72.89007417_wp, -102.51257878_wp, -13.65383820_wp, & + & -74.04413054_wp, -102.36923509_wp, -11.53247373_wp, -74.42620641_wp, & + & -102.65262831_wp, -11.63171153_wp, -75.47065910_wp, -102.77531415_wp, & + & -10.60355077_wp, -74.03399824_wp, -101.28651019_wp, -11.50667733_wp, & + & -74.35435560_wp, -101.31577279_wp, -12.79507683_wp, -71.84679003_wp, & + & -100.75582971_wp, -12.60606081_wp, -70.52570448_wp, -99.23682998_wp, & + & -12.53319654_wp, -70.69962695_wp, -98.70206220_wp, -12.90640093_wp, & + & -71.73967100_wp, -100.63314469_wp, -13.07902992_wp, -72.54277296_wp, & + & -101.14488020_wp, -11.67225209_wp, -70.10625960_wp, -101.11529540_wp, & + & -13.77106528_wp, -69.59661706_wp, -102.19700125_wp, -13.83824456_wp, & + & -69.51619275_wp, -100.72988173_wp, -14.70368002_wp, -70.00069805_wp, & + & -100.69647916_wp, -13.61063724_wp, -68.60818685_wp, -110.17283964_wp, & + & -13.49101138_wp, -77.82046957_wp, -108.72964816_wp, -13.43458459_wp, & + & -77.72955571_wp, -108.38942179_wp, -13.28245579_wp, -76.24498702_wp, & + & -109.24714134_wp, -12.95112968_wp, -75.43165019_wp, -110.64735766_wp, & + & -13.18012953_wp, -76.97835212_wp, -108.31263838_wp, -14.36400732_wp, & + & -78.13146256_wp, -108.16897477_wp, -12.24267013_wp, -78.51357975_wp, & + & -108.45198258_wp, -12.34193665_wp, -79.55813419_wp, -108.57512873_wp, & + & -11.31369612_wp, -78.12157002_wp, -107.08627430_wp, -12.21695464_wp, & + & -78.44132416_wp, -107.11665042_wp, -13.50542472_wp, -75.93372849_wp, & + & -106.55707825_wp, -13.31628588_wp, -74.61251743_wp, -105.03808518_wp, & + & -13.24294871_wp, -74.78620938_wp, -104.50305686_wp, -13.61597603_wp, & + & -75.82618667_wp, -106.43378753_wp, -13.78934282_wp, -76.62950034_wp, & + & -106.94648130_wp, -12.38259395_wp, -74.19313863_wp, -106.91642979_wp, & + & -14.48141273_wp, -73.68354651_wp, -107.99813498_wp, -14.54885519_wp, & + & -73.60332779_wp, -106.53072014_wp, -15.41391850_wp, -74.08759432_wp, & + & -106.49783721_wp, -14.32092574_wp, -72.69503140_wp, -115.97152059_wp, & + & -14.19923233_wp, -81.91023473_wp, -114.52833076_wp, -14.14366002_wp, & + & -81.81895459_wp, -114.18848984_wp, -13.99158004_wp, -80.33430410_wp, & + & -115.04624841_wp, -13.65957133_wp, -79.52128570_wp, -116.44604559_wp, & + & -13.88782747_wp, -81.06831157_wp, -114.11175478_wp, -15.07337597_wp, & + & -82.22063012_wp, -113.96674901_wp, -12.95215970_wp, -82.60295600_wp, & + & -114.24954060_wp, -13.05137565_wp, -83.64757410_wp, -114.37246791_wp, & + & -12.02290608_wp, -82.21115616_wp, -112.88405264_wp, -12.92706509_wp, & + & -82.53042015_wp, -112.91598904_wp, -14.21539018_wp, -80.02258262_wp, & + & -112.35683305_wp, -14.02643866_wp, -78.70118247_wp, -110.83779436_wp, & + & -13.95322430_wp, -78.87437279_wp, -110.30240561_wp, -14.32656778_wp, & + & -79.91404984_wp, -112.23303782_wp, -14.49974037_wp, -80.71808481_wp, & + & -112.74631011_wp, -13.09276521_wp, -78.28183782_wp, -112.71657702_wp, & + & -15.19164601_wp, -77.77246203_wp, -113.79831210_wp, -15.25900406_wp, & + & -77.69257810_wp, -112.33082242_wp, -16.12413548_wp, -78.17650462_wp, & + & -112.29826677_wp, -15.03131356_wp, -76.78380171_wp, -121.76982406_wp, & + & -14.90357684_wp, -86.00086302_wp, -120.32661339_wp, -14.84904021_wp, & + & -85.90940162_wp, -119.98689282_wp, -14.69707943_wp, -84.42472053_wp, & + & -120.84448341_wp, -14.36417613_wp, -83.61189086_wp, -122.24422781_wp, & + & -14.59157859_wp, -85.15909168_wp, -119.91065168_wp, -15.77908385_wp, & + & -86.31095076_wp, -119.76407494_wp, -13.65799107_wp, -86.69340231_wp, & + & -120.04677531_wp, -13.75708682_wp, -87.73805664_wp, -120.16921096_wp, & + & -12.72842832_wp, -86.30173045_wp, -118.68137291_wp, -13.63364654_wp, & + & -86.62069865_wp, -118.71466207_wp, -14.92203818_wp, -84.11274617_wp, & + & -118.15562670_wp, -14.73346026_wp, -82.79125145_wp, -116.63651587_wp, & + & -14.66131709_wp, -82.96415711_wp, -116.10114229_wp, -15.03531651_wp, & + & -84.00360445_wp, -118.03184117_wp, -15.20710966_wp, -84.80807651_wp, & + & -118.54452761_wp, -13.79950471_wp, -82.37200357_wp, -118.51635622_wp, & + & -15.89839526_wp, -81.86256941_wp, -119.59815342_wp, -15.96502720_wp, & + & -81.78292070_wp, -118.13113032_wp, -16.83115741_wp, -82.26648790_wp, & + & -118.09815804_wp, -15.73830064_wp, -80.87382262_wp, -127.56808059_wp, & + & -15.60350921_wp, -90.09213234_wp, -126.12484536_wp, -15.55003792_wp, & + & -90.00048014_wp, -125.78520328_wp, -15.39834004_wp, -88.51576094_wp, & + & -126.64259238_wp, -15.06459119_wp, -87.70306698_wp, -128.04237442_wp, & + & -15.29101350_wp, -89.25048580_wp, -125.70951368_wp, -16.48037629_wp, & + & -90.40199401_wp, -125.56134409_wp, -14.35937730_wp, -90.78438223_wp, & + & -125.84398589_wp, -14.45823996_wp, -91.82907461_wp, -125.96586424_wp, & + & -13.42953593_wp, -90.39273315_wp, -124.47863459_wp, -14.33581596_wp, & + & -90.71154026_wp, -124.51321977_wp, -15.62444453_wp, -88.20361189_wp, & + & -123.95419485_wp, -15.43633702_wp, -86.88205111_wp, -122.43501503_wp, & + & -15.36538156_wp, -87.05477996_wp, -121.89977768_wp, -15.74002763_wp, & + & -88.09406386_wp, -123.83058169_wp, -15.91022224_wp, -88.89882854_wp, & + & -124.34242713_wp, -14.50209751_wp, -86.46282045_wp, -124.31590371_wp, & + & -16.60102948_wp, -85.95344241_wp, -125.39775978_wp, -16.66688902_wp, & + & -85.87395619_wp, -123.93127872_wp, -17.53406305_wp, -86.35730837_wp, & + & -123.89773886_wp, -16.44124082_wp, -84.96463188_wp, -133.36616961_wp, & + & -16.30000975_wp, -94.18437694_wp, -131.92293303_wp, -16.24694448_wp, & + & -94.09251598_wp, -131.58345402_wp, -16.09545436_wp, -92.60773713_wp, & + & -132.44080447_wp, -15.76126723_wp, -91.79518320_wp, -133.84049295_wp, & + & -15.98728829_wp, -93.34283197_wp, -131.50780400_wp, -17.17735504_wp, & + & -94.49406659_wp, -131.35899615_wp, -15.05634731_wp, -94.87620303_wp, & + & -131.64148550_wp, -15.15502576_wp, -95.92095355_wp, -131.76334722_wp, & + & -14.12644518_wp, -94.48452208_wp, -130.27629381_wp, -15.03307294_wp, & + & -94.80316990_wp, -130.31163386_wp, -16.32220385_wp, -92.29538899_wp, & + & -129.75272321_wp, -16.13447387_wp, -90.97372443_wp, -128.23345547_wp, & + & -16.06477627_wp, -91.14616679_wp, -127.69832265_wp, -16.43990274_wp, & + & -92.18533185_wp, -129.62905655_wp, -16.60844159_wp, -92.99047668_wp, & + & -130.14025729_wp, -15.19988331_wp, -90.55462823_wp, -130.11556864_wp, & + & -17.29879759_wp, -90.04509659_wp, -131.19749691_wp, -17.36383597_wp, & + & -89.96591531_wp, -129.73152531_wp, -18.23216283_wp, -90.44875081_wp, & + & -129.69757142_wp, -17.13921437_wp, -89.05618196_wp, -139.16456634_wp, & + & -16.99631442_wp, -98.27638325_wp, -137.72131412_wp, -16.94309618_wp, & + & -98.18477275_wp, -137.38162798_wp, -16.79151803_wp, -96.70004586_wp, & + & -138.23890949_wp, -16.45739620_wp, -95.88739065_wp, -139.63876106_wp, & + & -16.68363698_wp, -97.43474748_wp, -137.30615850_wp, -17.87348598_wp, & + & -98.58634516_wp, -137.15761771_wp, -15.75248598_wp, -98.96860988_wp, & + & -137.44029426_wp, -15.85123012_wp, -100.01330374_wp, -137.56196409_wp, & + & -14.82259798_wp, -98.57689185_wp, -136.07490399_wp, -15.72912974_wp, & + & -98.89577951_wp, -136.10974206_wp, -17.01810326_wp, -96.38783293_wp, & + & -135.55083313_wp, -16.83052895_wp, -95.06614095_wp, -134.03154051_wp, & + & -16.76118054_wp, -95.23846174_wp, -133.49638791_wp, -17.13652638_wp, & + & -96.27753549_wp, -135.42722507_wp, -17.30443190_wp, -97.08293733_wp, & + & -135.93818978_wp, -15.89587373_wp, -94.64702807_wp, -135.91395711_wp, & + & -17.99481211_wp, -94.13756484_wp, -136.99590401_wp, -18.05969738_wp, & + & -94.05851582_wp, -135.52999293_wp, -18.92822729_wp, -94.54118059_wp, & + & -135.49605764_wp, -17.83529454_wp, -93.14859850_wp, -144.96385281_wp, & + & -17.69452131_wp, -102.36702953_wp, -143.52060076_wp, -17.64065233_wp, & + & -102.27570105_wp, -143.18062528_wp, -17.48896052_wp, -100.79105115_wp, & + & -144.03784710_wp, -17.15521062_wp, -99.97818213_wp, -145.43805180_wp, & + & -17.38208871_wp, -101.52530897_wp, -143.10511477_wp, -18.57084014_wp, & + & -102.67739926_wp, -142.95760330_wp, -16.44976403_wp, -103.05962135_wp, & + & -143.24048828_wp, -16.54857905_wp, -104.10425188_wp, -143.36224650_wp, & + & -15.52006610_wp, -102.66775972_wp, -141.87488202_wp, -16.42595273_wp, & + & -102.98705042_wp, -141.90855084_wp, -17.71497716_wp, -100.47917186_wp, & + & -141.34935094_wp, -17.52721901_wp, -99.15762566_wp, -139.83010607_wp, & + & -17.45761170_wp, -99.33030834_wp, -139.29513689_wp, -17.83289296_wp, & + & -100.36949947_wp, -141.22611412_wp, -18.00107512_wp, -101.17445176_wp, & + & -141.73677539_wp, -16.59261533_wp, -98.73846067_wp, -141.71201664_wp, & + & -18.69152413_wp, -98.22889633_wp, -142.79393016_wp, -18.75659451_wp, & + & -98.14954578_wp, -141.32800207_wp, -19.62489019_wp, -98.63257888_wp, & + & -141.29386962_wp, -18.53189052_wp, -97.24005327_wp, -150.76314546_wp, & + & -18.39620630_wp, -106.45736209_wp, -149.31992458_wp, -18.34128551_wp, & + & -106.36607319_wp, -148.97999225_wp, -18.18931587_wp, -104.88143548_wp, & + & -149.83742228_wp, -17.85617923_wp, -104.06853460_wp, -151.23755099_wp, & + & -18.08422303_wp, -105.61559130_wp, -148.90377223_wp, -19.27118093_wp, & + & -106.76776311_wp, -148.75779887_wp, -17.15001417_wp, -107.15003665_wp, & + & -149.04064952_wp, -17.24904981_wp, -108.19465490_wp, -149.16307527_wp, & + & -16.22059036_wp, -106.75818003_wp, -147.67509176_wp, -17.12544422_wp, & + & -107.07750404_wp, -147.70773043_wp, -18.41437932_wp, -104.56962368_wp, & + & -147.14854605_wp, -18.22624635_wp, -103.24811796_wp, -145.62933704_wp, & + & -18.15600466_wp, -103.42091314_wp, -145.09431703_wp, -18.53098353_wp, & + & -104.46018921_wp, -147.02513838_wp, -18.70003807_wp, -105.26493659_wp, & + & -147.53632958_wp, -17.29176041_wp, -102.82901983_wp, -147.51068616_wp, & + & -19.39060466_wp, -102.31925337_wp, -148.59257070_wp, -19.45610852_wp, & + & -102.23985640_wp, -147.12630960_wp, -20.32385313_wp, -102.72286262_wp, & + & -147.09256783_wp, -19.23070400_wp, -101.33044192_wp, -156.56215665_wp, & + & -19.10150994_wp, -110.54753368_wp, -155.11895112_wp, -19.04593836_wp, & + & -110.45630862_wp, -154.77901866_wp, -18.89375334_wp, -108.97168617_wp, & + & -155.63662683_wp, -18.56121679_wp, -108.15872621_wp, -157.03665023_wp, & + & -18.78984418_wp, -109.70569291_wp, -154.70240000_wp, -19.97567246_wp, & + & -110.85795903_wp, -154.55738288_wp, -17.85446910_wp, -111.24037017_wp, & + & -154.84025675_wp, -17.95368250_wp, -112.28496591_wp, -154.96302760_wp, & + & -16.92519542_wp, -110.84854016_wp, -153.47468113_wp, -17.82942923_wp, & + & -111.16791067_wp, -153.50658637_wp, -19.11796162_wp, -108.65993994_wp, & + & -152.94747700_wp, -18.92948734_wp, -107.33844560_wp, -151.42832355_wp, & + & -18.85805380_wp, -107.51128463_wp, -150.89306026_wp, -19.23248933_wp, & + & -108.55063042_wp, -152.82381949_wp, -19.40309116_wp, -109.35529858_wp, & + & -153.33597466_wp, -17.99533822_wp, -106.91925855_wp, -153.30867426_wp, & + & -20.09420356_wp, -106.40966181_wp, -154.39050269_wp, -20.16052919_wp, & + & -106.33018428_wp, -152.92363088_wp, -21.02712485_wp, -106.81339170_wp, & + & -152.89059723_wp, -19.93408639_wp, -105.42086806_wp, -162.36107654_wp, & + & -19.80846333_wp, -114.63759766_wp, -160.91787859_wp, -19.75258989_wp, & + & -114.54633866_wp, -160.57796458_wp, -19.60044877_wp, -113.06170166_wp, & + & -161.43566106_wp, -19.26826352_wp, -112.24869221_wp, -162.83565394_wp, & + & -19.49703133_wp, -113.79571820_wp, -160.50112028_wp, -20.68219559_wp, & + & -114.94807090_wp, -160.35655234_wp, -18.56092636_wp, -115.33028095_wp, & + & -160.63935517_wp, -18.66011814_wp, -116.37489783_wp, -160.76243019_wp, & + & -17.63177914_wp, -114.93839284_wp, -159.27385926_wp, -18.53563712_wp, & + & -115.25776908_wp, -159.30545120_wp, -19.82428991_wp, -112.75000036_wp, & + & -158.74632797_wp, -19.63565480_wp, -111.42853009_wp, -157.22720640_wp, & + & -19.56355360_wp, -111.60145561_wp, -156.69185528_wp, -19.93765244_wp, & + & -112.64087766_wp, -158.62260724_wp, -20.10910714_wp, -113.44541197_wp, & + & -159.13519845_wp, -18.70169294_wp, -111.00927059_wp, -159.10697106_wp, & + & -20.80056943_wp, -110.49978153_wp, -160.18876500_wp, -20.86732267_wp, & + & -110.42019318_wp, -158.72160660_wp, -21.73331584_wp, -110.90360706_wp, & + & -158.68885101_wp, -20.64034949_wp, -109.51102236_wp, -168.15961728_wp, & + & -20.51511209_wp, -118.72829514_wp, -166.71641709_wp, -20.45949255_wp, & + & -118.63681590_wp, -166.37665926_wp, -20.30754640_wp, -117.15211521_wp, & + & -167.23443595_wp, -19.97544717_wp, -116.33915617_wp, -168.63426518_wp, & + & -20.20372386_wp, -117.88643994_wp, -166.29975934_wp, -21.38913027_wp, & + & -119.03857972_wp, -166.15477532_wp, -19.26784853_wp, -119.42056366_wp, & + & -166.43738622_wp, -19.36692212_wp, -120.46524339_wp, -166.56060547_wp, & + & -18.33867519_wp, -119.02868768_wp, -165.07209257_wp, -19.24270630_wp, & + & -119.34783802_wp, -165.10417759_wp, -20.53144578_wp, -116.84030307_wp, & + & -164.54513750_wp, -20.34285071_wp, -115.51878573_wp, -163.02601316_wp, & + & -20.27042737_wp, -115.69163258_wp, -162.49055638_wp, -20.64422735_wp, & + & -116.73110795_wp, -164.42126114_wp, -20.81613285_wp, -117.53569662_wp, & + & -164.93421294_wp, -19.40901100_wp, -115.09944427_wp, -164.90558959_wp, & + & -21.50793504_wp, -114.59017681_wp, -165.98737282_wp, -21.57490816_wp, & + & -114.51062978_wp, -164.52003050_wp, -22.44056391_wp, -114.99408672_wp, & + & -164.48753288_wp, -21.34774140_wp, -113.60138630_wp, -173.95757261_wp, & + & -21.21952113_wp, -122.82024138_wp, -172.51436576_wp, -21.16458659_wp, & + & -122.72838839_wp, -172.17487901_wp, -21.01296939_wp, -121.24358303_wp, & + & -173.03270778_wp, -20.68063305_wp, -120.43077724_wp, -174.43228414_wp, & + & -20.90798900_wp, -121.97847616_wp, -172.09804464_wp, -22.09436450_wp, & + & -123.13017515_wp, -171.95197118_wp, -19.97309123_wp, -123.51182507_wp, & + & -172.23429422_wp, -20.07191435_wp, -124.55660585_wp, -172.35753183_wp, & + & -19.04379266_wp, -123.11996529_wp, -170.86930052_wp, -19.94841486_wp, & + & -123.43875342_wp, -170.90255101_wp, -21.23741019_wp, -120.93150683_wp, & + & -170.34366233_wp, -21.04897479_wp, -119.60989549_wp, -168.82449023_wp, & + & -20.97678804_wp, -119.78250350_wp, -168.28894848_wp, -21.35051310_wp, & + & -120.82196157_wp, -170.21958929_wp, -21.52222384_wp, -121.62680346_wp, & + & -170.73264894_wp, -20.11508792_wp, -119.19057578_wp, -170.70443628_wp, & + & -22.21403358_wp, -118.68138010_wp, -171.78624007_wp, -22.28082701_wp, & + & -118.60196709_wp, -170.31898524_wp, -23.14671423_wp, -119.08527281_wp, & + & -170.28647457_wp, -22.05394909_wp, -117.69253105_wp, -179.75502510_wp, & + & -21.92077250_wp, -126.91350264_wp, -178.31180003_wp, -21.86678704_wp, & + & -126.82131871_wp, -177.97253820_wp, -21.71543179_wp, -125.33642618_wp, & + & -178.83035247_wp, -21.38262557_wp, -124.52379777_wp, -180.22971631_wp, & + & -21.60891954_wp, -126.07184477_wp, -177.89600865_wp, -22.79682685_wp, & + & -127.22304484_wp, -177.74844125_wp, -20.67563400_wp, -127.60458340_wp, & + & -178.03051256_wp, -20.77426503_wp, -128.64945032_wp, -178.15355293_wp, & + & -19.74609391_wp, -127.21283206_wp, -176.66577727_wp, -20.65161772_wp, & + & -127.53118671_wp, -176.70040395_wp, -21.94061245_wp, -125.02406531_wp, & + & -176.14167242_wp, -21.75234890_wp, -123.70235700_wp, -174.62242580_wp, & + & -21.68079955_wp, -123.87464475_wp, -174.08682740_wp, -22.05465595_wp, & + & -124.91402519_wp, -176.01744605_wp, -22.22574866_wp, -125.71923094_wp, & + & -176.53036292_wp, -20.81828097_wp, -123.28316359_wp, -176.50309507_wp, & + & -22.91721355_wp, -122.77384944_wp, -177.58493969_wp, -22.98357769_wp, & + & -122.69463812_wp, -176.11793217_wp, -23.85007231_wp, -123.17760652_wp, & + & -176.08526234_wp, -22.75723371_wp, -121.78492867_wp, -185.55235592_wp, & + & -22.61897579_wp, -131.00747469_wp, -184.10910481_wp, -22.56595805_wp, & + & -130.91513654_wp, -183.76992642_wp, -22.41474033_wp, -129.43020213_wp, & + & -184.62764989_wp, -22.08137688_wp, -128.61770588_wp, -186.02690215_wp, & + & -22.30681508_wp, -130.16584637_wp, -183.69388997_wp, -23.49629490_wp, & + & -131.31677003_wp, -183.54485333_wp, -21.37520672_wp, -131.69836996_wp, & + & -183.82681255_wp, -21.47370489_wp, -132.74327955_wp, -183.94944159_wp, & + & -20.44538946_wp, -131.30673250_wp, -182.46218656_wp, -21.35187584_wp, & + & -131.62479088_wp, -182.49796919_wp, -22.64066695_wp, -129.11764361_wp, & + & -181.93928970_wp, -22.45248241_wp, -127.79589724_wp, -180.41997395_wp, & + & -22.38177341_wp, -127.96797395_wp, -179.88442688_wp, -22.75600867_wp, & + & -129.00724322_wp, -181.81508633_wp, -22.92623932_wp, -129.81270146_wp, & + & -182.32754906_wp, -21.51814059_wp, -127.37691389_wp, -182.30142723_wp, & + & -23.61699641_wp, -126.86722711_wp, -183.38331421_wp, -23.68278477_wp, & + & -126.78811933_wp, -181.91670571_wp, -24.55012638_wp, -127.27077931_wp, & + & -181.88361771_wp, -23.45706069_wp, -125.87828778_wp, -191.35082226_wp, & + & -23.31467684_wp, -135.10039691_wp, -189.90751793_wp, -23.26220576_wp, & + & -135.00851074_wp, -189.56784460_wp, -23.11104235_wp, -133.52368727_wp, & + & -190.42524220_wp, -22.77741993_wp, -132.71095105_wp, -191.82499544_wp, & + & -23.00239525_wp, -134.25860197_wp, -189.49279254_wp, -24.19273498_wp, & + & -135.41021227_wp, -189.34305076_wp, -22.07174142_wp, -135.79201968_wp, & + & -189.62536396_wp, -22.17023598_wp, -136.83683444_wp, -189.74717026_wp, & + & -21.14173326_wp, -135.40035216_wp, -188.26035344_wp, -22.04881801_wp, & + & -135.71877373_wp, -188.29587281_wp, -23.33734787_wp, -133.21145178_wp, & + & -187.73692978_wp, -23.14941339_wp, -131.88977888_wp, -186.21758588_wp, & + & -23.07959023_wp, -132.06194367_wp, -185.68229377_wp, -23.45415426_wp, & + & -133.10122325_wp, -187.61324876_wp, -23.62319413_wp, -133.90664514_wp, & + & -188.12462274_wp, -22.21482831_wp, -131.47081132_wp, -188.09964552_wp, & + & -24.31367039_wp, -130.96100891_wp, -189.18156363_wp, -24.37885930_wp, & + & -130.88183135_wp, -187.71545833_wp, -25.24703583_wp, -131.36452705_wp, & + & -187.68168856_wp, -24.15390046_wp, -129.97210558_wp, -197.14970010_wp, & + & -24.01014898_wp, -139.19297981_wp, -195.70644052_wp, -23.95726252_wp, & + & -139.10075336_wp, -195.36700130_wp, -23.80629154_wp, -137.61586575_wp, & + & -196.22450035_wp, -23.47283846_wp, -136.80317398_wp, -197.62423721_wp, & + & -23.69811728_wp, -138.35130737_wp, -195.29135758_wp, -24.88756487_wp, & + & -139.50260626_wp, -195.14221458_wp, -22.76642461_wp, -139.88387730_wp, & + & -195.42440352_wp, -22.86470434_wp, -140.92874575_wp, -195.54662831_wp, & + & -21.83663902_wp, -139.49198362_wp, -194.05953158_wp, -22.74322833_wp, & + & -139.81052026_wp, -194.09501670_wp, -24.03252748_wp, -137.30363530_wp, & + & -193.53582916_wp, -23.84458025_wp, -135.98207473_wp, -192.01650267_wp, & + & -23.77515452_wp, -136.15463171_wp, -191.48160843_wp, -24.14987772_wp, & + & -137.19406289_wp, -193.41242926_wp, -24.31829797_wp, -137.99890973_wp, & + & -193.92319174_wp, -22.90985518_wp, -135.56311278_wp, -193.89861168_wp, & + & -25.00865569_wp, -135.05310548_wp, -194.98052615_wp, -25.07355622_wp, & + & -134.97364092_wp, -193.51477955_wp, -25.94215897_wp, -135.45664334_wp, & + & -193.48035096_wp, -24.84890980_wp, -134.06432624_wp, -202.94740507_wp, & + & -24.70670348_wp, -143.28702548_wp, -201.50413828_wp, -24.65367990_wp, & + & -143.19509750_wp, -201.16476878_wp, -24.50218030_wp, -141.71023283_wp, & + & -202.02248638_wp, -24.16889581_wp, -140.89768586_wp, -203.42162290_wp, & + & -24.39477414_wp, -142.44511064_wp, -201.08900277_wp, -25.58412871_wp, & + & -143.59656977_wp, -200.94005474_wp, -23.46315680_wp, -143.97877992_wp, & + & -201.22235687_wp, -23.56191102_wp, -145.02357405_wp, -201.34446895_wp, & + & -22.53321638_wp, -143.58725808_wp, -199.85736451_wp, -23.43987950_wp, & + & -143.90555723_wp, -199.89278272_wp, -24.72791012_wp, -141.39771718_wp, & + & -199.33425396_wp, -24.53986279_wp, -140.07588487_wp, -197.81486381_wp, & + & -24.47034753_wp, -140.24766678_wp, -197.27943384_wp, -24.84471510_wp, & + & -141.28695240_wp, -199.20985269_wp, -25.01348201_wp, -142.09273250_wp, & + & -199.72184152_wp, -23.60510107_wp, -139.65719908_wp, -199.69760495_wp, & + & -25.70385282_wp, -139.14703598_wp, -200.77957212_wp, -25.76870529_wp, & + & -139.06823512_wp, -199.31356084_wp, -26.63740076_wp, -139.55026643_wp, & + & -199.27996091_wp, -25.54404355_wp, -138.15800939_wp, -208.74938344_wp, & + & -25.40823676_wp, -147.37428396_wp, -207.30603415_wp, -25.35389188_wp, & + & -147.28434435_wp, -206.96475108_wp, -25.20169328_wp, -145.80001263_wp, & + & -207.82170657_wp, -24.86924675_wp, -144.98631723_wp, -209.22278827_wp, & + & -25.09661627_wp, -146.53180082_wp, -206.89059678_wp, -26.28408874_wp, & + & -147.68609546_wp, -206.74417903_wp, -24.16311833_wp, -148.06924355_wp, & + & -207.02814926_wp, -24.26237796_wp, -149.11353965_wp, -207.14866976_wp, & + & -23.23339442_wp, -147.67728768_wp, -205.66138998_wp, -24.13897351_wp, & + & -147.99784724_wp, -205.69205706_wp, -25.42584261_wp, -145.48924433_wp, & + & -205.13225572_wp, -25.23774495_wp, -144.16797064_wp, -203.61306659_wp, & + & -25.16753291_wp, -144.34111057_wp, -203.07829832_wp, -25.54199235_wp, & + & -145.38069549_wp, -205.00977675_wp, -25.71099269_wp, -146.18506063_wp, & + & -205.51990273_wp, -24.30328854_wp, -143.74867345_wp, -205.49402914_wp, & + & -26.40216206_wp, -143.23902402_wp, -206.57587917_wp, -26.46764208_wp, & + & -143.15915322_wp, -205.10985925_wp, -27.33538866_wp, -143.64288430_wp, & + & -205.07547018_wp, -26.24236313_wp, -142.25038263_wp, -214.55245773_wp, & + & -26.11317274_wp, -151.45973729_wp, -213.10918985_wp, -26.05740226_wp, & + & -151.36950421_wp, -212.76816742_wp, -25.90501600_wp, -149.88514132_wp, & + & -213.62536882_wp, -25.57319620_wp, -149.07145675_wp, -215.02641825_wp, & + & -25.80223985_wp, -150.61732321_wp, -212.69275245_wp, -26.98712655_wp, & + & -151.77131288_wp, -212.54838524_wp, -24.86596614_wp, -152.15415994_wp, & + & -212.83206198_wp, -24.96539241_wp, -153.19851954_wp, -212.95388585_wp, & + & -23.93669857_wp, -151.76216402_wp, -211.46563401_wp, -24.84074091_wp, & + & -152.08255479_wp, -211.49529002_wp, -26.12826165_wp, -149.57452576_wp, & + & -210.93496073_wp, -25.93957878_wp, -148.25356685_wp, -209.41589032_wp, & + & -25.86904156_wp, -148.42781676_wp, -208.88191074_wp, -26.24311238_wp, & + & -149.46796119_wp, -210.81295214_wp, -26.41289851_wp, -150.27052925_wp, & + & -211.32245001_wp, -25.00498047_wp, -147.83442285_wp, -211.29616543_wp, & + & -27.10363628_wp, -147.32397726_wp, -212.37797748_wp, -27.16916295_wp, & + & -147.24359420_wp, -210.91212694_wp, -28.03700384_wp, -147.72763253_wp, & + & -210.87718161_wp, -26.94339799_wp, -146.33558932_wp, -220.35395501_wp, & + & -26.82112816_wp, -155.54697555_wp, -218.91070403_wp, -26.76466003_wp, & + & -155.45689584_wp, -218.56983236_wp, -26.61182604_wp, -153.97253798_wp, & + & -219.42740418_wp, -26.28079413_wp, -153.15891157_wp, -220.82789945_wp, & + & -26.51038628_wp, -154.70446880_wp, -218.49382703_wp, -27.69431945_wp, & + & -155.85840951_wp, -218.35052550_wp, -25.57324035_wp, -156.24200899_wp, & + & -218.63446124_wp, -25.67307028_wp, -157.28626332_wp, -218.75624127_wp, & + & -24.64399964_wp, -155.85017701_wp, -217.26776415_wp, -25.54761059_wp, & + & -156.17073399_wp, -217.29679567_wp, -26.83386556_wp, -153.66176830_wp, & + & -216.73721169_wp, -26.64559219_wp, -152.34043144_wp, -215.21813164_wp, & + & -26.57378980_wp, -152.51388462_wp, -214.68335275_wp, -26.94684180_wp, & + & -153.55398472_wp, -216.61404219_wp, -27.11788344_wp, -154.35760981_wp, & + & -217.12562190_wp, -25.71157156_wp, -151.92085839_wp, -217.09803145_wp, & + & -27.81056452_wp, -151.41183372_wp, -218.17984184_wp, -27.87702793_wp, & + & -151.33218154_wp, -216.71297503_wp, -28.74334465_wp, -151.81587596_wp, & + & -216.67980523_wp, -27.65065456_wp, -150.42307628_wp, -226.15413940_wp, & + & -27.52794896_wp, -159.63616688_wp, -224.71096704_wp, -27.47189277_wp, & + & -159.54458622_wp, -224.37114182_wp, -27.31955603_wp, -158.05997008_wp, & + & -225.22906431_wp, -26.98840747_wp, -157.24678232_wp, -226.62911356_wp, & + & -27.21720987_wp, -158.79426944_wp, -224.29399158_wp, -28.40153478_wp, & + & -159.94603770_wp, -224.14981870_wp, -26.28036142_wp, -160.32885556_wp, & + & -224.43284923_wp, -26.37984565_wp, -161.37338765_wp, -224.55570556_wp, & + & -25.35115512_wp, -159.93711390_wp, -223.06711779_wp, -26.25496563_wp, & + & -160.25661337_wp, -223.09830641_wp, -27.54208737_wp, -157.74868603_wp, & + & -222.53873475_wp, -27.35395241_wp, -156.42734775_wp, -221.01966593_wp, & + & -27.28185905_wp, -156.60102419_wp, -220.48499041_wp, -27.65476826_wp, & + & -157.64123185_wp, -222.41547093_wp, -27.82617024_wp, -158.44443318_wp, & + & -222.92721942_wp, -26.42004417_wp, -156.00759792_wp, -222.89927861_wp, & + & -28.51911565_wp, -155.49889159_wp, -223.98107397_wp, -28.58586095_wp, & + & -155.41926613_wp, -222.51398411_wp, -29.45175697_wp, -155.90302510_wp, & + & -222.48110729_wp, -28.35920762_wp, -154.51010954_wp, -231.94619116_wp, & + & -28.23333356_wp, -163.73778136_wp, -230.50326630_wp, -28.17620042_wp, & + & -163.64335482_wp, -230.16669315_wp, -28.02351020_wp, -162.15800215_wp, & + & -231.02644248_wp, -27.69218054_wp, -161.34681574_wp, -232.42295877_wp, & + & -27.92200729_wp, -162.89710649_wp, -230.08485053_wp, -29.10559097_wp, & + & -164.04387623_wp, -229.94133934_wp, -26.98433918_wp, -164.42654727_wp, & + & -230.22224541_wp, -27.08400743_wp, -165.47163392_wp, -230.34855880_wp, & + & -26.05537533_wp, -164.03562131_wp, -228.85879737_wp, -26.95828707_wp, & + & -164.35216282_wp, -228.89458560_wp, -28.24603430_wp, -161.84382965_wp, & + & -228.33786685_wp, -28.05804556_wp, -160.52124966_wp, -226.81838108_wp, & + & -27.98726252_wp, -160.69176494_wp, -226.28199317_wp, -28.35985797_wp, & + & -161.73121610_wp, -228.21021034_wp, -28.53026922_wp, -162.53801646_wp, & + & -228.72636825_wp, -27.12362812_wp, -160.10262890_wp, -228.70168895_wp, & + & -29.22256837_wp, -159.59328562_wp, -229.78373552_wp, -29.28818632_wp, & + & -159.51613790_wp, -228.31643175_wp, -30.15572504_wp, -159.99625876_wp, & + & -228.28565313_wp, -29.06280486_wp, -158.60358375_wp, -237.73643609_wp, & + & -28.96640010_wp, -167.83829950_wp, -236.29373677_wp, -28.90126131_wp, & + & -167.74548569_wp, -235.95654023_wp, -28.74323185_wp, -166.26086260_wp, & + & -236.81699066_wp, -28.41308818_wp, -165.44993231_wp, -238.21423410_wp, & + & -28.65228428_wp, -166.99927004_wp, -235.87100301_wp, -29.82942551_wp, & + & -168.14427821_wp, -235.73895626_wp, -27.70837706_wp, -168.53218959_wp, & + & -236.02072459_wp, -27.81182746_wp, -169.57667517_wp, -236.15022936_wp, & + & -26.78056348_wp, -168.14279531_wp, -234.65645707_wp, -27.67675887_wp, & + & -168.45931147_wp, -234.68335884_wp, -28.95988908_wp, -165.94687338_wp, & + & -234.12778116_wp, -28.76867469_wp, -164.62427702_wp, -232.60829262_wp, & + & -28.69574488_wp, -164.79339091_wp, -232.07006258_wp, -29.06956167_wp, & + & -165.83143222_wp, -233.99826292_wp, -29.24389027_wp, -166.64040684_wp, & + & -234.51824673_wp, -27.83429141_wp, -164.20742710_wp, -234.49026266_wp, & + & -29.93242908_wp, -163.69478729_wp, -235.57224851_wp, -29.99970247_wp, & + & -163.61823084_wp, -234.10323105_wp, -30.86552343_wp, -164.09622438_wp, & + & -234.07510085_wp, -29.77056534_wp, -162.70506068_wp, -243.51915656_wp, & + & -29.74548696_wp, -171.93832376_wp, -242.07667699_wp, -29.68348779_wp, & + & -171.84078719_wp, -241.74288973_wp, -29.51203506_wp, -170.35701895_wp, & + & -242.60423686_wp, -29.17251958_wp, -169.55099582_wp, -244.00004498_wp, & + & -29.41553543_wp, -171.10729762_wp, -241.65554565_wp, -30.61650818_wp, & + & -172.22972474_wp, -241.51666033_wp, -28.49921891_wp, -172.63685333_wp, & + & -241.79591939_wp, -28.61129428_wp, -173.68112271_wp, -241.92658883_wp, & + & -27.56691019_wp, -172.25681366_wp, -240.43427514_wp, -28.46954325_wp, & + & -172.56140450_wp, -240.47061308_wp, -29.72810877_wp, -170.03878585_wp, & + & -239.91554612_wp, -29.52329145_wp, -168.71811724_wp, -238.39662869_wp, & + & -29.44230366_wp, -168.88908587_wp, -237.85693389_wp, -29.82167746_wp, & + & -169.92435059_wp, -239.78477351_wp, -30.01777587_wp, -170.72924377_wp, & + & -240.31165964_wp, -28.58821825_wp, -168.30826760_wp, -240.27019816_wp, & + & -30.68237737_wp, -167.77983987_wp, -241.35165588_wp, -30.75467658_wp, & + & -167.70049020_wp, -239.87930307_wp, -31.61620093_wp, -168.17581566_wp, & + & -239.85371238_wp, -30.51168948_wp, -166.79214172_wp, -249.26143654_wp, & + & -30.42836356_wp, -176.09011294_wp, -247.81952865_wp, -30.45284149_wp, & + & -175.97114706_wp, -247.49800442_wp, -30.25740174_wp, -174.48755488_wp, & + & -248.35235869_wp, -29.85475348_wp, -173.70346059_wp, -249.73214945_wp, & + & -30.04335377_wp, -175.27698198_wp, -247.45234619_wp, -31.42229915_wp, & + & -176.32424587_wp, -247.17457183_wp, -29.33189109_wp, -176.79399764_wp, & + & -247.44575159_wp, -29.45917627_wp, -177.83863443_wp, -247.52948047_wp, & + & -28.36395022_wp, -176.44949433_wp, -246.09355827_wp, -29.36768855_wp, & + & -176.70252162_wp, -246.24313785_wp, -30.52890881_wp, -174.14373913_wp, & + & -245.69587691_wp, -30.30608114_wp, -172.82286009_wp, -244.17521247_wp, & + & -30.23822645_wp, -172.98402552_wp, -243.63049238_wp, -30.64070223_wp, & + & -174.00785606_wp, -245.56012351_wp, -30.85843560_wp, -174.81872675_wp, & + & -246.08888666_wp, -29.36128162_wp, -172.43296808_wp, -246.06663948_wp, & + & -31.44673204_wp, -171.86845245_wp, -247.14910486_wp, -31.50848495_wp, & + & -171.79428908_wp, -245.68164791_wp, -32.39018785_wp, -172.24696431_wp, & + & -245.65444991_wp, -31.26397528_wp, -170.88107888_wp, -255.01886792_wp, & + & -30.99589680_wp, -180.24278354_wp, -253.57995945_wp, -31.08805445_wp, & + & -180.12239572_wp, -253.24599360_wp, -30.83109945_wp, -178.65068909_wp, & + & -254.07610517_wp, -30.34026135_wp, -177.89116208_wp, -255.46289309_wp, & + & -30.51295756_wp, -179.46805341_wp, -253.26578955_wp, -32.09310373_wp, & + & -180.42281887_wp, -252.88147896_wp, -30.04738536_wp, -181.00453332_wp, & + & -253.15481785_wp, -30.22099585_wp, -182.04189619_wp, -253.19235972_wp, & + & -29.04609640_wp, -180.71764844_wp, -251.80354276_wp, -30.12740649_wp, & + & -180.90481069_wp, -252.00853508_wp, -31.15414642_wp, -178.28855790_wp, & + & -251.45714474_wp, -30.90132434_wp, -176.97481674_wp, -249.93413514_wp, & + & -30.92662069_wp, -177.12267874_wp, -249.40376409_wp, -31.40161866_wp, & + & -178.12257558_wp, -251.34354623_wp, -31.55506453_wp, -178.94232451_wp, & + & -251.79889661_wp, -29.91897144_wp, -176.63235429_wp, -251.89829359_wp, & + & -31.97441309_wp, -175.97298830_wp, -252.98289227_wp, -31.97058787_wp, & + & -175.90492350_wp, -251.56619821_wp, -32.95452935_wp, -176.30568423_wp, & + & -251.48171207_wp, -31.77153733_wp, -174.99137747_wp, -260.81619426_wp, & + & -31.67062058_wp, -184.29963824_wp, -259.39434119_wp, -31.89099757_wp, & + & -184.14713275_wp, -259.03379716_wp, -31.47078386_wp, -182.72023443_wp, & + & -259.81187742_wp, -30.80861829_wp, -182.03997953_wp, -261.21003511_wp, & + & -31.04370298_wp, -183.60525772_wp, -259.18535019_wp, -32.95439630_wp, & + & -184.30395318_wp, -258.59279276_wp, -31.05777940_wp, -185.15339738_wp, & + & -258.88590964_wp, -31.34045250_wp, -186.16092930_wp, -258.79558170_wp, & + & -29.99991126_wp, -185.00772682_wp, -257.52876808_wp, -31.23565221_wp, & + & -185.03192067_wp, -257.83072066_wp, -31.85695213_wp, -182.30689560_wp, & + & -257.24636745_wp, -31.46838026_wp, -181.04169250_wp, -255.72860046_wp, & + & -31.58400644_wp, -181.20068347_wp, -255.23552600_wp, -32.19876309_wp, & + & -182.14164177_wp, -257.20286841_wp, -32.38631043_wp, -182.90326672_wp, & + & -257.53729434_wp, -30.43558635_wp, -180.82328853_wp, -257.71923462_wp, & + & -32.38493790_wp, -179.90767439_wp, -258.80074147_wp, -32.31834254_wp, & + & -179.82514406_wp, -257.44143362_wp, -33.41423778_wp, -180.11965744_wp, & + & -257.27345830_wp, -32.08344807_wp, -178.96486023_wp, -266.59870422_wp, & + & -32.24283696_wp, -188.37974954_wp, -265.21833031_wp, -32.61189043_wp, & + & -188.15310417_wp, -264.82674912_wp, -32.03887761_wp, -186.78875028_wp, & + & -265.52138277_wp, -31.19171616_wp, -186.23525350_wp, -266.91208957_wp, & + & -31.46260143_wp, -187.81140712_wp, -265.14416460_wp, -33.70433455_wp, & + & -188.15226958_wp, -264.30538135_wp, -32.03560046_wp, -189.24107618_wp, & + & -264.61336450_wp, -32.42651122_wp, -190.20710654_wp, -264.38147693_wp, & + & -30.95141907_wp, -189.25613295_wp, -263.27273728_wp, -32.31667605_wp, & + & -189.05893784_wp, -263.69143157_wp, -32.51223788_wp, -186.28404323_wp, & + & -263.07748294_wp, -32.01583910_wp, -185.07154079_wp, -261.57942188_wp, & + & -32.30960117_wp, -185.18093982_wp, -261.14815654_wp, -33.09644744_wp, & + & -186.01837725_wp, -263.12586443_wp, -33.19169433_wp, -186.78240069_wp, & + & -263.25862354_wp, -30.93804023_wp, -185.00438780_wp, -263.65505307_wp, & + & -32.71087211_wp, -183.83352681_wp, -264.72381858_wp, -32.52020437_wp, & + & -183.78580061_wp, -263.48759145_wp, -33.78307525_wp, -183.89519757_wp, & + & -263.18746162_wp, -32.32951400_wp, -182.93110410_wp, -272.38032677_wp, & + & -32.79276954_wp, -192.44701430_wp, -271.08043704_wp, -33.31840642_wp, & + & -192.09063136_wp, -270.60841585_wp, -32.54106900_wp, -190.85922148_wp, & + & -271.15569132_wp, -31.49586004_wp, -190.52159020_wp, -272.55299647_wp, & + & -31.85497887_wp, -192.10085358_wp, -271.18894955_wp, -34.38326642_wp, & + & -191.86054430_wp, -270.07809802_wp, -33.13725928_wp, -193.23573866_wp, & + & -270.43629970_wp, -33.67255207_wp, -194.11089694_wp, -269.97875300_wp, & + & -32.08303785_wp, -193.48085043_wp, -269.10532438_wp, -33.52923431_wp, & + & -192.95524030_wp, -269.57271967_wp, -33.07660972_wp, -190.21948059_wp, & + & -268.88916744_wp, -32.44018843_wp, -189.11459636_wp, -267.44072675_wp, & + & -32.93424167_wp, -189.14207515_wp, -267.11587583_wp, -33.90924434_wp, & + & -189.81295982_wp, -269.11870922_wp, -33.92029776_wp, -190.55315157_wp, & + & -268.93311487_wp, -31.35554840_wp, -189.25752782_wp, -269.53839772_wp, & + & -32.80994369_wp, -187.77627148_wp, -270.57416663_wp, -32.48150590_wp, & + & -187.78051844_wp, -269.50783216_wp, -33.88684282_wp, -187.63193928_wp, & + & -269.01796656_wp, -32.32683122_wp, -186.95511456_wp, -278.07921981_wp, & + & -33.38640624_wp, -196.56233940_wp, -276.95354372_wp, -34.04137133_wp, & + & -195.93344608_wp, -276.34549993_wp, -33.04441333_wp, -194.94413257_wp, & + & -276.63112088_wp, -31.85190240_wp, -194.98555185_wp, -278.02112346_wp, & + & -32.37457042_wp, -196.56714575_wp, -277.32287896_wp, -34.93107680_wp, & + & -195.41290164_wp, -275.90027158_wp, -34.44874241_wp, -196.96985800_wp, & + & -276.34935424_wp, -35.13499981_wp, -197.68300344_wp, -275.54309583_wp, & + & -33.57094902_wp, -197.50244988_wp, -275.05934287_wp, -34.93823290_wp, & + & -196.48779963_wp, -275.49431502_wp, -33.57377928_wp, -194.06844259_wp, & + & -274.68890730_wp, -32.79437642_wp, -193.15350819_wp, -273.34411737_wp, & + & -33.51275691_wp, -193.01465655_wp, -273.20095229_wp, -34.67118908_wp, & + & -193.39337164_wp, -275.23460328_wp, -34.55293869_wp, -194.11490921_wp, & + & -274.55423008_wp, -31.79562684_wp, -193.58100839_wp, -275.36208114_wp, & + & -32.68559043_wp, -191.78105332_wp, -276.32619344_wp, -32.19747045_wp, & + & -191.89365112_wp, -275.51295781_wp, -33.67659777_wp, -191.36090140_wp, & + & -274.74755252_wp, -32.10279181_wp, -191.10169625_wp, -282.43861512_wp, & + & -35.01939886_wp, -201.38323028_wp, -281.99720171_wp, -35.31115217_wp, & + & -200.02893364_wp, -281.14543942_wp, -34.15768711_wp, -199.51266271_wp, & + & -280.39813155_wp, -33.52417689_wp, -200.25163684_wp, -281.69763748_wp, & + & -34.51075509_wp, -201.85883969_wp, -282.88732387_wp, -35.42864488_wp, & + & -199.40028521_wp, -281.11699644_wp, -36.56958177_wp, -199.90773071_wp, & + & -281.68830699_wp, -37.45343791_wp, -200.17994941_wp, -280.25915252_wp, & + & -36.48015160_wp, -200.57264950_wp, -280.74683668_wp, -36.68226474_wp, & + & -198.89081617_wp, -281.26322052_wp, -33.90966680_wp, -198.19922281_wp, & + & -280.29595518_wp, -33.10245933_wp, -197.48547385_wp, -279.17857017_wp, & + & -34.02084207_wp, -196.96915049_wp, -279.31152319_wp, -35.23990244_wp, & + & -196.93454406_wp, -281.78101675_wp, -34.56680850_wp, -197.63321150_wp, & + & -279.87575561_wp, -32.39840675_wp, -198.21024960_wp, -280.95899232_wp, & + & -32.37077660_wp, -196.32160785_wp, -281.76277713_wp, -31.74232096_wp, & + & -196.69283049_wp, -281.36759570_wp, -33.08981010_wp, -195.61575703_wp, & + & -280.23353141_wp, -31.74973235_wp, -195.80492256_wp, -282.59768663_wp, & + & -35.88313851_wp, -201.88983400_wp, 3.78278132_wp, -0.79049185_wp, & + & 5.49372221_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_100 + +subroutine polyala_12(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 123 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.92166514_wp, -0.07183377_wp, -0.45922613_wp, 0.41826039_wp, & + & 0.43642482_wp, -0.26032363_wp, 1.08417286_wp, -0.42391429_wp, & + & 0.81626154_wp, 0.42088082_wp, -1.11866604_wp, 1.57745826_wp, & + & -1.37492807_wp, -0.39307811_wp, 0.38715500_wp, 0.94837772_wp, & + & 0.35183183_wp, -1.21394433_wp, 0.38544948_wp, 1.89387952_wp, & + & 0.20968520_wp, -0.11527829_wp, 2.50571539_wp, -0.53510144_wp, & + & -0.15114034_wp, 1.96664392_wp, 1.15248428_wp, 1.39203168_wp, & + & 2.26977057_wp, 0.36216959_wp, 2.42114402_wp, -0.36981160_wp, & + & 0.84267266_wp, 3.16751961_wp, -0.93499416_wp, 1.94650533_wp, & + & 2.96713081_wp, -0.07055112_wp, 3.19060991_wp, 2.38612258_wp, & + & 0.99104204_wp, 3.18282498_wp, 2.89939051_wp, 0.30762223_wp, & + & 0.26693533_wp, 2.74142936_wp, -1.91905375_wp, 2.17476044_wp, & + & 4.64766962_wp, -1.05472498_wp, 1.60260502_wp, 4.77051267_wp, & + & -1.68523845_wp, 0.72780008_wp, 5.06858943_wp, -0.07320042_wp, & + & 1.39951067_wp, 5.17892728_wp, -1.49942930_wp, 2.43815902_wp, & + & 3.50096460_wp, -0.61080142_wp, 4.26431854_wp, -6.46883027_wp, & + & -0.85963905_wp, -4.70370776_wp, -5.03490540_wp, -0.68618411_wp, & + & -4.61692798_wp, -4.64954623_wp, -0.90765071_wp, -3.15187915_wp, & + & -5.50225164_wp, -0.93611440_wp, -2.26980599_wp, -6.95063357_wp, & + & -0.73580201_wp, -3.81937051_wp, -4.55619841_wp, -1.43204261_wp, & + & -5.26010406_wp, -4.61948221_wp, 0.72042571_wp, -5.06184660_wp, & + & -4.91745820_wp, 0.86917539_wp, -6.09614437_wp, -5.10722059_wp, & + & 1.46756042_wp, -4.44118888_wp, -3.54360666_wp, 0.84346550_wp, & + & -4.98309603_wp, -3.34571327_wp, -1.05279329_wp, -2.92805731_wp, & + & -2.76116968_wp, -1.13001017_wp, -1.60704203_wp, -1.42397399_wp, & + & -0.38813360_wp, -1.65260558_wp, -0.87752238_wp, -0.12651671_wp, & + & -2.71882737_wp, -2.66921522_wp, -0.95816785_wp, -3.67686172_wp, & + & -3.44905076_wp, -0.65381111_wp, -0.90132624_wp, -2.51686334_wp, & + & -2.58704171_wp, -1.19706840_wp, -3.46489503_wp, -3.11686985_wp, & + & -1.16829620_wp, -1.86164697_wp, -3.07035608_wp, -1.91736954_wp, & + & -2.05474118_wp, -2.63409422_wp, -0.21523918_wp, -12.23192683_wp, & + & -1.53043565_wp, -8.77028785_wp, -10.78893268_wp, -1.58580875_wp, & + & -8.67962224_wp, -10.43256116_wp, -1.46286875_wp, -7.19598196_wp, & + & -11.26548546_wp, -1.09612683_wp, -6.37256426_wp, -12.67840856_wp, & + & -1.10981558_wp, -7.96191807_wp, -10.45164904_wp, -2.54715288_wp, & + & -9.08114027_wp, -10.14086741_wp, -0.44313636_wp, -9.46934673_wp, & + & -10.42894798_wp, -0.52529061_wp, -10.51392663_wp, -10.47693839_wp, & + & 0.51559869_wp, -9.08289796_wp, -9.05894977_wp, -0.49539259_wp, & + & -9.39621597_wp, -9.17294849_wp, -1.76413661_wp, -6.89333790_wp, & + & -8.59514190_wp, -1.59134666_wp, -5.57830547_wp, -7.10028119_wp, & + & -1.32891716_wp, -5.77634703_wp, -6.55198078_wp, -1.55813971_wp, & + & -6.84991632_wp, -8.50101280_wp, -2.02275662_wp, -7.60795004_wp, & + & -9.07993970_wp, -0.73636464_wp, -5.09582278_wp, -8.78996792_wp, & + & -2.84578910_wp, -4.71896375_wp, -9.85341909_wp, -3.03891262_wp, & + & -4.60680502_wp, -8.32195400_wp, -3.70220114_wp, -5.19757793_wp, & + & -8.35057072_wp, -2.70555519_wp, -3.73602488_wp, -17.98412986_wp, & + & -2.00711654_wp, -12.86402031_wp, -16.58412437_wp, -2.32467205_wp, & + & -12.68415627_wp, -16.22134545_wp, -1.93545163_wp, -11.24859471_wp, & + & -16.96485150_wp, -1.22653382_wp, -10.57714507_wp, -18.33604347_wp, & + & -1.31938926_wp, -12.20618786_wp, -16.44902209_wp, -3.39977329_wp, & + & -12.84164564_wp, -15.70819858_wp, -1.54464937_wp, -13.67086330_wp, & + & -15.99660220_wp, -1.80482611_wp, -14.68573035_wp, -15.84440712_wp, & + & -0.47596685_wp, -13.52608699_wp, -14.66065704_wp, -1.79125748_wp, & + & -13.52704066_wp, -15.05575105_wp, -2.40776090_wp, -10.81558997_wp, & + & -14.45823157_wp, -2.04628575_wp, -9.54839856_wp, -12.94025641_wp, & + & -2.10852901_wp, -9.73617696_wp, -12.44383876_wp, -2.67156812_wp, & + & -10.70711720_wp, -14.44581188_wp, -2.94992337_wp, -11.41816114_wp, & + & -14.77719906_wp, -1.03061510_wp, -9.29263417_wp, -14.88386449_wp, & + & -3.01551453_wp, -8.43992471_wp, -15.96477663_wp, -2.98303137_wp, & + & -8.33369864_wp, -14.58234303_wp, -4.02836697_wp, -8.69444747_wp, & + & -14.42745212_wp, -2.73647610_wp, -7.49515712_wp, -23.81452295_wp, & + & -2.49536704_wp, -16.87829113_wp, -22.47944327_wp, -2.97409193_wp, & + & -16.59490727_wp, -22.01613772_wp, -2.28501588_wp, -15.30851040_wp, & + & -22.59875156_wp, -1.29786942_wp, -14.87089322_wp, -24.00888823_wp, & + & -1.56969579_wp, -16.51457275_wp, -22.52915828_wp, -4.05948047_wp, & + & -16.46028818_wp, -21.51630548_wp, -2.63536999_wp, -17.73801198_wp, & + & -21.87374914_wp, -3.09656699_wp, -18.65487650_wp, -21.47122400_wp, & + & -1.55849435_wp, -17.87979269_wp, -20.51991617_wp, -3.00712881_wp, & + & -17.51909199_wp, -20.94548810_wp, -2.82809110_wp, -14.73443342_wp, & + & -20.27274192_wp, -2.26241850_wp, -13.58506280_wp, -18.79975232_wp, & + & -2.66659649_wp, -13.68221176_wp, -18.43187542_wp, -3.54732098_wp, & + & -14.45361449_wp, -20.45953879_wp, -3.61399196_wp, -15.15260076_wp, & + & -20.38040567_wp, -1.17340476_wp, -13.62241133_wp, -20.87242459_wp, & + & -2.79547498_wp, -12.27893761_wp, -21.92313695_wp, -2.52230409_wp, & + & -12.23281091_wp, -20.78532358_wp, -3.87844451_wp, -12.24408078_wp, & + & -20.35856439_wp, -2.37026010_wp, -11.42230728_wp, -28.41815971_wp, & + & -3.58598438_wp, -21.62856631_wp, -27.71720188_wp, -4.18381509_wp, & + & -20.50372280_wp, -27.05927289_wp, -3.08588321_wp, -19.67605356_wp, & + & -26.59567668_wp, -2.07434333_wp, -20.19373034_wp, -27.88262429_wp, & + & -2.78353709_wp, -21.95002520_wp, -28.45262429_wp, -4.72015518_wp, & + & -19.89294670_wp, -26.58471882_wp, -5.14836925_wp, -20.90422723_wp, & + & -26.99389974_wp, -6.00911833_wp, -21.42729849_wp, -25.88174209_wp, & + & -4.63421523_wp, -21.55828414_wp, -26.04191853_wp, -5.48925135_wp, & + & -20.02499896_wp, -27.01274365_wp, -3.32251410_wp, -18.35637751_wp, & + & -26.15595070_wp, -2.56071721_wp, -17.47229314_wp, -24.78351752_wp, & + & -3.24690829_wp, -17.40172733_wp, -24.61571965_wp, -4.39641471_wp, & + & -17.79600226_wp, -27.28073425_wp, -4.23727454_wp, -18.02235868_wp, & + & -26.03792325_wp, -1.57037248_wp, -17.92311222_wp, -26.77171274_wp, & + & -2.46649941_wp, -16.07871996_wp, -27.75134205_wp, -2.00232326_wp, & + & -16.14054317_wp, -26.87630513_wp, -3.46099493_wp, -15.65148784_wp, & + & -26.13915956_wp, -1.87235777_wp, -15.42603841_wp, -28.47612052_wp, & + & -4.24892902_wp, -22.39364249_wp, 3.38490755_wp, -0.06751663_wp, & + & 5.06905474_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_12 + +subroutine polyala_16(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 163 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.83723940_wp, -0.09448239_wp, -0.39353140_wp, 0.52030619_wp, & + & 0.36947748_wp, -0.20751577_wp, 1.12789721_wp, -0.45132505_wp, & + & 0.93105491_wp, 0.42126247_wp, -1.09808853_wp, 1.69646338_wp, & + & -1.27670580_wp, -0.43542009_wp, 0.45345745_wp, 1.06276758_wp, & + & 0.20790109_wp, -1.14445860_wp, 0.54523377_wp, 1.85413483_wp, & + & 0.17161477_wp, 0.06499233_wp, 2.43469635_wp, -0.61086106_wp, & + & 0.01483782_wp, 2.00647863_wp, 1.10841321_wp, 1.56545660_wp, & + & 2.20169224_wp, 0.29692891_wp, 2.46318401_wp, -0.42064017_wp, & + & 1.01166798_wp, 3.14123004_wp, -0.94180339_wp, 2.18013781_wp, & + & 2.80803710_wp, -0.06788747_wp, 3.38868501_wp, 2.25655048_wp, & + & 1.00601680_wp, 3.30852925_wp, 2.97955542_wp, 0.22031691_wp, & + & 0.42728712_wp, 2.74323881_wp, -1.94078263_wp, 2.39194451_wp, & + & 4.64855778_wp, -0.99639034_wp, 1.96071526_wp, 4.87232089_wp, & + & -1.63077361_wp, 1.10898103_wp, 5.03964483_wp, 0.00160321_wp, & + & 1.77903416_wp, 5.12823800_wp, -1.40651067_wp, 2.84401623_wp, & + & 3.19926076_wp, -0.61388707_wp, 4.51954899_wp, -6.48581251_wp, & + & -0.83083784_wp, -4.61451760_wp, -5.07516428_wp, -0.52601108_wp, & + & -4.51167777_wp, -4.66541582_wp, -0.81545864_wp, -3.06546369_wp, & + & -5.50894554_wp, -0.98016704_wp, -2.18925501_wp, -6.96900797_wp, & + & -0.83768019_wp, -3.72213525_wp, -4.52765266_wp, -1.17153895_wp, & + & -5.20636011_wp, -4.80103542_wp, 0.94334558_wp, -4.85067613_wp, & + & -5.12117260_wp, 1.13839532_wp, -5.87064206_wp, -5.35366497_wp, & + & 1.59128742_wp, -4.17517936_wp, -3.74123210_wp, 1.16272440_wp, & + & -4.76517157_wp, -3.35379727_wp, -0.85645314_wp, -2.84844578_wp, & + & -2.75899069_wp, -0.99797715_wp, -1.53729200_wp, -1.39441728_wp, & + & -0.30818986_wp, -1.58373502_wp, -0.87459735_wp, 0.00275389_wp, & + & -2.65045876_wp, -2.68499647_wp, -0.67204330_wp, -3.58841788_wp, & + & -3.41416047_wp, -0.51483378_wp, -0.80488062_wp, -2.57666763_wp, & + & -2.47558994_wp, -1.17092030_wp, -3.54900092_wp, -2.96013454_wp, & + & -1.14967651_wp, -1.95049086_wp, -2.96793001_wp, -1.91056132_wp, & + & -2.11184699_wp, -2.57266610_wp, -0.19427223_wp, -12.19159511_wp, & + & -1.68846535_wp, -8.75742507_wp, -10.75280528_wp, -1.56231351_wp, & + & -8.66850401_wp, -10.40243782_wp, -1.56055277_wp, -7.17843555_wp, & + & -11.27065251_wp, -1.40864207_wp, -6.32408981_wp, -12.67630966_wp, & + & -1.46789301_wp, -7.89328720_wp, -10.29314058_wp, -2.41923979_wp, & + & -9.17235065_wp, -10.26964828_wp, -0.26436569_wp, -9.32492340_wp, & + & -10.55896411_wp, -0.26916393_wp, -10.37245175_wp, -10.72315304_wp, & + & 0.59350783_wp, -8.83517022_wp, -9.18925512_wp, -0.18254739_wp, & + & -9.25782287_wp, -9.11113289_wp, -1.71763794_wp, -6.90388378_wp, & + & -8.55004454_wp, -1.63475769_wp, -5.57298917_wp, -7.08439704_wp, & + & -1.22457211_wp, -5.73461584_wp, -6.52708023_wp, -1.28098286_wp, & + & -6.82665147_wp, -8.41607474_wp, -1.80861509_wp, -7.63771248_wp, & + & -9.10436982_wp, -0.87958956_wp, -5.00594270_wp, -8.63713169_wp, & + & -2.98428962_wp, -4.85139099_wp, -9.68054022_wp, -3.27757609_wp, & + & -4.77251125_wp, -8.09615557_wp, -3.74274809_wp, -5.41143148_wp, & + & -8.21472122_wp, -2.91082232_wp, -3.85398614_wp, -17.93108809_wp, & + & -2.29244778_wp, -12.89519645_wp, -16.48934451_wp, -2.34682371_wp, & + & -12.78557647_wp, -16.15672507_wp, -2.20715289_wp, -11.29803711_wp, & + & -17.00335419_wp, -1.82941409_wp, -10.49348121_wp, -18.38944597_wp, & + & -1.91277475_wp, -12.07266379_wp, -16.14266927_wp, -3.31122875_wp, & + & -13.17173118_wp, -15.82952553_wp, -1.21200969_wp, -13.57694914_wp, & + & -16.10481581_wp, -1.30448167_wp, -14.62416504_wp, -16.16946263_wp, & + & -0.24938194_wp, -13.20371272_wp, -14.74881734_wp, -1.26557046_wp, & + & -13.48969467_wp, -14.90242302_wp, -2.50258284_wp, -10.97130036_wp, & + & -14.34617884_wp, -2.31640391_wp, -9.64851694_wp, -12.83438890_wp, & + & -2.15343195_wp, -9.82409685_wp, -12.28364689_wp, -2.45649108_wp, & + & -10.87835755_wp, -14.22052801_wp, -2.78701870_wp, -11.66724030_wp, & + & -14.78594936_wp, -1.41547036_wp, -9.20795927_wp, -14.63919923_wp, & + & -3.52148516_wp, -8.74785044_wp, -15.71522689_wp, -3.64764003_wp, & + & -8.66308741_wp, -14.20823966_wp, -4.42240085_wp, -9.17682317_wp, & + & -14.22274626_wp, -3.36512006_wp, -7.75761367_wp, -23.73502597_wp, & + & -2.81026206_wp, -16.99693561_wp, -22.29629635_wp, -2.91619881_wp, & + & -16.88682537_wp, -21.94561420_wp, -2.64600650_wp, -15.42131029_wp, & + & -22.76092286_wp, -2.13283425_wp, -14.66064587_wp, -24.16600305_wp, & + & -2.29358429_wp, -16.23704835_wp, -21.99643634_wp, -3.92795022_wp, & + & -17.17893045_wp, -21.59553357_wp, -1.89198790_wp, -17.78626507_wp, & + & -21.87795325_wp, -2.07454020_wp, -18.81963208_wp, -21.89592979_wp, & + & -0.88492506_wp, -17.50842395_wp, -20.51757901_wp, -1.97996572_wp, & + & -17.69345463_wp, -20.70987837_wp, -2.98393635_wp, -15.06655782_wp, & + & -20.14208113_wp, -2.72376238_wp, -13.76122093_wp, -18.62113626_wp, & + & -2.77790402_wp, -13.92237779_wp, -18.10761523_wp, -3.25941320_wp, & + & -14.92790500_wp, -20.05645109_wp, -3.39964123_wp, -15.72280775_wp, & + & -20.46163845_wp, -1.73012918_wp, -13.42960258_wp, -20.59537068_wp, & + & -3.77366152_wp, -12.74051943_wp, -21.67885660_wp, -3.74503431_wp, & + & -12.66127293_wp, -20.28854572_wp, -4.76513688_wp, -13.06368716_wp, & + & -20.16408940_wp, -3.56766435_wp, -11.76587710_wp, -29.51294773_wp, & + & -3.38729419_wp, -21.04764581_wp, -28.12151883_wp, -3.73250456_wp, & + & -20.85300403_wp, -27.73831817_wp, -3.25074467_wp, -19.45110770_wp, & + & -28.45631527_wp, -2.47182703_wp, -18.83141945_wp, -29.83793913_wp, & + & -2.64179570_wp, -20.44068494_wp, -28.01865776_wp, -4.81964059_wp, & + & -20.93261932_wp, -27.23125441_wp, -3.05175235_wp, -21.89844959_wp, & + & -27.53186588_wp, -3.37933057_wp, -22.88998965_wp, -27.33916818_wp, & + & -1.97205296_wp, -21.83361949_wp, -26.18970387_wp, -3.31414437_wp, & + & -21.74024530_wp, -26.58518495_wp, -3.72441833_wp, -18.98758168_wp, & + & -25.97670572_wp, -3.29078389_wp, -17.74857370_wp, -24.46231907_wp, & + & -3.43531941_wp, -17.91811120_wp, -23.98676656_wp, -4.10073560_wp, & + & -18.83308514_wp, -25.99581257_wp, -4.33246997_wp, -19.54612183_wp, & + & -26.25076380_wp, -2.24490854_wp, -17.57576415_wp, -26.44935022_wp, & + & -4.14893751_wp, -16.56976420_wp, -27.52850487_wp, -4.06261009_wp, & + & -16.47630061_wp, -26.18954284_wp, -5.19075349_wp, -16.73914871_wp, & + & -25.98670957_wp, -3.81345497_wp, -15.64667963_wp, -35.39978129_wp, & + & -3.98789283_wp, -24.95906843_wp, -34.07400681_wp, -4.48325795_wp, & + & -24.66128583_wp, -33.57992909_wp, -3.72337016_wp, -23.42751730_wp, & + & -34.13603760_wp, -2.69703498_wp, -23.04928503_wp, -35.57899501_wp, & + & -3.05315412_wp, -24.60966371_wp, -34.14603427_wp, -5.55635212_wp, & + & -24.45587431_wp, -33.11681819_wp, -4.24555338_wp, -25.83456066_wp, & + & -33.49586980_wp, -4.76149935_wp, -26.71291785_wp, -33.05071155_wp, & + & -3.18251409_wp, -26.05208640_wp, -32.12620957_wp, -4.62364970_wp, & + & -25.60095267_wp, -32.51499538_wp, -4.25161897_wp, -22.83006660_wp, & + & -31.81480205_wp, -3.62446838_wp, -21.73005437_wp, -30.35585085_wp, & + & -4.08065122_wp, -21.80790554_wp, -30.02285314_wp, -5.02747881_wp, & + & -22.51404471_wp, -32.05272394_wp, -5.07602676_wp, -23.19821241_wp, & + & -31.88925204_wp, -2.53830095_wp, -21.84661617_wp, -32.41735888_wp, & + & -4.04035504_wp, -20.38335024_wp, -33.45936458_wp, -3.73413707_wp, & + & -20.35053236_wp, -32.36043388_wp, -5.11956562_wp, -20.26709530_wp, & + & -31.88367385_wp, -3.56652953_wp, -19.56513701_wp, -39.92751423_wp, & + & -4.98706968_wp, -29.80459482_wp, -39.23780140_wp, -5.60332844_wp, & + & -28.68326558_wp, -38.58183717_wp, -4.51934547_wp, -27.83624641_wp, & + & -38.08666655_wp, -3.51556852_wp, -28.33999267_wp, -39.37805451_wp, & + & -4.19277932_wp, -30.12269808_wp, -39.98014396_wp, -6.14505920_wp, & + & -28.08605859_wp, -38.10604900_wp, -6.56705216_wp, -29.08713512_wp, & + & -38.51400152_wp, -7.41831800_wp, -29.62639531_wp, -37.39466393_wp, & + & -6.04672465_wp, -29.72686840_wp, -37.57381572_wp, -6.92271102_wp, & + & -28.20745077_wp, -38.57513173_wp, -4.75691163_wp, -26.51589944_wp, & + & -37.72689824_wp, -4.01122641_wp, -25.60997733_wp, -36.36669814_wp, & + & -4.71863187_wp, -25.51335908_wp, -36.20789316_wp, -5.86806495_wp, & + & -25.91164181_wp, -38.86522917_wp, -5.66796526_wp, -26.19031559_wp, & + & -37.58432637_wp, -3.02095053_wp, -26.05375056_wp, -38.37185509_wp, & + & -3.91283676_wp, -24.23016539_wp, -39.34277695_wp, -3.43360561_wp, & + & -24.31195830_wp, -38.50101409_wp, -4.90706879_wp, -23.80914375_wp, & + & -37.74504512_wp, -3.33026516_wp, -23.56185562_wp, -39.99815400_wp, & + & -5.64548553_wp, -30.57243347_wp, 2.99874019_wp, -0.06552890_wp, & + & 5.30389097_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_16 + +subroutine polyala_20(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 203 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.97191695_wp, -0.18916005_wp, -0.34950345_wp, 0.15084355_wp, & + & 0.61884282_wp, 0.07433086_wp, 1.19779765_wp, -0.32770413_wp, & + & 0.66438876_wp, 0.90840222_wp, -1.47301738_wp, 0.99128132_wp, & + & -1.12913705_wp, -1.01263279_wp, 0.21903469_wp, 0.54088942_wp, & + & 1.13651133_wp, -0.80772836_wp, -0.27506082_wp, 1.63207198_wp, & + & 1.14176987_wp, -1.06399012_wp, 2.26472593_wp, 0.74498226_wp, & + & -0.64202703_wp, 1.11134134_wp, 2.02275445_wp, 0.56364408_wp, & + & 2.25360333_wp, 1.43774613_wp, 2.43091108_wp, 0.17998077_wp, & + & 0.77470730_wp, 3.45054912_wp, -0.51565341_wp, 1.53128633_wp, & + & 3.07515143_wp, -0.51031059_wp, 3.01252276_wp, 2.18225290_wp, & + & 0.16150608_wp, 3.47660480_wp, 2.57961950_wp, 1.16230392_wp, & + & 0.59695237_wp, 3.46027623_wp, -1.56391740_wp, 1.21157972_wp, & + & 4.81859536_wp, 0.12355978_wp, 1.32312028_wp, 5.07513389_wp, & + & 0.10387900_wp, 0.26877979_wp, 4.81180288_wp, 1.15284248_wp, & + & 1.67273559_wp, 5.56655231_wp, -0.43218865_wp, 1.88002575_wp, & + & 3.84024885_wp, -1.31141592_wp, 3.72138722_wp, -6.68368851_wp, & + & -0.77991507_wp, -4.43201789_wp, -5.39536380_wp, -0.15540886_wp, & + & -4.22436761_wp, -4.70824129_wp, -0.90895083_wp, -3.08275560_wp, & + & -5.33889119_wp, -1.66505108_wp, -2.35066287_wp, -7.04841464_wp, & + & -1.25475506_wp, -3.61363900_wp, -4.81868775_wp, -0.24281490_wp, & + & -5.15079375_wp, -5.55227530_wp, 1.32181131_wp, -3.84714291_wp, & + & -6.06062161_wp, 1.84510909_wp, -4.65228213_wp, -6.14032614_wp, & + & 1.41348436_wp, -2.93756877_wp, -4.58042450_wp, 1.77872470_wp, & + & -3.68677560_wp, -3.40611022_wp, -0.66480620_wp, -2.95491069_wp, & + & -2.59900456_wp, -1.14493440_wp, -1.85466299_wp, -1.58427626_wp, & + & -0.04813373_wp, -1.52397571_wp, -1.36671656_wp, 0.87307341_wp, & + & -2.30411373_wp, -2.94126637_wp, 0.02047740_wp, -3.53987523_wp, & + & -3.25932326_wp, -1.33459604_wp, -1.00236041_wp, -1.85640916_wp, & + & -2.43084049_wp, -2.23556044_wp, -2.57927303_wp, -3.20715790_wp, & + & -2.47047297_wp, -1.23027075_wp, -2.25389698_wp, -3.10635700_wp, & + & -1.23034905_wp, -2.76720013_wp, -1.41422928_wp, -12.31662103_wp, & + & -1.66218250_wp, -8.64291481_wp, -10.94516052_wp, -1.22112444_wp, & + & -8.50989058_wp, -10.47833389_wp, -1.64089207_wp, -7.11391574_wp, & + & -11.28128668_wp, -2.00311829_wp, -6.25942843_wp, -12.77491379_wp, & + & -1.84808635_wp, -7.75670865_wp, -10.34414959_wp, -1.70989797_wp, & + & -9.28384320_wp, -10.83583930_wp, 0.30060470_wp, -8.65922117_wp, & + & -11.19097779_wp, 0.58713561_wp, -9.64542230_wp, -11.44414851_wp, & + & 0.79392599_wp, -7.90540988_wp, -9.80445395_wp, 0.62118411_wp, & + & -8.54797814_wp, -9.16595595_wp, -1.56254333_wp, -6.91362389_wp, & + & -8.52934863_wp, -1.77263232_wp, -5.63146477_wp, -7.25334159_wp, & + & -0.92725037_wp, -5.62536669_wp, -6.80922862_wp, -0.44202650_wp, & + & -6.66124559_wp, -8.53832784_wp, -1.21438064_wp, -7.63089341_wp, & + & -9.21564607_wp, -1.44319953_wp, -4.84434881_wp, -8.17894640_wp, & + & -3.24997167_wp, -5.42249573_wp, -9.09201418_wp, -3.83861019_wp, & + & -5.44475626_wp, -7.51674163_wp, -3.59182836_wp, -6.21366711_wp, & + & -7.68916826_wp, -3.39410261_wp, -4.46419880_wp, -18.02429285_wp, & + & -2.37913707_wp, -12.78950532_wp, -16.59874633_wp, -2.14898099_wp, & + & -12.69914537_wp, -16.20759747_wp, -2.35378796_wp, -11.23317259_wp, & + & -17.05908264_wp, -2.39291632_wp, -10.35001482_wp, -18.51382249_wp, & + & -2.26984310_wp, -11.90758286_wp, -16.08904225_wp, -2.87337056_wp, & + & -13.34276265_wp, -16.23916887_wp, -0.72528516_wp, -13.13846764_wp, & + & -16.55030485_wp, -0.58103295_wp, -14.16955016_wp, -16.74925410_wp, & + & -0.00080700_wp, -12.50884959_wp, -15.16783268_wp, -0.56456290_wp, & + & -13.06707827_wp, -14.90109674_wp, -2.46325330_wp, -11.00986604_wp, & + & -14.30963956_wp, -2.53107747_wp, -9.69117506_wp, -12.90045816_wp, & + & -1.94417483_wp, -9.80395599_wp, -12.36974666_wp, -1.77513014_wp, & + & -10.89755126_wp, -14.22360185_wp, -2.38504252_wp, -11.76107988_wp, & + & -14.92318191_wp, -1.93916226_wp, -9.00402841_wp, -14.23148474_wp, & + & -3.97906132_wp, -9.19430338_wp, -15.23470958_wp, -4.39426833_wp, & + & -9.14911537_wp, -13.63069403_wp, -4.57550764_wp, -9.87616197_wp, & + & -13.78835860_wp, -4.01783194_wp, -8.20392201_wp, -23.72320725_wp, & + & -3.22925167_wp, -16.90474158_wp, -22.28017611_wp, -3.25641724_wp, & + & -16.80146363_wp, -21.94349489_wp, -3.12312896_wp, -15.31424549_wp, & + & -22.79704963_wp, -2.78387165_wp, -14.50003490_wp, -24.18517350_wp, & + & -2.86250840_wp, -16.07840560_wp, -21.91663241_wp, -4.21102134_wp, & + & -17.19648897_wp, -21.64657696_wp, -2.10309943_wp, -17.58763252_wp, & + & -21.92320835_wp, -2.19467479_wp, -18.63458441_wp, -22.00537307_wp, & + & -1.15007094_wp, -17.20753171_wp, -20.56457869_wp, -2.13363401_wp, & + & -17.50433566_wp, -20.67880218_wp, -3.38493766_wp, -14.99713208_wp, & + & -20.11957014_wp, -3.18280945_wp, -13.67809146_wp, -18.63368199_wp, & + & -2.86708411_wp, -13.86642647_wp, -18.07202803_wp, -3.07351007_wp, & + & -14.93790334_wp, -19.98999000_wp, -3.61729122_wp, -15.70486912_wp, & + & -20.63846846_wp, -2.34173138_wp, -13.20655377_wp, -20.27838749_wp, & + & -4.43658470_wp, -12.81070414_wp, -21.33547188_wp, -4.66530566_wp, & + & -12.70563787_wp, -19.77724207_wp, -5.28008700_wp, -13.27840958_wp, & + & -19.85243472_wp, -4.27378216_wp, -11.82534933_wp, -29.47487172_wp, & + & -3.62018940_wp, -21.05438764_wp, -28.04955622_wp, -3.82276332_wp, & + & -20.91040483_wp, -27.70701414_wp, -3.54902245_wp, -19.44370528_wp, & + & -28.49921155_wp, -2.97163699_wp, -18.70518233_wp, -29.88197861_wp, & + & -3.03720724_wp, -20.33064855_wp, -27.81731382_wp, -4.85897371_wp, & + & -21.17708086_wp, -27.26142827_wp, -2.86893286_wp, -21.81501708_wp, & + & -27.53314791_wp, -3.05443334_wp, -22.85066966_wp, -27.49747321_wp, & + & -1.83774585_wp, -21.56518951_wp, -26.19405017_wp, -3.02729586_wp, & + & -21.69580932_wp, -26.50242198_wp, -3.96321673_wp, -19.06191260_wp, & + & -25.93094654_wp, -3.70088398_wp, -17.75886827_wp, -24.40972518_wp, & + & -3.72948521_wp, -17.92745795_wp, -23.89305080_wp, -4.20430289_wp, & + & -18.93443236_wp, -25.86086765_wp, -4.41001209_wp, -19.70894130_wp, & + & -26.26625640_wp, -2.71423247_wp, -17.42257922_wp, -26.36131897_wp, & + & -4.76407553_wp, -16.74205280_wp, -27.44445503_wp, -4.75442406_wp, & + & -16.65486548_wp, -26.04036655_wp, -5.74839663_wp, -17.07323087_wp, & + & -25.92661066_wp, -4.55726077_wp, -15.76904010_wp, -35.21731899_wp, & + & -4.16540970_wp, -25.17099317_wp, -33.85194395_wp, -4.57070831_wp, & + & -24.91679454_wp, -33.46636459_wp, -3.99828796_wp, -23.55026717_wp, & + & -34.14834359_wp, -3.13218131_wp, -23.01087200_wp, -35.51275270_wp, & + & -3.35922276_wp, -24.63029010_wp, -33.81032127_wp, -5.66480732_wp, & + & -24.90547400_wp, -32.90485292_wp, -4.03020097_wp, -25.99388165_wp, & + & -33.20367209_wp, -4.42464323_wp, -26.96132216_wp, -32.95378189_wp, & + & -2.94472017_wp, -26.02270915_wp, -31.88277123_wp, -4.33376446_wp, & + & -25.78892601_wp, -32.35103688_wp, -4.49825000_wp, -23.02591004_wp, & + & -31.73470694_wp, -4.00277699_wp, -21.81428030_wp, -30.23098885_wp, & + & -4.25864559_wp, -21.94294192_wp, -29.78800179_wp, -5.01410389_wp, & + & -22.80276594_wp, -31.78857203_wp, -5.18036857_wp, -23.52363181_wp, & + & -31.94070380_wp, -2.93041688_wp, -21.73350747_wp, -32.28229048_wp, & + & -4.72680918_wp, -20.57927212_wp, -33.35406102_wp, -4.55975555_wp, & + & -20.51479811_wp, -32.09329684_wp, -5.79430414_wp, -20.65837407_wp, & + & -31.81110244_wp, -4.34932703_wp, -19.67692835_wp, -40.99277529_wp, & + & -4.70662142_wp, -29.24383647_wp, -39.71917171_wp, -5.26712374_wp, & + & -28.84722214_wp, -39.22314327_wp, -4.44709990_wp, -27.65344556_wp, & + & -39.72913385_wp, -3.36454550_wp, -27.37401334_wp, -41.12678691_wp, & + & -3.74403967_wp, -28.95300670_wp, -39.87547910_wp, -6.31276149_wp, & + & -28.56263343_wp, -38.70114207_wp, -5.18958281_wp, -29.99027522_wp, & + & -39.07501077_wp, -5.75466472_wp, -30.83977722_wp, -38.55459154_wp, & + & -4.15487461_wp, -30.28923858_wp, -37.74820517_wp, -5.60714140_wp, & + & -29.67993592_wp, -38.21436119_wp, -4.99113332_wp, -26.97839637_wp, & + & -37.51182282_wp, -4.32702857_wp, -25.90198829_wp, -36.07895012_wp, & + & -4.86525191_wp, -25.90373706_wp, -35.78221990_wp, -5.87771108_wp, & + & -26.53049664_wp, -37.79170155_wp, -5.86680964_wp, -27.26759336_wp, & + & -37.52269403_wp, -3.24915473_wp, -26.09394709_wp, -38.17277215_wp, & + & -4.61648763_wp, -24.54961565_wp, -39.19710061_wp, -4.25443284_wp, & + & -24.56909939_wp, -38.17798641_wp, -5.68656013_wp, -24.35873015_wp, & + & -37.63631122_wp, -4.11613065_wp, -23.74924780_wp, -46.73045203_wp, & + & -5.30823784_wp, -33.31886488_wp, -45.61064396_wp, -5.95800281_wp, & + & -32.67448670_wp, -44.97157539_wp, -4.93453251_wp, -31.73302424_wp, & + & -45.22448392_wp, -3.73781488_wp, -31.82678740_wp, -46.64710782_wp, & + & -4.30034071_wp, -33.38179136_wp, -45.99156646_wp, -6.81886671_wp, & + & -32.11542808_wp, -44.57583989_wp, -6.42613082_wp, -33.70411372_wp, & + & -45.04628366_wp, -7.12671130_wp, -34.38904479_wp, -44.20365500_wp, & + & -5.57613546_wp, -34.27055653_wp, -43.74225440_wp, -6.91729786_wp, & + & -33.21113241_wp, -44.12892908_wp, -5.44743965_wp, -30.83942214_wp, & + & -43.29762194_wp, -4.65195701_wp, -29.96218680_wp, -41.98544350_wp, & + & -5.41728038_wp, -29.77236196_wp, -41.89126970_wp, -6.60147087_wp, & + & -30.08035631_wp, -43.90059099_wp, -6.43554393_wp, -30.83855231_wp, & + & -43.11856040_wp, -3.68448800_wp, -30.44212432_wp, -43.97366948_wp, & + & -4.43983983_wp, -28.60318927_wp, -44.91459766_wp, -3.91685546_wp, & + & -28.75013292_wp, -44.17073302_wp, -5.39932267_wp, -28.13194936_wp, & + & -43.33814264_wp, -3.84863028_wp, -27.95094170_wp, -51.09575578_wp, & + & -7.19722547_wp, -37.98371633_wp, -50.70336325_wp, -7.38270482_wp, & + & -36.59605173_wp, -49.80024947_wp, -6.23266686_wp, -36.16696755_wp, & + & -48.99196261_wp, -5.72325003_wp, -36.93719764_wp, -50.31065422_wp, & + & -6.79187256_wp, -38.48729222_wp, -51.61321502_wp, -7.39169510_wp, & + & -35.98513402_wp, -49.89778088_wp, -8.66920505_wp, -36.33320588_wp, & + & -50.51239285_wp, -9.54331942_wp, -36.53181738_wp, -49.02464436_wp, & + & -8.69096381_wp, -36.98346141_wp, -49.55131971_wp, -8.70113781_wp, & + & -35.30243396_wp, -49.94614210_wp, -5.84028679_wp, -34.89165244_wp, & + & -48.95035712_wp, -5.01965462_wp, -34.23399517_wp, -47.85043759_wp, & + & -5.93606125_wp, -33.67701843_wp, -48.01362386_wp, -7.14737830_wp, & + & -33.57161232_wp, -50.51760408_wp, -6.40573634_wp, -34.28031316_wp, & + & -48.51735884_wp, -4.37073521_wp, -35.00159003_wp, -49.58312323_wp, & + & -4.20488521_wp, -33.10997596_wp, -50.37487153_wp, -3.57902827_wp, & + & -33.51035558_wp, -50.00175084_wp, -4.87075758_wp, -32.35910847_wp, & + & -48.83732296_wp, -3.57310303_wp, -32.63711173_wp, -51.30726897_wp, & + & -8.09438004_wp, -38.40660878_wp, 3.61784494_wp, -1.31593356_wp, & + & 4.67364239_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_20 + +subroutine polyala_24(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 243 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.81637731_wp, -0.18566167_wp, -0.41390804_wp, 0.37737222_wp, & + & 0.54899589_wp, -0.05672852_wp, 1.23656443_wp, -0.38150503_wp, & + & 0.80068002_wp, 0.77236547_wp, -1.40691772_wp, 1.28696364_wp, & + & -1.06451831_wp, -0.91527164_wp, 0.24462777_wp, 0.89637138_wp, & + & 0.82500258_wp, -0.98051696_wp, 0.02885163_wp, 1.80723494_wp, & + & 0.74647040_wp, -0.64099838_wp, 2.43158198_wp, 0.16179281_wp, & + & -0.45944736_wp, 1.53062248_wp, 1.67764697_wp, 0.92380363_wp, & + & 2.37300462_wp, 0.98383748_wp, 2.51047220_wp, -0.00414400_wp, & + & 0.95652325_wp, 3.35818709_wp, -0.65416824_wp, 1.93356635_wp, & + & 2.86723909_wp, -0.30758093_wp, 3.33911396_wp, 2.01072033_wp, & + & 0.51672417_wp, 3.56511650_wp, 2.80007364_wp, 0.90574780_wp, & + & 0.62903841_wp, 3.24184919_wp, -1.73817536_wp, 1.81845810_wp, & + & 4.81568730_wp, -0.24676831_wp, 1.75342469_wp, 5.14963166_wp, & + & -0.51244965_wp, 0.75543891_wp, 4.92911998_wp, 0.82481493_wp, & + & 1.89730715_wp, 5.42951496_wp, -0.76628067_wp, 2.48257009_wp, & + & 3.48669557_wp, -1.00089220_wp, 4.26922417_wp, -6.59607398_wp, & + & -0.67346286_wp, -4.45631844_wp, -5.27594673_wp, -0.10623716_wp, & + & -4.28551934_wp, -4.64476620_wp, -0.80189482_wp, -3.07657600_wp, & + & -5.32731066_wp, -1.45666886_wp, -2.29461207_wp, -6.98679636_wp, & + & -1.06808975_wp, -3.60753827_wp, -4.69707812_wp, -0.30310394_wp, & + & -5.19370076_wp, -5.35131779_wp, 1.40387851_wp, -4.03556176_wp, & + & -5.81954082_wp, 1.88485959_wp, -4.88995773_wp, -5.94336581_wp, & + & 1.60530456_wp, -3.14650345_wp, -4.35646515_wp, 1.81673867_wp, & + & -3.89898734_wp, -3.33201284_wp, -0.62662388_wp, -2.94748046_wp, & + & -2.56820217_wp, -1.08446508_wp, -1.80718878_wp, -1.43369522_wp, & + & -0.08127038_wp, -1.58857261_wp, -1.12967881_wp, 0.73467093_wp, & + & -2.45274489_wp, -2.81211110_wp, -0.03160002_wp, -3.58293520_wp, & + & -3.23307410_wp, -1.11486261_wp, -0.93784592_wp, -1.98255961_wp, & + & -2.47858115_wp, -2.05941895_wp, -2.79365057_wp, -3.18226721_wp, & + & -2.22557143_wp, -1.34277773_wp, -2.46036453_wp, -2.93797981_wp, & + & -1.39955481_wp, -2.80698150_wp, -1.20414821_wp, -12.26742621_wp, & + & -1.61730600_wp, -8.61118673_wp, -10.88146700_wp, -1.21553313_wp, & + & -8.50472200_wp, -10.43008267_wp, -1.55576955_wp, -7.08227469_wp, & + & -11.24542761_wp, -1.83707259_wp, -6.20908301_wp, -12.72524731_wp, & + & -1.75403929_wp, -7.71572435_wp, -10.29611267_wp, -1.77618124_wp, & + & -9.24123105_wp, -10.71990991_wp, 0.28721815_wp, -8.76027447_wp, & + & -11.07471236_wp, 0.51595022_wp, -9.76167069_wp, -11.30291734_wp, & + & 0.85382632_wp, -8.03878253_wp, -9.67681924_wp, 0.57723404_wp, & + & -8.68062479_wp, -9.11636844_wp, -1.50389510_wp, -6.88272040_wp, & + & -8.48639004_wp, -1.65841790_wp, -5.58950261_wp, -7.17218762_wp, & + & -0.87509640_wp, -5.63842770_wp, -6.70498518_wp, -0.48631974_wp, & + & -6.70448287_wp, -8.47613985_wp, -1.22859075_wp, -7.62029749_wp, & + & -9.15459401_wp, -1.24876846_wp, -4.82483444_wp, -8.20003995_wp, & + & -3.13350166_wp, -5.28595282_wp, -9.13730982_wp, -3.68325238_wp, & + & -5.27572374_wp, -7.55091609_wp, -3.55239994_wp, -6.05061329_wp, & + & -7.71909145_wp, -3.23734413_wp, -4.31800746_wp, -18.02676891_wp, & + & -2.26880828_wp, -12.71627392_wp, -16.60177352_wp, -2.03481918_wp, & + & -12.62745944_wp, -16.20894920_wp, -2.23534295_wp, -11.16160131_wp, & + & -17.05851828_wp, -2.26198762_wp, -10.27618148_wp, -18.51532424_wp, & + & -2.16975103_wp, -11.83256308_wp, -16.09044637_wp, -2.75872543_wp, & + & -13.27036077_wp, -16.24478580_wp, -0.61133594_wp, -13.06970735_wp, & + & -16.55560705_wp, -0.47017781_wp, -14.10131930_wp, -16.75640295_wp, & + & 0.11366587_wp, -12.44189111_wp, -15.17366192_wp, -0.44923732_wp, & + & -12.99815219_wp, -14.90291438_wp, -2.35321748_wp, -10.94128688_wp, & + & -14.30598861_wp, -2.42283459_wp, -9.62514511_wp, -12.87490065_wp, & + & -1.89660246_wp, -9.76036497_wp, -12.34841916_wp, -1.77116844_wp, & + & -10.86201315_wp, -14.22629902_wp, -2.29643004_wp, -11.69561916_wp, & + & -14.88861043_wp, -1.79425094_wp, -8.94365412_wp, -14.28433818_wp, & + & -3.86361142_wp, -9.10262321_wp, -15.30400160_wp, -4.23438537_wp, & + & -9.04117482_wp, -13.71616674_wp, -4.49727586_wp, -9.77875653_wp, & + & -13.83391041_wp, -3.90303719_wp, -8.11570714_wp, -23.72372521_wp, & + & -3.25344893_wp, -16.84471115_wp, -22.28299600_wp, -3.16833077_wp, & + & -16.74089100_wp, -21.95374509_wp, -3.06741856_wp, -15.24961455_wp, & + & -22.82688535_wp, -2.81926288_wp, -14.42343581_wp, -24.21244404_wp, & + & -2.97734825_wp, -15.99878102_wp, -21.84334191_wp, -4.07298082_wp, & + & -17.17420089_wp, -21.74546508_wp, -1.93672707_wp, -17.47852104_wp, & + & -22.01127350_wp, -2.01015869_wp, -18.52969012_wp, -22.18309307_wp, & + & -1.03233655_wp, -17.06373611_wp, -20.66486792_wp, -1.88173948_wp, & + & -17.39024306_wp, -20.67232561_wp, -3.24737083_wp, -14.94443288_wp, & + & -20.12050681_wp, -3.06484938_wp, -13.61944322_wp, -18.63664345_wp, & + & -2.73686537_wp, -13.80131693_wp, -18.07541567_wp, -2.91941111_wp, & + & -14.87753604_wp, -19.97205871_wp, -3.42304093_wp, -15.65794040_wp, & + & -20.64541346_wp, -2.23644580_wp, -13.13217514_wp, -20.27206634_wp, & + & -4.33501052_wp, -12.77482940_wp, -21.32782296_wp, -4.57429946_wp, & + & -12.68008029_wp, -19.76109576_wp, -5.16569093_wp, -13.25480415_wp, & + & -19.85322975_wp, -4.18549407_wp, -11.78439739_wp, -29.44297253_wp, & + & -3.84565895_wp, -21.03123494_wp, -28.00172137_wp, -3.88745819_wp, & + & -20.90986075_wp, -27.68274109_wp, -3.73022466_wp, -19.42108405_wp, & + & -28.53720045_wp, -3.34332108_wp, -18.62920069_wp, -29.91137244_wp, & + & -3.47227120_wp, -20.21131414_wp, -27.64354610_wp, -4.85228105_wp, & + & -21.28428107_wp, -27.34329932_wp, -2.75450257_wp, -21.70511534_wp, & + & -27.61143864_wp, -2.85571123_wp, -22.75337423_wp, -27.69048719_wp, & + & -1.79115466_wp, -21.34048792_wp, -26.26297188_wp, -2.80225914_wp, & + & -21.61048807_wp, -26.43078291_wp, -4.01790917_wp, -19.07953006_wp, & + & -25.88809144_wp, -3.82283994_wp, -17.75226524_wp, -24.36885133_wp, & + & -3.72097066_wp, -17.90878991_wp, -23.81543420_wp, -4.07342131_wp, & + & -18.94625809_wp, -25.74383170_wp, -4.32379965_wp, -19.76143064_wp, & + & -26.29914323_wp, -2.89654320_wp, -17.33722470_wp, -26.24003680_wp, & + & -4.99577858_wp, -16.83052488_wp, -27.32133393_wp, -5.07837469_wp, & + & -16.75979107_wp, -25.83829443_wp, -5.92164298_wp, -17.23409123_wp, & + & -25.83236265_wp, -4.83358181_wp, -15.83766020_wp, -35.21609293_wp, & + & -4.33602026_wp, -25.17555769_wp, -33.77718596_wp, -4.43428300_wp, & + & -25.06003822_wp, -33.43740397_wp, -4.19365761_wp, -23.58691070_wp, & + & -34.26263005_wp, -3.70636325_wp, -22.81986946_wp, -35.65709636_wp, & + & -3.85800279_wp, -24.39614590_wp, -33.46757356_wp, -5.43723039_wp, & + & -25.37198279_wp, -33.07775369_wp, -3.38682095_wp, -25.93336102_wp, & + & -33.35443209_wp, -3.54865046_wp, -26.97173582_wp, -33.38452420_wp, & + & -2.38756888_wp, -25.63514122_wp, -31.99982248_wp, -3.47149812_wp, & + & -25.83740280_wp, -32.20035173_wp, -4.52648167_wp, -23.23208543_wp, & + & -31.64349216_wp, -4.28889639_wp, -21.91774849_wp, -30.12097041_wp, & + & -4.32515171_wp, -22.06924662_wp, -29.59619546_wp, -4.79071116_wp, & + & -23.07647323_wp, -31.53906309_wp, -4.92354161_wp, -23.89194762_wp, & + & -31.97607332_wp, -3.30642970_wp, -21.56650838_wp, -32.09132287_wp, & + & -5.36612588_wp, -20.92335673_wp, -33.17558399_wp, -5.35229669_wp, & + & -20.85116657_wp, -31.77017753_wp, -6.34660672_wp, -21.26562738_wp, & + & -31.66920673_wp, -5.17585298_wp, -19.94154867_wp, -41.03455103_wp, & + & -5.02685474_wp, -29.20966083_wp, -39.60840024_wp, -5.22683638_wp, & + & -29.06919653_wp, -39.24396317_wp, -4.80852328_wp, -27.64263930_wp, & + & -40.02578520_wp, -4.15866678_wp, -26.95474002_wp, -41.43347231_wp, & + & -4.41564696_wp, -28.50412091_wp, -39.38423048_wp, -6.28617406_wp, & + & -29.23289324_wp, -38.82665034_wp, -4.37688955_wp, -30.07708600_wp, & + & -39.12300478_wp, -4.65916627_wp, -31.08382430_wp, -39.04408990_wp, & + & -3.32281978_wp, -29.92484654_wp, -37.75931881_wp, -4.53971488_wp, & + & -29.96420665_wp, -38.03387966_wp, -5.18203045_wp, -27.23854260_wp, & + & -37.44714532_wp, -4.79657504_wp, -25.97338206_wp, -35.92992130_wp, & + & -4.91603290_wp, -26.13536004_wp, -35.44053985_wp, -5.52642953_wp, & + & -27.08116700_wp, -37.40425407_wp, -5.70421271_wp, -27.83958881_wp, & + & -37.73454658_wp, -3.76321536_wp, -25.75272825_wp, -37.92152937_wp, & + & -5.71324424_wp, -24.84005739_wp, -39.00283523_wp, -5.64376739_wp, & + & -24.75697955_wp, -37.64674220_wp, -6.74306402_wp, -25.05345278_wp, & + & -37.47459810_wp, -5.41415572_wp, -23.89701759_wp, -46.83163700_wp, & + & -5.59784246_wp, -33.27026295_wp, -45.44370917_wp, -5.94737666_wp, & + & -33.05981961_wp, -45.05323044_wp, -5.40006875_wp, -31.68473439_wp, & + & -45.75695790_wp, -4.57611687_wp, -31.10820033_wp, -47.15507686_wp, & + & -4.83384928_wp, -32.68583439_wp, -45.35025274_wp, -7.03799258_wp, & + & -33.08599738_wp, -44.54780402_wp, -5.32831922_wp, -34.13858954_wp, & + & -44.85393535_wp, -5.70166137_wp, -35.11212529_wp, -44.64423596_wp, & + & -4.24567026_wp, -34.12704206_wp, -43.50907834_wp, -5.59415650_wp, & + & -33.96858326_wp, -43.90769478_wp, -5.86735800_wp, -31.19752321_wp, & + & -43.29425203_wp, -5.38940821_wp, -29.97737162_wp, -41.79253764_wp, & + & -5.65821790_wp, -30.10089249_wp, -41.35421885_wp, -6.42130878_wp, & + & -30.95650227_wp, -43.33577475_wp, -6.52814279_wp, -31.71338545_wp, & + & -43.49122744_wp, -4.31626463_wp, -29.88480339_wp, -43.85379496_wp, & + & -6.12131752_wp, -28.75236606_wp, -44.92523816_wp, -5.94917919_wp, & + & -28.69476041_wp, -43.66934276_wp, -7.18903702_wp, -28.83914918_wp, & + & -43.38733277_wp, -5.75271467_wp, -27.84407911_wp, -52.61252996_wp, & + & -6.14596086_wp, -37.33686239_wp, -51.30653926_wp, -6.66308849_wp, & + & -36.99011829_wp, -50.84169242_wp, -5.90276489_wp, -35.74532774_wp, & + & -51.39985935_wp, -4.86990897_wp, -35.38799203_wp, -52.79259349_wp, & + & -5.21297904_wp, -36.98157910_wp, -51.40353836_wp, -7.73297492_wp, & + & -36.77874740_wp, -50.30693727_wp, -6.45033819_wp, -38.13230209_wp, & + & -50.65968042_wp, -6.97304427_wp, -39.01724242_wp, -50.21884013_wp, & + & -5.39066042_wp, -38.35784906_wp, -49.32985263_wp, -6.83710574_wp, & + & -37.85941605_wp, -49.79926788_wp, -6.43881735_wp, -35.11677914_wp, & + & -49.12202200_wp, -5.81744331_wp, -33.99945288_wp, -47.66611079_wp, & + & -6.28741833_wp, -34.04270115_wp, -47.32866131_wp, -7.24387752_wp, & + & -34.73379412_wp, -49.33569296_wp, -7.27022545_wp, -35.46768401_wp, & + & -49.18403239_wp, -4.73060981_wp, -34.11657868_wp, -49.76062636_wp, & + & -6.22995742_wp, -32.66842232_wp, -50.80143432_wp, -5.91791110_wp, & + & -32.66116077_wp, -49.71261927_wp, -7.30955974_wp, -32.55109360_wp, & + & -49.24476101_wp, -5.75925470_wp, -31.83722513_wp, -58.34636411_wp, & + & -6.75754976_wp, -41.40207862_wp, -57.20728645_wp, -7.40789368_wp, & + & -40.79263752_wp, -56.59773148_wp, -6.41440248_wp, -39.80067407_wp, & + & -56.89271195_wp, -5.22392648_wp, -39.83023357_wp, -58.29819446_wp, & + & -5.74505700_wp, -41.39529746_wp, -57.56117966_wp, -8.30694929_wp, & + & -40.27756759_wp, -56.16105525_wp, -7.79257686_wp, -41.84501315_wp, & + & -56.61090334_wp, -8.47412883_wp, -42.56221048_wp, -55.81790664_wp, & + & -6.90465570_wp, -42.37008221_wp, -55.31054305_wp, -8.27982936_wp, & + & -41.37767403_wp, -55.73348179_wp, -6.94337952_wp, -38.93751446_wp, & + & -54.92673082_wp, -6.16358389_wp, -38.02386231_wp, -53.57529476_wp, & + & -6.87178184_wp, -37.89927821_wp, -53.42582843_wp, -8.02742030_wp, & + & -38.28418242_wp, -55.46702787_wp, -7.92025538_wp, -38.99253725_wp, & + & -54.80327900_wp, -5.16107257_wp, -38.44601594_wp, -55.59004165_wp, & + & -6.06878020_wp, -36.64542212_wp, -56.55755341_wp, -5.58492428_wp, & + & -36.74672186_wp, -55.73236424_wp, -7.06388920_wp, -36.23188582_wp, & + & -54.97331784_wp, -5.48804847_wp, -35.96619807_wp, -62.74004274_wp, & + & -8.34158495_wp, -46.21737150_wp, -62.28173375_wp, -8.65981743_wp, & + & -44.87474671_wp, -61.42392631_wp, -7.51629429_wp, -44.34684070_wp, & + & -60.67763395_wp, -6.87473997_wp, -45.08007425_wp, -62.00037796_wp, & + & -7.83510137_wp, -46.69730702_wp, -63.16428615_wp, -8.78962083_wp, & + & -44.23795380_wp, -61.40015608_wp, -9.92025491_wp, -44.78847293_wp, & + & -61.97304224_wp, -10.79838593_wp, -45.07564213_wp, -60.54744029_wp, & + & -9.81541722_wp, -45.45788554_wp, -61.02242022_wp, -10.05477507_wp, & + & -43.77698738_wp, -61.53552375_wp, -7.28544936_wp, -43.02976264_wp, & + & -60.56971369_wp, -6.48207320_wp, -42.30989121_wp, -59.44066720_wp, & + & -7.39765919_wp, -41.81377309_wp, -59.56107133_wp, -8.61847187_wp, & + & -41.79673175_wp, -62.05377562_wp, -7.94709001_wp, -42.46943415_wp, & + & -60.15953476_wp, -5.76362299_wp, -43.02640829_wp, -61.23259613_wp, & + & -5.77402456_wp, -41.13127893_wp, -62.04589314_wp, -5.14947558_wp, & + & -41.48827092_wp, -61.62838951_wp, -6.50764131_wp, -40.43302068_wp, & + & -60.51079782_wp, -5.15211685_wp, -40.61055623_wp, -62.91879032_wp, & + & -9.19565897_wp, -46.73400922_wp, 3.18379524_wp, -0.78699872_wp, & + & 5.17414998_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_24 + +subroutine polyala_28(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 283 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -1.07306017_wp, -0.43046828_wp, -0.19902379_wp, -0.14467062_wp, & + & 0.44362088_wp, 0.48449120_wp, 1.14569354_wp, -0.34092694_wp, & + & 0.73011208_wp, 1.15972293_wp, -1.56615497_wp, 0.71954139_wp, & + & -1.04177501_wp, -1.39567763_wp, 0.10482394_wp, 0.03630540_wp, & + & 1.30520993_wp, -0.16528078_wp, -0.71286138_wp, 0.89605632_wp, & + & 1.83350029_wp, -1.62545411_wp, 1.46321227_wp, 1.67453654_wp, & + & -0.93443914_wp, 0.02809436_wp, 2.44974225_wp, 0.00542435_wp, & + & 1.51326463_wp, 2.36397400_wp, 2.23364514_wp, 0.41101731_wp, & + & 0.93658553_wp, 3.46683091_wp, -0.16695902_wp, 1.42564474_wp, & + & 3.33886588_wp, -0.44234210_wp, 2.92289976_wp, 2.39132817_wp, & + & -0.09001788_wp, 3.58859248_wp, 2.12741934_wp, 1.40968950_wp, & + & 1.04078883_wp, 3.60122137_wp, -1.13672362_wp, 0.93263675_wp, & + & 4.65232837_wp, 0.75031325_wp, 1.14557674_wp, 4.73866245_wp, & + & 0.92132422_wp, 0.07732782_wp, 4.51945962_wp, 1.70341540_wp, & + & 1.65141349_wp, 5.56404947_wp, 0.28438077_wp, 1.50594872_wp, & + & 4.37198280_wp, -1.10002134_wp, 3.40148108_wp, -6.68464353_wp, & + & -0.91483082_wp, -4.37586905_wp, -5.50562786_wp, -0.15903034_wp, & + & -4.01313471_wp, -4.65490253_wp, -1.05613483_wp, -3.11049024_wp, & + & -5.12269685_wp, -2.06783083_wp, -2.59783017_wp, -6.93232854_wp, & + & -1.63724995_wp, -3.70895373_wp, -4.96533399_wp, 0.09444151_wp, & + & -4.93085627_wp, -5.88109183_wp, 1.12145833_wp, -3.25903136_wp, & + & -6.49593256_wp, 1.74771331_wp, -3.89941316_wp, -6.44195002_wp, & + & 0.87354684_wp, -2.36150071_wp, -4.98908426_wp, 1.67252730_wp, & + & -2.97628663_wp, -3.40192194_wp, -0.64238122_wp, -2.93262725_wp, & + & -2.48276031_wp, -1.23698432_wp, -1.98676457_wp, -1.71640983_wp, & + & -0.09388610_wp, -1.31663997_wp, -1.70917006_wp, 1.03411994_wp, & + & -1.79808789_wp, -3.08794806_wp, 0.24258638_wp, -3.31410141_wp, & + & -3.06805615_wp, -1.79774135_wp, -1.25124263_wp, -1.49374711_wp, & + & -2.17126742_wp, -2.69264015_wp, -2.03958369_wp, -2.98135330_wp, & + & -3.16803097_wp, -0.94168132_wp, -1.62254359_wp, -3.45144041_wp, & + & -0.78962071_wp, -2.58978064_wp, -1.97936424_wp, -12.36267576_wp, & + & -1.48586871_wp, -8.53419873_wp, -11.03455982_wp, -0.93989977_wp, & + & -8.35787540_wp, -10.43918178_wp, -1.61041127_wp, -7.11734747_wp, & + & -11.14580088_wp, -2.24120020_wp, -6.33701586_wp, -12.75726619_wp, & + & -1.88734744_wp, -7.69009181_wp, -10.44192996_wp, -1.17505442_wp, & + & -9.24810029_wp, -11.08374682_wp, 0.57897078_wp, -8.15775548_wp, & + & -11.52572810_wp, 1.03975216_wp, -9.03702975_wp, -11.68912025_wp, & + & 0.82089026_wp, -7.28796405_wp, -10.08384958_wp, 0.97733416_wp, & + & -8.01502290_wp, -9.12868364_wp, -1.44161364_wp, -6.96193982_wp, & + & -8.39404616_wp, -1.86558553_wp, -5.78998693_wp, -7.27483659_wp, & + & -0.84546704_wp, -5.56666199_wp, -6.96079836_wp, -0.04524277_wp, & + & -6.44212522_wp, -8.59220208_wp, -0.86138824_wp, -7.59753046_wp, & + & -9.08250810_wp, -1.87989891_wp, -4.93884936_wp, -7.79047962_wp, & + & -3.26002883_wp, -5.99193385_wp, -8.59060696_wp, -3.97444630_wp, & + & -6.16506182_wp, -7.12541575_wp, -3.25683070_wp, -6.85176321_wp, & + & -7.23002037_wp, -3.56355616_wp, -5.11280477_wp, -18.10162750_wp, & + & -2.13364220_wp, -12.66024440_wp, -16.71090844_wp, -1.75158621_wp, & + & -12.54606055_wp, -16.25300882_wp, -2.15435594_wp, -11.14198546_wp, & + & -17.06573661_wp, -2.44298456_wp, -10.26877932_wp, -18.57302634_wp, & + & -2.23799227_wp, -11.76777382_wp, -16.13973503_wp, -2.28901227_wp, & + & -13.31013463_wp, -16.53395544_wp, -0.24124596_wp, -12.73757526_wp, & + & -16.88334453_wp, 0.03574883_wp, -13.72848478_wp, -17.11245065_wp, & + & 0.29949348_wp, -11.99301666_wp, -15.48796327_wp, 0.03361132_wp, & + & -12.64191443_wp, -14.93608377_wp, -2.14591521_wp, -10.95726829_wp, & + & -14.29696223_wp, -2.36720937_wp, -9.67829066_wp, -12.96055901_wp, & + & -1.62206959_wp, -9.71436144_wp, -12.49487802_wp, -1.20558872_wp, & + & -10.77074335_wp, -14.29667718_wp, -1.86109718_wp, -11.69197182_wp, & + & -14.94361957_wp, -1.96530709_wp, -8.89121093_wp, -14.05508801_wp, & + & -3.86072714_wp, -9.43216387_wp, -15.00959316_wp, -4.38013687_wp, & + & -9.43263878_wp, -13.42693193_wp, -4.27127696_wp, -10.21856006_wp, & + & -13.56929263_wp, -4.01527881_wp, -8.47356571_wp, -23.75194146_wp, & + & -3.22408573_wp, -16.83791897_wp, -22.33378420_wp, -2.95472736_wp, & + & -16.73953947_wp, -21.97515004_wp, -3.01921672_wp, -15.25282356_wp, & + & -22.84779881_wp, -3.00294025_wp, -14.38976084_wp, -24.25407177_wp, & + & -3.09598486_wp, -15.96510560_wp, -21.79141745_wp, -3.72151991_wp, & + & -17.30266285_wp, -21.99170235_wp, -1.56964223_wp, -17.29986170_wp, & + & -22.27223068_wp, -1.53202550_wp, -18.34909189_wp, -22.53880646_wp, & + & -0.80227132_wp, -16.75830565_wp, -20.92711508_wp, -1.37619402_wp, & + & -17.21132081_wp, -20.67292545_wp, -3.07342746_wp, -14.99075571_wp, & + & -20.11174260_wp, -3.02405588_wp, -13.65809125_wp, -18.68066205_wp, & + & -2.50040066_wp, -13.79987338_wp, -18.13070665_wp, -2.44854834_wp, & + & -14.89588367_wp, -19.97695734_wp, -3.05650006_wp, -15.72940019_wp, & + & -20.71502111_wp, -2.34315299_wp, -13.04833716_wp, -20.09713696_wp, & + & -4.41425977_wp, -13.01237357_wp, -21.11698559_wp, -4.78238454_wp, & + & -12.93969222_wp, -19.51378426_wp, -5.10144056_wp, -13.61989989_wp, & + & -19.66659765_wp, -4.36772356_wp, -12.01677165_wp, -29.41491056_wp, & + & -4.11038258_wp, -20.98813843_wp, -27.97193416_wp, -4.10870978_wp, & + & -20.88001351_wp, -27.64490840_wp, -4.00149335_wp, -19.38861413_wp, & + & -28.50945541_wp, -3.69832611_wp, -18.57163562_wp, -29.88725162_wp, & + & -3.79571240_wp, -20.14616454_wp, -27.58453644_wp, -5.04553968_wp, & + & -21.29456695_wp, -27.36066138_wp, -2.92419544_wp, -21.63693458_wp, & + & -27.62717920_wp, -3.00105215_wp, -22.68770486_wp, -27.74621613_wp, & + & -1.98845554_wp, -21.24036471_wp, -26.27895330_wp, -2.93010066_wp, & + & -21.54539605_wp, -26.37643258_wp, -4.24217752_wp, -19.07083250_wp, & + & -25.82782706_wp, -4.05651879_wp, -17.74498049_wp, -24.34502149_wp, & + & -3.71954851_wp, -17.91989597_wp, -23.77079622_wp, -3.92193263_wp, & + & -18.98552170_wp, -25.67979255_wp, -4.45238120_wp, -19.77797385_wp, & + & -26.36034880_wp, -3.23127450_wp, -17.26114522_wp, -25.97367396_wp, & + & -5.32771471_wp, -16.90110629_wp, -27.02774866_wp, -5.57533829_wp, & + & -16.80948121_wp, -25.45450920_wp, -6.15448843_wp, -17.37903272_wp, & + & -25.55918031_wp, -5.17421226_wp, -15.90948362_wp, -35.16801064_wp, & + & -4.43370089_wp, -25.16001843_wp, -33.73027179_wp, -4.54312934_wp, & + & -25.03971997_wp, -33.39881744_wp, -4.38323693_wp, -23.55406329_wp, & + & -34.22629771_wp, -3.93380614_wp, -22.76665950_wp, -35.61382528_wp, & + & -3.99872746_wp, -24.35857407_wp, -33.42134398_wp, -5.52850470_wp, & + & -25.40392081_wp, -33.02162740_wp, -3.45177866_wp, -25.84978933_wp, & + & -33.29350038_wp, -3.55446751_wp, -26.89691553_wp, -33.32573980_wp, & + & -2.46927692_wp, -25.49793210_wp, -31.94455014_wp, -3.54642498_wp, & + & -25.75332698_wp, -32.16541911_wp, -4.74129964_wp, -23.21091874_wp, & + & -31.60861855_wp, -4.56319344_wp, -21.88730392_wp, -30.08630099_wp, & + & -4.55215317_wp, -22.04680809_wp, -29.55562758_wp, -4.94918880_wp, & + & -23.07995025_wp, -31.50084866_wp, -5.09758222_wp, -23.89045287_wp, & + & -31.96403264_wp, -3.60997992_wp, -21.48200975_wp, -32.02506742_wp, & + & -5.70364554_wp, -20.95166040_wp, -33.10906801_wp, -5.72271657_wp, & + & -20.87707815_wp, -31.67885752_wp, -6.65557160_wp, -21.34606066_wp, & + & -31.60529846_wp, -5.55464213_wp, -19.96174637_wp, -40.95678722_wp, & + & -4.95882314_wp, -29.28238308_wp, -39.52378160_wp, -5.10684713_wp, & + & -29.14856025_wp, -39.17913926_wp, -4.77248427_wp, -27.69512390_wp, & + & -39.98146310_wp, -4.18770890_wp, -26.97335487_wp, -41.38095602_wp, & + & -4.39984178_wp, -28.54901047_wp, -39.25443975_wp, -6.14156380_wp, & + & -29.38472641_wp, -38.77818164_wp, -4.15478996_wp, -30.09046170_wp, & + & -39.05330970_wp, -4.38301442_wp, -31.11669498_wp, -39.04862684_wp, & + & -3.12520537_wp, -29.87050119_wp, -37.70499965_wp, -4.27254389_wp, & + & -29.97742661_wp, -37.96159058_wp, -5.13949447_wp, -27.30779427_wp, & + & -37.39147922_wp, -4.82733552_wp, -26.01494136_wp, -35.87290283_wp, & + & -4.94685866_wp, -26.16341432_wp, -35.37404107_wp, -5.49956623_wp, & + & -27.13934379_wp, -37.31896353_wp, -5.61432164_wp, -27.93417471_wp, & + & -37.67515095_wp, -3.80551341_wp, -25.74154572_wp, -37.88749309_wp, & + & -5.80034927_wp, -24.93942254_wp, -38.96940773_wp, -5.72724675_wp, & + & -24.86779683_wp, -37.61655850_wp, -6.81919210_wp, -25.20414778_wp, & + & -37.45212069_wp, -5.55571285_wp, -23.97553430_wp, -46.74082650_wp, & + & -5.63331874_wp, -33.35383763_wp, -45.33621630_wp, -5.92360084_wp, & + & -33.16267854_wp, -44.96742667_wp, -5.41652578_wp, -31.76629399_wp, & + & -45.71331887_wp, -4.66103441_wp, -31.15016467_wp, -47.10422742_wp, & + & -4.93252033_wp, -32.71571710_wp, -45.18885367_wp, -7.00634657_wp, & + & -33.23431678_wp, -44.47583652_wp, -5.21865055_wp, -34.21732223_wp, & + & -44.77147410_wp, -5.56376161_wp, -35.20447036_wp, -44.62035559_wp, & + & -4.14291053_wp, -34.15871521_wp, -43.42521676_wp, -5.44485143_wp, & + & -34.06396267_wp, -43.79380051_wp, -5.83860783_wp, -31.30568342_wp, & + & -43.19996328_wp, -5.38365573_wp, -30.06711352_wp, -41.68826120_wp, & + & -5.58154109_wp, -30.20152335_wp, -41.21852174_wp, -6.28598595_wp, & + & -31.09012536_wp, -43.19006902_wp, -6.44453083_wp, -31.85197023_wp, & + & -43.44317261_wp, -4.32474019_wp, -29.93063604_wp, -43.72399107_wp, & + & -6.18811300_wp, -28.87215192_wp, -44.80193415_wp, -6.06657029_wp, & + & -28.80760362_wp, -43.49205563_wp, -7.24219568_wp, -29.00122861_wp, & + & -43.27268356_wp, -5.83539282_wp, -27.94996067_wp, -52.51776401_wp, & + & -6.22660518_wp, -37.44675911_wp, -51.16087336_wp, -6.64583961_wp, & + & -37.17052586_wp, -50.74792682_wp, -5.97822062_wp, -35.85635377_wp, & + & -51.39748181_wp, -5.04869962_wp, -35.38684761_wp, -52.78872651_wp, & + & -5.37244849_wp, -36.97078706_wp, -51.14687402_wp, -7.73640088_wp, & + & -37.07393388_wp, -50.21000329_wp, -6.21546381_wp, -38.29303182_wp, & + & -50.53151775_wp, -6.67044620_wp, -39.22602069_wp, -50.22616523_wp, & + & -5.13395549_wp, -38.40103535_wp, -49.19568608_wp, -6.53523681_wp, & + & -38.07507931_wp, -49.64458332_wp, -6.46901038_wp, -35.29966232_wp, & + & -49.01219889_wp, -5.91052045_wp, -34.12429488_wp, -47.53240397_wp, & + & -6.29621024_wp, -34.19154547_wp, -47.14042188_wp, -7.17091769_wp, & + & -34.95818084_wp, -49.11654978_wp, -7.22044389_wp, -35.73148828_wp, & + & -49.13261242_wp, -4.82240805_wp, -34.14590264_wp, -49.63645037_wp, & + & -6.47074316_wp, -32.84125980_wp, -50.69256822_wp, -6.21575203_wp, & + & -32.81943313_wp, -49.53143827_wp, -7.55240353_wp, -32.81693576_wp, & + & -49.15244480_wp, -6.04706258_wp, -31.96678956_wp, -58.32189764_wp, & + & -6.96613269_wp, -41.45796957_wp, -57.05283596_wp, -7.51130995_wp, & + & -41.02673876_wp, -56.54543972_wp, -6.61419520_wp, -39.89489991_wp, & + & -57.04622460_wp, -5.51339729_wp, -39.68578848_wp, -58.45621040_wp, & + & -5.99189543_wp, -41.20802707_wp, -57.21721586_wp, -8.53297968_wp, & + & -40.66867196_wp, -56.03766188_wp, -7.52592209_wp, -42.17505981_wp, & + & -56.42249592_wp, -8.14344533_wp, -42.98216110_wp, -55.87838755_wp, & + & -6.51636139_wp, -42.54510110_wp, -55.08936109_wp, -7.93426157_wp, & + & -41.83936011_wp, -55.53252267_wp, -7.11427345_wp, -39.19311277_wp, & + & -54.81631699_wp, -6.38264029_wp, -38.17075520_wp, -53.39764035_wp, & + & -6.95589431_wp, -38.12678772_wp, -53.12698006_wp, -8.01969512_wp, & + & -38.67596195_wp, -55.11775303_wp, -8.01169479_wp, -39.42168824_wp, & + & -54.79848966_wp, -5.32345781_wp, -38.44814535_wp, -55.48733113_wp, & + & -6.54442336_wp, -36.80218884_wp, -56.50072740_wp, -6.15576398_wp, & + & -36.85516335_wp, -55.52399883_wp, -7.59524005_wp, -36.52660263_wp, & + & -54.93833388_wp, -5.99720167_wp, -36.04199051_wp, -64.02697262_wp, & + & -7.64810375_wp, -45.57594053_wp, -62.91643673_wp, -8.29844448_wp, & + & -44.91483354_wp, -62.27765977_wp, -7.25925432_wp, -43.98964530_wp, & + & -62.54322767_wp, -6.06597730_wp, -44.09770553_wp, -63.94839813_wp, & + & -6.63735153_wp, -45.61317736_wp, -63.30504299_wp, -9.14474115_wp, & + & -44.33897235_wp, -61.88304249_wp, -8.79602154_wp, -45.93147214_wp, & + & -62.35400200_wp, -9.51557102_wp, -46.59569894_wp, -61.50812069_wp, & + & -7.96259205_wp, -46.52003834_wp, -61.05054053_wp, -9.27489461_wp, & + & -45.42499488_wp, -61.42477034_wp, -7.75160502_wp, -43.09527232_wp, & + & -60.61212875_wp, -6.93419147_wp, -42.22076820_wp, -59.30401217_wp, & + & -7.69300472_wp, -41.98376127_wp, -59.20507182_wp, -8.88611625_wp, & + & -42.25345940_wp, -61.19162858_wp, -8.73839383_wp, -43.07216513_wp, & + & -60.42341333_wp, -5.97798623_wp, -42.71932459_wp, -61.31657039_wp, & + & -6.68955119_wp, -40.88162638_wp, -62.25510304_wp, -6.17224357_wp, & + & -41.06113281_wp, -61.52185309_wp, -7.63724099_wp, -40.39031760_wp, & + & -60.69574061_wp, -6.08056688_wp, -40.23164742_wp, -69.67238959_wp, & + & -8.33957756_wp, -49.75071037_wp, -68.75445286_wp, -8.96147367_wp, & + & -48.82218459_wp, -67.90573200_wp, -7.84628760_wp, -48.20687133_wp, & + & -67.85864727_wp, -6.72971740_wp, -48.71267112_wp, -69.34370594_wp, & + & -7.46194117_wp, -50.13602632_wp, -69.34241870_wp, -9.47456023_wp, & + & -48.05420012_wp, -67.84346244_wp, -9.96693589_wp, -49.53585907_wp, & + & -68.45494752_wp, -10.74026309_wp, -49.99332865_wp, -67.27188095_wp, & + & -9.46462589_wp, -50.31237126_wp, -67.15731634_wp, -10.42739604_wp, & + & -48.83130517_wp, -67.23345728_wp, -8.19436600_wp, -47.11184214_wp, & + & -66.25050770_wp, -7.35083337_wp, -46.46687349_wp, -65.14704576_wp, & + & -8.26947204_wp, -45.93557301_wp, -65.31741205_wp, -9.48146192_wp, & + & -45.84612973_wp, -67.24678367_wp, -9.14849025_wp, -46.76899430_wp, & + & -65.85249947_wp, -6.65639093_wp, -47.21378333_wp, -66.87251464_wp, & + & -6.56600744_wp, -45.30665867_wp, -67.66739884_wp, -5.93180067_wp, & + & -45.68928162_wp, -67.28796912_wp, -7.25260140_wp, -44.57349726_wp, & + & -66.12443365_wp, -5.94390812_wp, -44.82465907_wp, -74.42240440_wp, & + & -10.60815665_wp, -53.88244687_wp, -74.05564287_wp, -10.42247558_wp, & + & -52.48794698_wp, -72.89124918_wp, -9.44354102_wp, -52.39664236_wp, & + & -71.99476284_wp, -9.42494138_wp, -53.23466653_wp, -73.57324083_wp, & + & -10.59451385_wp, -54.44174927_wp, -74.92665229_wp, -10.01738000_wp, & + & -51.96003053_wp, -73.58124881_wp, -11.70668267_wp, -51.78118249_wp, & + & -74.39235865_wp, -12.42877819_wp, -51.73196151_wp, -72.74938497_wp, & + & -12.14078320_wp, -52.33408586_wp, -73.23775521_wp, -11.48422752_wp, & + & -50.77306058_wp, -72.91693370_wp, -8.62781884_wp, -51.33151890_wp, & + & -71.74509199_wp, -7.88749762_wp, -50.91228168_wp, -70.90964953_wp, & + & -8.77918386_wp, -49.98130428_wp, -71.36661851_wp, -9.80823556_wp, & + & -49.49412770_wp, -73.60228913_wp, -8.80371125_wp, -50.61068120_wp, & + & -71.16510251_wp, -7.67569750_wp, -51.81601237_wp, -72.15059094_wp, & + & -6.60056718_wp, -50.19948295_wp, -72.75806326_wp, -5.99064892_wp, & + & -50.86123672_wp, -72.72471618_wp, -6.83564031_wp, -49.30650350_wp, & + & -71.26961876_wp, -6.03668324_wp, -49.90801457_wp, -74.86319599_wp, & + & -11.51294722_wp, -54.00713161_wp, 4.30495554_wp, -1.28078079_wp, & + & 4.36023217_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_28 + +subroutine polyala_32(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 323 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.89985178_wp, -0.21717731_wp, -0.26438588_wp, 0.15795144_wp, & + & 0.64643953_wp, 0.21301811_wp, 1.21766550_wp, -0.24525015_wp, & + & 0.86144750_wp, 0.96417391_wp, -1.39823760_wp, 1.19232741_wp, & + & -1.02626109_wp, -1.06129198_wp, 0.28121588_wp, 0.56756736_wp, & + & 1.18357373_wp, -0.64841905_wp, -0.37372442_wp, 1.63842549_wp, & + & 1.25317747_wp, -1.15730000_wp, 2.24415598_wp, 0.80667475_wp, & + & -0.77948071_wp, 1.09943594_wp, 2.10584399_wp, 0.42063683_wp, & + & 2.28754279_wp, 1.60693384_wp, 2.42078727_wp, 0.31858896_wp, & + & 1.01788355_wp, 3.43554276_wp, -0.32042399_wp, 1.82920480_wp, & + & 2.99956482_wp, -0.29888163_wp, 3.29362786_wp, 2.07066020_wp, & + & 0.35736147_wp, 3.70688043_wp, 2.53454593_wp, 1.30402397_wp, & + & 0.83045411_wp, 3.50015178_wp, -1.37346583_wp, 1.53220708_wp, & + & 4.78415827_wp, 0.37046488_wp, 1.66344868_wp, 5.08584963_wp, & + & 0.33890543_wp, 0.62130794_wp, 4.72037823_wp, 1.40592129_wp, & + & 1.98860723_wp, 5.52988876_wp, -0.14140856_wp, 2.26364562_wp, & + & 3.75309721_wp, -1.06766700_wp, 4.04870368_wp, -6.55156611_wp, & + & -0.88182111_wp, -4.40598226_wp, -5.28676534_wp, -0.22074619_wp, & + & -4.16929710_wp, -4.57719949_wp, -0.99334728_wp, -3.05513305_wp, & + & -5.18181847_wp, -1.80198920_wp, -2.35793641_wp, -6.88858199_wp, & + & -1.42271247_wp, -3.61710731_wp, -4.70360154_wp, -0.25082420_wp, & + & -5.09545263_wp, -5.49807593_wp, 1.23492685_wp, -3.73799735_wp, & + & -6.01756325_wp, 1.76939061_wp, -4.52866975_wp, -6.09746606_wp, & + & 1.27168232_wp, -2.83189181_wp, -4.54464543_wp, 1.71965913_wp, & + & -3.55098450_wp, -3.28558773_wp, -0.70625794_wp, -2.91070305_wp, & + & -2.46811287_wp, -1.19154189_wp, -1.82030683_wp, -1.51023629_wp, & + & -0.06097891_wp, -1.43731074_wp, -1.33115537_wp, 0.89919693_wp, & + & -2.17952910_wp, -2.84573691_wp, 0.02102535_wp, -3.46361954_wp, & + & -3.12774098_wp, -1.44260136_wp, -0.98342539_wp, -1.66512906_wp, & + & -2.42796706_wp, -2.23944410_wp, -2.35050512_wp, -3.22362455_wp, & + & -2.51804666_wp, -1.03305849_wp, -2.18990414_wp, -3.09110424_wp, & + & -1.03965307_wp, -2.77089708_wp, -1.42053376_wp, -12.26381389_wp, & + & -1.45977201_wp, -8.53378874_wp, -10.88519655_wp, -1.04088259_wp, & + & -8.40415794_wp, -10.38436931_wp, -1.56679219_wp, -7.05692455_wp, & + & -11.16691115_wp, -1.97704343_wp, -6.20527676_wp, -12.71289803_wp, & + & -1.67346884_wp, -7.64951420_wp, -10.31135334_wp, -1.47608648_wp, & + & -9.22889618_wp, -10.76549771_wp, 0.48682856_wp, -8.44197059_wp, & + & -11.14512953_wp, 0.85047663_wp, -9.39292087_wp, -11.34728689_wp, & + & 0.92623863_wp, -7.63577566_wp, -9.72831088_wp, 0.79008984_wp, & + & -8.33619427_wp, -9.06475966_wp, -1.52502140_wp, -6.89524598_wp, & + & -8.39173349_wp, -1.82911134_wp, -5.65127952_wp, -7.14038897_wp, & + & -0.94928362_wp, -5.59692883_wp, -6.72875514_wp, -0.36998416_wp, & + & -6.59740650_wp, -8.45776610_wp, -1.12532876_wp, -7.60311113_wp, & + & -9.06903190_wp, -1.59177843_wp, -4.82432309_wp, -7.99391950_wp, & + & -3.30770635_wp, -5.58450855_wp, -8.88890880_wp, -3.92093815_wp, & + & -5.64518224_wp, -7.33729241_wp, -3.55514027_wp, -6.41461450_wp, & + & -7.48143874_wp, -3.52225948_wp, -4.65160967_wp, -17.97032674_wp, & + & -2.22037328_wp, -12.69553822_wp, -16.55493158_wp, -1.93771008_wp, & + & -12.59789694_wp, -16.16249672_wp, -2.15429787_wp, -11.13413103_wp, & + & -17.01596227_wp, -2.23820340_wp, -10.25601072_wp, -18.45805648_wp, & + & -2.17589338_wp, -11.80663664_wp, -16.01430135_wp, -2.62998292_wp, & + & -13.25165841_wp, -16.24859241_wp, -0.49408657_wp, -13.01168828_wp, & + & -16.55894930_wp, -0.34634571_wp, -14.04257129_wp, -16.79121239_wp, & + & 0.19943382_wp, -12.37438325_wp, -15.18481639_wp, -0.29295968_wp, & + & -12.93069119_wp, -14.85434059_wp, -2.22257228_wp, -10.90685432_wp, & + & -14.26566017_wp, -2.30243552_wp, -9.58764941_wp, -12.85422348_wp, & + & -1.72114362_wp, -9.69643147_wp, -12.32800376_wp, -1.53427881_wp, & + & -10.78932057_wp, -14.17577618_wp, -2.11520182_wp, -11.65380968_wp, & + & -14.87585841_wp, -1.71202254_wp, -8.89609089_wp, -14.19660946_wp, & + & -3.75393628_wp, -9.09986586_wp, -15.20318690_wp, -4.16083459_wp, & + & -9.05323560_wp, -13.60366098_wp, -4.35106280_wp, -9.78788806_wp, & + & -13.74970123_wp, -3.80306502_wp, -8.11164131_wp, -23.68495073_wp, & + & -3.18031847_wp, -16.80347433_wp, -22.24630507_wp, -3.04789673_wp, & + & -16.72280400_wp, -21.89427876_wp, -3.00688225_wp, -15.23370562_wp, & + & -22.76207318_wp, -2.83036080_wp, -14.38359348_wp, -24.16418737_wp, & + & -2.95648864_wp, -15.93677906_wp, -21.78388934_wp, -3.91513003_wp, & + & -17.20606627_wp, -21.76758930_wp, -1.76492788_wp, -17.41131606_wp, & + & -22.05752763_wp, -1.79642251_wp, -18.45821358_wp, -22.22332009_wp, & + & -0.89662322_wp, -16.94244012_wp, -20.68741034_wp, -1.67848703_wp, & + & -17.34655242_wp, -20.60319282_wp, -3.15664244_wp, -14.95494078_wp, & + & -20.04328591_wp, -3.03166919_wp, -13.62685685_wp, -18.57149219_wp, & + & -2.65027982_wp, -13.80070437_wp, -18.01207053_wp, -2.76160797_wp, & + & -14.88744052_wp, -19.90736062_wp, -3.27394344_wp, -15.68439138_wp, & + & -20.58745374_wp, -2.24774370_wp, -13.08973053_wp, -20.14959348_wp, & + & -4.35105715_wp, -12.85370857_wp, -21.19691566_wp, -4.62688448_wp, & + & -12.76477647_wp, -19.61819277_wp, -5.13773897_wp, -13.38313907_wp, & + & -19.72678335_wp, -4.24416348_wp, -11.85947752_wp, -29.47270648_wp, & + & -3.86687848_wp, -20.87547708_wp, -28.02866954_wp, -3.84632393_wp, & + & -20.78536457_wp, -27.68324340_wp, -3.73632230_wp, -19.29856227_wp, & + & -28.53452523_wp, -3.41786656_wp, -18.47349548_wp, -29.93940885_wp, & + & -3.56373258_wp, -20.02625212_wp, -27.63390313_wp, -4.77615418_wp, & + & -21.20835328_wp, -27.44152945_wp, -2.65090962_wp, -21.54440074_wp, & + & -27.72334479_wp, -2.72410062_wp, -22.59142485_wp, -27.83040854_wp, & + & -1.72172232_wp, -21.13576260_wp, -26.35865713_wp, -2.64760680_wp, & + & -21.46899157_wp, -26.41278206_wp, -3.98468715_wp, -18.99666534_wp, & + & -25.84467917_wp, -3.81130927_wp, -17.67732227_wp, -24.33558221_wp, & + & -3.64016926_wp, -17.86724081_wp, -23.79439518_wp, -3.93510618_wp, & + & -18.92876578_wp, -25.73153466_wp, -4.23421011_wp, -19.70683558_wp, & + & -26.28328543_wp, -2.91778865_wp, -17.22069465_wp, -26.12118815_wp, & + & -5.02743708_wp, -16.78624794_wp, -27.19557733_wp, -5.16299148_wp, & + & -16.69517145_wp, -25.68568067_wp, -5.92070417_wp, -17.22645372_wp, & + & -25.69901471_wp, -4.87633053_wp, -15.79763600_wp, -35.26788548_wp, & + & -4.39823849_wp, -24.99896588_wp, -33.82488408_wp, -4.37007026_wp, & + & -24.89547779_wp, -33.49305865_wp, -4.24085838_wp, -23.40694893_wp, & + & -34.34834742_wp, -3.89661504_wp, -22.59653505_wp, -35.74462774_wp, & + & -4.08081972_wp, -24.16070149_wp, -33.42290449_wp, -5.30293509_wp, & + & -25.30462789_wp, -33.23528888_wp, -3.18071536_wp, -25.66198397_wp, & + & -33.51063549_wp, -3.26393814_wp, -26.70997628_wp, -33.62780223_wp, & + & -2.24846652_wp, -25.26393536_wp, -32.15298644_wp, -3.17582827_wp, & + & -25.57990033_wp, -32.22842036_wp, -4.49898361_wp, -23.08998451_wp, & + & -31.66876616_wp, -4.33314811_wp, -21.76587033_wp, -30.14818614_wp, & + & -4.29508575_wp, -21.93685471_wp, -29.62097278_wp, -4.66327156_wp, & + & -22.98257496_wp, -31.54880337_wp, -4.79014061_wp, -23.78611707_wp, & + & -32.03553281_wp, -3.39270727_wp, -21.34100511_wp, -32.05928291_wp, & + & -5.49478173_wp, -20.84522236_wp, -33.14259997_wp, -5.53718231_wp, & + & -20.76977642_wp, -31.69392159_wp, -6.43393640_wp, -21.25268387_wp, & + & -31.64131750_wp, -5.34985148_wp, -19.85402062_wp, -41.03987810_wp, & + & -5.10512640_wp, -29.13521898_wp, -39.59821051_wp, -5.03211288_wp, & + & -29.03462907_wp, -39.27044629_wp, -4.87236041_wp, -27.54807178_wp, & + & -40.13569158_wp, -4.53948877_wp, -26.74340271_wp, -41.52398351_wp, & + & -4.78835218_wp, -28.30083576_wp, -39.16868355_wp, -5.95794868_wp, & + & -29.43146918_wp, -39.04524567_wp, -3.83601643_wp, -29.81767141_wp, & + & -39.32068523_wp, -3.94020860_wp, -30.86376151_wp, -39.46325434_wp, & + & -2.91051620_wp, -29.42997475_wp, -37.96334170_wp, -3.79915474_wp, & + & -29.73869581_wp, -37.99968797_wp, -5.09059958_wp, -27.22578793_wp, & + & -37.45147142_wp, -4.90098340_wp, -25.89996623_wp, -35.93018588_wp, & + & -4.85055233_wp, -26.05882078_wp, -35.39029591_wp, -5.23243139_wp, & + & -27.09307969_wp, -37.31165642_wp, -5.37940345_wp, -27.91450664_wp, & + & -37.83142826_wp, -3.95928405_wp, -25.48984747_wp, -37.83625613_wp, & + & -6.05527473_wp, -24.96757553_wp, -38.91953755_wp, -6.10723583_wp, & + & -24.89795345_wp, -37.45953420_wp, -6.99551062_wp, -25.36213345_wp, & + & -37.42540979_wp, -5.89460487_wp, -23.97583799_wp, -46.81311259_wp, & + & -5.89669847_wp, -33.23243087_wp, -45.36972860_wp, -5.85604489_wp, & + & -33.13817909_wp, -45.03268217_wp, -5.67788670_wp, -31.65598998_wp, & + & -45.89023943_wp, -5.32517313_wp, -30.85151034_wp, -47.28618937_wp, & + & -5.55250085_wp, -32.40253695_wp, -44.96356297_wp, -6.79877359_wp, & + & -33.51964083_wp, -44.79292890_wp, -4.68730273_wp, -33.94501818_wp, & + & -45.07419972_wp, -4.80479120_wp, -34.98815394_wp, -45.18928086_wp, & + & -3.74575981_wp, -33.57345846_wp, -43.71018900_wp, -4.67231384_wp, & + & -33.87016568_wp, -43.76281280_wp, -5.90447602_wp, -31.33547741_wp, & + & -43.20995566_wp, -5.69162918_wp, -30.01527668_wp, -41.69181857_wp, & + & -5.59781515_wp, -30.18352649_wp, -41.14527076_wp, -5.98242851_wp, & + & -31.21315481_wp, -43.07797731_wp, -6.20099941_wp, -32.02371164_wp, & + & -43.61587804_wp, -4.75953129_wp, -29.60839676_wp, -43.55431172_wp, & + & -6.85203903_wp, -29.07468274_wp, -44.63500909_wp, -6.93370832_wp, & + & -28.99439720_wp, -43.15537112_wp, -7.78310970_wp, -29.46913525_wp, & + & -43.13857092_wp, -6.67578629_wp, -28.08761314_wp, -52.58748992_wp, & + & -6.49732672_wp, -37.33910297_wp, -51.14644916_wp, -6.56574214_wp, & + & -37.22904102_wp, -50.80834388_wp, -6.35897631_wp, -35.75066487_wp, & + & -51.64285554_wp, -5.91475560_wp, -34.96769369_wp, -53.03797776_wp, & + & -6.06037299_wp, -36.54118624_wp, -50.81386438_wp, -7.55159045_wp, & + & -37.57051014_wp, -50.47332950_wp, -5.47728070_wp, -38.07261016_wp, & + & -50.75262612_wp, -5.61259842_wp, -39.11406980_wp, -50.79861585_wp, & + & -4.49426064_wp, -37.74177975_wp, -49.39333387_wp, -5.54260769_wp, & + & -37.98493213_wp, -49.56193188_wp, -6.67030207_wp, -35.40946526_wp, & + & -49.00069756_wp, -6.44350611_wp, -34.09530053_wp, -47.48064560_wp, & + & -6.39627367_wp, -34.26754615_wp, -46.94706793_wp, -6.81962063_wp, & + & -35.28873001_wp, -48.89328164_wp, -7.02774656_wp, -36.08441721_wp, & + & -49.37978902_wp, -5.49098671_wp, -33.71064354_wp, -49.37707282_wp, & + & -7.57214748_wp, -33.12877005_wp, -50.45940279_wp, -7.61982753_wp, & + & -33.04360665_wp, -49.00749958_wp, -8.52319201_wp, -33.50369645_wp, & + & -48.95292448_wp, -7.38723996_wp, -32.14682933_wp, -58.39361801_wp, & + & -7.18280282_wp, -41.40460133_wp, -56.95757082_wp, -7.30741709_wp, & + & -41.28040079_wp, -56.60857664_wp, -6.95762550_wp, -39.83182685_wp, & + & -57.41725513_wp, -6.38562074_wp, -39.10689416_wp, -58.82301193_wp, & + & -6.63817485_wp, -40.66341538_wp, -56.67252820_wp, -8.33915416_wp, & + & -41.51132742_wp, -56.23436600_wp, -6.35003947_wp, -42.23429846_wp, & + & -56.51364625_wp, -6.59015692_wp, -43.25671778_wp, -56.52019819_wp, & + & -5.32350423_wp, -42.01952552_wp, -55.15858011_wp, -6.44943299_wp, & + & -42.12885401_wp, -55.38064725_wp, -7.29674105_wp, -39.45216345_wp, & + & -54.80685694_wp, -6.96234982_wp, -38.16663677_wp, -53.28720371_wp, & + & -7.04337447_wp, -38.32855075_wp, -52.78309864_wp, -7.59688659_wp, & + & -39.30128581_wp, -54.73311173_wp, -7.76176049_wp, -40.08077116_wp, & + & -55.11510931_wp, -5.94694638_wp, -37.89617643_wp, -55.26643356_wp, & + & -7.94212023_wp, -37.08108423_wp, -56.34922401_wp, -7.89807539_wp, & + & -36.99976533_wp, -54.97014456_wp, -8.95473455_wp, -37.34257533_wp, & + & -54.82898462_wp, -7.67978094_wp, -36.12281152_wp, -64.11926001_wp, & + & -7.72845809_wp, -45.55053605_wp, -62.72290387_wp, -8.04253806_wp, & + & -45.33949118_wp, -62.37090585_wp, -7.57415443_wp, -43.92550296_wp, & + & -63.10813611_wp, -6.81068064_wp, -43.30913652_wp, -64.47524483_wp, & + & -7.00546943_wp, -44.93411528_wp, -62.59160870_wp, -9.12522628_wp, & + & -45.43562474_wp, -61.83341933_wp, -7.32311504_wp, -46.35968637_wp, & + & -62.11220793_wp, -7.63994426_wp, -47.36103809_wp, -61.96647891_wp, & + & -6.24743517_wp, -46.27715439_wp, -60.78876058_wp, -7.56535745_wp, & + & -46.19038725_wp, -61.21943582_wp, -8.03961791_wp, -43.45024687_wp, & + & -60.63191349_wp, -7.61877482_wp, -42.19691061_wp, -59.11797760_wp, & + & -7.79604712_wp, -42.33549551_wp, -58.64051272_wp, -8.47826031_wp, & + & -43.23722311_wp, -60.61829516_wp, -8.64193824_wp, -44.00313912_wp, & + & -60.88772847_wp, -6.56775449_wp, -42.02739908_wp, -61.14697272_wp, & + & -8.46832935_wp, -41.02971163_wp, -62.22630413_wp, -8.36260857_wp, & + & -40.96144644_wp, -60.90191170_wp, -9.51460166_wp, -41.19344767_wp, & + & -60.69979296_wp, -8.14060818_wp, -40.09634496_wp, -69.88774430_wp, & + & -8.39380083_wp, -49.63745551_wp, -68.54708494_wp, -8.84086822_wp, & + & -49.32838792_wp, -68.12458281_wp, -8.11715707_wp, -48.04724038_wp, & + & -68.75479278_wp, -7.15058138_wp, -47.62895628_wp, -70.14016954_wp, & + & -7.51793193_wp, -49.19119555_wp, -68.56756234_wp, -9.92468874_wp, & + & -49.17353345_wp, -67.57461633_wp, -8.50234962_wp, -50.46373862_wp, & + & -67.90454894_wp, -8.99697821_wp, -51.37336094_wp, -67.55492146_wp, & + & -7.42842247_wp, -50.63058239_wp, -66.57270996_wp, -8.84227243_wp, & + & -50.22034017_wp, -67.03636881_wp, -8.60488109_wp, -47.45924301_wp, & + & -66.39386600_wp, -7.99888093_wp, -46.31345497_wp, -64.92091141_wp, & + & -8.41208760_wp, -46.36183296_wp, -64.54199520_wp, -9.32254815_wp, & + & -47.09246200_wp, -66.52122324_wp, -9.38556277_wp, -47.85295985_wp, & + & -66.49541915_wp, -6.91129996_wp, -46.39028740_wp, -67.02672739_wp, & + & -8.48268546_wp, -45.00389765_wp, -68.07788082_wp, -8.20732797_wp, & + & -44.99421399_wp, -66.94184145_wp, -9.56354867_wp, -44.92584670_wp, & + & -66.53386785_wp, -8.02540437_wp, -44.15149882_wp, -75.64116163_wp, & + & -8.99729509_wp, -53.73037508_wp, -74.40066048_wp, -9.58599094_wp, & + & -53.27400336_wp, -73.87735716_wp, -8.69498914_wp, -52.14462231_wp, & + & -74.33706332_wp, -7.57220421_wp, -51.95914290_wp, -75.73758184_wp, & + & -8.01402183_wp, -53.49895270_wp, -74.61011050_wp, -10.59629309_wp, & + & -52.90742782_wp, -73.36954950_wp, -9.65251705_wp, -54.40597913_wp, & + & -73.76644780_wp, -10.26214013_wp, -55.21322615_wp, -73.16442271_wp, & + & -8.65392635_wp, -54.78313413_wp, -72.44362981_wp, -10.09494816_wp, & + & -54.05153582_wp, -72.89817550_wp, -9.22417800_wp, -51.41679284_wp, & + & -72.17816561_wp, -8.50336292_wp, -50.38959534_wp, -70.77726973_wp, & + & -9.11478645_wp, -50.31371165_wp, -70.52912028_wp, -10.19878591_wp, & + & -50.83294435_wp, -72.51449845_wp, -10.14032572_wp, -51.62335988_wp, & + & -72.12688465_wp, -7.44811887_wp, -50.67724508_wp, -72.87590895_wp, & + & -8.63282731_wp, -49.03095534_wp, -73.87706398_wp, -8.21668470_wp, & + & -49.10424144_wp, -72.94630973_wp, -9.67948609_wp, -48.74621141_wp, & + & -72.32387127_wp, -8.09357919_wp, -48.26729830_wp, -81.38752673_wp, & + & -9.54526306_wp, -57.82757570_wp, -80.27456812_wp, -10.20482937_wp, & + & -57.18121073_wp, -79.60451831_wp, -9.17475351_wp, -56.26874862_wp, & + & -79.83026568_wp, -7.97495776_wp, -56.38975444_wp, -81.28080296_wp, & + & -8.54184565_wp, -57.91954857_wp, -80.66767448_wp, -11.04513475_wp, & + & -56.59982519_wp, -79.26147006_wp, -10.71656534_wp, -58.21147345_wp, & + & -79.75461085_wp, -11.42010281_wp, -58.87722313_wp, -78.87671353_wp, & + & -9.88671005_wp, -58.79895491_wp, -78.43400160_wp, -11.21618510_wp, & + & -57.71684095_wp, -78.76526896_wp, -9.68464036_wp, -55.37063824_wp, & + & -77.92338543_wp, -8.88490758_wp, -54.50745167_wp, -76.64939135_wp, & + & -9.69287236_wp, -54.24887083_wp, -76.59810775_wp, -10.89400589_wp, & + & -54.49535451_wp, -78.56688350_wp, -10.67860828_wp, -55.33516999_wp, & + & -77.69268309_wp, -7.94719235_wp, -55.02320252_wp, -78.62293359_wp, & + & -8.58509121_wp, -53.17701274_wp, -79.53793579_wp, -8.03247446_wp, & + & -53.37192101_wp, -78.87029755_wp, -9.51377680_wp, -52.66911833_wp, & + & -77.97993105_wp, -7.99027186_wp, -52.53551258_wp, -85.82679288_wp, & + & -11.48063497_wp, -62.38916069_wp, -85.42709103_wp, -11.63085037_wp, & + & -60.99960539_wp, -84.49588963_wp, -10.48801335_wp, -60.61395512_wp, & + & -83.67544330_wp, -10.02884340_wp, -61.40269749_wp, -85.03555581_wp, & + & -11.11391813_wp, -62.91210804_wp, -86.33178680_wp, -11.60210106_wp, & + & -60.38176214_wp, -84.64515448_wp, -12.92461122_wp, -60.70156206_wp, & + & -85.27867253_wp, -13.79258862_wp, -60.86572946_wp, -83.77824445_wp, & + & -12.98518454_wp, -61.35809547_wp, -84.29021906_wp, -12.92901148_wp, & + & -59.67303597_wp, -84.63011271_wp, -10.04400838_wp, -59.35443471_wp, & + & -83.60932292_wp, -9.22907594_wp, -58.72871990_wp, -82.52521587_wp, & + & -10.15612789_wp, -58.15793362_wp, -82.71520995_wp, -11.36012391_wp, & + & -58.01870029_wp, -85.21798927_wp, -10.56843015_wp, -58.72242745_wp, & + & -83.16844920_wp, -8.61170204_wp, -59.51767247_wp, -84.21182096_wp, & + & -8.36908182_wp, -57.62206721_wp, -84.99346742_wp, -7.73691829_wp, & + & -58.03237703_wp, -84.63729641_wp, -9.00395321_wp, -56.84852579_wp, & + & -83.44714232_wp, -7.74120472_wp, -57.17480772_wp, -86.06665613_wp, & + & -12.38484958_wp, -62.78048848_wp, 3.49107155_wp, -1.06087437_wp, & + & 4.99083952_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_32 + +subroutine polyala_36(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 363 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -1.04202137_wp, -0.41308217_wp, -0.10741194_wp, -0.10748768_wp, & + & 0.45918856_wp, 0.56988934_wp, 1.17508244_wp, -0.33478234_wp, & + & 0.82665941_wp, 1.17743310_wp, -1.56022489_wp, 0.82875202_wp, & + & -1.02551974_wp, -1.37410458_wp, 0.21017640_wp, 0.08288395_wp, & + & 1.31235819_wp, -0.08809379_wp, -0.67495950_wp, 0.92984028_wp, & + & 1.91274646_wp, -1.58400713_wp, 1.50030689_wp, 1.74630867_wp, & + & -0.90200344_wp, 0.07010869_wp, 2.53824837_wp, 0.04621930_wp, & + & 1.54881486_wp, 2.43733847_wp, 2.26973538_wp, 0.40877279_wp, & + & 1.02909108_wp, 3.49445135_wp, -0.17699905_wp, 1.53032004_wp, & + & 3.35680319_wp, -0.43387546_wp, 3.03005056_wp, 2.40852421_wp, & + & -0.06763204_wp, 3.68715485_wp, 2.17241498_wp, 1.40944231_wp, & + & 1.12261579_wp, 3.61907252_wp, -1.15432887_wp, 1.04976960_wp, & + & 4.69202997_wp, 0.72231312_wp, 1.24356436_wp, 4.78583602_wp, & + & 0.87749420_wp, 0.17347592_wp, 4.56805371_wp, 1.68385961_wp, & + & 1.73544811_wp, 5.59629889_wp, 0.25056718_wp, 1.61505629_wp, & + & 4.38407263_wp, -1.09125675_wp, 3.52197690_wp, -6.63695903_wp, & + & -0.89002125_wp, -4.29240865_wp, -5.44197059_wp, -0.15016876_wp, & + & -3.94991871_wp, -4.60888179_wp, -1.04063404_wp, -3.02481653_wp, & + & -5.09620498_wp, -2.02926126_wp, -2.48601366_wp, -6.89959780_wp, & + & -1.58948363_wp, -3.60693151_wp, -4.89767718_wp, 0.06812460_wp, & + & -4.87437629_wp, -5.78944330_wp, 1.15716908_wp, -3.22898063_wp, & + & -6.39175110_wp, 1.77948485_wp, -3.88499627_wp, -6.35425415_wp, & + & 0.94448162_wp, -2.32490450_wp, -4.88567225_wp, 1.69639731_wp, & + & -2.96114774_wp, -3.34772885_wp, -0.64716130_wp, -2.85859957_wp, & + & -2.43916742_wp, -1.23384906_wp, -1.89803582_wp, -1.66882127_wp, & + & -0.08747361_wp, -1.23796659_wp, -1.64361083_wp, 1.03215899_wp, & + & -1.73774657_wp, -3.01845449_wp, 0.22073724_wp, -3.26490998_wp, & + & -3.03399476_wp, -1.78063305_wp, -1.15968510_wp, -1.45010643_wp, & + & -2.18293317_wp, -2.58399388_wp, -1.99619195_wp, -2.99688821_wp, & + & -3.05258889_wp, -0.88947141_wp, -1.64708479_wp, -3.34595200_wp, & + & -0.75326458_wp, -2.59500766_wp, -1.85989380_wp, -12.32398668_wp, & + & -1.42454797_wp, -8.44516278_wp, -10.98544061_wp, -0.90309755_wp, & + & -8.27422039_wp, -10.40823601_wp, -1.56092577_wp, -7.01846047_wp, & + & -11.13052261_wp, -2.15797862_wp, -6.22610231_wp, -12.73332537_wp, & + & -1.79265465_wp, -7.59300079_wp, -10.39509731_wp, -1.16837918_wp, & + & -9.15740214_wp, -11.00379453_wp, 0.62005263_wp, -8.10427052_wp, & + & -11.43130194_wp, 1.07271467_wp, -8.99482577_wp, -11.60858788_wp, & + & 0.89153899_wp, -7.24285190_wp, -9.99646662_wp, 1.00008990_wp, & + & -7.96356067_wp, -9.09421993_wp, -1.42021770_wp, -6.86487364_wp, & + & -8.37152335_wp, -1.83307374_wp, -5.68159439_wp, -7.22740950_wp, & + & -0.83575232_wp, -5.48378556_wp, -6.89584962_wp, -0.06400003_wp, & + & -6.37823357_wp, -8.54420119_wp, -0.86427795_wp, -7.51070250_wp, & + & -9.06024122_wp, -1.80731425_wp, -4.83083053_wp, -7.80526474_wp, & + & -3.24775967_wp, -5.84690518_wp, -8.62458327_wp, -3.94478123_wp, & + & -6.00038288_wp, -7.14182243_wp, -3.28509794_wp, -6.70714777_wp, & + & -7.25165412_wp, -3.54272811_wp, -4.96056927_wp, -18.01752009_wp, & + & -2.17921941_wp, -12.62551405_wp, -16.62776485_wp, -1.79449576_wp, & + & -12.50893577_wp, -16.19220406_wp, -2.14178617_wp, -11.08297897_wp, & + & -17.01954065_wp, -2.39705389_wp, -10.21292528_wp, -18.49438858_wp, & + & -2.26597458_wp, -11.73382967_wp, -16.04627158_wp, -2.36352442_wp, & + & -13.24178922_wp, -16.44501984_wp, -0.29390736_wp, -12.76157477_wp, & + & -16.78567494_wp, -0.05852785_wp, -13.76628344_wp, -17.02826561_wp, & + & 0.27920830_wp, -12.04546883_wp, -15.39910969_wp, -0.01777261_wp, & + & -12.66967914_wp, -14.87881483_wp, -2.12636056_wp, -10.87636696_wp, & + & -14.26199250_wp, -2.30879390_wp, -9.58043123_wp, -12.91106966_wp, & + & -1.59137568_wp, -9.62683903_wp, -12.42553775_wp, -1.22132603_wp, & + & -10.69151871_wp, -14.22539738_wp, -1.87344063_wp, -11.61051626_wp, & + & -14.91100668_wp, -1.86391529_wp, -8.81875807_wp, -14.05311590_wp, & + & -3.79580893_wp, -9.27221019_wp, -15.01738529_wp, -4.29690668_wp, & + & -9.27026362_wp, -13.41906554_wp, -4.24857567_wp, -10.03018398_wp, & + & -13.58765150_wp, -3.92200587_wp, -8.29949424_wp, -23.67736457_wp, & + & -3.20457384_wp, -16.78929535_wp, -22.25440305_wp, -2.96039727_wp, & + & -16.69347695_wp, -21.89338137_wp, -3.03848131_wp, -15.20824282_wp, & + & -22.76314852_wp, -3.00949745_wp, -14.34260401_wp, -24.17297617_wp, & + & -3.08642667_wp, -15.91122357_wp, -21.72614338_wp, -3.73302219_wp, & + & -17.26217995_wp, -21.88814070_wp, -1.57827934_wp, -17.24614755_wp, & + & -22.17311031_wp, -1.52829212_wp, -18.29371247_wp, -22.41701301_wp, & + & -0.80381452_wp, -16.69657656_wp, -20.81945781_wp, -1.40643329_wp, & + & -17.16180749_wp, -20.59163536_wp, -3.11836175_wp, -14.95037754_wp, & + & -20.02612858_wp, -3.07524195_wp, -13.61942322_wp, -18.59407074_wp, & + & -2.55485223_wp, -13.76329349_wp, -18.04135372_wp, -2.51514272_wp, & + & -14.85845528_wp, -19.89782913_wp, -3.11043461_wp, -15.69114487_wp, & + & -20.62674589_wp, -2.39576236_wp, -13.00557223_wp, -20.01076113_wp, & + & -4.46793141_wp, -12.97908664_wp, -21.03046639_wp, -4.83622918_wp, & + & -12.90537425_wp, -19.42873205_wp, -5.15290691_wp, -13.59044671_wp, & + & -19.57801344_wp, -4.42458462_wp, -11.98428944_wp, -29.37950764_wp, & + & -3.94943498_wp, -20.92966856_wp, -27.93650215_wp, -3.91508020_wp, & + & -20.82920875_wp, -27.60222521_wp, -3.87207053_wp, -19.33622815_wp, & + & -28.46551974_wp, -3.61611462_wp, -18.50192924_wp, -29.85426606_wp, & + & -3.68447842_wp, -20.07214116_wp, -27.52742954_wp, -4.81879047_wp, & + & -21.29320527_wp, -27.36065952_wp, -2.67756443_wp, -21.52698495_wp, & + & -27.63381973_wp, -2.70506182_wp, -22.57849474_wp, -27.76515319_wp, & + & -1.77387554_wp, -21.07824929_wp, -26.27839960_wp, -2.66252781_wp, & + & -21.44311119_wp, -26.32874640_wp, -4.10925851_wp, -19.03716574_wp, & + & -25.77192506_wp, -3.97650329_wp, -17.70842533_wp, -24.28496769_wp, & + & -3.65727531_wp, -17.88166469_wp, -23.72017406_wp, -3.83736147_wp, & + & -18.95637494_wp, -25.63504006_wp, -4.28820877_wp, -19.75602799_wp, & + & -26.28901710_wp, -3.16029433_wp, -17.19330680_wp, -25.93193946_wp, & + & -5.27290522_wp, -16.90633253_wp, -26.98919050_wp, -5.50782297_wp, & + & -16.81707019_wp, -25.42733728_wp, -6.09075667_wp, -17.41434009_wp, & + & -25.51015550_wp, -5.15808633_wp, -15.91257424_wp, -35.16634497_wp, & + & -4.41761021_wp, -25.06255645_wp, -33.72263311_wp, -4.41762483_wp, & + & -24.96410433_wp, -33.38573596_wp, -4.30595875_wp, -23.47514205_wp, & + & -34.23644721_wp, -3.96247942_wp, -22.65947426_wp, -35.63272017_wp, & + & -4.10181399_wp, -24.21763946_wp, -33.33941057_wp, -5.35529799_wp, & + & -25.38033080_wp, -33.11241213_wp, -3.23491478_wp, -25.72460871_wp, & + & -33.39110648_wp, -3.30668427_wp, -26.77256426_wp, -33.48656388_wp, & + & -2.29776774_wp, -25.32052783_wp, -32.03000911_wp, -3.25049578_wp, & + & -25.64465044_wp, -32.12378371_wp, -4.58043132_wp, -23.16110409_wp, & + & -31.56582752_wp, -4.42657865_wp, -21.83470202_wp, -30.04563637_wp, & + & -4.36456553_wp, -22.00222123_wp, -29.51105934_wp, -4.70083396_wp, & + & -23.05482327_wp, -31.44384898_wp, -4.86104779_wp, -23.86102230_wp, & + & -31.94569602_wp, -3.49697315_wp, -21.39754425_wp, -31.94309538_wp, & + & -5.60543032_wp, -20.93056163_wp, -33.02595021_wp, -5.66345050_wp, & + & -20.85884442_wp, -31.56380031_wp, -6.53433386_wp, -21.34849048_wp, & + & -31.53024647_wp, -5.46799367_wp, -19.93610412_wp, -40.98243180_wp, & + & -4.97941212_wp, -29.15637818_wp, -39.53860035_wp, -4.94457878_wp, & + & -29.06599652_wp, -39.19559036_wp, -4.80195587_wp, -27.58109696_wp, & + & -40.04670217_wp, -4.45497278_wp, -26.76736711_wp, -41.45204821_wp, & + & -4.65705488_wp, -28.31584950_wp, -39.13612613_wp, -5.87908872_wp, & + & -29.47087014_wp, -38.96047004_wp, -3.75905771_wp, -29.84695126_wp, & + & -39.24568556_wp, -3.85076631_wp, -30.89158869_wp, -39.35196358_wp, & + & -2.82513369_wp, -29.45184772_wp, -37.87744985_wp, -3.75029105_wp, & + & -29.77545035_wp, -37.92770430_wp, -5.05150439_wp, -27.27033043_wp, & + & -37.36441842_wp, -4.87946757_wp, -25.94843002_wp, -35.84377256_wp, & + & -4.85238459_wp, -26.12011524_wp, -35.31877859_wp, -5.23561631_wp, & + & -27.16148806_wp, -37.25096540_wp, -5.34830112_wp, -27.96678574_wp, & + & -37.72563943_wp, -3.93456721_wp, -25.52885303_wp, -37.75924164_wp, & + & -6.03363270_wp, -25.02004926_wp, -38.84252677_wp, -6.06860805_wp, & + & -24.94052521_wp, -37.40148489_wp, -6.97718872_wp, -25.42421632_wp, & + & -37.33664619_wp, -5.88641430_wp, -24.03114268_wp, -46.79481979_wp, & + & -5.75333009_wp, -33.22359962_wp, -45.35226679_wp, -5.67831562_wp, & + & -33.13695069_wp, -45.01014190_wp, -5.50076714_wp, -31.65571059_wp, & + & -45.86831452_wp, -5.16203571_wp, -30.84593279_wp, -47.27167976_wp, & + & -5.42904968_wp, -32.38793810_wp, -44.92550864_wp, -6.60835121_wp, & + & -33.52691824_wp, -44.80772684_wp, -4.49092010_wp, -33.93898604_wp, & + & -45.09250137_wp, -4.60756295_wp, -34.98125550_wp, -45.22319807_wp, & + & -3.56138359_wp, -33.55823001_wp, -43.72518191_wp, -4.45198917_wp, & + & -33.87027697_wp, -43.73529022_wp, -5.71086111_wp, -31.34429971_wp, & + & -43.17333196_wp, -5.50343328_wp, -30.02691768_wp, -41.65395918_wp, & + & -5.44780430_wp, -30.20329359_wp, -41.12399158_wp, -5.83888685_wp, & + & -31.23924973_wp, -43.05297539_wp, -6.00345656_wp, -32.03717684_wp, & + & -43.55288427_wp, -4.55870624_wp, -29.62341019_wp, -43.54312827_wp, & + & -6.64864526_wp, -29.07748682_wp, -44.62535755_wp, -6.70313875_wp, & + & -28.99448908_wp, -43.16823193_wp, -7.59195126_wp, -29.46643465_wp, & + & -43.12116499_wp, -6.47604237_wp, -28.09244013_wp, -52.58286692_wp, & + & -6.54899840_wp, -37.29556263_wp, -51.13900464_wp, -6.53254726_wp, & + & -37.20087871_wp, -50.79930572_wp, -6.33453224_wp, -35.72164796_wp, & + & -51.65202340_wp, -5.95832428_wp, -34.92269065_wp, -53.04997743_wp, & + & -6.18559734_wp, -36.47039450_wp, -50.74939867_wp, -7.48920577_wp, & + & -37.56470163_wp, -50.54034592_wp, -5.38940779_wp, -38.02824563_wp, & + & -50.82401671_wp, -5.52003933_wp, -39.06916218_wp, -50.91839919_wp, & + & -4.43393804_wp, -37.67359785_wp, -49.45744798_wp, -5.39358808_wp, & + & -37.95370312_wp, -49.53238631_wp, -6.57294269_wp, -35.39832017_wp, & + & -48.97279746_wp, -6.34413890_wp, -34.08362961_wp, -47.45519297_wp, & + & -6.25592242_wp, -34.26181864_wp, -46.91643530_wp, -6.65224027_wp, & + & -35.29116757_wp, -48.85138132_wp, -6.88424731_wp, -36.08397883_wp, & + & -49.37394884_wp, -5.40545855_wp, -33.68728613_wp, -49.31640473_wp, & + & -7.49115473_wp, -33.12661638_wp, -50.39697506_wp, -7.56773738_wp, & + & -33.03965404_wp, -48.92313398_wp, -8.42867165_wp, -33.51133931_wp, & + & -48.89492660_wp, -7.30420273_wp, -32.14396095_wp, -58.37672708_wp, & + & -7.20179373_wp, -41.38238601_wp, -56.93518296_wp, -7.26367957_wp, & + & -41.27370740_wp, -56.59371893_wp, -7.02232739_wp, -39.80127690_wp, & + & -57.42762251_wp, -6.56394618_wp, -39.02587601_wp, -58.82759411_wp, & + & -6.75097137_wp, -40.59249101_wp, -56.60054758_wp, -8.25637361_wp, & + & -41.59273663_wp, -56.26678946_wp, -6.19374928_wp, -42.14429863_wp, & + & -56.54805312_wp, -6.35456051_wp, -43.18161489_wp, -56.59393164_wp, & + & -5.20399359_wp, -41.83616134_wp, -55.18644574_wp, -6.25425748_wp, & + & -42.05758713_wp, -55.34475161_wp, -7.32081361_wp, -39.45797198_wp, & + & -54.78008639_wp, -7.07165657_wp, -38.14929947_wp, -53.25935043_wp, & + & -7.05339871_wp, -38.32249070_wp, -52.73372059_wp, -7.50192698_wp, & + & -39.33704492_wp, -54.67843494_wp, -7.69426102_wp, -40.12669145_wp, & + & -55.14248915_wp, -6.10388339_wp, -37.78713733_wp, -55.17570428_wp, & + & -8.17049962_wp, -37.15648494_wp, -56.25882789_wp, -8.19824478_wp, & + & -37.07219823_wp, -54.82146682_wp, -9.13620653_wp, -37.50803013_wp, & + & -54.75007498_wp, -7.96937276_wp, -36.17839389_wp, -64.16379134_wp, & + & -7.92568423_wp, -45.46383151_wp, -62.73030317_wp, -8.06458749_wp, & + & -45.32466473_wp, -62.38811947_wp, -7.69212939_wp, -43.88008314_wp, & + & -63.19523211_wp, -7.09756780_wp, -43.17175740_wp, -64.59293908_wp, & + & -7.35956679_wp, -44.73884451_wp, -62.45570535_wp, -9.10363254_wp, & + & -45.53456481_wp, -61.98764746_wp, -7.13308003_wp, -46.28932904_wp, & + & -62.26224436_wp, -7.38694886_wp, -47.30968204_wp, -62.26146646_wp, & + & -6.09934014_wp, -46.09419365_wp, -60.91403004_wp, -7.24459162_wp, & + & -46.17391410_wp, -61.16691019_wp, -8.03873567_wp, -43.48534068_wp, & + & -60.59553961_wp, -7.68362881_wp, -42.20424544_wp, -59.07538615_wp, & + & -7.76523327_wp, -42.36289550_wp, -58.56980848_wp, -8.33448887_wp, & + & -43.32577410_wp, -60.51948897_wp, -8.51875178_wp, -44.10268045_wp, & + & -60.90550868_wp, -6.66447938_wp, -41.95045381_wp, -61.05581988_wp, & + & -8.64709880_wp, -41.10456251_wp, -62.13879405_wp, -8.60323912_wp, & + & -41.02571112_wp, -60.75788532_wp, -9.66323842_wp, -41.34998694_wp, & + & -60.62029626_wp, -8.36959235_wp, -40.14970244_wp, -69.89019650_wp, & + & -8.58325501_wp, -49.61048333_wp, -68.49248536_wp, -8.88859539_wp, & + & -49.39407111_wp, -68.14108238_wp, -8.37710515_wp, -47.99466985_wp, & + & -68.88748110_wp, -7.60800817_wp, -47.39615613_wp, -70.25514704_wp, & + & -7.87259727_wp, -48.98423797_wp, -68.35639293_wp, -9.97336280_wp, & + & -49.45691053_wp, -67.60629057_wp, -8.19958548_wp, -50.43789273_wp, & + & -67.88863919_wp, -8.54740575_wp, -51.42798283_wp, -67.73983667_wp, & + & -7.12194127_wp, -50.38811025_wp, -66.56098248_wp, -8.43630269_wp, & + & -50.26506504_wp, -66.98132283_wp, -8.81195473_wp, -47.51121492_wp, & + & -66.40022252_wp, -8.35378938_wp, -46.26771497_wp, -64.88717532_wp, & + & -8.55261131_wp, -46.38647214_wp, -64.40942747_wp, -9.26160880_wp, & + & -47.26723152_wp, -66.37482079_wp, -9.42572787_wp, -48.04560703_wp, & + & -66.64430984_wp, -7.29432619_wp, -46.13731529_wp, -66.93742500_wp, & + & -9.15438900_wp, -45.07614848_wp, -68.01594183_wp, -9.03219933_wp, & + & -45.02342165_wp, -66.70464720_wp, -10.20894713_wp, -45.19959653_wp, & + & -66.49583848_wp, -8.79905197_wp, -44.15029400_wp, -75.63480706_wp, & + & -9.15090135_wp, -53.75922259_wp, -74.28233818_wp, -9.57807031_wp, & + & -53.47309597_wp, -73.87349795_wp, -8.90562969_wp, -52.15998480_wp, & + & -74.52211223_wp, -7.97114186_wp, -51.69882724_wp, -75.90451795_wp, & + & -8.29644430_wp, -53.28276380_wp, -74.27587764_wp, -10.66818329_wp, & + & -53.37017382_wp, -73.32199631_wp, -9.16037392_wp, -54.59229951_wp, & + & -73.64130019_wp, -9.61825488_wp, -55.52465010_wp, -73.33013207_wp, & + & -8.07937453_wp, -54.70627640_wp, -72.31121225_wp, -9.48592871_wp, & + & -54.36673505_wp, -72.77491625_wp, -9.39709725_wp, -51.59444794_wp, & + & -72.15199814_wp, -8.83689444_wp, -50.41471972_wp, -70.67658042_wp, & + & -9.24221248_wp, -50.45624801_wp, -70.28379324_wp, -10.12730588_wp, & + & -51.21040417_wp, -72.24808644_wp, -10.15476687_wp, -52.01672526_wp, & + & -72.25746116_wp, -7.74742791_wp, -50.44703883_wp, -72.80251454_wp, & + & -9.37749914_wp, -49.13626241_wp, -73.85539537_wp, -9.10850151_wp, & + & -49.13269448_wp, -72.71212228_wp, -10.46020247_wp, -49.10094459_wp, & + & -72.32616199_wp, -8.95234467_wp, -48.25830762_wp, -81.42355748_wp, & + & -9.82945620_wp, -57.80706549_wp, -80.15712794_wp, -10.38285882_wp, & + & -57.37871815_wp, -79.65047823_wp, -9.49861446_wp, -56.23624135_wp, & + & -80.14961094_wp, -8.39903534_wp, -56.01728623_wp, -81.55757319_wp, & + & -8.85905922_wp, -57.54192685_wp, -80.32447322_wp, -11.40801582_wp, & + & -57.03188094_wp, -79.13870492_wp, -10.38727168_wp, -58.52442871_wp, & + & -79.52374339_wp, -10.99315105_wp, -59.34028666_wp, -78.97434696_wp, & + & -9.37362979_wp, -58.88132526_wp, -78.19301347_wp, -10.80368198_wp, & + & -58.19118316_wp, -78.63995250_wp, -10.00732772_wp, -55.53735351_wp, & + & -77.92770912_wp, -9.28852738_wp, -54.50316745_wp, -76.51281810_wp, & + & -9.87066963_wp, -54.45172308_wp, -76.24425295_wp, -10.93296989_wp, & + & -55.00484164_wp, -78.22814686_wp, -10.90488297_wp, -55.77104266_wp, & + & -77.90149259_wp, -8.22713813_wp, -54.77134483_wp, -78.61052707_wp, & + & -9.45802850_wp, -53.14127919_wp, -79.62172655_wp, -9.06433888_wp, & + & -53.19923720_wp, -78.65410014_wp, -10.51088815_wp, -52.87430635_wp, & + & -78.06519612_wp, -8.91930499_wp, -52.37239131_wp, -87.13256697_wp, & + & -10.42451650_wp, -61.94319664_wp, -86.01757484_wp, -11.08659058_wp, & + & -61.30133516_wp, -85.37861147_wp, -10.06736423_wp, -60.35432468_wp, & + & -85.64914407_wp, -8.87278930_wp, -60.43241630_wp, -87.06015052_wp, & + & -9.41263717_wp, -61.95395329_wp, -86.40154514_wp, -11.94736001_wp, & + & -60.74396631_wp, -84.98621866_wp, -11.55745971_wp, -62.33277698_wp, & + & -85.45780202_wp, -12.26220922_wp, -63.01228970_wp, -84.61510496_wp, & + & -10.70938421_wp, -62.90263576_wp, -84.15106044_wp, -12.04634890_wp, & + & -61.84038137_wp, -84.51886581_wp, -10.57745553_wp, -59.47654603_wp, & + & -83.70822892_wp, -9.77786118_wp, -58.58383978_wp, -82.40311034_wp, & + & -10.54402331_wp, -58.35404899_wp, -82.30472423_wp, -11.73183844_wp, & + & -58.64637013_wp, -84.28431899_wp, -11.56430767_wp, -59.47467639_wp, & + & -83.51467280_wp, -8.81327678_wp, -59.06414958_wp, -84.41832968_wp, & + & -9.55486656_wp, -57.24378733_wp, -85.35487601_wp, -9.03235195_wp, & + & -57.41864615_wp, -84.62795934_wp, -10.51050397_wp, -56.76995727_wp, & + & -83.79917207_wp, -8.95858412_wp, -56.58055760_wp, -92.79129147_wp, & + & -11.03910254_wp, -66.12214059_wp, -91.85629236_wp, -11.67955144_wp, & + & -65.22362327_wp, -91.01582808_wp, -10.57537141_wp, -64.57765080_wp, & + & -90.98273547_wp, -9.44260738_wp, -65.04768276_wp, -92.47067025_wp, & + & -10.15224028_wp, -66.49286844_wp, -92.43075427_wp, -12.22621194_wp, & + & -64.46878336_wp, -90.93831774_wp, -12.64697048_wp, -65.97961985_wp, & + & -91.54293344_wp, -13.41181329_wp, -66.45993822_wp, -90.37933120_wp, & + & -12.10979899_wp, -66.74186710_wp, -90.24077519_wp, -13.12288883_wp, & + & -65.29681835_wp, -90.33348607_wp, -10.95150422_wp, -63.49816197_wp, & + & -89.35734249_wp, -10.11882026_wp, -62.82920130_wp, -88.24684058_wp, & + & -11.04378448_wp, -62.32409187_wp, -88.40738822_wp, -12.25936204_wp, & + & -62.27106469_wp, -90.33652565_wp, -11.91602638_wp, -63.18493542_wp, & + & -88.96485863_wp, -9.39978562_wp, -63.55558989_wp, -89.98586854_wp, & + & -9.37300898_wp, -61.64681883_wp, -90.78574523_wp, -8.73436753_wp, & + & -62.01130166_wp, -90.39612831_wp, -10.08425333_wp, -60.93439763_wp, & + & -89.24306365_wp, -8.75920825_wp, -61.14634320_wp, -97.64920237_wp, & + & -13.17899955_wp, -70.20564815_wp, -97.24700965_wp, -13.03411782_wp, & + & -68.81589711_wp, -96.07566191_wp, -12.06310244_wp, -68.72568682_wp, & + & -95.20057567_wp, -12.02338738_wp, -69.58545371_wp, -96.81451511_wp, & + & -13.15057037_wp, -70.78563711_wp, -98.10273969_wp, -12.64052638_wp, & + & -68.25542457_wp, -96.76162419_wp, -14.33949566_wp, -68.15729835_wp, & + & -97.57374943_wp, -15.06072252_wp, -68.11105847_wp, -95.94347353_wp, & + & -14.75953232_wp, -68.74073640_wp, -96.39564277_wp, -14.14724107_wp, & + & -67.15081417_wp, -96.07054435_wp, -11.28002219_wp, -67.63608671_wp, & + & -94.88762279_wp, -10.55321868_wp, -67.22486432_wp, -94.03693209_wp, & + & -11.46686321_wp, -66.32972816_wp, -94.48877241_wp, -12.50217259_wp, & + & -65.85076142_wp, -96.73928312_wp, -11.47384898_wp, -66.90423423_wp, & + & -94.32500482_wp, -10.32341153_wp, -68.13528784_wp, -95.27385180_wp, & + & -9.28120147_wp, -66.47506007_wp, -95.89128470_wp, -8.65372345_wp, & + & -67.11076774_wp, -95.83197993_wp, -9.53478461_wp, -65.57684733_wp, & + & -94.38507559_wp, -8.72761905_wp, -66.18735481_wp, -98.09489374_wp, & + & -14.07918805_wp, -70.34509270_wp, 4.31134886_wp, -1.25952921_wp, & + & 4.48262213_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_36 + +subroutine polyala_40(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 403 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.75506880_wp, -0.37762887_wp, -0.28625273_wp, 0.26416571_wp, & + & 0.50729639_wp, 0.23414194_wp, 1.32458732_wp, -0.36295720_wp, & + & 0.90873713_wp, 1.08666981_wp, -1.52097895_wp, 1.23280564_wp, & + & -0.86367280_wp, -1.24009696_wp, 0.23400200_wp, 0.68756746_wp, & + & 1.06609521_wp, -0.60655429_wp, -0.32563967_wp, 1.47385414_wp, & + & 1.26754460_wp, -1.10267172_wp, 2.07170307_wp, 0.79951914_wp, & + & -0.75380704_wp, 0.91455724_wp, 2.09575959_wp, 0.44254168_wp, & + & 2.13160256_wp, 1.66129758_wp, 2.51132228_wp, 0.22670298_wp, & + & 1.09481144_wp, 3.52036478_wp, -0.38464926_wp, 1.93375584_wp, & + & 3.07224128_wp, -0.32081465_wp, 3.39297957_wp, 2.12481141_wp, & + & 0.32775105_wp, 3.77521141_wp, 2.60486025_wp, 1.21522167_wp, & + & 0.91198821_wp, 3.58834691_wp, -1.44569201_wp, 1.66767184_wp, & + & 4.86949394_wp, 0.30315926_wp, 1.75749176_wp, 5.18081248_wp, & + & 0.23837524_wp, 0.71979070_wp, 4.80085821_wp, 1.34861291_wp, & + & 2.04775168_wp, 5.61040865_wp, -0.18713310_wp, 2.38117896_wp, & + & 3.83736880_wp, -1.04314204_wp, 4.18205259_wp, -6.41206530_wp, & + & -0.95823877_wp, -4.41990908_wp, -5.14557288_wp, -0.30403651_wp, & + & -4.17350306_wp, -4.42405416_wp, -1.11151694_wp, -3.09207524_wp, & + & -5.01906947_wp, -1.94770854_wp, -2.41966424_wp, -6.73363925_wp, & + & -1.53920577_wp, -3.65330426_wp, -4.57044512_wp, -0.30186364_wp, & + & -5.10518777_wp, -5.35383411_wp, 1.13647771_wp, -3.69207413_wp, & + & -5.87941845_wp, 1.69653205_wp, -4.46071726_wp, -5.94645077_wp, & + & 1.14248052_wp, -2.78078649_wp, -4.39926030_wp, 1.61549505_wp, & + & -3.49600760_wp, -3.13292720_wp, -0.82153237_wp, -2.94847430_wp, & + & -2.30285904_wp, -1.32991242_wp, -1.87820810_wp, -1.37498838_wp, & + & -0.18995782_wp, -1.44921259_wp, -1.22487749_wp, 0.80462542_wp, & + & -2.15155627_wp, -2.70656479_wp, -0.06828809_wp, -3.47679554_wp, & + & -2.95555066_wp, -1.63097779_wp, -1.05251271_wp, -1.46945827_wp, & + & -2.52715955_wp, -2.34788238_wp, -2.13490178_wp, -3.32603529_wp, & + & -2.66318434_wp, -0.84145782_wp, -2.23721183_wp, -3.18632041_wp, & + & -0.83804404_wp, -2.89047430_wp, -1.54261632_wp, -12.21449715_wp, & + & -1.32556377_wp, -8.46678560_wp, -10.84199216_wp, -0.88999814_wp, & + & -8.32814698_wp, -10.31250938_wp, -1.49190278_wp, -7.02375926_wp, & + & -11.07607752_wp, -1.96645232_wp, -6.18838613_wp, -12.65167803_wp, & + & -1.59020147_wp, -7.59046038_wp, -10.27271153_wp, -1.26114847_wp, & + & -9.18662852_wp, -10.75068018_wp, 0.63886738_wp, -8.26959259_wp, & + & -11.15222204_wp, 1.05563447_wp, -9.18929768_wp, -11.32723352_wp, & + & 1.01455694_wp, -7.42815822_wp, -9.71753043_wp, 0.95430829_wp, & + & -8.16019975_wp, -8.99140766_wp, -1.43997536_wp, -6.87923222_wp, & + & -8.29170270_wp, -1.81861588_wp, -5.67073001_wp, -7.03531086_wp, & + & -0.94712232_wp, -5.59490467_wp, -6.64967247_wp, -0.30611910_wp, & + & -6.56780332_wp, -8.40032648_wp, -0.99120936_wp, -7.57115875_wp, & + & -8.94814295_wp, -1.62763050_wp, -4.81540237_wp, -7.90034434_wp, & + & -3.30011921_wp, -5.69970989_wp, -8.79988424_wp, -3.90458234_wp, & + & -5.77857688_wp, -7.26191499_wp, -3.50065141_wp, -6.55624925_wp, & + & -7.37079885_wp, -3.57203718_wp, -4.79175541_wp, -17.93231841_wp, & + & -2.08854250_wp, -12.62252898_wp, -16.52483889_wp, -1.76870037_wp, & + & -12.52300332_wp, -16.11664126_wp, -2.01896055_wp, -11.06866945_wp, & + & -16.96154258_wp, -2.15503309_wp, -10.18885783_wp, -18.41961467_wp, & + & -2.07043321_wp, -11.73256250_wp, -15.96949098_wp, -2.42561527_wp, & + & -13.20045126_wp, -16.26247826_wp, -0.30521895_wp, -12.89500642_wp, & + & -16.58311198_wp, -0.13543539_wp, -13.91931056_wp, -16.82056245_wp, & + & 0.35334159_wp, -12.23442146_wp, -15.20437055_wp, -0.07625978_wp, & + & -12.81357709_wp, -14.80544669_wp, -2.05696512_wp, -10.85103187_wp, & + & -14.20537550_wp, -2.16954276_wp, -9.53932583_wp, -12.80805635_wp, & + & -1.55282743_wp, -9.63514311_wp, -12.29500560_wp, -1.31059419_wp, & + & -10.72333998_wp, -14.13499124_wp, -1.90600013_wp, -11.59775456_wp, & + & -14.82403147_wp, -1.61913241_wp, -8.82276963_wp, -14.09781538_wp, & + & -3.63570642_wp, -9.10478730_wp, -15.09368986_wp, -4.06888668_wp, & + & -9.06704596_wp, -13.49483293_wp, -4.19265429_wp, -9.81740000_wp, & + & -13.64302741_wp, -3.70971316_wp, -8.12167815_wp, -23.61299203_wp, & + & -3.13613190_wp, -16.74739343_wp, -22.17476981_wp, -3.00136338_wp, & + & -16.66078057_wp, -21.82861721_wp, -2.95599625_wp, -15.17023985_wp, & + & -22.70119692_wp, -2.78732501_wp, -14.32346777_wp, -24.09571771_wp, & + & -2.91542358_wp, -15.88179681_wp, -21.70872845_wp, -3.86909830_wp, & + & -17.13970134_wp, -21.69519252_wp, -1.71941420_wp, -17.35065441_wp, & + & -21.97931957_wp, -1.75480514_wp, -18.39901157_wp, -22.15549324_wp, & + & -0.85071637_wp, -16.88700141_wp, -20.61557562_wp, -1.62991030_wp, & + & -17.28035920_wp, -20.53714727_wp, -3.09435511_wp, -14.88657316_wp, & + & -19.98169088_wp, -2.95513377_wp, -13.55785937_wp, -18.52084590_wp, & + & -2.53149524_wp, -13.72960487_wp, -17.95884733_wp, -2.62111524_wp, & + & -14.81696184_wp, -19.83809389_wp, -3.19913658_wp, -15.61477386_wp, & + & -20.54815147_wp, -2.18688072_wp, -13.02113726_wp, -20.05236699_wp, & + & -4.27756138_wp, -12.78600349_wp, -21.09179431_wp, -4.58202176_wp, & + & -12.69780749_wp, -19.49937874_wp, -5.04905643_wp, -13.31567478_wp, & + & -19.63318730_wp, -4.16045858_wp, -11.79134359_wp, -29.39362349_wp, & + & -3.89784142_wp, -20.83054393_wp, -27.95006545_wp, -3.84946488_wp, & + & -20.74090217_wp, -27.60667157_wp, -3.72831909_wp, -19.25424630_wp, & + & -28.46459753_wp, -3.42491346_wp, -18.43032666_wp, -29.86549054_wp, & + & -3.60180878_wp, -19.98161779_wp, -27.53769902_wp, -4.77295623_wp, & + & -21.16098160_wp, -27.38608862_wp, -2.64559347_wp, -21.50405019_wp, & + & -27.66714234_wp, -2.72734396_wp, -22.55065247_wp, -27.79205905_wp, & + & -1.72257878_wp, -21.09807700_wp, -26.30343125_wp, -2.62177163_wp, & + & -21.42942036_wp, -26.33148806_wp, -3.94938885_wp, -18.95100743_wp, & + & -25.76926303_wp, -3.76739257_wp, -17.63003647_wp, -24.25936089_wp, & + & -3.59556317_wp, -17.81405135_wp, -23.71416635_wp, -3.88881507_wp, & + & -18.87399634_wp, -25.64481029_wp, -4.19115611_wp, -19.65870362_wp, & + & -26.21002478_wp, -2.87127154_wp, -17.18046831_wp, -26.04991629_wp, & + & -4.97797629_wp, -16.73276434_wp, -27.12483089_wp, -5.11173687_wp, & + & -16.64500841_wp, -25.61387693_wp, -5.87427427_wp, -17.16623746_wp, & + & -25.63143084_wp, -4.82164875_wp, -15.74340868_wp, -35.18906543_wp, & + & -4.47283525_wp, -24.93849015_wp, -33.74526234_wp, -4.46272420_wp, & + & -24.84086684_wp, -33.40730484_wp, -4.32709590_wp, -23.35417264_wp, & + & -34.25970140_wp, -3.97965857_wp, -22.54195168_wp, -35.65744216_wp, & + & -4.15390746_wp, -24.09587387_wp, -33.35623777_wp, -5.40388960_wp, & + & -25.24370034_wp, -33.14301270_wp, -3.28731943_wp, -25.61892158_wp, & + & -33.42420766_wp, -3.37486766_wp, -26.66501379_wp, -33.52099576_wp, & + & -2.34674637_wp, -25.22646336_wp, -32.06036321_wp, -3.29625570_wp, & + & -25.54182440_wp, -32.14196492_wp, -4.58433034_wp, -23.03912268_wp, & + & -31.58157270_wp, -4.40837685_wp, -21.71647590_wp, -30.06207269_wp, & + & -4.34275022_wp, -21.88963434_wp, -29.52957329_wp, -4.70456818_wp, & + & -22.93486953_wp, -31.46195595_wp, -4.87342684_wp, -23.73554254_wp, & + & -31.96496643_wp, -3.47472439_wp, -21.29139078_wp, -31.95003104_wp, & + & -5.57682001_wp, -20.79538805_wp, -33.03226873_wp, -5.63718109_wp, & + & -20.71665722_wp, -31.57046566_wp, -6.50954076_wp, -21.20461780_wp, & + & -31.53154106_wp, -5.42564255_wp, -19.80534183_wp, -40.99542717_wp, & + & -5.06366944_wp, -29.04555427_wp, -39.55202257_wp, -5.01775934_wp, & + & -28.95176270_wp, -39.21316130_wp, -4.87341830_wp, -27.46607093_wp, & + & -40.06849390_wp, -4.53319438_wp, -26.65391176_wp, -41.46949828_wp, & + & -4.74945385_wp, -28.20448160_wp, -39.14116102_wp, -5.94873031_wp, & + & -29.35638205_wp, -38.98155274_wp, -3.82712810_wp, -29.73061272_wp, & + & -39.26398807_wp, -3.92041872_wp, -30.77587259_wp, -39.38130872_wp, & + & -2.89664074_wp, -29.33563909_wp, -37.89880417_wp, -3.80987135_wp, & + & -29.65690893_wp, -37.94383074_wp, -5.11284315_wp, -27.15295446_wp, & + & -37.38455112_wp, -4.93950499_wp, -25.82942613_wp, -35.86346205_wp, & + & -4.90977837_wp, -25.99714898_wp, -35.33532965_wp, -5.29337216_wp, & + & -27.03682455_wp, -37.26414748_wp, -5.40708404_wp, -27.84763475_wp, & + & -37.74826029_wp, -3.99497969_wp, -25.41113033_wp, -37.78023431_wp, & + & -6.09381421_wp, -24.90163064_wp, -38.86375265_wp, -6.13129655_wp, & + & -24.82651068_wp, -37.41853129_wp, -7.03686327_wp, -25.30345027_wp, & + & -37.36206372_wp, -5.94452143_wp, -23.91118382_wp, -46.79823665_wp, & + & -5.76857148_wp, -33.13414319_wp, -45.35472256_wp, -5.71304861_wp, & + & -33.04554540_wp, -45.01247678_wp, -5.55782103_wp, -31.56176153_wp, & + & -45.86953687_wp, -5.22589892_wp, -30.74792160_wp, -47.27072343_wp, & + & -5.45884522_wp, -32.29041506_wp, -44.93886241_wp, -6.64377091_wp, & + & -33.44569897_wp, -44.79434690_wp, -4.52356037_wp, -33.83341126_wp, & + & -45.07876249_wp, -4.62549797_wp, -34.87732675_wp, -45.19951607_wp, & + & -3.59332576_wp, -33.44338066_wp, -43.71155077_wp, -4.49825382_wp, & + & -33.76262799_wp, -43.73917381_wp, -5.77880482_wp, -31.25106720_wp, & + & -43.18061969_wp, -5.58866589_wp, -29.92945566_wp, -41.66105353_wp, & + & -5.52345389_wp, -30.10019807_wp, -41.12558562_wp, -5.90076871_wp, & + & -31.13839472_wp, -43.05615454_wp, -6.06410572_wp, -31.94607598_wp, & + & -43.56600436_wp, -4.65187654_wp, -29.51323174_wp, -43.54739911_wp, & + & -6.74940368_wp, -28.99785093_wp, -44.62957500_wp, -6.81124862_wp, & + & -28.91957744_wp, -43.16552092_wp, -7.68493182_wp, -29.39856182_wp, & + & -43.12995747_wp, -6.58821833_wp, -28.00896614_wp, -52.60792374_wp, & + & -6.47203064_wp, -37.21116789_wp, -51.16414033_wp, -6.42103687_wp, & + & -37.12392885_wp, -50.81959440_wp, -6.26801698_wp, -35.64036706_wp, & + & -51.67511960_wp, -5.93636815_wp, -34.82481286_wp, -53.07875244_wp, & + & -6.16134985_wp, -36.36687133_wp, -50.75146803_wp, -7.35274989_wp, & + & -37.52508811_wp, -50.60127729_wp, -5.23275641_wp, -37.91185643_wp, & + & -50.88817000_wp, -5.33289124_wp, -38.95528191_wp, -51.00256306_wp, & + & -4.30147982_wp, -37.52029101_wp, -49.51825652_wp, -5.21106859_wp, & + & -37.84336276_wp, -49.54604342_wp, -6.49086995_wp, -35.33207312_wp, & + & -48.98411485_wp, -6.30238669_wp, -34.01163172_wp, -47.46530016_wp, & + & -6.22951900_wp, -34.18731879_wp, -46.93181078_wp, -6.60200529_wp, & + & -35.22828661_wp, -48.86429180_wp, -6.77435626_wp, -36.02909941_wp, & + & -49.37254002_wp, -5.36876373_wp, -33.59120102_wp, -49.34258489_wp, & + & -7.46785558_wp, -33.08272995_wp, -50.42419647_wp, -7.53472902_wp, & + & -33.00077847_wp, -48.95808963_wp, -8.40034180_wp, -33.48798425_wp, & + & -48.92230492_wp, -7.30824478_wp, -32.09479279_wp, -58.41543869_wp, & + & -7.18498153_wp, -41.29620644_wp, -56.97242418_wp, -7.12100738_wp, & + & -41.20477028_wp, -56.63205870_wp, -6.96631954_wp, -39.72046847_wp, & + & -57.49077367_wp, -6.63861611_wp, -38.90673072_wp, -58.89237005_wp, & + & -6.87753379_wp, -40.45426624_wp, -56.55069415_wp, -8.04854186_wp, & + & -41.60615968_wp, -56.41812366_wp, -5.92688912_wp, -41.98997793_wp, & + & -56.70110168_wp, -6.02855024_wp, -43.03431455_wp, -56.82879801_wp, & + & -4.99965028_wp, -41.59858271_wp, -55.33554404_wp, -5.89565795_wp, & + & -41.91828861_wp, -55.35783056_wp, -7.18292546_wp, -39.41043392_wp, & + & -54.79679549_wp, -6.99312888_wp, -38.08977966_wp, -53.27740363_wp, & + & -6.92810125_wp, -38.26486690_wp, -52.74580230_wp, -7.30168028_wp, & + & -39.30645229_wp, -54.67458727_wp, -7.46510661_wp, -40.10666709_wp, & + & -55.18030263_wp, -6.05595738_wp, -37.67261658_wp, -55.16265686_wp, & + & -8.15345017_wp, -37.15741462_wp, -56.24477171_wp, -8.21460484_wp, & + & -37.07750617_wp, -54.78206965_wp, -9.08931680_wp, -37.55853897_wp, & + & -54.74369365_wp, -7.99238513_wp, -36.16916576_wp, -64.19826977_wp, & + & -7.94847442_wp, -45.40500208_wp, -62.75587573_wp, -7.87884971_wp, & + & -45.30900063_wp, -62.42206452_wp, -7.71701013_wp, -43.82392175_wp, & + & -63.28580960_wp, -7.39084613_wp, -43.01485745_wp, -64.67867021_wp, & + & -7.63652770_wp, -44.56663126_wp, -62.32930426_wp, -8.80642626_wp, & + & -45.70509152_wp, -62.20329198_wp, -6.68574650_wp, -46.09694933_wp, & + & -62.48264322_wp, -6.79219120_wp, -47.14178839_wp, -62.61837473_wp, & + & -5.75850065_wp, -45.71024865_wp, -61.12105028_wp, -6.65038419_wp, & + & -46.02203398_wp, -61.14820104_wp, -7.92598406_wp, -43.50737917_wp, & + & -60.59529251_wp, -7.72920441_wp, -42.18430530_wp, -59.07590464_wp, & + & -7.64924520_wp, -42.35212137_wp, -58.53564431_wp, -8.01920800_wp, & + & -43.39054956_wp, -60.45985257_wp, -8.20585005_wp, -44.19945312_wp, & + & -60.99047208_wp, -6.79561667_wp, -41.77005899_wp, -60.95419780_wp, & + & -8.89244384_wp, -41.25285106_wp, -62.03601079_wp, -8.96343436_wp, & + & -41.17707886_wp, -60.56360119_wp, -9.82492140_wp, -41.65224175_wp, & + & -60.54049276_wp, -8.72728894_wp, -40.26307025_wp, -69.97183305_wp, & + & -8.72259765_wp, -49.51812363_wp, -68.52896692_wp, -8.67177257_wp, & + & -49.41832124_wp, -68.19681414_wp, -8.49670365_wp, -47.93443767_wp, & + & -69.05846881_wp, -8.15196910_wp, -47.13091713_wp, -70.45080188_wp, & + & -8.38627524_wp, -48.68847509_wp, -68.11449713_wp, -9.60995844_wp, & + & -49.80201641_wp, -67.95824332_wp, -7.49573165_wp, -50.21892266_wp, & + & -68.23634835_wp, -7.61075053_wp, -51.26318331_wp, -68.36179948_wp, & + & -6.55846626_wp, -49.84428842_wp, -66.87581089_wp, -7.47381560_wp, & + & -50.14154259_wp, -66.92599992_wp, -8.71633065_wp, -47.61253981_wp, & + & -66.37420715_wp, -8.50931802_wp, -46.29069206_wp, -64.85487832_wp, & + & -8.42584470_wp, -46.45747045_wp, -64.31174720_wp, -8.80422757_wp, & + & -47.49130305_wp, -66.23868548_wp, -9.00785432_wp, -48.30068635_wp, & + & -66.77282120_wp, -7.57438980_wp, -45.88291582_wp, -66.73004154_wp, & + & -9.66795581_wp, -45.35231206_wp, -67.81163614_wp, -9.74155006_wp, & + & -45.27599550_wp, -66.33684993_wp, -10.60167252_wp, -45.74624817_wp, & + & -66.31668905_wp, -9.49583284_wp, -44.36354780_wp, -75.73028291_wp, & + & -9.34751518_wp, -53.65334340_wp, -74.28884101_wp, -9.40719528_wp, & + & -53.53992046_wp, -73.95569731_wp, -9.20109582_wp, -52.06018109_wp, & + & -74.79779444_wp, -8.77188557_wp, -51.27689210_wp, -76.18605937_wp, & + & -8.92613625_wp, -52.84997376_wp, -73.94879338_wp, -10.39050124_wp, & + & -53.88160243_wp, -73.62056688_wp, -8.31391441_wp, -54.38107303_wp, & + & -73.89751267_wp, -8.45008818_wp, -55.42307331_wp, -73.95220816_wp, & + & -7.33311569_wp, -54.04998040_wp, -72.54036641_wp, -8.37294325_wp, & + & -54.29187315_wp, -72.70545589_wp, -9.49538902_wp, -51.71739478_wp, & + & -72.15264852_wp, -9.27030703_wp, -50.39905059_wp, -70.63163017_wp, & + & -9.21553124_wp, -50.56159885_wp, -70.09033236_wp, -9.62759221_wp, & + & -51.58335117_wp, -72.03001985_wp, -9.84204493_wp, -52.39118645_wp, & + & -72.53764844_wp, -8.32041302_wp, -50.01362221_wp, -72.53129549_wp, & + & -10.40327600_wp, -49.43853050_wp, -73.61406115_wp, -10.45519319_wp, & + & -49.36147620_wp, -72.15550648_wp, -11.35179701_wp, -49.81365392_wp, & + & -72.11512625_wp, -10.21981642_wp, -48.45294986_wp, -81.52265927_wp, & + & -9.97819151_wp, -57.75382578_wp, -80.08582635_wp, -10.09611381_wp, & + & -57.62952260_wp, -79.74100292_wp, -9.77398472_wp, -56.17339038_wp, & + & -80.55500500_wp, -9.22331818_wp, -55.43796564_wp, -81.95645167_wp, & + & -9.44877662_wp, -57.00427626_wp, -79.79418637_wp, -11.12111255_wp, & + & -57.88117883_wp, -79.36745079_wp, -9.11475874_wp, -58.56245467_wp, & + & -79.64359931_wp, -9.33555944_wp, -59.59006505_wp, -79.66015427_wp, & + & -8.09468636_wp, -58.32711503_wp, -78.29121110_wp, -9.20937174_wp, & + & -58.45728418_wp, -78.51084222_wp, -10.11104185_wp, -55.79855015_wp, & + & -77.94383095_wp, -9.80104534_wp, -54.50364531_wp, -76.42285712_wp, & + & -9.87262823_wp, -54.65920274_wp, -75.91155823_wp, -10.40201046_wp, & + & -55.64157030_wp, -77.85879560_wp, -10.55941791_wp, -56.43443941_wp, & + & -78.25727127_wp, -8.79251707_wp, -54.21400149_wp, -78.40535170_wp, & + & -10.80448032_wp, -53.44077512_wp, -79.48869794_wp, -10.76572249_wp, & + & -53.36412185_wp, -78.10427193_wp, -11.81050315_wp, -53.72155567_wp, & + & -77.97369650_wp, -10.56045999_wp, -52.47511015_wp, -87.26519369_wp, & + & -10.55623973_wp, -61.88375060_wp, -85.86290877_wp, -10.85202519_wp, & + & -61.68478312_wp, -85.50874957_wp, -10.39115040_wp, -60.26869705_wp, & + & -86.25659524_wp, -9.64925376_wp, -59.63881465_wp, -87.63114300_wp, & + & -9.85670363_wp, -61.24612986_wp, -85.71575462_wp, -11.93181299_wp, & + & -61.79115436_wp, -84.99047732_wp, -10.11121476_wp, -62.70436377_wp, & + & -85.27203674_wp, -10.42288768_wp, -63.70658002_wp, -85.13765054_wp, & + & -9.03825089_wp, -62.61117280_wp, -83.94145300_wp, -10.34068976_wp, & + & -62.54456891_wp, -84.34413004_wp, -10.83713898_wp, -59.80707647_wp, & + & -83.75817259_wp, -10.42003307_wp, -58.55154344_wp, -82.24288341_wp, & + & -10.58475428_wp, -58.69247619_wp, -81.76070694_wp, -11.25154707_wp, & + & -59.60316133_wp, -83.73682862_wp, -11.42550988_wp, -60.36814064_wp, & + & -84.02142814_wp, -9.37197656_wp, -58.37492921_wp, -84.26658008_wp, & + & -11.28041270_wp, -57.38935629_wp, -85.34654453_wp, -11.18194274_wp, & + & -57.31987256_wp, -84.01501366_wp, -12.32404546_wp, -57.55992095_wp, & + & -83.82109167_wp, -10.95587057_wp, -56.45407783_wp, -93.05471589_wp, & + & -11.21848638_wp, -65.94911789_wp, -91.70049450_wp, -11.64399424_wp, & + & -65.66898634_wp, -91.27952778_wp, -10.94977573_wp, -64.37122158_wp, & + & -91.92778391_wp, -10.01203360_wp, -63.91621024_wp, -93.32277756_wp, & + & -10.36500405_wp, -65.46975478_wp, -91.69450891_wp, -12.73218542_wp, & + & -65.54689165_wp, -90.75012939_wp, -11.24883664_wp, -66.80466062_wp, & + & -91.08034015_wp, -11.72276810_wp, -67.72513472_wp, -90.75696788_wp, & + & -10.17011610_wp, -66.93833651_wp, -89.73784480_wp, -11.57297898_wp, & + & -66.58383943_wp, -90.17310639_wp, -11.42801898_wp, -63.80993284_wp, & + & -89.53731324_wp, -10.84343996_wp, -62.64909120_wp, -88.05787760_wp, & + & -11.23068443_wp, -62.71149377_wp, -87.66581554_wp, -12.11421670_wp, & + & -63.46789660_wp, -89.64316673_wp, -12.18410058_wp, -64.23113802_wp, & + & -89.65677798_wp, -9.75589801_wp, -62.69518808_wp, -90.15992489_wp, & + & -11.37337845_wp, -61.35252378_wp, -91.21516768_wp, -11.11453697_wp, & + & -61.33398171_wp, -90.05842791_wp, -12.45457883_wp, -61.30483300_wp, & + & -89.67277124_wp, -10.93244531_wp, -60.48834808_wp, -98.78420173_wp, & + & -11.76760131_wp, -70.06913371_wp, -97.54339143_wp, -12.36077652_wp, & + & -69.61940458_wp, -97.03412525_wp, -11.50107736_wp, -68.45968203_wp, & + & -97.49983186_wp, -10.38594144_wp, -68.24576397_wp, -98.88197280_wp, & + & -10.78752891_wp, -69.82559424_wp, -97.74976085_wp, -13.38280046_wp, & + & -69.28524351_wp, -96.50197071_wp, -12.38525356_wp, -70.74363053_wp, & + & -96.88564206_wp, -12.97382150_wp, -71.57253848_wp, -96.30228108_wp, & + & -11.37402335_wp, -71.08870322_wp, -95.57524925_wp, -12.82975763_wp, & + & -70.39376077_wp, -96.06010911_wp, -12.04860622_wp, -67.73808365_wp, & + & -95.34835555_wp, -11.35337016_wp, -66.68762498_wp, -93.93313414_wp, & + & -11.93478672_wp, -66.64468987_wp, -93.66494772_wp, -12.99336636_wp, & + & -67.20474696_wp, -95.66706935_wp, -12.95373801_wp, -67.97311144_wp, & + & -95.32387220_wp, -10.28680602_wp, -66.93373189_wp, -96.03234069_wp, & + & -11.55401964_wp, -65.33069572_wp, -97.04446414_wp, -11.16173052_wp, & + & -65.38050427_wp, -96.07338684_wp, -12.61254112_wp, -65.08694566_wp, & + & -95.48847552_wp, -11.03093726_wp, -64.55014501_wp, -104.55335963_wp, & + & -12.32150392_wp, -74.12732279_wp, -103.44223778_wp, -12.98129814_wp, & + & -73.47818552_wp, -102.76503092_wp, -11.94692199_wp, -72.57616028_wp, & + & -102.98529308_wp, -10.74708247_wp, -72.70638319_wp, -104.44673857_wp, & + & -11.31766673_wp, -74.21660626_wp, -103.83702258_wp, -13.81526035_wp, & + & -72.88879579_wp, -102.43362217_wp, -13.50610482_wp, -74.50645941_wp, & + & -102.93101863_wp, -14.21400743_wp, -75.16433933_wp, -102.04765145_wp, & + & -12.68298372_wp, -75.10256509_wp, -101.60651493_wp, -14.00403711_wp, & + & -74.00949885_wp, -101.92721020_wp, -12.45396068_wp, -71.67494166_wp, & + & -101.07487712_wp, -11.65307330_wp, -70.82323333_wp, -99.79870671_wp, & + & -12.46172174_wp, -70.57784898_wp, -99.75012817_wp, -13.66231739_wp, & + & -70.82740910_wp, -101.72989765_wp, -13.44815714_wp, -71.63792154_wp, & + & -100.84933440_wp, -10.71657264_wp, -71.34342214_wp, -101.75929426_wp, & + & -11.35073028_wp, -69.48541677_wp, -102.67557133_wp, -10.79694225_wp, & + & -69.67066548_wp, -102.00246365_wp, -12.27867057_wp, -68.97413756_wp, & + & -101.10853827_wp, -10.75648472_wp, -68.85122021_wp, -108.96291251_wp, & + & -14.21996107_wp, -78.73651318_wp, -108.57620081_wp, -14.38040643_wp, & + & -77.34413087_wp, -107.64822729_wp, -13.24075817_wp, -76.94147033_wp, & + & -106.82933917_wp, -12.76674194_wp, -77.72298330_wp, -108.16881324_wp, & + & -13.84322250_wp, -79.24802548_wp, -109.48665695_wp, -14.35426187_wp, & + & -76.73455080_wp, -107.79998139_wp, -15.67791243_wp, -77.04872265_wp, & + & -108.43394295_wp, -16.54280597_wp, -77.22706054_wp, -106.92652480_wp, & + & -15.73526334_wp, -77.69683488_wp, -107.45574730_wp, -15.69259508_wp, & + & -76.01665631_wp, -107.78588404_wp, -12.81526306_wp, -75.67572453_wp, & + & -106.77113556_wp, -12.00301617_wp, -75.03693774_wp, -105.68942791_wp, & + & -12.93167218_wp, -74.46442451_wp, -105.88026138_wp, -14.13601319_wp, & + & -74.32926251_wp, -108.36735175_wp, -13.35629408_wp, -75.05164307_wp, & + & -106.32630815_wp, -11.37888826_wp, -75.81824998_wp, -107.38329443_wp, & + & -11.15242485_wp, -73.92814503_wp, -108.16435553_wp, -10.51992082_wp, & + & -74.33899692_wp, -107.81167604_wp, -11.79394295_wp, -73.16171202_wp, & + & -106.62334079_wp, -10.52526495_wp, -73.47188036_wp, -109.19220825_wp, & + & -15.12228556_wp, -79.13844537_wp, 3.56590551_wp, -1.00743532_wp, & + & 5.12074769_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_40 + +subroutine polyala_44(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 443 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.77471391_wp, -0.22514582_wp, -0.23496259_wp, 0.23670195_wp, & + & 0.65025671_wp, 0.31571649_wp, 1.33581714_wp, -0.23687880_wp, & + & 0.90193076_wp, 1.13657577_wp, -1.42262657_wp, 1.14094167_wp, & + & -0.84081342_wp, -1.12480609_wp, 0.22655366_wp, 0.62322297_wp, & + & 1.27412995_wp, -0.49653026_wp, -0.34651378_wp, 1.53055925_wp, & + & 1.42689537_wp, -1.14963043_wp, 2.13913355_wp, 1.02088735_wp, & + & -0.73876580_wp, 0.90642814_wp, 2.22608487_wp, 0.41681420_wp, & + & 2.17938394_wp, 1.84420108_wp, 2.50840969_wp, 0.37204462_wp, & + & 1.11036375_wp, 3.55862730_wp, -0.26981030_wp, 1.87161683_wp, & + & 3.18190379_wp, -0.27759368_wp, 3.35267612_wp, 2.22409262_wp, & + & 0.30861494_wp, 3.80370916_wp, 2.57271219_wp, 1.37287955_wp, & + & 0.99466529_wp, 3.61286987_wp, -1.31785601_wp, 1.55477390_wp, & + & 4.89687480_wp, 0.42815568_wp, 1.65707714_wp, 5.15534170_wp, & + & 0.40886198_wp, 0.60311923_wp, 4.84300576_wp, 1.46010913_wp, & + & 1.99462212_wp, 5.66828827_wp, -0.08661853_wp, 2.22110580_wp, & + & 4.02035025_wp, -0.98696452_wp, 4.07598828_wp, -6.44858626_wp, & + & -0.88953923_wp, -4.38671274_wp, -5.25216349_wp, -0.14205742_wp, & + & -4.06538373_wp, -4.45884451_wp, -0.97749521_wp, -3.05797197_wp, & + & -4.97226018_wp, -1.92961380_wp, -2.47842134_wp, -6.70719611_wp, & + & -1.57566129_wp, -3.68573137_wp, -4.67840907_wp, 0.00466809_wp, & + & -4.98636193_wp, -5.59939310_wp, 1.21885251_wp, -3.45122703_wp, & + & -6.18053605_wp, 1.79470355_wp, -4.16635190_wp, -6.18596271_wp, & + & 1.08054651_wp, -2.54650701_wp, -4.69548133_wp, 1.76832591_wp, & + & -3.20636985_wp, -3.20430973_wp, -0.57848335_wp, -2.86357130_wp, & + & -2.33288999_wp, -1.12339397_wp, -1.84530915_wp, -1.43324732_wp, & + & 0.01833990_wp, -1.36581559_wp, -1.33731001_wp, 1.06228655_wp, & + & -2.00310841_wp, -2.83739913_wp, 0.24951430_wp, -3.32027926_wp, & + & -2.95416334_wp, -1.49860865_wp, -1.02543309_wp, -1.47216718_wp, & + & -2.26139384_wp, -2.40525495_wp, -2.12023743_wp, -3.05901513_wp, & + & -2.75802741_wp, -0.87038338_wp, -1.89982660_wp, -3.23508353_wp, & + & -0.81412229_wp, -2.65493185_wp, -1.63630421_wp, -12.24500267_wp, & + & -1.37552205_wp, -8.39631655_wp, -10.90493494_wp, -0.85138223_wp, & + & -8.24639573_wp, -10.29629450_wp, -1.52475370_wp, -7.01344549_wp, & + & -10.99933534_wp, -2.12618588_wp, -6.20727201_wp, -12.64763838_wp, & + & -1.72699777_wp, -7.53428414_wp, -10.33475938_wp, -1.10087517_wp, & + & -9.14716072_wp, -10.92549091_wp, 0.66855177_wp, -8.05011617_wp, & + & -11.37521441_wp, 1.13581955_wp, -8.92193877_wp, -11.51076582_wp, & + & 0.92232640_wp, -7.16994860_wp, -9.91641914_wp, 1.04978756_wp, & + & -7.92594875_wp, -8.97801086_wp, -1.39009833_wp, -6.89400943_wp, & + & -8.22418702_wp, -1.81663503_wp, -5.73509704_wp, -7.07092718_wp, & + & -0.82515418_wp, -5.56083227_wp, -6.75704054_wp, -0.05220463_wp, & + & -6.46087327_wp, -8.44280919_wp, -0.83283692_wp, -7.55102958_wp, & + & -8.88900136_wp, -1.79696765_wp, -4.86543629_wp, -7.66644419_wp, & + & -3.23105079_wp, -5.92914275_wp, -8.49098545_wp, -3.92417837_wp, & + & -6.07214039_wp, -7.02219286_wp, -3.26037623_wp, -6.80422703_wp, & + & -7.09458161_wp, -3.53692921_wp, -5.05830767_wp, -17.95234224_wp, & + & -2.22364449_wp, -12.52678622_wp, -16.55218107_wp, -1.87295492_wp, & + & -12.42809951_wp, -16.11796933_wp, -2.17115587_wp, -10.99067985_wp, & + & -16.94571881_wp, -2.36865114_wp, -10.10642447_wp, -18.43528812_wp, & + & -2.24332568_wp, -11.63481891_wp, -15.98981233_wp, -2.48759927_wp, & + & -13.13864900_wp, -16.33141791_wp, -0.38931504_wp, -12.74315436_wp, & + & -16.66809358_wp, -0.18662725_wp, -13.75627974_wp, -16.89839534_wp, & + & 0.22734368_wp, -12.05044481_wp, -15.27868358_wp, -0.13604639_wp, & + & -12.66366479_wp, -14.80269045_wp, -2.18022540_wp, -10.79322808_wp, & + & -14.17781965_wp, -2.31559487_wp, -9.49553924_wp, -12.83280224_wp, & + & -1.58897434_wp, -9.57060579_wp, -12.35275010_wp, -1.25249614_wp, & + & -10.64867082_wp, -14.15199630_wp, -1.96891858_wp, -11.54247249_wp, & + & -14.82802087_wp, -1.85284285_wp, -8.74581339_wp, -13.95136182_wp, & + & -3.79009200_wp, -9.14241045_wp, -14.90974294_wp, -4.30157572_wp, & + & -9.11700414_wp, -13.31797312_wp, -4.25956982_wp, -9.89078722_wp, & + & -13.47654995_wp, -3.88092709_wp, -8.17016038_wp, -23.59385311_wp, & + & -3.31296671_wp, -16.70135286_wp, -22.15928168_wp, -3.15122037_wp, & + & -16.60105423_wp, -21.82440596_wp, -3.12357822_wp, -15.10756572_wp, & + & -22.70603000_wp, -2.98984716_wp, -14.26395506_wp, -24.08810991_wp, & + & -3.11676996_wp, -15.83644026_wp, -21.67279583_wp, -4.00185712_wp, & + & -17.09029311_wp, -21.70063034_wp, -1.84933568_wp, -17.26742867_wp, & + & -21.98028410_wp, -1.87260620_wp, -18.31733978_wp, -22.17859406_wp, & + & -0.99706332_wp, -16.79127340_wp, -20.62309947_wp, -1.74120088_wp, & + & -17.19179636_wp, -20.53193434_wp, -3.23805957_wp, -14.81776591_wp, & + & -19.98613773_wp, -3.10690715_wp, -13.48412768_wp, -18.53415187_wp, & + & -2.64970894_wp, -13.64413515_wp, -17.97166489_wp, -2.69733764_wp, & + & -14.73399377_wp, -19.82625289_wp, -3.31087953_wp, -15.54362285_wp, & + & -20.57014021_wp, -2.35729202_wp, -12.93970962_wp, -20.03523398_wp, & + & -4.44103736_wp, -12.73117181_wp, -21.06934965_wp, -4.76512811_wp, & + & -12.65078432_wp, -19.46705126_wp, -5.19509843_wp, -13.26972011_wp, & + & -19.62132575_wp, -4.33092677_wp, -11.73353081_wp, -29.31501349_wp, & + & -3.99265555_wp, -20.86046469_wp, -27.87174476_wp, -3.98711504_wp, & + & -20.75575965_wp, -27.54308919_wp, -3.88296799_wp, -19.26428789_wp, & + & -28.40481996_wp, -3.56976511_wp, -18.44797370_wp, -29.78539745_wp, & + & -3.69119329_wp, -20.01241084_wp, -27.48179227_wp, -4.92117030_wp, & + & -21.17407618_wp, -27.26410043_wp, -2.79829603_wp, -21.50872957_wp, & + & -27.53614901_wp, -2.86881428_wp, -22.55854016_wp, -27.64698257_wp, & + & -1.86475755_wp, -21.10445983_wp, -26.18204470_wp, -2.80630375_wp, & + & -21.42259080_wp, -26.27681330_wp, -4.13299224_wp, -18.94660373_wp, & + & -25.72921588_wp, -3.96819879_wp, -17.61729094_wp, -24.22125986_wp, & + & -3.76438235_wp, -17.78279109_wp, -23.66000460_wp, -4.02802773_wp, & + & -18.84210645_wp, -25.58393107_wp, -4.37098960_wp, -19.64921556_wp, & + & -26.19206145_wp, -3.09042197_wp, -17.15412695_wp, -25.99409971_wp, & + & -5.20323996_wp, -16.74897887_wp, -27.06671597_wp, -5.36118907_wp, & + & -16.67470365_wp, -25.53519113_wp, -6.08080988_wp, -17.19696037_wp, & + & -25.58833280_wp, -5.05985159_wp, -15.75239249_wp, -35.12286067_wp, & + & -4.44303316_wp, -24.97453559_wp, -33.67858463_wp, -4.44451843_wp, & + & -24.88263538_wp, -33.33453222_wp, -4.31905044_wp, -23.39639403_wp, & + & -34.18078676_wp, -3.96481706_wp, -22.58065188_wp, -35.58499160_wp, & + & -4.12036351_wp, -24.12988085_wp, -33.29870942_wp, -5.38671293_wp, & + & -25.29167420_wp, -33.07015372_wp, -3.27002034_wp, -25.65714813_wp, & + & -33.35634953_wp, -3.34984791_wp, -26.70250114_wp, -33.43879043_wp, & + & -2.32844881_wp, -25.25829267_wp, -31.98733061_wp, -3.28824204_wp, & + & -25.58453249_wp, -32.07150574_wp, -4.59203075_wp, -23.08514125_wp, & + & -31.51010060_wp, -4.43531800_wp, -21.76045705_wp, -29.98877305_wp, & + & -4.41032095_wp, -21.92724127_wp, -29.46109930_wp, -4.77878177_wp, & + & -22.97251443_wp, -31.39678154_wp, -4.89016173_wp, -23.78280159_wp, & + & -31.86914090_wp, -3.49289174_wp, -21.33335545_wp, -31.91250884_wp, & + & -5.59592516_wp, -20.84352474_wp, -32.99627196_wp, -5.62855675_wp, & + & -20.76964228_wp, -31.55510184_wp, -6.53729608_wp, -21.25290943_wp, & + & -31.49472908_wp, -5.45760010_wp, -19.85129375_wp, -40.95802788_wp, & + & -5.01315808_wp, -29.04514848_wp, -39.51378489_wp, -4.97351360_wp, & + & -28.96160298_wp, -39.16422913_wp, -4.82742234_wp, -27.47850251_wp, & + & -40.01313087_wp, -4.48338378_wp, -26.66120376_wp, -41.42459960_wp, & + & -4.69583680_wp, -28.20099795_wp, -39.10980285_wp, -5.90725295_wp, & + & -29.36679336_wp, -38.94323573_wp, -3.78731757_wp, -29.74711606_wp, & + & -39.23373428_wp, -3.88140268_wp, -30.79009731_wp, -39.33551132_wp, & + & -2.85404407_wp, -29.35122241_wp, -37.85990848_wp, -3.77522630_wp, & + & -29.68135951_wp, -37.89346479_wp, -5.06959852_wp, -27.17348273_wp, & + & -37.32566362_wp, -4.89731220_wp, -25.85341586_wp, -35.80537391_wp, & + & -4.87651704_wp, -26.02941093_wp, -35.28503188_wp, -5.26410165_wp, & + & -27.07152685_wp, -37.21917626_wp, -5.36755621_wp, -27.87183445_wp, & + & -37.68188850_wp, -3.95026909_wp, -25.43438799_wp, -37.72224980_wp, & + & -6.04826464_wp, -24.92179651_wp, -38.80551290_wp, -6.07988856_wp, & + & -24.84054350_wp, -37.36782835_wp, -6.99374439_wp, -25.32442326_wp, & + & -37.29769737_wp, -5.89996387_wp, -23.93391468_wp, -46.78660708_wp, & + & -5.70969413_wp, -33.10222822_wp, -45.34312275_wp, -5.64804860_wp, & + & -33.01806634_wp, -44.99523217_wp, -5.49381409_wp, -31.53551946_wp, & + & -45.84890680_wp, -5.16273364_wp, -30.71788442_wp, -47.25897800_wp, & + & -5.39957383_wp, -32.25871016_wp, -44.92492390_wp, -6.57618213_wp, & + & -33.42171389_wp, -44.79058157_wp, -4.45461011_wp, -33.80557787_wp, & + & -45.07900916_wp, -4.55518782_wp, -34.84852381_wp, -45.19748124_wp, & + & -3.52679131_wp, -33.41161178_wp, -43.70759707_wp, -4.42553500_wp, & + & -33.73928941_wp, -43.72013875_wp, -5.71403522_wp, -31.23165229_wp, & + & -43.15243732_wp, -5.52662511_wp, -29.91362867_wp, -41.63364211_wp, & + & -5.46894656_wp, -30.09507860_wp, -41.10778201_wp, -5.84875686_wp, & + & -31.13729168_wp, -43.04187237_wp, -6.00088435_wp, -31.93079874_wp, & + & -43.53030843_wp, -4.58803420_wp, -29.49461944_wp, -43.51816903_wp, & + & -6.68579743_wp, -28.97967134_wp, -44.60008192_wp, -6.74321023_wp, & + & -28.89462463_wp, -43.14267625_wp, -7.62290219_wp, -29.38275079_wp, & + & -43.09383772_wp, -6.52634016_wp, -27.99344566_wp, -52.58483753_wp, & + & -6.43142813_wp, -37.19289816_wp, -51.14188955_wp, -6.37391536_wp, & + & -37.09814170_wp, -50.80476090_wp, -6.22069600_wp, -35.61290870_wp, & + & -51.66445476_wp, -5.89092060_wp, -34.80106466_wp, -53.06201786_wp, & + & -6.12189329_wp, -36.35182245_wp, -50.72307307_wp, -7.30315928_wp, & + & -37.49859344_wp, -50.58024142_wp, -5.18186014_wp, -37.88131752_wp, & + & -50.86109007_wp, -5.28155388_wp, -38.92641502_wp, -50.98774087_wp, & + & -4.25302720_wp, -37.49035173_wp, -49.49770252_wp, -5.15546006_wp, & + & -37.80692209_wp, -49.53184339_wp, -6.44073871_wp, -35.30006100_wp, & + & -48.97212584_wp, -6.24917838_wp, -33.97921499_wp, -47.45341013_wp, & + & -6.17230868_wp, -34.15482962_wp, -46.91936958_wp, -6.54353164_wp, & + & -35.19600676_wp, -48.84789359_wp, -6.72326376_wp, -35.99543283_wp, & + & -49.36324440_wp, -5.31599573_wp, -33.56030255_wp, -49.32812602_wp, & + & -7.41438268_wp, -33.04910705_wp, -50.40961543_wp, -7.48410586_wp, & + & -32.96788935_wp, -48.94082611_wp, -8.34634241_wp, -33.45288720_wp, & + & -48.90899063_wp, -7.25235620_wp, -32.06108024_wp, -58.37172012_wp, & + & -7.13463966_wp, -41.30363664_wp, -56.92866346_wp, -7.07934453_wp, & + & -41.20865946_wp, -56.59285241_wp, -6.92693206_wp, -39.72297992_wp, & + & -57.45354194_wp, -6.59694888_wp, -38.91220600_wp, -58.84796370_wp, & + & -6.82508987_wp, -40.46195705_wp, -56.51120181_wp, -8.00944811_wp, & + & -41.60857718_wp, -56.36466327_wp, -5.88860447_wp, -41.99201675_wp, & + & -56.64485553_wp, -5.98852392_wp, -43.03727380_wp, -56.77108145_wp, & + & -4.95892028_wp, -41.60198055_wp, -55.28215044_wp, -5.86379795_wp, & + & -41.91679641_wp, -55.32078388_wp, -7.14828104_wp, -39.40759770_wp, & + & -54.76641284_wp, -6.96085985_wp, -38.08384309_wp, -53.24654776_wp, & + & -6.88907998_wp, -38.25091582_wp, -52.70769839_wp, -7.25965152_wp, & + & -39.28980107_wp, -54.63525282_wp, -7.43142737_wp, -40.10104528_wp, & + & -55.15627189_wp, -6.02691285_wp, -37.66541406_wp, -55.13150926_wp, & + & -8.12612239_wp, -37.15729928_wp, -56.21368805_wp, -8.19278331_wp, & + & -37.08296367_wp, -54.74431631_wp, -9.05875876_wp, -37.55961558_wp, & + & -54.71821943_wp, -7.96635174_wp, -36.16645349_wp, -64.16894458_wp, & + & -7.86048224_wp, -45.39760281_wp, -62.72593241_wp, -7.79701526_wp, & + & -45.30686549_wp, -62.38609421_wp, -7.64207311_wp, -43.82241710_wp, & + & -63.24560639_wp, -7.31525869_wp, -43.00913501_wp, -64.64483117_wp, & + & -7.55142264_wp, -44.55558528_wp, -62.30445704_wp, -8.72476273_wp, & + & -45.70799002_wp, -62.17132742_wp, -6.60312051_wp, -46.09218156_wp, & + & -62.45530956_wp, -6.70415267_wp, -47.13630828_wp, -62.58088241_wp, & + & -5.67567007_wp, -45.70011193_wp, -61.08866058_wp, -6.57277305_wp, & + & -46.02143324_wp, -61.11191443_wp, -7.85720789_wp, -43.51114753_wp, & + & -60.55426269_wp, -7.66789396_wp, -42.18906382_wp, -59.03487939_wp, & + & -7.59444667_wp, -42.35978547_wp, -58.49782333_wp, -7.96591971_wp, & + & -43.39926323_wp, -60.42761458_wp, -8.13877100_wp, -44.20645517_wp, & + & -60.94440821_wp, -6.73432152_wp, -41.77009833_wp, -60.91483115_wp, & + & -8.83323317_wp, -41.26077842_wp, -61.99664861_wp, -8.90093386_wp, & + & -41.18232809_wp, -60.52826830_wp, -9.76558123_wp, -41.66439565_wp, & + & -60.49787871_wp, -8.67285922_wp, -40.27155674_wp, -69.96288495_wp, & + & -8.61044613_wp, -49.49160438_wp, -68.52017405_wp, -8.54406536_wp, & + & -49.39859822_wp, -68.18251568_wp, -8.38512950_wp, -47.91408937_wp, & + & -69.04339830_wp, -8.05771971_wp, -47.10252184_wp, -70.44106203_wp, & + & -8.29775171_wp, -48.65227288_wp, -68.09662317_wp, -9.47198507_wp, & + & -49.79711183_wp, -67.96643194_wp, -7.35092285_wp, -50.18566903_wp, & + & -68.24758086_wp, -7.45522767_wp, -51.23023122_wp, -68.37903492_wp, & + & -6.42342316_wp, -49.79692416_wp, -66.88400482_wp, -7.31788534_wp, & + & -50.11229505_wp, -66.90832331_wp, -8.59773941_wp, -47.60114362_wp, & + & -66.35099986_wp, -8.40278986_wp, -46.27974277_wp, -64.83194844_wp, & + & -8.32467132_wp, -46.45191011_wp, -64.29480090_wp, -8.69596661_wp, & + & -47.49143142_wp, -66.22299049_wp, -8.87919925_wp, -48.29552752_wp, & + & -66.74374341_wp, -7.46902774_wp, -45.86359247_wp, -66.70806547_wp, & + & -9.56620052_wp, -45.34778155_wp, -67.78969724_wp, -9.63676534_wp, & + & -45.26917288_wp, -66.31884572_wp, -10.49872370_wp, -45.74841020_wp, & + & -66.29167962_wp, -9.40144718_wp, -44.35904469_wp, -75.74813584_wp, & + & -9.40604951_wp, -53.58831507_wp, -74.30546875_wp, -9.34181069_wp, & + & -53.49403195_wp, -73.96961120_wp, -9.16483804_wp, -52.01116033_wp, & + & -74.83115393_wp, -8.82635001_wp, -51.20486138_wp, -76.22695493_wp, & + & -9.07437207_wp, -52.75670637_wp, -73.88370940_wp, -10.27568704_wp, & + & -53.88023750_wp, -73.74848141_wp, -8.15971504_wp, -54.29537973_wp, & + & -74.03019082_wp, -8.27551609_wp, -55.33858869_wp, -74.15831220_wp, & + & -7.22649633_wp, -53.91748041_wp, -72.66594200_wp, -8.12878611_wp, & + & -54.22270580_wp, -72.69617086_wp, -9.37524066_wp, -51.69366374_wp, & + & -72.14152983_wp, -9.16754275_wp, -50.37312567_wp, -70.62251819_wp, & + & -9.08545956_wp, -50.54326015_wp, -70.08216094_wp, -9.46331139_wp, & + & -51.57873464_wp, -72.00975781_wp, -9.66425051_wp, -52.38381910_wp, & + & -72.53858608_wp, -8.23209348_wp, -49.96501251_wp, -72.49575464_wp, & + & -10.32533865_wp, -49.43307586_wp, -73.57719672_wp, -10.39821252_wp, & + & -49.35402126_wp, -72.10412224_wp, -11.25953838_wp, -49.82743891_wp, & + & -72.07979606_wp, -10.15286136_wp, -48.44547009_wp, -81.51467610_wp, & + & -10.09668929_wp, -57.70415638_wp, -80.07214155_wp, -10.13174384_wp, & + & -57.59420006_wp, -79.73940079_wp, -9.92952197_wp, -56.11393569_wp, & + & -80.58728730_wp, -9.52103755_wp, -55.32581582_wp, -81.97706625_wp, & + & -9.70414874_wp, -56.88987235_wp, -79.71459856_wp, -11.10626231_wp, & + & -57.94330755_wp, -79.42435290_wp, -9.02099060_wp, -58.42861055_wp, & + & -79.70305380_wp, -9.15335309_wp, -59.47064796_wp, -79.77036511_wp, & + & -8.04828942_wp, -58.08840663_wp, -78.34304290_wp, -9.06362120_wp, & + & -58.34376734_wp, -78.48267810_wp, -10.20188789_wp, -55.77713855_wp, & + & -77.92750770_wp, -9.97361357_wp, -54.46043285_wp, -76.40771602_wp, & + & -9.90382467_wp, -54.62951632_wp, -75.86716883_wp, -10.30927389_wp, & + & -55.65432300_wp, -77.80461655_wp, -10.53573668_wp, -56.45488397_wp, & + & -78.32001079_wp, -9.02813608_wp, -54.07169968_wp, -78.29082026_wp, & + & -11.11158874_wp, -53.49994855_wp, -79.37270968_wp, -11.17475669_wp, & + & -53.41898204_wp, -77.90662315_wp, -12.05572212_wp, -53.87758837_wp, & + & -77.87292332_wp, -10.92488215_wp, -52.51570880_wp, -87.28932341_wp, & + & -10.65454954_wp, -61.84180431_wp, -85.85067446_wp, -10.74777232_wp, & + & -61.71848871_wp, -85.51531244_wp, -10.48279413_wp, -60.24861494_wp, & + & -86.34192078_wp, -9.98178510_wp, -59.49206325_wp, -87.73495900_wp, & + & -10.16015735_wp, -61.07554178_wp, -85.53786487_wp, -11.75469082_wp, & + & -62.01387191_wp, -85.15060124_wp, -9.71199857_wp, -62.60532267_wp, & + & -85.42384460_wp, -9.88981850_wp, -63.64199007_wp, -85.46035779_wp, & + & -8.70906546_wp, -62.32286403_wp, -84.07279082_wp, -9.79286629_wp, & + & -62.50491113_wp, -84.27887254_wp, -10.81010657_wp, -59.88623199_wp, & + & -83.72001673_wp, -10.54866839_wp, -58.57724050_wp, -82.19778159_wp, & + & -10.59128541_wp, -58.73162220_wp, -81.67720683_wp, -11.07505995_wp, & + & -59.73251202_wp, -83.61793472_wp, -11.21946552_wp, -60.53906121_wp, & + & -84.04922140_wp, -9.55862010_wp, -58.24452172_wp, -84.16894964_wp, & + & -11.60507377_wp, -57.56133830_wp, -85.25311613_wp, -11.58765097_wp, & + & -57.48842002_wp, -83.85000172_wp, -12.59276163_wp, -57.88440312_wp, & + & -83.74544976_wp, -11.39619008_wp, -56.58395528_wp, -93.04209539_wp, & + & -11.33160847_wp, -65.95733646_wp, -91.62692141_wp, -11.57418795_wp, & + & -65.77833931_wp, -91.28000238_wp, -11.13138294_wp, -64.35461975_wp, & + & -92.05608454_wp, -10.44201101_wp, -63.69954819_wp, -93.43401569_wp, & + & -10.68070613_wp, -65.28420769_wp, -91.43530236_wp, -12.64429190_wp, & + & -65.91011574_wp, -90.79496654_wp, -10.77641979_wp, -66.78873816_wp, & + & -91.07722294_wp, -11.07473370_wp, -67.79487375_wp, -90.98089719_wp, & + & -9.71227522_wp, -66.66795572_wp, -89.73627745_wp, -10.97033082_wp, & + & -66.64673066_wp, -90.09055633_wp, -11.53140684_wp, -63.91553384_wp, & + & -89.51449379_wp, -11.12579398_wp, -62.65175857_wp, -87.99590017_wp, & + & -11.25038171_wp, -62.79747545_wp, -87.49888674_wp, -11.87861819_wp, & + & -63.72744788_wp, -89.46309255_wp, -12.08015531_wp, -64.49456955_wp, & + & -89.80249909_wp, -10.08834138_wp, -62.45236775_wp, -90.00065315_wp, & + & -12.02245328_wp, -61.50754657_wp, -91.08252839_wp, -11.95058019_wp, & + & -61.43502281_wp, -89.72516602_wp, -13.05604730_wp, -61.70085160_wp, & + & -89.56155124_wp, -11.70792793_wp, -60.56584194_wp, -98.84455305_wp, & + & -12.03287456_wp, -70.01395912_wp, -97.45714732_wp, -12.37712693_wp, & + & -69.78955177_wp, -97.06219822_wp, -11.75828630_wp, -68.44631582_wp, & + & -97.76784637_wp, -10.90960085_wp, -67.90908788_wp, -99.17205604_wp, & + & -11.26161947_wp, -69.44086368_wp, -97.36644079_wp, -13.46799329_wp, & + & -69.75592073_wp, -96.56178685_wp, -11.82305679_wp, -70.90340278_wp, & + & -96.87607251_wp, -12.24610531_wp, -71.85382805_wp, -96.65016380_wp, & + & -10.74064890_wp, -70.94969859_wp, -95.52435454_wp, -12.08785289_wp, & + & -70.72446475_wp, -95.91187544_wp, -12.19408922_wp, -67.94219609_wp, & + & -95.30057563_wp, -11.66288136_wp, -66.74307177_wp, -93.80635932_wp, & + & -11.98316326_wp, -66.82858627_wp, -93.37936721_wp, -12.80021675_wp, & + & -67.63892529_wp, -95.34264712_wp, -12.88413176_wp, -68.42185381_wp, & + & -95.46514143_wp, -10.58061136_wp, -66.71499789_wp, -95.89862052_wp, & + & -12.30433097_wp, -65.48582684_wp, -96.96471308_wp, -12.09588630_wp, & + & -65.45458114_wp, -95.74717595_wp, -13.38051524_wp, -65.50781791_wp, & + & -95.43292545_wp, -11.89803541_wp, -64.59335891_wp, -104.57486071_wp, & + & -12.57160454_wp, -74.16216520_wp, -103.25984166_wp, -13.06736171_wp, & + & -73.81868218_wp, -102.82167882_wp, -12.32635525_wp, -72.55271095_wp, & + & -103.40331256_wp, -11.31224115_wp, -72.17910336_wp, -104.77978426_wp, & + & -11.65381844_wp, -73.78152802_wp, -103.33271800_wp, -14.14412977_wp, & + & -73.63450688_wp, -102.25726533_wp, -12.80274730_wp, -74.94741106_wp, & + & -102.59343118_wp, -13.30794752_wp, -75.84881869_wp, -102.18922746_wp, & + & -11.73562269_wp, -75.14287196_wp, -101.27447871_wp, -13.17724408_wp, & + & -74.67804542_wp, -101.77430190_wp, -12.85468124_wp, -71.92620043_wp, & + & -101.12144273_wp, -12.24585728_wp, -70.78759482_wp, -99.66488145_wp, & + & -12.71632479_wp, -70.80614962_wp, -99.31625561_wp, -13.66975058_wp, & + & -71.49600781_wp, -101.29493171_wp, -13.67393729_wp, -72.28484240_wp, & + & -101.18073702_wp, -11.15761106_wp, -70.89276665_wp, -101.78775961_wp, & + & -12.67308820_wp, -69.47498879_wp, -102.82856780_wp, -12.36096921_wp, & + & -69.48651761_wp, -101.74204633_wp, -13.75391463_wp, -69.36840754_wp, & + & -101.28971705_wp, -12.21107832_wp, -68.62827033_wp, -110.35169656_wp, & + & -13.21474488_wp, -78.19983604_wp, -109.16196583_wp, -13.83687994_wp, & + & -77.66078495_wp, -108.58067749_wp, -12.86885857_wp, -76.62719518_wp, & + & -108.94971591_wp, -11.69966069_wp, -76.57550926_wp, -110.36750055_wp, & + & -12.20497076_wp, -78.10421323_wp, -109.44939735_wp, -14.78294264_wp, & + & -77.19062810_wp, -108.12870366_wp, -14.09943199_wp, -78.76216861_wp, & + & -108.55899785_wp, -14.76734005_wp, -79.50347098_wp, -107.85289020_wp, & + & -13.16501092_wp, -79.24434157_wp, -107.23772288_wp, -14.55986128_wp, & + & -78.34619660_wp, -107.65509577_wp, -13.39089225_wp, -75.82687542_wp, & + & -106.87812918_wp, -12.61873329_wp, -74.88169725_wp, -105.51219432_wp, & + & -13.29930526_wp, -74.76321644_wp, -105.33059737_wp, -14.43654550_wp, & + & -75.18715150_wp, -107.34045430_wp, -14.34927938_wp, -75.93390009_wp, & + & -106.77256518_wp, -11.60097667_wp, -75.27149086_wp, -107.55871339_wp, & + & -12.57755487_wp, -73.50894842_wp, -108.53706609_wp, -12.11565015_wp, & + & -73.60994155_wp, -107.68041364_wp, -13.58632153_wp, -73.12275249_wp, & + & -106.96535325_wp, -11.99884379_wp, -72.80756034_wp, -115.99677368_wp, & + & -13.86495333_wp, -82.36888470_wp, -115.01552431_wp, -14.52452375_wp, & + & -81.53623399_wp, -114.25475703_wp, -13.43044806_wp, -80.78302429_wp, & + & -114.31339899_wp, -12.25704016_wp, -81.13647911_wp, -115.74584629_wp, & + & -12.91962366_wp, -82.63447169_wp, -115.54517974_wp, -15.18298641_wp, & + & -80.84021886_wp, -114.03455860_wp, -15.34395986_wp, -82.38250214_wp, & + & -114.58596327_wp, -16.09838434_wp, -82.93752428_wp, -113.51942015_wp, & + & -14.69523747_wp, -83.08659718_wp, -113.30094424_wp, -15.83422196_wp, & + & -81.74963539_wp, -113.53471125_wp, -13.85804893_wp, -79.74816216_wp, & + & -112.61948978_wp, -13.01991356_wp, -79.00397762_wp, -111.41797785_wp, & + & -13.88889736_wp, -78.62265263_wp, -111.46979946_wp, -15.11269615_wp, & + & -78.69683540_wp, -113.45767096_wp, -14.84623772_wp, -79.53455790_wp, & + & -112.31128837_wp, -12.19272483_wp, -79.65148244_wp, -113.28279471_wp, & + & -12.46921530_wp, -77.73678677_wp, -114.14722300_wp, -11.87294709_wp, & + & -78.01551839_wp, -113.60731170_wp, -13.28861455_wp, -77.10049948_wp, & + & -112.58664154_wp, -11.84584357_wp, -77.18395623_wp, -120.60253268_wp, & + & -15.87524519_wp, -86.78369275_wp, -120.24110141_wp, -15.86719557_wp, & + & -85.37531470_wp, -119.15057214_wp, -14.82937904_wp, -85.13848408_wp, & + & -118.26342521_wp, -14.62389553_wp, -85.96130193_wp, -119.76064705_wp, & + & -15.71596912_wp, -87.33130515_wp, -121.13573718_wp, -15.60765635_wp, & + & -84.79787124_wp, -119.66977474_wp, -17.20192272_wp, -84.86006279_wp, & + & -120.42726436_wp, -17.97988136_wp, -84.91347181_wp, -118.81554876_wp, & + & -17.49217234_wp, -85.47026428_wp, -119.33161219_wp, -17.10146056_wp, & + & -83.83072390_wp, -119.22883364_wp, -14.18066691_wp, -83.96642530_wp, & + & -118.11407294_wp, -13.41892095_wp, -83.44338162_wp, -117.20071992_wp, & + & -14.36420116_wp, -82.64843282_wp, -117.57210948_wp, -15.48101823_wp, & + & -82.30243878_wp, -119.89176673_wp, -14.51076989_wp, -83.27962788_wp, & + & -117.56238024_wp, -13.03326074_wp, -84.30652633_wp, -118.61083826_wp, & + & -12.28574153_wp, -82.54998202_wp, -119.27385918_wp, -11.63669574_wp, & + & -83.11402201_wp, -119.15192503_wp, -12.69390313_wp, -81.69956177_wp, & + & -117.77314998_wp, -11.70153742_wp, -82.18103661_wp, -120.97414772_wp, & + & -16.78316481_wp, -87.04071973_wp, 3.79512614_wp, -0.99984183_wp, & + & 5.02739663_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_44 + +subroutine polyala_48(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 483 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.75346220_wp, -0.13778496_wp, -0.17322389_wp, 0.33037084_wp, & + & 0.70166639_wp, 0.28855497_wp, 1.39157541_wp, -0.21683723_wp, & + & 0.89676406_wp, 1.13447917_wp, -1.37821976_wp, 1.19393396_wp, & + & -0.88834151_wp, -0.98053472_wp, 0.37240787_wp, 0.72688096_wp, & + & 1.24284076_wp, -0.57654218_wp, -0.15828666_wp, 1.68801363_wp, & + & 1.35490496_wp, -0.95752798_wp, 2.29774159_wp, 0.94320240_wp, & + & -0.53060070_wp, 1.14494963_wp, 2.22012079_wp, 0.64986938_wp, & + & 2.33468633_wp, 1.68028055_wp, 2.60046720_wp, 0.33383827_wp, & + & 1.05825751_wp, 3.61708409_wp, -0.33727046_wp, 1.84077452_wp, & + & 3.17599606_wp, -0.39249475_wp, 3.30317709_wp, 2.23786177_wp, & + & 0.23063549_wp, 3.74540004_wp, 2.71835823_wp, 1.32427050_wp, & + & 0.90245202_wp, 3.69038290_wp, -1.37440239_wp, 1.49376909_wp, & + & 4.96140642_wp, 0.37001422_wp, 1.71347090_wp, 5.26748245_wp, & + & 0.39059460_wp, 0.67231611_wp, 4.88911974_wp, 1.38823239_wp, & + & 2.08768792_wp, 5.70846040_wp, -0.16487768_wp, 2.29164371_wp, & + & 3.94160183_wp, -1.18386142_wp, 4.02246216_wp, -6.43347588_wp, & + & -0.78484243_wp, -4.28927529_wp, -5.16248548_wp, -0.13044693_wp, & + & -4.06739218_wp, -4.45609416_wp, -0.89328528_wp, -2.94399038_wp, & + & -5.06544890_wp, -1.69017927_wp, -2.23738353_wp, -6.77146253_wp, & + & -1.30919956_wp, -3.48974160_wp, -4.58283924_wp, -0.17933673_wp, & + & -4.99498547_wp, -5.35982463_wp, 1.33301746_wp, -3.65626819_wp, & + & -5.88057954_wp, 1.86016267_wp, -4.45100912_wp, -5.95255181_wp, & + & 1.38761074_wp, -2.74664266_wp, -4.40138539_wp, 1.81283450_wp, & + & -3.48277311_wp, -3.16334257_wp, -0.61099381_wp, -2.80168213_wp, & + & -2.34716264_wp, -1.09701279_wp, -1.71076208_wp, -1.36800524_wp, & + & 0.02069907_wp, -1.34403726_wp, -1.17842893_wp, 0.97224448_wp, & + & -2.09456743_wp, -2.71783472_wp, 0.10416921_wp, -3.36545149_wp, & + & -3.00582477_wp, -1.32848614_wp, -0.86743448_wp, -1.56672820_wp, & + & -2.35075481_wp, -2.12145740_wp, -2.26658596_wp, -3.13910771_wp, & + & -2.38449162_wp, -0.93857370_wp, -2.13251372_wp, -2.98131878_wp, & + & -0.93887713_wp, -2.69352302_wp, -1.30425116_wp, -12.13002055_wp, & + & -1.56415511_wp, -8.44068725_wp, -10.77056187_wp, -1.08937271_wp, & + & -8.30124912_wp, -10.26573597_wp, -1.58117649_wp, -6.94256472_wp, & + & -11.04123278_wp, -2.02144104_wp, -6.09922288_wp, -12.56977986_wp, & + & -1.81320064_wp, -7.56062399_wp, -10.16920168_wp, -1.50983339_wp, & + & -9.11407551_wp, -10.71050376_wp, 0.44127496_wp, -8.35555492_wp, & + & -11.09028450_wp, 0.77816480_wp, -9.31626761_wp, -11.32126891_wp, & + & 0.86638469_wp, -7.56323339_wp, -9.68780139_wp, 0.78666858_wp, & + & -8.23896174_wp, -8.95292690_wp, -1.47331795_wp, -6.76019037_wp, & + & -8.28345724_wp, -1.74649009_wp, -5.50702369_wp, -7.02779743_wp, & + & -0.87153769_wp, -5.47600446_wp, -6.61891776_wp, -0.31336407_wp, & + & -6.48961832_wp, -8.34921038_wp, -1.06431037_wp, -7.46594659_wp, & + & -8.95920249_wp, -1.48319667_wp, -4.68643031_wp, -7.89410118_wp, & + & -3.22494138_wp, -5.39763190_wp, -8.79310827_wp, -3.83364194_wp, & + & -5.44415791_wp, -7.23655028_wp, -3.49947879_wp, -6.21850172_wp, & + & -7.38612467_wp, -3.41680348_wp, -4.45737153_wp, -17.84771107_wp, & + & -2.30090379_wp, -12.57697149_wp, -16.43300495_wp, -2.01235904_wp, & + & -12.48501370_wp, -16.02220420_wp, -2.26885586_wp, -11.03279318_wp, & + & -16.86456459_wp, -2.38636992_wp, -10.14789694_wp, -18.33075759_wp, & + & -2.27177386_wp, -11.68509029_wp, -15.89598852_wp, -2.68215294_wp, & + & -13.16466819_wp, -16.14073446_wp, -0.55540805_wp, -12.86064806_wp, & + & -16.46083299_wp, -0.38071854_wp, -13.88429329_wp, -16.68287605_wp, & + & 0.11592648_wp, -12.19954599_wp, -15.07778495_wp, -0.34843804_wp, & + & -12.78285171_wp, -14.71070180_wp, -2.33341521_wp, -10.82261481_wp, & + & -14.10579697_wp, -2.44411661_wp, -9.51299327_wp, -12.71771737_wp, & + & -1.80629682_wp, -9.60885030_wp, -12.20488058_wp, -1.56446329_wp, & + & -10.69759223_wp, -14.04294710_wp, -2.19318826_wp, -11.57356663_wp, & + & -14.73196917_wp, -1.90645226_wp, -8.79329615_wp, -13.97518614_wp, & + & -3.91082548_wp, -9.08669844_wp, -14.96374485_wp, -4.36068980_wp, & + & -9.05213493_wp, -13.36239760_wp, -4.45386262_wp, -9.80179990_wp, & + & -13.52023185_wp, -3.98219299_wp, -8.10350380_wp, -23.54981402_wp, & + & -3.21029663_wp, -16.70694747_wp, -22.10911495_wp, -3.11253613_wp, & + & -16.61451660_wp, -21.76684683_wp, -3.07198120_wp, -15.12311882_wp, & + & -22.63689489_wp, -2.87905753_wp, -14.27899535_wp, -24.03152792_wp, & + & -2.97356681_wp, -15.84516580_wp, -21.66386060_wp, -3.99348197_wp, & + & -17.08911631_wp, -21.59426650_wp, -1.84562386_wp, -17.30685634_wp, & + & -21.87190901_wp, -1.87921197_wp, -18.35701934_wp, -22.03706076_wp, & + & -0.96409950_wp, -16.85038686_wp, -20.51335236_wp, -1.78136297_wp, & + & -17.22934533_wp, -20.47986623_wp, -3.24243529_wp, -14.83662662_wp, & + & -19.92149347_wp, -3.11378942_wp, -13.50817469_wp, -18.45076735_wp, & + & -2.72733286_wp, -13.68261557_wp, -17.89401247_wp, -2.82931765_wp, & + & -14.77165693_wp, -19.78241771_wp, -3.36523520_wp, -15.56365819_wp, & + & -20.46783706_wp, -2.32968736_wp, -12.97348385_wp, -20.02618873_wp, & + & -4.43183629_wp, -12.73283679_wp, -21.07312750_wp, -4.70927943_wp, & + & -12.64445660_wp, -19.49304767_wp, -5.21863406_wp, -13.26029747_wp, & + & -19.60459610_wp, -4.32296393_wp, -11.73828575_wp, -29.31603088_wp, & + & -3.84522662_wp, -20.83653242_wp, -27.87249298_wp, -3.83393745_wp, & + & -20.73628906_wp, -27.53879293_wp, -3.70568118_wp, -19.24794161_wp, & + & -28.39651869_wp, -3.37463617_wp, -18.43445624_wp, -29.78563890_wp, & + & -3.53212139_wp, -19.99233771_wp, -27.48145305_wp, -4.77315125_wp, & + & -21.14184224_wp, -27.27017000_wp, -2.65496875_wp, -21.50876889_wp, & + & -27.54753522_wp, -2.74028691_wp, -22.55607933_wp, -27.65182226_wp, & + & -1.71634005_wp, -21.11522529_wp, -26.18772637_wp, -2.66118470_wp, & + & -21.42807278_wp, -26.27190666_wp, -3.95342895_wp, -18.93153828_wp, & + & -25.71744427_wp, -3.77709568_wp, -17.60656806_wp, -24.20160928_wp, & + & -3.65100429_wp, -17.77815527_wp, -23.65671619_wp, -3.96117088_wp, & + & -18.83350558_wp, -25.58498495_wp, -4.21759678_wp, -19.63096357_wp, & + & -26.13498623_wp, -2.86419290_wp, -17.16860429_wp, -26.04411163_wp, & + & -4.97100555_wp, -16.70261627_wp, -27.12349767_wp, -5.07079893_wp, & + & -16.62490311_wp, -25.63192066_wp, -5.88387352_wp, -17.12465942_wp, & + & -25.63111958_wp, -4.81975452_wp, -15.71021330_wp, -35.12242483_wp, & + & -4.36633894_wp, -24.94372044_wp, -33.67832593_wp, -4.35250660_wp, & + & -24.85151738_wp, -33.33619089_wp, -4.21501848_wp, -23.36597522_wp, & + & -34.18552340_wp, -3.86185221_wp, -22.55298411_wp, -35.58808159_wp, & + & -4.04306609_wp, -24.10124147_wp, -33.28856549_wp, -5.29284292_wp, & + & -25.25544452_wp, -33.08182833_wp, -3.17578687_wp, -25.63194618_wp, & + & -33.36684767_wp, -3.26390917_wp, -26.67695750_wp, -33.46039616_wp, & + & -2.23610015_wp, -25.23793484_wp, -31.99890695_wp, -3.18248489_wp, & + & -25.55891366_wp, -32.07120954_wp, -4.47603046_wp, -23.05282304_wp, & + & -31.51068131_wp, -4.30755915_wp, -21.72928375_wp, -29.98965314_wp, & + & -4.27828177_wp, -21.89720497_wp, -29.46148856_wp, -4.65762650_wp, & + & -22.93837683_wp, -31.39469670_wp, -4.77577850_wp, -23.74810933_wp, & + & -31.87343936_wp, -3.36371521_wp, -21.30859000_wp, -31.90800044_wp, & + & -5.46374382_wp, -20.80460021_wp, -32.99150628_wp, -5.49873842_wp, & + & -20.72804747_wp, -31.54919922_wp, -6.40647868_wp, -21.20968768_wp, & + & -31.48812974_wp, -5.31858711_wp, -19.81424310_wp, -40.94426337_wp, & + & -4.99720824_wp, -29.02103856_wp, -39.50078936_wp, -4.94430872_wp, & + & -28.93365153_wp, -39.15634222_wp, -4.79243875_wp, -27.45011239_wp, & + & -40.00948831_wp, -4.45207948_wp, -26.63572811_wp, -41.41646218_wp, & + & -4.68073293_wp, -28.17977000_wp, -39.08740289_wp, -5.87499801_wp, & + & -29.33632168_wp, -38.93914369_wp, -3.75419974_wp, -29.71967875_wp, & + & -39.22606917_wp, -3.85268970_wp, -30.76324071_wp, -39.34101819_wp, & + & -2.82394938_wp, -29.32629377_wp, -37.85614647_wp, -3.73205350_wp, & + & -29.65113514_wp, -37.88472657_wp, -5.02554324_wp, -27.14187919_wp, & + & -37.32014347_wp, -4.84611739_wp, -25.82154111_wp, -35.80000412_wp, & + & -4.81213640_wp, -25.99652692_wp, -35.27537822_wp, -5.20055838_wp, & + & -27.03618307_wp, -37.20743216_wp, -5.32099424_wp, -27.83839572_wp, & + & -37.68525338_wp, -3.90166031_wp, -25.40439111_wp, -37.70734877_wp, & + & -5.99918666_wp, -24.88861788_wp, -38.79039359_wp, -6.04078816_wp, & + & -24.80893191_wp, -37.34352931_wp, -6.94197162_wp, -25.28917486_wp, & + & -37.28567316_wp, -5.84521933_wp, -23.90037509_wp, -46.74659248_wp, & + & -5.72918544_wp, -33.10246765_wp, -45.30365180_wp, -5.66748842_wp, & + & -33.01217931_wp, -44.96377527_wp, -5.50832898_wp, -31.52839137_wp, & + & -45.82201072_wp, -5.17501994_wp, -30.71640594_wp, -47.22191768_wp, & + & -5.41699898_wp, -32.26128536_wp, -44.88349258_wp, -6.59697249_wp, & + & -33.41064079_wp, -44.74721337_wp, -4.47658508_wp, -33.80075483_wp, & + & -45.03082791_wp, -4.58030401_wp, -34.84471074_wp, -45.15579761_wp, & + & -3.54750753_wp, -33.41151543_wp, -43.66453778_wp, -4.44743707_wp, & + & -33.72951536_wp, -43.69053747_wp, -5.72740496_wp, -31.21663837_wp, & + & -43.13055769_wp, -5.53229252_wp, -29.89656974_wp, -41.61163756_wp, & + & -5.46321510_wp, -30.07165676_wp, -41.07815256_wp, -5.84286254_wp, & + & -31.11005249_wp, -43.00769896_wp, -6.01422237_wp, -31.91130170_wp, & + & -43.51759842_wp, -4.59541748_wp, -29.48210597_wp, -43.49225726_wp, & + & -6.69153809_wp, -28.96120530_wp, -44.57408814_wp, -6.75564560_wp, & + & -28.87993510_wp, -43.10936524_wp, -7.62717597_wp, -29.36068236_wp, & + & -43.07254812_wp, -6.52698162_wp, -27.97383781_wp, -52.54474921_wp, & + & -6.45809502_wp, -37.18676620_wp, -51.10155824_wp, -6.39994135_wp, & + & -37.09820781_wp, -50.76039188_wp, -6.24379503_wp, -35.61433404_wp, & + & -51.61806452_wp, -5.91191247_wp, -34.80113393_wp, -53.01788182_wp, & + & -6.14604206_wp, -36.34424311_wp, -50.68396209_wp, -7.33002011_wp, & + & -37.49800541_wp, -50.54315660_wp, -5.20960271_wp, -37.88618171_wp, & + & -50.82840213_wp, -5.31154742_wp, -38.92987676_wp, -50.94893050_wp, & + & -4.27989547_wp, -37.49552385_wp, -49.46031684_wp, -5.18317934_wp, & + & -37.81637921_wp, -49.48724736_wp, -6.46427994_wp, -35.30322451_wp, & + & -48.92860007_wp, -6.27334531_wp, -33.98198190_wp, -47.40990978_wp, & + & -6.19615168_wp, -34.15524354_wp, -46.87320598_wp, -6.57075148_wp, & + & -35.19378273_wp, -48.80420483_wp, -6.74877533_wp, -35.99853694_wp, & + & -49.32065087_wp, -5.34062531_wp, -33.56295133_wp, -49.28524753_wp, & + & -7.43931111_wp, -33.05300600_wp, -50.36680417_wp, -7.50949040_wp, & + & -32.97310973_wp, -48.89703970_wp, -8.37083879_wp, -33.45692169_wp, & + & -48.86734009_wp, -7.27767310_wp, -32.06439741_wp, -58.35358293_wp, & + & -7.17897363_wp, -41.25869396_wp, -56.91028440_wp, -7.12019876_wp, & + & -41.17180994_wp, -56.56630929_wp, -6.96584865_wp, -39.68849080_wp, & + & -57.42208399_wp, -6.63436994_wp, -38.87317110_wp, -58.82649003_wp, & + & -6.86760552_wp, -40.41587238_wp, -56.49291561_wp, -8.04944267_wp, & + & -41.57376211_wp, -56.35380138_wp, -5.92835171_wp, -41.95891788_wp, & + & -56.64034316_wp, -6.02908752_wp, -43.00237231_wp, -56.75977602_wp, & + & -4.99950305_wp, -41.56642440_wp, -55.27089548_wp, -5.90120777_wp, & + & -41.89049067_wp, -55.29244046_wp, -7.18700734_wp, -39.38062813_wp, & + & -54.72991878_wp, -6.99701600_wp, -38.06093043_wp, -53.21147179_wp, & + & -6.92305158_wp, -38.23823508_wp, -52.67826840_wp, -7.29812472_wp, & + & -39.27839324_wp, -54.61148497_wp, -7.47169141_wp, -40.07792632_wp, & + & -55.11873392_wp, -6.06331447_wp, -37.64104844_wp, -55.08650579_wp, & + & -8.16190815_wp, -37.13059947_wp, -56.16798581_wp, -8.22970692_wp, & + & -37.04770017_wp, -54.70143540_wp, -9.09441382_wp, -37.53526605_wp, & + & -54.66552122_wp, -8.00084623_wp, -36.14319650_wp, -64.15230607_wp, & + & -7.88657950_wp, -45.34706575_wp, -62.70924654_wp, -7.83171623_wp, & + & -45.25456504_wp, -62.37056132_wp, -7.67940965_wp, -43.76975795_wp, & + & -63.22854844_wp, -7.34646491_wp, -42.95737499_wp, -64.62751606_wp, & + & -7.57482040_wp, -44.50567756_wp, -62.29272888_wp, -8.76172344_wp, & + & -45.65563201_wp, -62.14651465_wp, -6.64064629_wp, -46.03841261_wp, & + & -62.42894458_wp, -6.73982693_wp, -47.08313255_wp, -62.55185366_wp, & + & -5.71110972_wp, -45.64688142_wp, -61.06383675_wp, -6.61620897_wp, & + & -45.96543797_wp, -61.09840187_wp, -7.90411020_wp, -43.45753822_wp, & + & -60.53872620_wp, -7.71486928_wp, -42.13650751_wp, -59.01991715_wp, & + & -7.64178327_wp, -42.31136489_wp, -58.48571578_wp, -8.01549582_wp, & + & -43.35154065_wp, -60.41573689_wp, -8.18913845_wp, -44.15307922_wp, & + & -60.92760437_wp, -6.78087950_wp, -41.71729847_wp, -60.89831458_wp, & + & -8.87956817_wp, -41.20714299_wp, -61.98003930_wp, -8.94652297_wp, & + & -41.12671878_wp, -60.51309383_wp, -9.81235138_wp, -41.61100543_wp, & + & -60.47947819_wp, -8.71895601_wp, -40.21875772_wp, -69.94701819_wp, & + & -8.58686693_wp, -49.44358084_wp, -68.50386716_wp, -8.53203785_wp, & + & -49.35188617_wp, -68.16505875_wp, -8.37911569_wp, -47.86714235_wp, & + & -69.02332026_wp, -8.04633127_wp, -47.05494820_wp, -70.42148655_wp, & + & -8.27527911_wp, -48.60167188_wp, -68.08763131_wp, -9.46243401_wp, & + & -49.75238166_wp, -67.94126012_wp, -7.34175430_wp, -50.13694272_wp, & + & -68.22438569_wp, -7.44169413_wp, -51.18140719_wp, -68.34603213_wp, & + & -6.41176375_wp, -49.74592411_wp, -66.85853275_wp, -7.31764681_wp, & + & -50.06468778_wp, -66.89296856_wp, -8.60334659_wp, -47.55425943_wp, & + & -66.33572256_wp, -8.41639589_wp, -46.23184534_wp, -64.81633289_wp, & + & -8.34667126_wp, -46.40243248_wp, -64.27986743_wp, -8.72068405_wp, & + & -47.44130560_wp, -66.20977852_wp, -8.88889517_wp, -48.24900276_wp, & + & -66.72355563_wp, -7.48192068_wp, -45.81274437_wp, -66.70012150_wp, & + & -9.58110799_wp, -45.30432013_wp, -67.78219633_wp, -9.64617228_wp, & + & -45.22714607_wp, -66.31533705_wp, -10.51429953_wp, -45.70766581_wp, & + & -66.28395134_wp, -9.42191192_wp, -44.31458401_wp, -75.74650120_wp, & + & -9.28531954_wp, -53.53261991_wp, -74.30319014_wp, -9.23280785_wp, & + & -53.44176524_wp, -73.96269918_wp, -9.08137518_wp, -51.95728371_wp, & + & -74.81963002_wp, -8.74807113_wp, -51.14391980_wp, -76.22014894_wp, & + & -8.97283578_wp, -52.69060681_wp, -73.88862850_wp, -10.16343265_wp, & + & -53.84343003_wp, -73.73954329_wp, -8.04254961_wp, -54.22617332_wp, & + & -74.02350406_wp, -8.14112517_wp, -55.27053848_wp, -74.14285942_wp, & + & -7.11240872_wp, -53.83399331_wp, -72.65673476_wp, -8.01987403_wp, & + & -54.15464320_wp, -72.69045787_wp, -9.30718884_wp, -51.64603461_wp, & + & -72.13107405_wp, -9.12000696_wp, -50.32456011_wp, -70.61202841_wp, & + & -9.04850365_wp, -50.49764231_wp, -70.07674026_wp, -9.42264311_wp, & + & -51.53707330_wp, -72.00825264_wp, -9.59256995_wp, -52.34181533_wp, & + & -72.51941507_wp, -8.18621016_wp, -49.90444763_wp, -72.49218277_wp, & + & -10.28556591_wp, -49.39679705_wp, -73.57398971_wp, -10.35161083_wp, & + & -49.31683045_wp, -72.10765563_wp, -11.21818373_wp, -49.80171635_wp, & + & -72.07351758_wp, -10.12663165_wp, -48.40806359_wp, -81.54076835_wp, & + & -9.99295702_wp, -57.63162824_wp, -80.09805731_wp, -9.93148174_wp, & + & -57.53685803_wp, -79.76178765_wp, -9.77799889_wp, -56.05158865_wp, & + & -80.62163241_wp, -9.44650048_wp, -55.24060100_wp, -82.01902019_wp, & + & -9.68091417_wp, -56.79211206_wp, -79.67703440_wp, -10.85954805_wp, & + & -57.93768617_wp, -79.53948303_wp, -8.73778393_wp, -58.31966403_wp, & + & -79.81986886_wp, -8.83797014_wp, -59.36483464_wp, -79.94939764_wp, & + & -7.81009845_wp, -57.92853024_wp, -78.45703157_wp, -8.70869727_wp, & + & -58.24502139_wp, -78.48952693_wp, -9.99991926_wp, -55.73763318_wp, & + & -77.93193492_wp, -9.81137625_wp, -54.41556206_wp, -76.41240370_wp, & + & -9.74456786_wp, -54.58713023_wp, -75.87749723_wp, -10.11979959_wp, & + & -55.62639630_wp, -77.80566443_wp, -10.28509550_wp, -56.43196913_wp, & + & -78.31775072_wp, -8.87532307_wp, -53.99809093_wp, -78.29817509_wp, & + & -10.97353777_wp, -53.48560311_wp, -79.38035311_wp, -11.03648583_wp, & + & -53.40806878_wp, -77.91522263_wp, -11.90825675_wp, -53.88715720_wp, & + & -77.88150677_wp, -10.81311301_wp, -52.49627163_wp, -87.32053663_wp, & + & -10.76248845_wp, -61.73985214_wp, -85.87836887_wp, -10.69146320_wp, & + & -61.64358906_wp, -85.54540646_wp, -10.52686388_wp, -60.15872055_wp, & + & -86.40874455_wp, -10.19598824_wp, -59.35118323_wp, -87.80167545_wp, & + & -10.44492744_wp, -60.90404649_wp, -85.45113630_wp, -11.61928823_wp, & + & -62.03829005_wp, -85.32616341_wp, -9.49891311_wp, -62.43264522_wp, & + & -85.60575394_wp, -9.60606887_wp, -63.47733651_wp, -85.74107520_wp, & + & -8.57139069_wp, -62.04641827_wp, -84.24389441_wp, -9.46356336_wp, & + & -62.35796901_wp, -84.27235033_wp, -10.73868849_wp, -59.84101552_wp, & + & -83.71952697_wp, -10.54055668_wp, -58.51833036_wp, -82.20017758_wp, & + & -10.46196460_wp, -58.68600713_wp, -81.65932517_wp, -10.83740222_wp, & + & -59.72210807_wp, -83.58507213_wp, -11.02312915_wp, -60.53223395_wp, & + & -84.11446536_wp, -9.60643071_wp, -58.10516771_wp, -84.07821450_wp, & + & -11.70276986_wp, -57.58544856_wp, -85.15997077_wp, -11.77362468_wp, & + & -57.50891697_wp, -83.68785649_wp, -12.63567409_wp, -57.98410307_wp, & + & -83.66379675_wp, -11.53657446_wp, -56.59612196_wp, -93.09221861_wp, & + & -11.52260383_wp, -65.84862881_wp, -91.64901042_wp, -11.48833054_wp, & + & -65.74843527_wp, -91.31605734_wp, -11.31170879_wp, -64.26500939_wp, & + & -92.17429320_wp, -10.95413483_wp, -63.46345227_wp, -93.56735055_wp, & + & -11.17465519_wp, -65.02151400_wp, -91.24553596_wp, -12.43266869_wp, & + & -66.12870368_wp, -91.06377958_wp, -10.32173122_wp, -66.55238960_wp, & + & -91.34140050_wp, -10.43721182_wp, -67.59671624_wp, -91.45723874_wp, & + & -9.37861880_wp, -66.18172211_wp, -89.98128037_wp, -10.31172277_wp, & + & -66.47320946_wp, -90.04818706_wp, -11.54469983_wp, -63.94107447_wp, & + & -89.49524792_wp, -11.33383116_wp, -62.62049834_wp, -87.97631325_wp, & + & -11.24865114_wp, -62.78878364_wp, -87.43278796_wp, -11.63353053_wp, & + & -63.81995514_wp, -89.36343095_wp, -11.84482661_wp, -64.62795647_wp, & + & -89.89538125_wp, -10.39864282_wp, -62.21491903_wp, -89.84784332_wp, & + & -12.49085720_wp, -61.67890822_wp, -90.92914744_wp, -12.56559744_wp, & + & -61.59983715_wp, -89.45440292_wp, -13.42494491_wp, -62.07171989_wp, & + & -89.43226449_wp, -12.31606359_wp, -60.69152509_wp, -98.85330224_wp, & + & -12.12402596_wp, -69.98133714_wp, -97.41257814_wp, -12.19056821_wp, & + & -69.86458340_wp, -97.08071758_wp, -11.97812635_wp, -68.38546711_wp, & + & -97.91928989_wp, -11.53333891_wp, -67.60719746_wp, -99.30824533_wp, & + & -11.68780055_wp, -69.18555407_wp, -97.07767326_wp, -13.17750754_wp, & + & -70.20069792_wp, -96.73628312_wp, -11.10519325_wp, -70.70957430_wp, & + & -97.01153059_wp, -11.24455917_wp, -71.75158080_wp, -97.06282813_wp, & + & -10.12090976_wp, -70.38376450_wp, -95.65663751_wp, -11.17024003_wp, & + & -70.61746774_wp, -95.83470542_wp, -12.28518868_wp, -68.03874545_wp, & + & -95.27893187_wp, -12.05738034_wp, -66.72234087_wp, -93.75765961_wp, & + & -12.01838872_wp, -66.88701935_wp, -93.22148903_wp, -12.44500479_wp, & + & -67.90547892_wp, -95.16367846_wp, -12.64555105_wp, -68.70979028_wp, & + & -95.65486847_wp, -11.10185526_wp, -66.34207472_wp, -95.66596852_wp, & + & -13.18148471_wp, -65.75472173_wp, -96.74901995_wp, -13.22440682_wp, & + & -65.67637851_wp, -95.29798362_wp, -14.13519420_wp, -66.12441506_wp, & + & -95.24738303_wp, -12.99539214_wp, -64.77063376_wp, -104.64602140_wp, & + & -12.80460434_wp, -74.06851927_wp, -103.20997564_wp, -12.92848775_wp, & + & -73.94218987_wp, -102.86411914_wp, -12.58439900_wp, -72.49138935_wp, & + & -103.67539455_wp, -12.01695438_wp, -71.76578379_wp, -105.07651904_wp, & + & -12.26197929_wp, -73.32644916_wp, -102.92344067_wp, -13.95879338_wp, & + & -74.17739238_wp, -102.48587083_wp, -11.96565228_wp, -74.88990844_wp, & + & -102.76179163_wp, -12.20152392_wp, -75.91420366_wp, -102.77413814_wp, & + & -10.94063089_wp, -74.67123938_wp, -101.41022117_wp, -12.06356696_wp, & + & -74.78175117_wp, -101.63614938_wp, -12.92196265_wp, -72.11009239_wp, & + & -101.06789264_wp, -12.59116704_wp, -70.82099992_wp, -99.54728789_wp, & + & -12.66835598_wp, -70.97595857_wp, -99.03734024_wp, -13.21821265_wp, & + & -71.94768947_wp, -100.98608310_wp, -13.38416931_wp, -72.73802752_wp, & + & -101.37970782_wp, -11.57747489_wp, -70.54817053_wp, -101.52982278_wp, & + & -13.57596652_wp, -69.74095203_wp, -102.61292791_wp, -13.53364086_wp, & + & -69.66300885_wp, -101.23134107_wp, -14.58712437_wp, -70.00564863_wp, & + & -101.09583032_wp, -13.31698284_wp, -68.78020556_wp, -110.38339078_wp, & + & -13.36530726_wp, -78.20353197_wp, -108.98538365_wp, -13.67571509_wp, & + & -77.99713409_wp, -108.63002252_wp, -13.20484232_wp, -76.58458668_wp, & + & -109.37077085_wp, -12.44786785_wp, -75.96430102_wp, -110.74264072_wp, & + & -12.65353262_wp, -77.57574918_wp, -108.85087394_wp, -14.75826804_wp, & + & -78.09183816_wp, -108.10127379_wp, -12.95602522_wp, -79.02183170_wp, & + & -108.38407995_wp, -13.27469029_wp, -80.02151004_wp, -108.23563969_wp, & + & -11.88040812_wp, -78.94015764_wp, -107.05551099_wp, -13.19654639_wp, & + & -78.85695285_wp, -107.47229717_wp, -13.66066830_wp, -76.11521024_wp, & + & -106.88402717_wp, -13.23912174_wp, -74.86236572_wp, -105.36983031_wp, & + & -13.41600337_wp, -75.00115744_wp, -104.89217684_wp, -14.09626605_wp, & + & -75.90423005_wp, -106.87065352_wp, -14.26113779_wp, -76.66958493_wp, & + & -107.13995124_wp, -12.18809120_wp, -74.69304242_wp, -107.39852880_wp, & + & -14.08810628_wp, -73.69444460_wp, -108.47800275_wp, -13.98335130_wp, & + & -73.62678088_wp, -107.15233493_wp, -15.13430277_wp, -73.85694484_wp, & + & -106.95216809_wp, -13.75897344_wp, -72.76118883_wp, -116.17447794_wp, & + & -14.01230638_wp, -82.27290056_wp, -114.82479258_wp, -14.44739356_wp, & + & -81.98553653_wp, -114.39906370_wp, -13.74225251_wp, -80.69519186_wp, & + & -115.04000971_wp, -12.79429285_wp, -80.25108650_wp, -116.43550744_wp, & + & -13.15145041_wp, -81.80284961_wp, -114.82921680_wp, -15.53412918_wp, & + & -81.85096544_wp, -113.86923458_wp, -14.07440198_wp, -83.12439906_wp, & + & -114.20205937_wp, -14.55692795_wp, -84.03947874_wp, -113.86667535_wp, & + & -12.99739378_wp, -83.27144378_wp, -112.86011475_wp, -14.40435827_wp, & + & -82.89788219_wp, -113.29633978_wp, -14.22276935_wp, -80.12863084_wp, & + & -112.65626511_wp, -13.63169116_wp, -78.97342853_wp, -111.18165254_wp, & + & -14.03826056_wp, -79.02715049_wp, -110.79838003_wp, -14.93461110_wp, & + & -79.77287248_wp, -112.77408794_wp, -14.98973288_wp, -80.53975781_wp, & + & -112.76173081_wp, -12.54333662_wp, -79.03352768_wp, -113.28860652_wp, & + & -14.13718512_wp, -77.67174324_wp, -114.34043100_wp, -13.86433383_wp, & + & -77.65869946_wp, -113.20135579_wp, -15.21898310_wp, -77.61032823_wp, & + & -112.79747093_wp, -13.69186672_wp, -76.81205368_wp, -121.93272823_wp, & + & -14.59378707_wp, -86.36517320_wp, -120.68375176_wp, -15.17570494_wp, & + & -85.92356654_wp, -120.16808122_wp, -14.30242492_wp, -84.77679197_wp, & + & -120.64074273_wp, -13.18948924_wp, -84.56622105_wp, -122.03938080_wp, & + & -13.61531917_wp, -86.11852432_wp, -120.87954712_wp, -16.19603125_wp, & + & -85.57772125_wp, -119.65491071_wp, -15.20496419_wp, -87.05928327_wp, & + & -120.04583409_wp, -15.80233822_wp, -87.87853261_wp, -119.46374127_wp, & + & -14.19590625_wp, -87.41541114_wp, -118.72236460_wp, -15.64271538_wp, & + & -86.71656158_wp, -119.18099947_wp, -14.83615734_wp, -84.06297043_wp, & + & -118.46606321_wp, -14.13126078_wp, -83.02116962_wp, -117.05670248_wp, & + & -14.72589287_wp, -82.96621820_wp, -116.79636096_wp, -15.79198055_wp, & + & -83.51585431_wp, -118.78610347_wp, -15.74207366_wp, -84.29260173_wp, & + & -118.42996189_wp, -13.06861158_wp, -83.28266447_wp, -119.15629891_wp, & + & -14.30424132_wp, -81.66352494_wp, -120.16412403_wp, -13.90226960_wp, & + & -81.72306295_wp, -119.20920775_wp, -15.35846631_wp, -81.40393577_wp, & + & -118.60977993_wp, -13.77494829_wp, -80.88905340_wp, -127.68874796_wp, & + & -15.16478338_wp, -90.44175401_wp, -126.57226012_wp, -15.82107659_wp, & + & -89.79810041_wp, -125.90555892_wp, -14.78952068_wp, -88.88499661_wp, & + & -126.13887455_wp, -13.59073777_wp, -89.00197540_wp, -127.58939473_wp, & + & -14.15954321_wp, -90.52325618_wp, -126.96047997_wp, -16.66398439_wp, & + & -89.21710392_wp, -125.55877897_wp, -16.32736386_wp, -90.83078078_wp, & + & -126.04994489_wp, -17.03312796_wp, -91.49561220_wp, -125.17950918_wp, & + & -15.49536427_wp, -91.41879915_wp, -124.72770089_wp, -16.82309856_wp, & + & -90.33826140_wp, -125.06208167_wp, -15.29701406_wp, -87.98945221_wp, & + & -124.22107078_wp, -14.49508414_wp, -87.12738639_wp, -122.93817860_wp, & + & -15.29363656_wp, -86.88351055_wp, -122.87732940_wp, -16.49177606_wp, & + & -87.14261376_wp, -124.85300708_wp, -16.28905023_wp, -87.96234249_wp, & + & -124.00171791_wp, -13.55233442_wp, -87.63900815_wp, -124.91498586_wp, & + & -14.20918516_wp, -85.79089706_wp, -125.83525479_wp, -13.66225021_wp, & + & -85.97700250_wp, -125.15251514_wp, -15.14302276_wp, -85.28780156_wp, & + & -124.27294544_wp, -13.61376832_wp, -85.14903213_wp, -132.12095505_wp, & + & -17.05585903_wp, -95.04023950_wp, -131.72116159_wp, -17.22721672_wp, & + & -93.65294686_wp, -130.79586534_wp, -16.08594163_wp, -93.24839666_wp, & + & -129.98527349_wp, -15.60202200_wp, -94.03251383_wp, -131.33200480_wp, & + & -16.67394083_wp, -95.55597505_wp, -132.62636737_wp, -17.21174874_wp, & + & -93.03530297_wp, -130.93540761_wp, -18.52319247_wp, -93.37643294_wp, & + & -131.56632847_wp, -19.38994331_wp, -93.55678282_wp, -130.06776949_wp, & + & -18.56981370_wp, -94.03319443_wp, -130.58156535_wp, -18.54526211_wp, & + & -92.34772457_wp, -130.92541499_wp, -15.67112987_wp, -91.97841042_wp, & + & -129.91126666_wp, -14.85574754_wp, -91.34260749_wp, -128.82202558_wp, & + & -15.78046476_wp, -90.77830430_wp, -129.00421691_wp, -16.98685518_wp, & + & -90.64947956_wp, -131.50032248_wp, -16.21797738_wp, -91.35346109_wp, & + & -129.47349644_wp, -14.22778663_wp, -92.12498594_wp, -130.52164808_wp, & + & -14.01017180_wp, -90.22887436_wp, -131.30606120_wp, -13.37863946_wp, & + & -90.63486302_wp, -130.94524249_wp, -14.65512078_wp, -89.46258426_wp, & + & -129.76180495_wp, -13.38209584_wp, -89.77362936_wp, -132.35329221_wp, & + & -17.95513458_wp, -95.44724284_wp, 3.67963134_wp, -1.22803083_wp, & + & 4.96367159_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_48 + +subroutine polyala_52(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 523 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.67677925_wp, -0.39196151_wp, -0.19147042_wp, 0.37322028_wp, & + & 0.44388340_wp, 0.34916799_wp, 1.53292112_wp, -0.47012631_wp, & + & 0.75020932_wp, 1.36744231_wp, -1.67311077_wp, 0.91805452_wp, & + & -0.76959074_wp, -1.29121093_wp, 0.26457728_wp, 0.67504404_wp, & + & 1.14477992_wp, -0.43512513_wp, -0.11573503_wp, 1.20153828_wp, & + & 1.58783380_wp, -0.95981036_wp, 1.83064343_wp, 1.32070790_wp, & + & -0.42385545_wp, 0.49523657_wp, 2.35504240_wp, 0.67664987_wp, & + & 1.82106777_wp, 1.99560545_wp, 2.71845134_wp, 0.13673120_wp, & + & 0.88380803_wp, 3.83622937_wp, -0.54848098_wp, 1.49776898_wp, & + & 3.56428025_wp, -0.72278909_wp, 2.99137462_wp, 2.63631804_wp, & + & -0.20339840_wp, 3.56879697_wp, 2.76611794_wp, 1.14429331_wp, & + & 0.84170622_wp, 3.89680070_wp, -1.55488026_wp, 1.06729078_wp, & + & 5.13746732_wp, 0.21350484_wp, 1.27392757_wp, 5.32059352_wp, & + & 0.32139580_wp, 0.20942047_wp, 5.08149217_wp, 1.19863850_wp, & + & 1.73081453_wp, 5.95973706_wp, -0.33570562_wp, 1.72189943_wp, & + & 4.45555025_wp, -1.49520198_wp, 3.57358026_wp, -6.31902601_wp, & + & -0.88881500_wp, -4.35471172_wp, -5.06789768_wp, -0.21397040_wp, & + & -4.08575782_wp, -4.32453038_wp, -1.04969293_wp, -3.04096290_wp, & + & -4.89757939_wp, -1.93104493_wp, -2.40818362_wp, -6.62242121_wp, & + & -1.50611185_wp, -3.60910186_wp, -4.49652734_wp, -0.16028770_wp, & + & -5.01832968_wp, -5.30845457_wp, 1.20007978_wp, -3.54489009_wp, & + & -5.84930504_wp, 1.77927812_wp, -4.28836887_wp, -5.89804613_wp, & + & 1.15451753_wp, -2.63271164_wp, -4.36461677_wp, 1.69270641_wp, & + & -3.33140329_wp, -3.04166312_wp, -0.73375691_wp, -2.87990429_wp, & + & -2.20168248_wp, -1.28256158_wp, -1.83778870_wp, -1.28340385_wp, & + & -0.15774481_wp, -1.35457784_wp, -1.13324863_wp, 0.86692447_wp, & + & -2.01189240_wp, -2.62852734_wp, 0.04823636_wp, -3.37547423_wp, & + & -2.84864534_wp, -1.63313292_wp, -1.02725552_wp, -1.35328019_wp, & + & -2.44403290_wp, -2.36801498_wp, -2.00824034_wp, -3.23994767_wp, & + & -2.71148387_wp, -0.73922131_wp, -2.10633516_wp, -3.19900644_wp, & + & -0.70562821_wp, -2.83093658_wp, -1.58665950_wp, -12.11404782_wp, & + & -1.34945476_wp, -8.39612274_wp, -10.75819826_wp, -0.86639065_wp, & + & -8.25111627_wp, -10.19908638_wp, -1.48558479_wp, -6.96749408_wp, & + & -10.93958370_wp, -2.01189461_wp, -6.14242683_wp, -12.53666986_wp, & + & -1.65499760_wp, -7.52599076_wp, -10.18028788_wp, -1.19097109_wp, & + & -9.12263383_wp, -10.72432701_wp, 0.66251594_wp, -8.14927783_wp, & + & -11.14291596_wp, 1.08970723_wp, -9.05650313_wp, -11.31318106_wp, & + & 0.99224836_wp, -7.29718382_wp, -9.70357548_wp, 1.01340522_wp, & + & -8.03176600_wp, -8.87979349_wp, -1.38955638_wp, -6.82806123_wp, & + & -8.16024656_wp, -1.78201166_wp, -5.63597092_wp, -6.93693077_wp, & + & -0.86771378_wp, -5.53254118_wp, -6.57053177_wp, -0.18835637_wp, & + & -6.48656751_wp, -8.30954916_wp, -0.90069511_wp, -7.50999666_wp, & + & -8.82005890_wp, -1.64763872_wp, -4.77259039_wp, -7.70973948_wp, & + & -3.24478279_wp, -5.71910602_wp, -8.58418295_wp, -3.88231350_wp, & + & -5.81720444_wp, -7.06715899_wp, -3.38825073_wp, -6.58407823_wp, & + & -7.16553362_wp, -3.52710835_wp, -4.82297334_wp, -17.82829575_wp, & + & -2.10533189_wp, -12.54181645_wp, -16.42117739_wp, -1.78376388_wp, & + & -12.44232822_wp, -16.00212668_wp, -2.06996514_wp, -10.99797895_wp, & + & -16.83983690_wp, -2.23756542_wp, -10.11675232_wp, -18.30992233_wp, & + & -2.11921222_wp, -11.64875450_wp, -15.86806807_wp, -2.42115592_wp, & + & -13.14006958_wp, -16.16545467_wp, -0.31056162_wp, -12.77905265_wp, & + & -16.49288594_wp, -0.11655542_wp, -13.79689410_wp, -16.72149336_wp, & + & 0.32957297_wp, -12.09892475_wp, -15.10759247_wp, -0.08006126_wp, & + & -12.69854841_wp, -14.68903176_wp, -2.10319608_wp, -10.79047692_wp, & + & -14.07804911_wp, -2.23507651_wp, -9.48569483_wp, -12.70493453_wp, & + & -1.56422621_wp, -9.56821673_wp, -12.20621804_wp, -1.27150284_wp, & + & -10.65070919_wp, -14.02659926_wp, -1.91989811_wp, -11.53706441_wp, & + & -14.71320436_wp, -1.73053018_wp, -8.75011540_wp, -13.91378299_wp, & + & -3.70920518_wp, -9.09862501_wp, -14.89225519_wp, -4.18111433_wp, & + & -9.07229275_wp, -13.29259889_wp, -4.21992187_wp, -9.82999000_wp, & + & -13.45286947_wp, -3.79707373_wp, -8.11952185_wp, -23.51380593_wp, & + & -3.11773841_wp, -16.69190372_wp, -22.08091303_wp, -2.93640126_wp, & + & -16.60118238_wp, -21.73342574_wp, -2.92863550_wp, -15.11020548_wp, & + & -22.60916204_wp, -2.81541173_wp, -14.25750452_wp, -24.00440435_wp, & + & -2.93673348_wp, -15.82168951_wp, -21.58685414_wp, -3.77193577_wp, & + & -17.10848685_wp, -21.64704201_wp, -1.61758793_wp, -17.25044592_wp, & + & -21.93924652_wp, -1.62643999_wp, -18.29715921_wp, -22.12955064_wp, & + & -0.77977153_wp, -16.75365428_wp, -20.57006873_wp, -1.49763988_wp, & + & -17.18624788_wp, -20.43765434_wp, -3.03529588_wp, -14.83302265_wp, & + & -19.88209169_wp, -2.93777267_wp, -13.50068350_wp, -18.42256277_wp, & + & -2.50599365_wp, -13.66179147_wp, -17.86528779_wp, -2.55285586_wp, & + & -14.75437570_wp, -19.73724793_wp, -3.10034030_wp, -15.56481350_wp, & + & -20.44863372_wp, -2.18845777_wp, -12.93783321_wp, -19.95026923_wp, & + & -4.28484382_wp, -12.77232803_wp, -20.98959343_wp, -4.59169066_wp, & + & -12.69103824_wp, -19.39942458_wp, -5.03861640_wp, -13.32906097_wp, & + & -19.52795193_wp, -4.20072788_wp, -11.77571272_wp, -29.24607767_wp, & + & -3.87435241_wp, -20.82567883_wp, -27.80304835_wp, -3.83744400_wp, & + & -20.72400170_wp, -27.47129310_wp, -3.74054263_wp, -19.23280884_wp, & + & -28.33548773_wp, -3.45101545_wp, -18.41048967_wp, -29.72212376_wp, & + & -3.58837344_wp, -19.97558802_wp, -27.39364572_wp, -4.75793762_wp, & + & -21.15353034_wp, -27.22441348_wp, -2.62727185_wp, -21.46587595_wp, & + & -27.49587970_wp, -2.69364430_wp, -22.51609786_wp, -27.62870921_wp, & + & -1.70709321_wp, -21.05189761_wp, -26.14235652_wp, -2.61075343_wp, & + & -21.38067174_wp, -26.19888009_wp, -3.96871005_wp, -18.92298402_wp, & + & -25.64555463_wp, -3.80154692_wp, -17.59639544_wp, -24.14246038_wp, & + & -3.57110584_wp, -17.77178817_wp, -23.58531330_wp, -3.81709859_wp, & + & -18.83754103_wp, -25.50550847_wp, -4.18766075_wp, -19.63137765_wp, & + & -26.11998337_wp, -2.93422362_wp, -17.12530893_wp, -25.88304991_wp, & + & -5.04536081_wp, -16.73274589_wp, -26.95232732_wp, -5.22075639_wp, & + & -16.65000859_wp, -25.41435727_wp, -5.91306372_wp, -17.18971673_wp, & + & -25.47069459_wp, -4.90105726_wp, -15.73897690_wp, -35.03512849_wp, & + & -4.41922518_wp, -24.95342329_wp, -33.59128228_wp, -4.39967904_wp, & + & -24.85734021_wp, -33.25367681_wp, -4.27283684_wp, -23.36966887_wp, & + & -34.10818433_wp, -3.93559485_wp, -22.55531826_wp, -35.50404561_wp, & + & -4.10796436_wp, -24.10819794_wp, -33.19597324_wp, -5.33498904_wp, & + & -25.26754030_wp, -32.99824528_wp, -3.21411752_wp, -25.62695331_wp, & + & -33.27859657_wp, -3.29634266_wp, -26.67370647_wp, -33.38380506_wp, & + & -2.27940505_wp, -25.22791513_wp, -31.91558634_wp, -3.21507273_wp, & + & -25.54962747_wp, -31.98720979_wp, -4.52561477_wp, -23.05547057_wp, & + & -31.43138664_wp, -4.36035915_wp, -21.72940701_wp, -29.91076074_wp, & + & -4.30168314_wp, -21.89440279_wp, -29.37458734_wp, -4.65321177_wp, & + & -22.94122114_wp, -31.30502793_wp, -4.80768115_wp, -23.75261658_wp, & + & -31.81134669_wp, -3.42695660_wp, -21.30055088_wp, -31.81058285_wp, & + & -5.53163895_wp, -20.81624565_wp, -32.89352560_wp, -5.58703907_wp, & + & -20.74386555_wp, -31.43322882_wp, -6.46421572_wp, -21.22779698_wp, & + & -31.39703025_wp, -5.38749624_wp, -19.82307580_wp, -40.85101009_wp, & + & -4.99004881_wp, -29.04417483_wp, -39.40690394_wp, -4.95789141_wp, & + & -28.95562786_wp, -39.06209817_wp, -4.82130602_wp, -27.47051195_wp, & + & -39.91349898_wp, -4.48216342_wp, -26.65373850_wp, -41.31862566_wp, & + & -4.67810799_wp, -28.19854699_wp, -39.00594218_wp, -5.89157429_wp, & + & -29.36400931_wp, -38.82786676_wp, -3.77065822_wp, -29.73329159_wp, & + & -39.11424359_wp, -3.85885935_wp, -30.77792442_wp, -39.21795271_wp, & + & -2.83747868_wp, -29.33503824_wp, -37.74478207_wp, -3.76334068_wp, & + & -29.66283107_wp, -37.79270038_wp, -5.06667389_wp, -27.16237836_wp, & + & -37.22951110_wp, -4.89711883_wp, -25.84000533_wp, -35.70915665_wp, & + & -4.85609056_wp, -26.01234703_wp, -35.18151695_wp, -5.23101539_wp, & + & -27.05540101_wp, -37.11512457_wp, -5.35686294_wp, -27.86072870_wp, & + & -37.59837742_wp, -3.95740626_wp, -25.41544504_wp, -37.61448934_wp, & + & -6.05908295_wp, -24.91728308_wp, -38.69750836_wp, -6.10466126_wp, & + & -24.83942270_wp, -37.24716546_wp, -6.99745041_wp, -25.32488136_wp, & + & -37.19474389_wp, -5.91198975_wp, -23.92716810_wp, -46.67515105_wp, & + & -5.63847517_wp, -33.11459983_wp, -45.23155355_wp, -5.58180890_wp, & + & -33.03027867_wp, -44.88436958_wp, -5.43836020_wp, -31.54639794_wp, & + & -45.73796185_wp, -5.10977757_wp, -30.72761192_wp, -47.14565910_wp, & + & -5.33155303_wp, -32.26878194_wp, -44.81601974_wp, -6.50859353_wp, & + & -33.43971314_wp, -44.67520175_wp, -4.38498501_wp, -33.80986192_wp, & + & -44.96312434_wp, -4.47813936_wp, -34.85363625_wp, -45.07990501_wp, & + & -3.45855596_wp, -33.41042536_wp, -43.59219243_wp, -4.35928770_wp, & + & -33.74257077_wp, -43.61062688_wp, -5.66513963_wp, -31.24211457_wp, & + & -43.04512482_wp, -5.48760810_wp, -29.92175031_wp, -41.52573052_wp, & + & -5.43490770_wp, -30.09930249_wp, -40.99893510_wp, -5.80862865_wp, & + & -31.14324906_wp, -42.93164306_wp, -5.94886966_wp, -31.94183778_wp, & + & -43.42013167_wp, -4.54983816_wp, -29.49828406_wp, -43.41786526_wp, & + & -6.65037586_wp, -28.99505953_wp, -44.50021523_wp, -6.70387998_wp, & + & -28.91304342_wp, -43.04510581_wp, -7.58681968_wp, -29.40217130_wp, & + & -42.99545933_wp, -6.49799408_wp, -28.00688904_wp, -52.49258252_wp, & + & -6.36340342_wp, -37.17911568_wp, -51.04944379_wp, -6.29625122_wp, & + & -37.09459672_wp, -50.70361093_wp, -6.14543017_wp, -35.61113651_wp, & + & -51.56017815_wp, -5.82299361_wp, -34.79301774_wp, -52.96548444_wp, & + & -6.05907560_wp, -36.33368478_wp, -50.62715486_wp, -7.22148059_wp, & + & -37.50065803_wp, -50.50120608_wp, -5.09828601_wp, -37.87817117_wp, & + & -50.78853649_wp, -5.19690545_wp, -38.92160677_wp, -50.91207755_wp, & + & -4.17325825_wp, -37.48179842_wp, -49.41838216_wp, -5.06502288_wp, & + & -37.81107044_wp, -49.42766637_wp, -6.35905068_wp, -35.30659150_wp, & + & -48.86306825_wp, -6.17180053_wp, -33.98722338_wp, -47.34488698_wp, & + & -6.09638586_wp, -34.16729229_wp, -46.81425900_wp, -6.46462381_wp, & + & -35.21125005_wp, -48.74604708_wp, -6.63711607_wp, -36.00604038_wp, & + & -49.25158570_wp, -5.23937912_wp, -33.56418812_wp, -49.21715374_wp, & + & -7.33918677_wp, -33.05906376_wp, -50.29846665_wp, -7.40862341_wp, & + & -32.97529341_wp, -48.83125336_wp, -8.27032099_wp, -33.46608633_wp, & + & -48.79548252_wp, -7.17976759_wp, -32.07169212_wp, -58.30352423_wp, & + & -7.10469773_wp, -41.24768992_wp, -56.86050423_wp, -7.03666516_wp, & + & -41.16192508_wp, -56.51601572_wp, -6.88635102_wp, -39.67811056_wp, & + & -57.37368045_wp, -6.56588613_wp, -38.86037111_wp, -58.77731043_wp, & + & -6.80158462_wp, -40.40230788_wp, -56.43721442_wp, -7.96138247_wp, & + & -41.56810801_wp, -56.31245572_wp, -5.83787347_wp, -41.94438383_wp, & + & -56.59890137_wp, -5.93609059_wp, -42.98809846_wp, -56.72428387_wp, & + & -4.91335441_wp, -41.54781641_wp, -55.22970606_wp, -5.80385824_wp, & + & -41.87641847_wp, -55.23996683_wp, -7.09819896_wp, -39.37268884_wp, & + & -54.67678960_wp, -6.90964994_wp, -38.05291174_wp, -53.15900349_wp, & + & -6.82507919_wp, -38.23229330_wp, -52.62571908_wp, -7.18986074_wp, & + & -39.27609909_wp, -54.55733506_wp, -7.37391218_wp, -40.07204228_wp, & + & -55.07096980_wp, -5.98010646_wp, -37.62881055_wp, -55.02453509_wp, & + & -8.08033921_wp, -37.12653659_wp, -56.10544811_wp, -8.15567780_wp, & + & -37.04271600_wp, -54.63372267_wp, -9.00876817_wp, -37.53501957_wp, & + & -54.60354375_wp, -7.92018827_wp, -36.13899580_wp, -64.11180719_wp, & + & -7.83980539_wp, -45.32058849_wp, -62.66872283_wp, -7.77373220_wp, & + & -45.23429005_wp, -62.32459686_wp, -7.62485763_wp, -43.75027574_wp, & + & -63.18219753_wp, -7.30394897_wp, -42.93263262_wp, -64.58548675_wp, & + & -7.53601490_wp, -44.47540546_wp, -62.24662540_wp, -8.69877560_wp, & + & -45.64096768_wp, -62.11874065_wp, -6.57521347_wp, -46.01581043_wp, & + & -62.40441695_wp, -6.67264522_wp, -47.05980759_wp, -62.52988283_wp, & + & -5.65041794_wp, -45.61918624_wp, -61.03601425_wp, -6.54241902_wp, & + & -45.94690183_wp, -61.04893322_wp, -7.83824541_wp, -43.44429573_wp, & + & -60.48678969_wp, -7.65051991_wp, -42.12393296_wp, -58.96886999_wp, & + & -7.56562269_wp, -42.30188359_wp, -58.43456939_wp, -7.92931370_wp, & + & -43.34554519_wp, -60.36591720_wp, -8.11412486_wp, -44.14317665_wp, & + & -60.88141975_wp, -6.72121665_wp, -41.69970710_wp, -60.83548296_wp, & + & -8.82168156_wp, -41.19852213_wp, -61.91649069_wp, -8.89713611_wp, & + & -41.11602328_wp, -60.44411429_wp, -9.74990735_wp, -41.60692064_wp, & + & -60.41571812_wp, -8.66192533_wp, -40.21039972_wp, -69.91927610_wp, & + & -8.57767075_wp, -49.39490890_wp, -68.47627294_wp, -8.51040806_wp, & + & -49.30810730_wp, -68.13270931_wp, -8.35984453_wp, -47.82416642_wp, & + & -68.99065617_wp, -8.03847663_wp, -47.00707104_wp, -70.39364785_wp, & + & -8.27391064_wp, -48.55011225_wp, -68.05327812_wp, -9.43552331_wp, & + & -49.71369402_wp, -67.92702719_wp, -7.31224289_wp, -50.09068634_wp, & + & -68.21293024_wp, -7.41068302_wp, -51.13452608_wp, -68.33850700_wp, & + & -6.38732763_wp, -49.69469213_wp, -66.84429662_wp, -7.27888274_wp, & + & -50.02211278_wp, -66.85706850_wp, -8.57273215_wp, -47.51766182_wp, & + & -66.29520832_wp, -8.38457540_wp, -46.19726430_wp, -64.77721351_wp, & + & -8.30055529_wp, -46.37483393_wp, -64.24278999_wp, -8.66491823_wp, & + & -47.41819858_wp, -66.17395308_wp, -8.84864326_wp, -48.21643073_wp, & + & -66.68952454_wp, -7.45493948_wp, -45.77348026_wp, -66.64466075_wp, & + & -9.55527769_wp, -45.27153511_wp, -67.72571516_wp, -9.63002881_wp, & + & -45.18901202_wp, -66.25391277_wp, -10.48382438_wp, -45.67980249_wp, & + & -66.22475425_wp, -9.39562942_wp, -44.28345602_wp, -75.72303391_wp, & + & -9.31472573_wp, -53.47366082_wp, -74.28005035_wp, -9.24950833_wp, & + & -53.38508252_wp, -73.93793157_wp, -9.09927668_wp, -51.90080324_wp, & + & -74.79629783_wp, -8.77672977_wp, -51.08463774_wp, -76.19818794_wp, & + & -9.00994974_wp, -52.62969357_wp, -73.85798639_wp, -10.17526033_wp, & + & -53.79018949_wp, -73.72817012_wp, -8.05213975_wp, -54.16704141_wp, & + & -74.01232027_wp, -8.15056651_wp, -55.21136012_wp, -74.13942995_wp, & + & -7.12670283_wp, -53.77202700_wp, -72.64552919_wp, -8.01983347_wp, & + & -54.09654470_wp, -72.66280904_wp, -9.31365552_wp, -51.59298783_wp, & + & -72.10180973_wp, -9.12441886_wp, -50.27241385_wp, -70.58372941_wp, & + & -9.04023110_wp, -50.44901244_wp, -70.04834230_wp, -9.40546190_wp, & + & -51.49155958_wp, -71.97967101_wp, -9.59026579_wp, -52.29141104_wp, & + & -72.49643229_wp, -8.19436238_wp, -49.84979825_wp, -72.45198327_wp, & + & -10.29420690_wp, -49.34583748_wp, -73.53310566_wp, -10.36868780_wp, & + & -49.26397641_wp, -72.06110125_wp, -11.22320427_wp, -49.75294604_wp, & + & -72.03273588_wp, -10.13363399_wp, -48.35762563_wp, -81.52129370_wp, & + & -10.04062288_wp, -57.56160291_wp, -80.07832863_wp, -9.97774246_wp, & + & -57.47129545_wp, -79.73812365_wp, -9.82834873_wp, -55.98645597_wp, & + & -80.59713913_wp, -9.50403796_wp, -55.17165027_wp, -81.99677171_wp, & + & -9.73513738_wp, -56.71804884_wp, -79.65719532_wp, -10.90410991_wp, & + & -57.87596617_wp, -79.52361855_wp, -8.78115864_wp, -58.25242910_wp, & + & -79.80708289_wp, -8.87879191_wp, -59.29701630_wp, -79.93353847_wp, & + & -7.85507432_wp, -57.85753766_wp, -78.44097940_wp, -8.75084274_wp, & + & -58.18104204_wp, -78.46406934_wp, -10.04567653_wp, -55.67652255_wp, & + & -77.90500937_wp, -9.85814679_wp, -54.35486307_wp, -76.38656622_wp, & + & -9.77567276_wp, -54.52903265_wp, -75.85008442_wp, -10.14120066_wp, & + & -55.57092568_wp, -77.78010665_wp, -10.32363765_wp, -56.37361073_wp, & + & -78.29942138_wp, -8.92809772_wp, -53.93207474_wp, -78.25772364_wp, & + & -11.02844921_wp, -53.42987254_wp, -79.33903025_wp, -11.10213426_wp, & + & -53.34973352_wp, -77.86695687_wp, -11.95742069_wp, -53.83715573_wp, & + & -77.83986388_wp, -10.86908831_wp, -52.44087635_wp, -87.31733165_wp, & + & -10.76142319_wp, -61.65285277_wp, -85.87437856_wp, -10.70065305_wp, & + & -61.56131023_wp, -85.53522099_wp, -10.55130845_wp, -60.07623989_wp, & + & -86.39444273_wp, -10.22551904_wp, -59.26224611_wp, -87.79313794_wp, & + & -10.45473614_wp, -60.80991601_wp, -85.45414886_wp, -11.62768693_wp, & + & -61.96538561_wp, -85.31744772_wp, -9.50497096_wp, -62.34226862_wp, & + & -85.59988521_wp, -9.60267665_wp, -63.38712954_wp, -85.72683703_wp, & + & -8.57830986_wp, -61.94816639_wp, -84.23485801_wp, -9.47576174_wp, & + & -62.26972077_wp, -84.26175654_wp, -10.77040193_wp, -59.76521644_wp, & + & -83.70325187_wp, -10.58257795_wp, -58.44338689_wp, -82.18459383_wp, & + & -10.50213585_wp, -58.61681548_wp, -81.64797699_wp, -10.86939798_wp, & + & -59.65803566_wp, -83.57742684_wp, -11.04918209_wp, -60.46165346_wp, & + & -84.09663047_wp, -9.65168484_wp, -58.02148228_wp, -84.05792827_wp, & + & -11.75169645_wp, -57.51765881_wp, -85.13936527_wp, -11.82381810_wp, & + & -57.43786619_wp, -83.66830273_wp, -12.68151675_wp, -57.92410488_wp, & + & -83.64021712_wp, -11.59216509_wp, -56.52861919_wp, -93.10614229_wp, & + & -11.46842356_wp, -65.75693099_wp, -91.66341592_wp, -11.41012715_wp, & + & -65.66063317_wp, -91.32835601_wp, -11.26099721_wp, -64.17461074_wp, & + & -92.18889141_wp, -10.93224344_wp, -63.36324245_wp, -93.58457040_wp, & + & -11.15930467_wp, -64.91642116_wp, -91.24380018_wp, -12.33816303_wp, & + & -66.06305233_wp, -91.10165742_wp, -10.21589657_wp, -66.44032914_wp, & + & -91.38133668_wp, -10.31331962_wp, -67.48595578_wp, -91.51006019_wp, & + & -9.28819357_wp, -66.04766263_wp, -90.01921124_wp, -10.18912502_wp, & + & -66.36472409_wp, -90.05636202_wp, -11.48391333_wp, -63.86025956_wp, & + & -89.49959442_wp, -11.29771809_wp, -62.53751665_wp, -87.98045414_wp, & + & -11.22119946_wp, -62.70890029_wp, -87.44344553_wp, -11.58982102_wp, & + & -63.74944383_wp, -89.37156978_wp, -11.76510770_wp, -64.55529115_wp, & + & -89.89110055_wp, -10.36584881_wp, -62.11604286_wp, -89.85862940_wp, & + & -12.46608270_wp, -61.61251627_wp, -90.94038217_wp, -12.53616566_wp, & + & -61.53520267_wp, -89.46981879_wp, -13.39668292_wp, -62.01796105_wp, & + & -89.44291675_wp, -12.30724576_wp, -60.62252267_wp, -98.88521369_wp, & + & -12.20832379_wp, -69.87214810_wp, -97.44300331_wp, -12.13938721_wp, & + & -69.77474450_wp, -97.11045777_wp, -11.98305729_wp, -68.28892528_wp, & + & -97.97367930_wp, -11.65526955_wp, -67.48000321_wp, -99.36658996_wp, & + & -11.89513021_wp, -69.03484273_wp, -97.01661783_wp, -13.06557024_wp, & + & -70.17420498_wp, -96.88909702_wp, -10.94332512_wp, -70.55727517_wp, & + & -97.16674047_wp, -11.04556882_wp, -71.60297334_wp, -97.30457994_wp, & + & -10.01751837_wp, -70.16757565_wp, -95.80696376_wp, -10.90854099_wp, & + & -70.48038088_wp, -95.83786049_wp, -12.19835855_wp, -67.97169085_wp, & + & -95.28550076_wp, -12.00620910_wp, -66.64788563_wp, -93.76584733_wp, & + & -11.93054728_wp, -66.81415563_wp, -93.22518421_wp, -12.30197596_wp, & + & -67.85181013_wp, -95.15023705_wp, -12.47976997_wp, -68.66381938_wp, & + & -95.67838477_wp, -11.07245870_wp, -66.23185146_wp, -95.64789692_wp, & + & -13.17049870_wp, -65.71906297_wp, -96.72990577_wp, -13.23911211_wp, & + & -65.64408776_wp, -95.25915634_wp, -14.10307295_wp, -66.12004411_wp, & + & -95.23435711_wp, -13.00824920_wp, -64.72871626_wp, -104.64946570_wp, & + & -12.96730332_wp, -73.99526259_wp, -103.20682188_wp, -12.92299852_wp, & + & -73.89118932_wp, -102.87847907_wp, -12.75188139_wp, -72.40608079_wp, & + & -103.74052899_wp, -12.40310432_wp, -71.60476892_wp, -105.12941973_wp, & + & -12.62877060_wp, -73.16706558_wp, -102.79541484_wp, -13.86227265_wp, & + & -74.27547561_wp, -102.62809935_wp, -11.74787736_wp, -74.68741293_wp, & + & -102.90281838_wp, -11.85946191_wp, -75.73292820_wp, -103.02884070_wp, & + & -10.80960026_wp, -74.31228802_wp, -101.54585976_wp, -11.73092957_wp, & + & -74.60595159_wp, -101.60997147_wp, -12.97939508_wp, -72.08090658_wp, & + & -101.05961900_wp, -12.77371718_wp, -70.75840767_wp, -99.54039984_wp, & + & -12.68821613_wp, -70.92428731_wp, -98.99595840_wp, -13.06761022_wp, & + & -71.95705211_wp, -100.92252140_wp, -13.27335275_wp, -72.76786680_wp, & + & -101.46012796_wp, -11.84010723_wp, -70.34956393_wp, -101.41384164_wp, & + & -13.93448970_wp, -69.82204404_wp, -102.49530570_wp, -14.01009080_wp, & + & -69.74595640_wp, -101.01896729_wp, -14.86687754_wp, -70.21744659_wp, & + & -101.00081652_wp, -13.76327922_wp, -68.83297064_wp, -110.39533652_wp, & + & -13.57957882_wp, -78.14900125_wp, -108.95421513_wp, -13.63368496_wp, & + & -78.03063866_wp, -108.62819459_wp, -13.43442000_wp, -76.54839418_wp, & + & -109.47427678_wp, -13.00913207_wp, -75.76725188_wp, -110.85577889_wp, & + & -13.16859255_wp, -77.34279248_wp, -108.60809165_wp, -14.61316879_wp, & + & -78.37713863_wp, -108.28695965_wp, -12.53187806_wp, -78.86148536_wp, & + & -108.55956636_wp, -12.66154656_wp, -79.90545057_wp, -108.62344384_wp, & + & -11.55473689_wp, -78.52449596_wp, -107.20690347_wp, -12.58771300_wp, & + & -78.76860597_wp, -107.37912679_wp, -13.72876634_wp, -76.20196400_wp, & + & -106.82982612_wp, -13.50745044_wp, -74.88168548_wp, -105.30826780_wp, & + & -13.45740683_wp, -75.04056992_wp, -104.76588645_wp, -13.87092790_wp, & + & -76.06115868_wp, -106.70231235_wp, -14.07566408_wp, -76.87433399_wp, & + & -107.21296396_wp, -12.55698348_wp, -74.49586151_wp, -107.21390091_wp, & + & -14.64057077_wp, -73.92351339_wp, -108.29700617_wp, -14.69033247_wp, & + & -73.84989549_wp, -106.83884246_wp, -15.58952189_wp, -74.29827899_wp, & + & -106.80042815_wp, -14.45878489_wp, -72.93647970_wp, -116.17830887_wp, & + & -14.17588926_wp, -82.26762409_wp, -114.74046909_wp, -14.28279060_wp, & + & -82.14638716_wp, -114.39917967_wp, -13.98701095_wp, -80.68390340_wp, & + & -115.21938668_wp, -13.46059732_wp, -79.93763492_wp, -116.61650791_wp, & + & -13.66800940_wp, -81.50572389_wp, -114.43916651_wp, -15.29973392_wp, & + & -82.41857484_wp, -114.03116993_wp, -13.27623669_wp, -83.05916400_wp, & + & -114.30661343_wp, -13.47780930_wp, -84.09090761_wp, -114.33180408_wp, & + & -12.26370501_wp, -82.80225778_wp, -112.95410506_wp, -13.36437843_wp, & + & -82.95696004_wp, -113.16543860_wp, -14.31757322_wp, -80.31552517_wp, & + & -112.60356850_wp, -14.02787501_wp, -79.01378154_wp, -111.08197002_wp, & + & -14.09096141_wp, -79.16580895_wp, -110.56538715_wp, -14.60275191_wp, & + & -80.15472577_wp, -112.50871532_wp, -14.74816665_wp, -80.95885014_wp, & + & -112.92166399_wp, -13.02562261_wp, -78.70766958_wp, -113.06438649_wp, & + & -15.05106921_wp, -77.96957715_wp, -114.14810820_wp, -15.01747463_wp, & + & -77.89558654_wp, -112.75876373_wp, -16.05106086_wp, -78.26663881_wp, & + & -112.63647088_wp, -14.82191487_wp, -76.99863571_wp, -121.93190803_wp, & + & -14.74263285_wp, -86.38775742_wp, -120.52265488_wp, -15.01452752_wp, & + & -86.20475478_wp, -120.17057564_wp, -14.58430482_wp, -84.77858054_wp, & + & -120.93129538_wp, -13.87687818_wp, -84.12481796_wp, -122.30925819_wp, & + & -14.07311771_wp, -85.72485586_wp, -120.35345752_wp, -16.08779218_wp, & + & -86.34077148_wp, -119.67152249_wp, -14.22897327_wp, -87.20874284_wp, & + & -119.95498486_wp, -14.51749653_wp, -88.21736086_wp, -119.83759124_wp, & + & -13.16195324_wp, -87.08420636_wp, -118.61730775_wp, -14.44354812_wp, & + & -87.06298597_wp, -118.99334540_wp, -15.01561442_wp, -84.33591633_wp, & + & -118.41017128_wp, -14.62284433_wp, -83.07146880_wp, -116.89358279_wp, & + & -14.76742544_wp, -83.21935887_wp, -116.40628455_wp, -15.40691611_wp, & + & -84.14675564_wp, -118.37752838_wp, -15.57741300_wp, -84.91481403_wp, & + & -118.68445451_wp, -13.58251050_wp, -82.86810222_wp, -118.90634900_wp, & + & -15.51740331_wp, -81.92998186_wp, -119.98701206_wp, -15.43140217_wp, & + & -81.85502020_wp, -118.64500005_wp, -16.55377275_wp, -82.12789089_wp, & + & -118.46113883_wp, -15.21231507_wp, -80.98805733_wp, -127.71977283_wp, & + & -15.36866738_wp, -90.46024971_wp, -126.35312781_wp, -15.76787852_wp, & + & -90.20327192_wp, -125.94598393_wp, -15.12107262_wp, -88.87697869_wp, & + & -126.61454157_wp, -14.21918363_wp, -88.38080517_wp, -128.00943945_wp, & + & -14.54383013_wp, -89.94473685_wp, -126.31580074_wp, -16.85989939_wp, & + & -90.13098704_wp, -125.41846327_wp, -15.29430972_wp, -91.32199928_wp, & + & -125.73744554_wp, -15.73586388_wp, -92.26234689_wp, -125.45734025_wp, & + & -14.21126963_wp, -91.40685410_wp, -124.39647535_wp, -15.59818942_wp, & + & -91.11758664_wp, -124.82661122_wp, -15.59663735_wp, -88.33976363_wp, & + & -124.19999164_wp, -15.04805870_wp, -87.15660108_wp, -122.71303636_wp, & + & -15.40139838_wp, -87.23855641_wp, -122.30569206_wp, -16.24743428_wp, & + & -88.02900212_wp, -124.28269963_wp, -16.32462139_wp, -88.79168748_wp, & + & -124.34245122_wp, -13.96231751_wp, -87.15667658_wp, -124.80665491_wp, & + & -15.64498100_wp, -85.88167102_wp, -125.86744464_wp, -15.41114822_wp, & + & -85.85018132_wp, -124.68044242_wp, -16.72467059_wp, -85.87860603_wp, & + & -124.32686200_wp, -15.22882828_wp, -85.00121914_wp, -133.45926807_wp, & + & -15.92346967_wp, -94.57166439_wp, -132.19467544_wp, -16.49061812_wp, & + & -94.15652153_wp, -131.70435811_wp, -15.66120045_wp, -92.96675325_wp, & + & -132.20345193_wp, -14.57079485_wp, -92.70588966_wp, -133.58583021_wp, & + & -14.95547101_wp, -94.29533328_wp, -132.36303966_wp, -17.53167763_wp, & + & -93.86219625_wp, -131.16367623_wp, -16.43380612_wp, -95.28913042_wp, & + & -131.53402034_wp, -17.00227704_wp, -96.13793314_wp, -131.00275823_wp, & + & -15.40328332_wp, -95.59520722_wp, -130.21871964_wp, -16.85870308_wp, & + & -94.96454952_wp, -130.70833849_wp, -16.20615521_wp, -92.27388197_wp, & + & -130.01149567_wp, -15.53410062_wp, -91.19877485_wp, -128.58061881_wp, & + & -16.07751274_wp, -91.18476015_wp, -128.28568627_wp, -17.10290995_wp, & + & -91.79124711_wp, -130.28995639_wp, -17.08881177_wp, -92.54789651_wp, & + & -130.01745959_wp, -14.45818797_wp, -91.40139891_wp, -130.68339035_wp, & + & -15.80846122_wp, -89.84872426_wp, -131.70677088_wp, -15.44452234_wp, & + & -89.87968671_wp, -130.69227580_wp, -16.87655104_wp, -89.64712894_wp, & + & -130.15182044_wp, -15.30087399_wp, -89.04972915_wp, -139.21560976_wp, & + & -16.50451152_wp, -98.62651003_wp, -138.09995229_wp, -17.16129950_wp, & + & -97.98187375_wp, -137.44443143_wp, -16.13601762_wp, -97.05384115_wp, & + & -137.68668161_wp, -14.93772000_wp, -97.15596731_wp, -139.12486754_wp, & + & -15.49712642_wp, -98.69055520_wp, -138.48751603_wp, -18.01211866_wp, & + & -97.41182251_wp, -137.07669776_wp, -17.65229753_wp, -99.01246533_wp, & + & -137.55940482_wp, -18.35485134_wp, -99.68687729_wp, -136.69831557_wp, & + & -16.81271064_wp, -99.59035806_wp, -136.24585170_wp, -18.14777384_wp, & + & -98.51917345_wp, -136.60065253_wp, -16.64969850_wp, -96.16197731_wp, & + & -135.76234932_wp, -15.85503325_wp, -95.29089035_wp, -134.45884815_wp, & + & -16.63196637_wp, -95.09006886_wp, -134.37731791_wp, -17.82146680_wp, & + & -95.38046073_wp, -136.38358808_wp, -17.64035304_wp, -96.15197764_wp, & + & -135.57253464_wp, -14.89369238_wp, -95.77898128_wp, -136.43858828_wp, & + & -15.62437700_wp, -93.93480324_wp, -137.37332985_wp, -15.09204971_wp, & + & -94.08781265_wp, -136.64730545_wp, -16.57801433_wp, -93.45658695_wp, & + & -135.79772626_wp, -15.03533583_wp, -93.28579672_wp, -143.60658750_wp, & + & -18.36840379_wp, -103.28865534_wp, -143.19514982_wp, -18.56309071_wp, & + & -101.90781786_wp, -142.29303663_wp, -17.41156579_wp, -101.48087373_wp, & + & -141.49102424_wp, -16.89788402_wp, -102.25479314_wp, -142.82762642_wp, & + & -17.96230889_wp, -103.80085537_wp, -144.09698344_wp, -18.58302383_wp, & + & -101.28550090_wp, -142.37814996_wp, -19.84662655_wp, -101.66587518_wp, & + & -142.98924334_wp, -20.72346450_wp, -101.86481920_wp, -141.51244818_wp, & + & -19.85679203_wp, -102.32677693_wp, -142.01978682_wp, -19.88499856_wp, & + & -100.63914218_wp, -142.43135636_wp, -17.02364934_wp, -100.20333800_wp, & + & -141.43152876_wp, -16.20553716_wp, -99.54869365_wp, -140.33775674_wp, & + & -17.12670721_wp, -98.98740666_wp, -140.50730868_wp, -18.33718019_wp, & + & -98.88149273_wp, -142.99795717_wp, -17.59274040_wp, -99.59068438_wp, & + & -140.99418309_wp, -15.56316964_wp, -100.31945645_wp, -142.05988923_wp, & + & -15.38055762_wp, -98.42949716_wp, -142.84763706_wp, -14.75223439_wp, & + & -98.83396764_wp, -142.48300381_wp, -16.03952200_wp, -97.67500310_wp, & + & -141.31054726_wp, -14.75032589_wp, -97.96007819_wp, -143.82639178_wp, & + & -19.26260635_wp, -103.71354823_wp, 4.29699790_wp, -1.61542983_wp, & + & 4.53116785_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_52 + +subroutine polyala_56(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 563 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.73273268_wp, -0.27347349_wp, -0.19638845_wp, 0.36578410_wp, & + & 0.55111256_wp, 0.25777719_wp, 1.44297141_wp, -0.37899534_wp, & + & 0.81891599_wp, 1.17748635_wp, -1.52356750_wp, 1.16737603_wp, & + & -0.89625845_wp, -1.09854736_wp, 0.36739186_wp, 0.73859587_wp, & + & 1.11225361_wp, -0.60456615_wp, -0.08937972_wp, 1.50812850_wp, & + & 1.36462058_wp, -0.85736972_wp, 2.17269274_wp, 0.97950517_wp, & + & -0.49327927_wp, 0.94088459_wp, 2.19967691_wp, 0.74607257_wp, & + & 2.09835050_wp, 1.72804843_wp, 2.67164791_wp, 0.14777567_wp, & + & 0.88014065_wp, 3.73688626_wp, -0.51088708_wp, 1.60499272_wp, & + & 3.54941555_wp, -0.28049766_wp, 3.10346657_wp, 2.70507007_wp, & + & 0.45258201_wp, 3.56688912_wp, 2.79592899_wp, 1.12949934_wp, & + & 0.67948333_wp, 3.63995188_wp, -1.58928124_wp, 1.43371661_wp, & + & 5.10365518_wp, -0.01242391_wp, 1.14817777_wp, 5.22484975_wp, & + & -0.19862301_wp, 0.08571962_wp, 5.19972838_wp, 1.05366853_wp, & + & 1.33843503_wp, 5.88144745_wp, -0.53870936_wp, 1.69250869_wp, & + & 4.40724999_wp, -0.96648421_wp, 3.82659964_wp, -6.34701381_wp, & + & -0.89624031_wp, -4.40029424_wp, -5.06723787_wp, -0.26408587_wp, & + & -4.16477786_wp, -4.39570953_wp, -1.02537745_wp, -3.01970937_wp, & + & -5.03198781_wp, -1.80191390_wp, -2.31413933_wp, -6.69430441_wp, & + & -1.43093617_wp, -3.61128660_wp, -4.47202662_wp, -0.33522488_wp, & + & -5.08104279_wp, -5.24195763_wp, 1.20849837_wp, -3.77620926_wp, & + & -5.73839586_wp, 1.73420421_wp, -4.58733851_wp, -5.84915265_wp, & + & 1.28736663_wp, -2.87801398_wp, -4.27724907_wp, 1.67172165_wp, & + & -3.59278001_wp, -3.10086900_wp, -0.76424657_wp, -2.85778829_wp, & + & -2.31335525_wp, -1.24314951_wp, -1.74280450_wp, -1.31854522_wp, & + & -0.13654103_wp, -1.38491474_wp, -1.09309965_wp, 0.78899103_wp, & + & -2.15770995_wp, -2.63108893_wp, -0.06655397_wp, -3.42425558_wp, & + & -2.99018085_wp, -1.44456806_wp, -0.90625399_wp, -1.54895559_wp, & + & -2.51909849_wp, -2.11365024_wp, -2.25831213_wp, -3.30048521_wp, & + & -2.37190787_wp, -0.90274957_wp, -2.33031096_wp, -2.96710814_wp, & + & -0.94079883_wp, -2.85527033_wp, -1.27897183_wp, -12.11735078_wp, & + & -1.33371280_wp, -8.48013307_wp, -10.73690193_wp, -0.91936817_wp, & + & -8.35496711_wp, -10.22618474_wp, -1.47349879_wp, -7.02270751_wp, & + & -11.00309909_wp, -1.90182719_wp, -6.17464630_wp, -12.55452640_wp, & + & -1.57615301_wp, -7.59712496_wp, -10.17036418_wp, -1.33900249_wp, & + & -9.19283972_wp, -10.61453727_wp, 0.60850275_wp, -8.36430447_wp, & + & -11.00408708_wp, 0.99103998_wp, -9.30384176_wp, -11.18635914_wp, & + & 1.03337569_wp, -7.54330225_wp, -9.57558500_wp, 0.90760217_wp, & + & -8.26459392_wp, -8.90582638_wp, -1.43452500_wp, -6.86815233_wp, & + & -8.22523939_wp, -1.77537843_wp, -5.63780998_wp, -6.95200478_wp, & + & -0.92747013_wp, -5.58443075_wp, -6.53756044_wp, -0.34263726_wp, & + & -6.58058253_wp, -8.30078590_wp, -1.02681612_wp, -7.57317768_wp, & + & -8.88621047_wp, -1.53623679_wp, -4.79822579_wp, -7.86301537_wp, & + & -3.26420667_wp, -5.60062010_wp, -8.77369402_wp, -3.85397729_wp, & + & -5.66078021_wp, -7.22245337_wp, -3.51339812_wp, -6.44269207_wp, & + & -7.34549814_wp, -3.50687886_wp, -4.67754037_wp, -17.87339418_wp, & + & -2.01942836_wp, -12.60574108_wp, -16.46441489_wp, -1.70613373_wp, & + & -12.50620786_wp, -16.05388633_wp, -1.96880923_wp, -11.05505211_wp, & + & -16.89682622_wp, -2.10793700_wp, -10.17380809_wp, -18.35696483_wp, & + & -2.02171641_wp, -11.71356975_wp, -15.91249274_wp, -2.35952031_wp, & + & -13.18994573_wp, -16.19651431_wp, -0.24097773_wp, -12.86770006_wp, & + & -16.51904574_wp, -0.06258561_wp, -13.88996369_wp, -16.75013528_wp, & + & 0.41501204_wp, -12.20082466_wp, -15.13720896_wp, -0.01737512_wp, & + & -12.78745378_wp, -14.74224464_wp, -2.01158444_wp, -10.84163825_wp, & + & -14.13687684_wp, -2.13421032_wp, -9.53329687_wp, -12.72654328_wp, & + & -1.54994725_wp, -9.64219584_wp, -12.21722979_wp, -1.32273470_wp, & + & -10.73552223_wp, -14.07323415_wp, -1.86532954_wp, -11.59079928_wp, & + & -14.73698052_wp, -1.56659269_wp, -8.81428313_wp, -14.06218683_wp, & + & -3.60064830_wp, -9.09311762_wp, -15.06832024_wp, -4.00891954_wp, & + & -9.04861387_wp, -13.47682597_wp, -4.17531438_wp, -9.80631857_wp, & + & -13.60469125_wp, -3.68127344_wp, -8.11186733_wp, -23.56438977_wp, & + & -3.02015183_wp, -16.75682690_wp, -22.13259439_wp, -2.83026569_wp, & + & -16.66575594_wp, -21.78487253_wp, -2.82587559_wp, -15.17481186_wp, & + & -22.66088949_wp, -2.71767476_wp, -14.32175167_wp, -24.05565644_wp, & + & -2.84562637_wp, -15.88566137_wp, -21.63351482_wp, -3.66062456_wp, & + & -17.17658159_wp, -21.70656645_wp, -1.50602205_wp, -17.30907543_wp, & + & -21.99870671_wp, -1.51167025_wp, -18.35581052_wp, -22.19382387_wp, & + & -0.67337145_wp, -16.80823943_wp, -20.63029662_wp, -1.38034628_wp, & + & -17.24412556_wp, -20.48867397_wp, -2.92822642_wp, -14.89818540_wp, & + & -19.93336650_wp, -2.83559040_wp, -13.56537245_wp, -18.47015365_wp, & + & -2.41624563_wp, -13.72565654_wp, -17.91212862_wp, -2.47024018_wp, & + & -14.81755084_wp, -19.78810470_wp, -2.99354739_wp, -15.62983140_wp, & + & -20.49392542_wp, -2.08189664_wp, -13.00236936_wp, -20.01282764_wp, & + & -4.18223115_wp, -12.83737010_wp, -21.05450654_wp, -4.48190827_wp, & + & -12.75936915_wp, -19.46541065_wp, -4.93966771_wp, -13.39252610_wp, & + & -19.59311487_wp, -4.10086647_wp, -11.83945769_wp, -29.30185302_wp, & + & -3.82763291_wp, -20.88018315_wp, -27.85941078_wp, -3.76255023_wp, & + & -20.78413972_wp, -27.52331558_wp, -3.67068819_wp, -19.29354990_wp, & + & -28.38949838_wp, -3.40312379_wp, -18.46587663_wp, -29.77996024_wp, & + & -3.55313118_wp, -20.02748150_wp, -27.43365028_wp, -4.67112041_wp, & + & -21.22296163_wp, -27.30877706_wp, -2.53512491_wp, -21.51892928_wp, & + & -27.58284167_wp, -2.59900519_wp, -22.56862521_wp, -27.73020807_wp, & + & -1.62663451_wp, -21.09637131_wp, -26.22696398_wp, -2.49711185_wp, & + & -21.43758137_wp, -26.24572366_wp, -3.87717418_wp, -18.99014787_wp, & + & -25.69184913_wp, -3.71467835_wp, -17.66313434_wp, -24.19083139_wp, & + & -3.47152737_wp, -17.83882329_wp, -23.63303088_wp, -3.70738137_wp, & + & -18.90652481_wp, -25.55091529_wp, -4.08158949_wp, -19.70145613_wp, & + & -26.17251503_wp, -2.85469805_wp, -17.18498089_wp, -25.91786244_wp, & + & -4.96667613_wp, -16.80821651_wp, -26.98560754_wp, -5.15084416_wp, & + & -16.72463490_wp, -25.44355403_wp, -5.82726349_wp, -17.27285628_wp, & + & -25.50444335_wp, -4.82668085_wp, -15.81427132_wp, -35.08985767_wp, & + & -4.48425649_wp, -24.99032745_wp, -33.64633474_wp, -4.44219858_wp, & + & -24.89734268_wp, -33.30780505_wp, -4.30766924_wp, -23.41057267_wp, & + & -34.16621392_wp, -3.98377694_wp, -22.59487859_wp, -35.56173792_wp, & + & -4.17837582_wp, -24.14479878_wp, -33.23734527_wp, -5.37189842_wp, & + & -25.30687526_wp, -33.07403680_wp, -3.24876653_wp, -25.67045953_wp, & + & -33.35436953_wp, -3.33824841_wp, -26.71664212_wp, -33.47484479_wp, & + & -2.31972210_wp, -25.27318494_wp, -31.99141247_wp, -3.23128819_wp, & + & -25.59461507_wp, -32.03669258_wp, -4.53879350_wp, -23.09870410_wp, & + & -31.48027722_wp, -4.36067102_wp, -21.77459897_wp, -29.96160119_wp, & + & -4.27212224_wp, -21.94488547_wp, -29.42223520_wp, -4.61547098_wp, & + & -22.99278684_wp, -31.35129354_wp, -4.80981896_wp, -23.79711509_wp, & + & -31.87724968_wp, -3.43424567_wp, -21.34604646_wp, -31.83377044_wp, & + & -5.53756288_wp, -20.85840735_wp, -32.91522105_wp, -5.61423658_wp, & + & -20.78302221_wp, -31.43920387_wp, -6.46327910_wp, -21.26929091_wp, & + & -31.42059101_wp, -5.38333898_wp, -19.86657651_wp, -40.89905166_wp, & + & -5.12101969_wp, -29.07555111_wp, -39.45533005_wp, -5.07891962_wp, & + & -28.98692018_wp, -39.11168843_wp, -4.93638168_wp, -27.50220661_wp, & + & -39.96505118_wp, -4.60018873_wp, -26.68628560_wp, -41.36898806_wp, & + & -4.80784843_wp, -28.23169850_wp, -39.04803102_wp, -6.01083351_wp, & + & -29.39302083_wp, -38.88415093_wp, -3.88953465_wp, -29.76714232_wp, & + & -39.17014743_wp, -3.98165720_wp, -30.81153336_wp, -39.28014054_wp, & + & -2.95810233_wp, -29.37060476_wp, -37.80110663_wp, -3.87509362_wp, & + & -29.69691502_wp, -37.84095582_wp, -5.17378925_wp, -27.19350336_wp, & + & -37.27845416_wp, -4.99578017_wp, -25.87207861_wp, -35.75908874_wp, & + & -4.93424302_wp, -26.04669053_wp, -35.22782219_wp, -5.30485752_wp, & + & -27.08945100_wp, -37.16133858_wp, -5.45940397_wp, -27.89173828_wp, & + & -37.65955337_wp, -4.06087099_wp, -25.44776720_wp, -37.64671791_wp, & + & -6.16228175_wp, -24.94829360_wp, -38.72894272_wp, -6.22258741_wp, & + & -24.86938875_wp, -37.26700835_wp, -7.09577596_wp, -25.35571858_wp, & + & -37.22809758_wp, -6.00882313_wp, -23.95866485_wp, -46.71725846_wp, & + & -5.80224785_wp, -33.14480713_wp, -45.27370197_wp, -5.74736056_wp, & + & -33.05932473_wp, -44.92755724_wp, -5.59695206_wp, -31.57604642_wp, & + & -45.78115460_wp, -5.26337130_wp, -30.75931609_wp, -47.18851764_wp, & + & -5.49009666_wp, -32.30136806_wp, -44.85930208_wp, -6.67682224_wp, & + & -33.46381873_wp, -44.71471333_wp, -4.55523833_wp, -33.84424198_wp, & + & -45.00096826_wp, -4.65354682_wp, -34.88799508_wp, -45.11909091_wp, & + & -3.62632033_wp, -33.45027153_wp, -43.63178585_wp, -4.53029629_wp, & + & -33.77521177_wp, -43.65422623_wp, -5.82366906_wp, -31.26974873_wp, & + & -43.08950174_wp, -5.63763079_wp, -29.95036280_wp, -41.57057021_wp, & + & -5.57641710_wp, -30.12824205_wp, -41.04110429_wp, -5.95273590_wp, & + & -31.16985937_wp, -42.97515142_wp, -6.11064698_wp, -31.96796467_wp, & + & -43.47026418_wp, -4.70045189_wp, -29.53077551_wp, -43.45511885_wp, & + & -6.79889959_wp, -29.01897333_wp, -44.53706043_wp, -6.85776272_wp, & + & -28.93538699_wp, -43.07793628_wp, -7.73484794_wp, -29.42313102_wp, & + & -43.03225294_wp, -6.64062155_wp, -28.03191658_wp, -52.52830741_wp, & + & -6.51769441_wp, -37.21637603_wp, -51.08486002_wp, -6.46234779_wp, & + & -37.12839926_wp, -50.74143148_wp, -6.30674150_wp, -35.64492305_wp, & + & -51.59709839_wp, -5.97298858_wp, -34.83043949_wp, -53.00096572_wp, & + & -6.20684451_wp, -36.37319773_wp, -50.66943284_wp, -7.39330870_wp, & + & -37.52844573_wp, -50.52424580_wp, -5.27330804_wp, -37.91679735_wp, & + & -50.81073241_wp, -5.37440961_wp, -38.96022945_wp, -50.92720667_wp, & + & -4.34258563_wp, -37.52563530_wp, -49.44126179_wp, -5.24972765_wp, & + & -37.84804702_wp, -49.46812562_wp, -6.53010640_wp, -35.33613059_wp, & + & -48.90460356_wp, -6.33849188_wp, -34.01700108_wp, -47.38620358_wp, & + & -6.26562085_wp, -34.19567570_wp, -46.85454454_wp, -6.64053325_wp, & + & -35.23670224_wp, -48.78713489_wp, -6.81524991_wp, -36.03326699_wp, & + & -49.29276367_wp, -5.40415449_wp, -33.59794382_wp, -49.26059022_wp, & + & -7.50222768_wp, -33.08495935_wp, -50.34199581_wp, -7.57017249_wp, & + & -33.00131419_wp, -48.87555830_wp, -8.43518157_wp, -33.48863684_wp, & + & -48.83905371_wp, -7.33986464_wp, -32.09799460_wp, -58.33318412_wp, & + & -7.21981887_wp, -41.29913561_wp, -56.88983039_wp, -7.16614323_wp, & + & -41.20899442_wp, -56.54855290_wp, -7.01450553_wp, -39.72451361_wp, & + & -57.40531530_wp, -6.68170111_wp, -38.91078432_wp, -58.80647833_wp, & + & -6.90866295_wp, -40.45640983_wp, -56.47466590_wp, -8.09632539_wp, & + & -41.61103915_wp, -56.32715268_wp, -5.97523023_wp, -41.99312180_wp, & + & -56.61332833_wp, -6.07225461_wp, -43.03702774_wp, -56.72894492_wp, & + & -5.04527950_wp, -41.59892487_wp, -55.24416506_wp, -5.95343234_wp, & + & -41.92384324_wp, -55.27598714_wp, -7.23967395_wp, -39.41403932_wp, & + & -54.71449091_wp, -7.05102698_wp, -38.09355596_wp, -53.19569263_wp, & + & -6.97802647_wp, -38.26958986_wp, -52.66258548_wp, -7.35026283_wp, & + & -39.31083651_wp, -54.59403538_wp, -7.52375162_wp, -40.11067202_wp, & + & -55.10305356_wp, -6.11741635_wp, -37.67323709_wp, -55.07259952_wp, & + & -8.21653933_wp, -37.16459013_wp, -56.15412551_wp, -8.28253007_wp, & + & -37.08084834_wp, -54.68960775_wp, -9.14916845_wp, -37.57093538_wp, & + & -54.65045263_wp, -8.05781524_wp, -36.17730047_wp, -64.13986345_wp, & + & -7.91992398_wp, -45.38111124_wp, -62.69641918_wp, -7.86541326_wp, & + & -45.29234243_wp, -62.35388556_wp, -7.71448699_wp, -43.80813225_wp, & + & -63.21055615_wp, -7.38414371_wp, -42.99326644_wp, -64.61255175_wp, & + & -7.61021234_wp, -44.53751412_wp, -62.28119899_wp, -8.79521396_wp, & + & -45.69525992_wp, -62.13545486_wp, -6.67393743_wp, -46.07679121_wp, & + & -62.41918091_wp, -6.77313472_wp, -47.12116252_wp, -62.54085919_wp, & + & -5.74469115_wp, -45.68465286_wp, -61.05270015_wp, -6.64882385_wp, & + & -46.00521592_wp, -61.08061186_wp, -7.93730129_wp, -43.49878999_wp, & + & -60.51939284_wp, -7.74861607_wp, -42.17816143_wp, -59.00030636_wp, & + & -7.67883442_wp, -42.35308470_wp, -58.46706877_wp, -8.05179461_wp, & + & -43.39399791_wp, -60.39859763_wp, -8.22079600_wp, -44.19558059_wp, & + & -60.90601914_wp, -6.81355092_wp, -41.75920685_wp, -60.88102831_wp, & + & -8.91193087_wp, -41.24784925_wp, -61.96283944_wp, -8.97609865_wp, & + & -41.16634519_wp, -60.49855936_wp, -9.84591500_wp, -41.65155768_wp, & + & -60.46085984_wp, -8.75187186_wp, -40.25993463_wp, -69.94481288_wp, & + & -8.62559193_wp, -49.46415287_wp, -68.50152865_wp, -8.57015624_wp, & + & -49.37410245_wp, -68.16026258_wp, -8.41876146_wp, -47.88966402_wp, & + & -69.01768532_wp, -8.08895865_wp, -47.07538492_wp, -70.41848620_wp, & + & -8.31607502_wp, -48.62103659_wp, -68.08526455_wp, -9.49974429_wp, & + & -49.77643539_wp, -67.94057621_wp, -7.37843873_wp, -50.15822307_wp, & + & -68.22436876_wp, -7.47731660_wp, -51.20260520_wp, -68.34589346_wp, & + & -6.44928537_wp, -49.76576863_wp, -66.85781454_wp, -7.35341103_wp, & + & -50.08672719_wp, -66.88698863_wp, -8.64060022_wp, -47.57976747_wp, & + & -66.32591860_wp, -8.45197252_wp, -46.25912300_wp, -64.80704264_wp, & + & -8.37970725_wp, -46.43463976_wp, -64.27376261_wp, -8.75167382_wp, & + & -47.47591249_wp, -66.20452659_wp, -8.92346798_wp, -48.27640887_wp, & + & -66.71411831_wp, -7.51803428_wp, -45.83916246_wp, -66.68498225_wp, & + & -9.61693223_wp, -45.32983864_wp, -67.76665522_wp, -9.68409802_wp, & + & -45.24895172_wp, -66.29976898_wp, -10.54957039_wp, -45.73405640_wp, & + & -66.26575655_wp, -9.45648555_wp, -44.34158742_wp, -75.74389841_wp, & + & -9.32965378_wp, -53.55654414_wp, -74.30080976_wp, -9.27294681_wp, & + & -53.46447367_wp, -73.96192273_wp, -9.12106560_wp, -51.97951084_wp, & + & -74.82069023_wp, -8.79118423_wp, -51.16668647_wp, -76.21891900_wp, & + & -9.02000140_wp, -52.71423071_wp, -73.88313182_wp, -10.20223503_wp, & + & -53.86602061_wp, -73.73961242_wp, -8.08083831_wp, -54.24781680_wp, & + & -74.02189524_wp, -8.17986349_wp, -55.29258947_wp, -74.14605974_wp, & + & -7.15196436_wp, -53.85587286_wp, -72.65696393_wp, -8.05510792_wp, & + & -54.17481061_wp, -72.68908426_wp, -9.34254550_wp, -51.66762254_wp, & + & -72.13003931_wp, -9.15453178_wp, -50.34604003_wp, -70.61084147_wp, & + & -9.08336504_wp, -50.51927017_wp, -70.07636117_wp, -9.45434243_wp, & + & -51.56028485_wp, -72.00563060_wp, -9.62559859_wp, -52.36322528_wp, & + & -72.51791622_wp, -8.22018619_wp, -49.92665112_wp, -72.49196323_wp, & + & -10.31912216_wp, -49.41742756_wp, -73.57385149_wp, -10.38478527_wp, & + & -49.33813320_wp, -72.10748111_wp, -11.25224052_wp, -49.82122470_wp, & + & -72.07397294_wp, -10.15943019_wp, -48.42853833_wp, -81.54352525_wp, & + & -10.03632166_wp, -57.64730392_wp, -80.10025054_wp, -9.98104845_wp, & + & -57.55619490_wp, -79.76001128_wp, -9.82892722_wp, -56.07158255_wp, & + & -80.61801940_wp, -9.49887746_wp, -55.25803288_wp, -82.01781906_wp, & + & -9.72620673_wp, -56.80476994_wp, -79.68386223_wp, -10.91096217_wp, & + & -57.95764755_wp, -79.53851158_wp, -8.78990162_wp, -58.34060480_wp, & + & -79.82154848_wp, -8.88934863_wp, -59.38513490_wp, -79.94392952_wp, & + & -7.86044072_wp, -57.94898493_wp, -78.45579754_wp, -8.76502090_wp, & + & -58.26832395_wp, -78.48688225_wp, -10.05033774_wp, -55.76053447_wp, & + & -77.92768720_wp, -9.86228854_wp, -54.43900332_wp, -76.40856117_wp, & + & -9.78917707_wp, -54.61182206_wp, -75.87302415_wp, -10.16045721_wp, & + & -55.65214867_wp, -77.80386100_wp, -10.33358193_wp, -56.45641379_wp, & + & -78.31689720_wp, -8.92875316_wp, -54.01908075_wp, -78.28770517_wp, & + & -11.02794716_wp, -53.51095121_wp, -79.36946659_wp, -11.09544963_wp, & + & -53.43158745_wp, -77.90165577_wp, -11.96021789_wp, -53.91521917_wp, & + & -77.86987373_wp, -10.86802080_wp, -52.52202609_wp, -87.34163399_wp, & + & -10.73716426_wp, -61.74193016_wp, -85.89841994_wp, -10.68274463_wp, & + & -61.64910120_wp, -85.55965034_wp, -10.53149658_wp, -60.16399894_wp, & + & -86.41816634_wp, -10.20048735_wp, -59.35138328_wp, -87.81670198_wp, & + & -10.42674231_wp, -60.89994552_wp, -85.48207079_wp, -11.61258704_wp, & + & -62.05072395_wp, -85.33515173_wp, -9.49128937_wp, -62.43197070_wp, & + & -85.61671515_wp, -9.58990070_wp, -63.47697744_wp, -85.74081943_wp, & + & -8.56195342_wp, -62.04030303_wp, -84.25253100_wp, -9.46682179_wp, & + & -62.35810033_wp, -84.28713427_wp, -10.75462176_wp, -59.85162283_wp, & + & -83.72828839_wp, -10.56611885_wp, -58.52995045_wp, -82.20896937_wp, & + & -10.49501168_wp, -58.70247500_wp, -81.67387319_wp, -10.86690342_wp, & + & -59.74282592_wp, -83.60374137_wp, -11.03833530_wp, -60.54698124_wp, & + & -84.11640003_wp, -9.63165534_wp, -58.11105397_wp, -84.09025086_wp, & + & -11.73036867_wp, -57.60091510_wp, -85.17212565_wp, -11.79606575_wp, & + & -57.52155864_wp, -83.70569612_wp, -12.66363008_wp, -58.00431493_wp, & + & -83.67223820_wp, -11.57023830_wp, -56.61209590_wp, -93.13808865_wp, & + & -11.43406135_wp, -65.83960120_wp, -91.69480889_wp, -11.38148667_wp, & + & -65.74669780_wp, -91.35623919_wp, -11.22961724_wp, -64.26156341_wp, & + & -92.21480009_wp, -10.89756314_wp, -63.44941284_wp, -93.61272784_wp, & + & -11.12258619_wp, -64.99774693_wp, -91.27970678_wp, -12.31227947_wp, & + & -66.14742834_wp, -91.12974909_wp, -10.19157100_wp, -66.53058332_wp, & + & -91.41152925_wp, -10.29064972_wp, -67.57549182_wp, -91.53393519_wp, & + & -9.26125768_wp, -66.13971077_wp, -90.04708675_wp, -10.16874375_wp, & + & -66.45681807_wp, -90.08402280_wp, -11.45359191_wp, -63.94858697_wp, & + & -89.52586879_wp, -11.26591250_wp, -62.62649171_wp, -88.00635218_wp, & + & -11.19539985_wp, -62.79778604_wp, -87.47059308_wp, -11.56752072_wp, & + & -63.83770179_wp, -89.40066949_wp, -11.73831821_wp, -64.64354729_wp, & + & -89.91400795_wp, -10.33157296_wp, -62.20737693_wp, -89.88878803_wp, & + & -12.43061439_wp, -61.69837208_wp, -90.97073891_wp, -12.49628412_wp, & + & -61.62000904_wp, -89.50393457_wp, -13.36369344_wp, -62.10191637_wp, & + & -89.47164846_wp, -12.27104482_wp, -60.70909489_wp, -98.93599032_wp, & + & -12.12410211_wp, -69.93562859_wp, -97.49268114_wp, -12.07368192_wp, & + & -69.84215413_wp, -97.15396428_wp, -11.92356924_wp, -68.35696570_wp, & + & -98.01187556_wp, -11.59059728_wp, -67.54451772_wp, -99.41078557_wp, & + & -11.81250633_wp, -69.09394292_wp, -97.07886784_wp, -13.00462765_wp, & + & -70.24385368_wp, -96.92584855_wp, -10.88369279_wp, -70.62468678_wp, & + & -97.20689683_wp, -10.98166565_wp, -71.66989250_wp, -97.32949529_wp, & + & -9.95332554_wp, -70.23337788_wp, -95.84322722_wp, -10.86193508_wp, & + & -70.55002403_wp, -95.88207921_wp, -12.14993056_wp, -68.04428573_wp, & + & -95.32307156_wp, -11.96200532_wp, -66.72261032_wp, -93.80358806_wp, & + & -11.89271558_wp, -66.89477052_wp, -93.26863670_wp, -12.26601841_wp, & + & -67.93467907_wp, -95.19927982_wp, -12.43525224_wp, -68.73954312_wp, & + & -95.71032922_wp, -11.02713323_wp, -66.30385437_wp, -95.68632875_wp, & + & -13.12586180_wp, -65.79357742_wp, -96.76827260_wp, -13.19037281_wp, & + & -65.71417853_wp, -95.30282195_wp, -14.05954274_wp, -66.19701012_wp, & + & -95.26808563_wp, -12.96620123_wp, -64.80477838_wp, -104.72657715_wp, & + & -12.80547692_wp, -74.04324849_wp, -103.28347582_wp, -12.75613233_wp, & + & -73.94678867_wp, -102.94802981_wp, -12.60672648_wp, -72.46079277_wp, & + & -103.80741628_wp, -12.27284623_wp, -71.65026553_wp, -105.20271621_wp, & + & -12.49381730_wp, -73.20232358_wp, -102.86947680_wp, -13.68729955_wp, & + & -74.34779459_wp, -102.71403244_wp, -11.56640627_wp, -74.72780350_wp, & + & -102.99266596_wp, -11.66405805_wp, -75.77368450_wp, -103.11801464_wp, & + & -10.63583447_wp, -74.33733538_wp, -101.63157568_wp, -11.54536305_wp, & + & -74.65056480_wp, -101.67725813_wp, -12.83501667_wp, -72.14521858_wp, & + & -101.12074289_wp, -12.64773361_wp, -70.82241086_wp, -99.60088979_wp, & + & -12.58096336_wp, -70.99193109_wp, -99.06491062_wp, -12.95435335_wp, & + & -72.03130657_wp, -100.99311005_wp, -13.12067783_wp, -72.83904472_wp, & + & -101.50716846_wp, -11.71205010_wp, -70.40466704_wp, -101.48803650_wp, & + & -13.81065963_wp, -69.89382129_wp, -102.57027203_wp, -13.87329056_wp, & + & -69.81688335_wp, -101.10522772_wp, -14.74513866_wp, -70.29605780_wp, & + & -101.07181130_wp, -13.65137972_wp, -68.90411474_wp, -110.51464766_wp, & + & -13.50338997_wp, -78.15256279_wp, -109.07176960_wp, -13.44708097_wp, & + & -78.05683357_wp, -108.73651601_wp, -13.29468594_wp, -76.57111718_wp, & + & -109.59682491_wp, -12.96239045_wp, -75.76091836_wp, -110.99193990_wp, & + & -13.19068511_wp, -77.31269136_wp, -108.65364760_wp, -14.37669977_wp, & + & -78.45712004_wp, -108.50834185_wp, -12.25547703_wp, -78.83932646_wp, & + & -108.78763170_wp, -12.35510131_wp, -79.88484601_wp, -108.91586129_wp, & + & -11.32635396_wp, -78.44910193_wp, -107.42590428_wp, -12.22975442_wp, & + & -78.76324015_wp, -107.46503427_wp, -13.51868715_wp, -76.25538813_wp, & + & -106.90977658_wp, -13.33066152_wp, -74.93218779_wp, -105.38983499_wp, & + & -13.26339091_wp, -75.10010556_wp, -104.85239969_wp, -13.63744948_wp, & + & -76.13847690_wp, -106.78012247_wp, -13.80369993_wp, -76.94871681_wp, & + & -107.29704030_wp, -12.39512599_wp, -74.51490977_wp, -107.27714252_wp, & + & -14.49368697_wp, -74.00370321_wp, -108.35939328_wp, -14.55684046_wp, & + & -73.92746104_wp, -106.89361593_wp, -15.42799768_wp, -74.40566717_wp, & + & -106.86160983_wp, -14.33416070_wp, -73.01374342_wp, -116.29940469_wp, & + & -14.25290768_wp, -82.25767410_wp, -114.85692816_wp, -14.18856703_wp, & + & -82.16090742_wp, -114.52287545_wp, -14.02600629_wp, -80.67610995_wp, & + & -115.38456371_wp, -13.69236934_wp, -79.86797194_wp, -116.77979325_wp, & + & -13.93348409_wp, -81.42219562_wp, -114.43404301_wp, -15.11823314_wp, & + & -82.55598464_wp, -114.29925812_wp, -12.99829964_wp, -82.94958357_wp, & + & -114.57741025_wp, -13.10492810_wp, -83.99470815_wp, -114.71169749_wp, & + & -12.06920766_wp, -82.56446913_wp, -113.21700444_wp, -12.96657120_wp, & + & -82.87303575_wp, -113.25042881_wp, -14.24289087_wp, -80.35913280_wp, & + & -112.69559167_wp, -14.04468508_wp, -79.03728574_wp, -111.17609021_wp, & + & -13.97074173_wp, -79.20640631_wp, -110.63727763_wp, -14.34777921_wp, & + & -80.24298303_wp, -112.56438705_wp, -14.52877864_wp, -81.05099197_wp, & + & -113.08726717_wp, -13.10874424_wp, -78.62506781_wp, -113.05688873_wp, & + & -15.20436724_wp, -78.10228366_wp, -114.13878612_wp, -15.27204832_wp, & + & -78.02490788_wp, -112.66943214_wp, -16.13904159_wp, -78.49961601_wp, & + & -112.64136991_wp, -15.03767634_wp, -77.11349345_wp, -122.06127829_wp, & + & -15.00557070_wp, -86.38336432_wp, -120.61845450_wp, -14.97630866_wp, & + & -86.27661739_wp, -120.29127013_wp, -14.79447973_wp, -84.79251914_wp, & + & -121.15149637_wp, -14.43039357_wp, -83.99606748_wp, -122.53922796_wp, & + & -14.65284891_wp, -85.55991563_wp, -120.21695413_wp, -15.92391953_wp, & + & -86.65083318_wp, -120.02500502_wp, -13.81567476_wp, -87.08317538_wp, & + & -120.29882445_wp, -13.93455405_wp, -88.12812547_wp, -120.41594478_wp, & + & -12.86927795_wp, -86.71825936_wp, -118.94279876_wp, -13.80989294_wp, & + & -86.99960836_wp, -119.02565912_wp, -15.03120188_wp, -84.46257830_wp, & + & -118.47562392_wp, -14.81613078_wp, -83.14144712_wp, -116.95594477_wp, & + & -14.73761975_wp, -83.30680510_wp, -116.41227827_wp, -15.12581157_wp, & + & -84.33670402_wp, -118.33925476_wp, -15.33556402_wp, -85.14603387_wp, & + & -118.87291139_wp, -13.87732172_wp, -82.74142443_wp, -118.83553585_wp, & + & -15.96715799_wp, -82.19532326_wp, -119.91734575_wp, -16.03667635_wp, & + & -82.11839040_wp, -118.44549443_wp, -16.90483241_wp, -82.58293785_wp, & + & -118.42146395_wp, -15.78976087_wp, -81.20776936_wp, -127.80794281_wp, & + & -15.60036195_wp, -90.53471970_wp, -126.36832010_wp, -15.68063784_wp, & + & -90.41398436_wp, -126.03911098_wp, -15.45867787_wp, -88.93555116_wp, & + & -126.87710926_wp, -15.00219459_wp, -88.16339191_wp, -128.25939083_wp, & + & -15.15140358_wp, -89.74396421_wp, -126.04261027_wp, -16.67397868_wp, & + & -90.74012957_wp, -125.67894125_wp, -14.60988177_wp, -91.26692708_wp, & + & -125.95126524_wp, -14.75706056_wp, -92.30863341_wp, -125.99803746_wp, & + & -13.61956480_wp, -90.95226935_wp, -124.60028587_wp, -14.68348239_wp, & + & -91.16979811_wp, -124.79659203_wp, -15.77173107_wp, -88.58185037_wp, & + & -124.24552424_wp, -15.53758630_wp, -87.26456715_wp, -122.72348088_wp, & + & -15.50419757_wp, -87.42252795_wp, -122.18393598_wp, -15.93727098_wp, & + & -88.43646163_wp, -124.12485859_wp, -16.14028745_wp, -89.24764010_wp, & + & -124.62021548_wp, -14.57852420_wp, -86.89202926_wp, -124.64060977_wp, & + & -16.65449819_wp, -86.29188617_wp, -125.72411430_wp, -16.69286887_wp, & + & -86.21753573_wp, -124.27483065_wp, -17.61175108_wp, -86.65455348_wp, & + & -124.22518145_wp, -16.46428100_wp, -85.30724784_wp, -133.61740100_wp, & + & -16.29601974_wp, -94.59763656_wp, -132.18162561_wp, -16.42576000_wp, & + & -94.47422940_wp, -131.82846887_wp, -16.06103179_wp, -93.03029717_wp, & + & -132.63315864_wp, -15.47662875_wp, -92.31082145_wp, -134.04283805_wp, & + & -15.73758011_wp, -93.86454259_wp, -131.90215301_wp, -17.46142311_wp, & + & -94.69412089_wp, -131.45544974_wp, -15.48241670_wp, -95.43978738_wp, & + & -131.73894383_wp, -15.73112074_wp, -96.45898669_wp, -131.73454180_wp, & + & -14.45204901_wp, -95.23457503_wp, -130.38000889_wp, -15.58721645_wp, & + & -95.33617957_wp, -130.60135342_wp, -16.40103471_wp, -92.64821564_wp, & + & -130.02727150_wp, -16.05720979_wp, -91.36523036_wp, -128.50775378_wp, & + & -16.15159825_wp, -91.52138401_wp, -128.00442297_wp, -16.71976406_wp, & + & -92.48599066_wp, -129.95724744_wp, -16.87852236_wp, -93.27083120_wp, & + & -130.32867266_wp, -15.03674436_wp, -91.10632202_wp, -130.49621972_wp, & + & -17.02204254_wp, -90.27024170_wp, -131.57895607_wp, -16.97051089_wp, & + & -90.19279438_wp, -130.20530546_wp, -18.03929220_wp, -90.51960249_wp, & + & -130.06010058_wp, -16.75175142_wp, -89.31356333_wp, -139.35915264_wp, & + & -16.84479389_wp, -98.71430780_wp, -137.96868741_wp, -17.18489100_wp, & + & -98.50439307_wp, -137.60200221_wp, -16.69720561_wp, -97.10039228_wp, & + & -138.32516734_wp, -15.91216017_wp, -96.49435881_wp, -139.69763687_wp, & + & -16.11091798_wp, -98.10043704_wp, -137.85979367_wp, -18.27169617_wp, & + & -98.58047102_wp, -137.06888539_wp, -16.50348391_wp, -99.54146267_wp, & + & -137.35797935_wp, -16.83408039_wp, -100.53543323_wp, -137.18022740_wp, & + & -15.42394912_wp, -99.47971860_wp, -136.02856107_wp, -16.76317339_wp, & + & -99.37122526_wp, -136.45557861_wp, -17.17067976_wp, -96.62076150_wp, & + & -135.85964463_wp, -16.73323555_wp, -95.37696177_wp, -134.34696767_wp, & + & -16.91954390_wp, -95.51784377_wp, -133.87514166_wp, -17.61724322_wp, & + & -96.41057797_wp, -135.86499042_wp, -17.79142589_wp, -97.16425404_wp, & + & -136.11023084_wp, -15.67843719_wp, -95.22385990_wp, -136.37395575_wp, & + & -17.56117730_wp, -94.19395884_wp, -137.45230832_wp, -17.44818052_wp, & + & -94.12207250_wp, -136.13560717_wp, -18.61132958_wp, -94.34203759_wp, & + & -135.92032660_wp, -17.22122457_wp, -93.26810661_wp, -145.19993098_wp, & + & -17.39575340_wp, -102.72083076_wp, -143.86217127_wp, -17.86900160_wp, & + & -102.43828359_wp, -143.39865512_wp, -17.15260834_wp, -101.16713432_wp, & + & -143.99865878_wp, -16.17109928_wp, -100.73927808_wp, -145.41763661_wp, & + & -16.50207258_wp, -102.29231665_wp, -143.90276653_wp, -18.95195454_wp, & + & -102.28180025_wp, -142.90745308_wp, -17.55031800_wp, -103.59411793_wp, & + & -143.26485254_wp, -18.03961101_wp, -104.49622513_wp, -142.87187770_wp, & + & -16.47709502_wp, -103.76305885_wp, -141.90706908_wp, -17.90798464_wp, & + & -103.37077237_wp, -142.31026943_wp, -17.66234197_wp, -100.59799906_wp, & + & -141.64316902_wp, -17.07062272_wp, -99.45859959_wp, -140.18004771_wp, & + & -17.51580953_wp, -99.51702684_wp, -139.82592744_wp, -18.43784206_wp, & + & -100.24549454_wp, -141.82005767_wp, -18.45683058_wp, -100.99546313_wp, & + & -141.72174329_wp, -15.98114148_wp, -99.53547352_wp, -142.27567824_wp, & + & -17.53965495_wp, -98.14338487_wp, -143.32036571_wp, -17.24105187_wp, & + & -98.12546128_wp, -142.21409106_wp, -18.62214985_wp, -98.06546465_wp, & + & -141.76590445_wp, -17.09291137_wp, -97.29534537_wp, -150.95486457_wp, & + & -17.92688474_wp, -106.77150978_wp, -149.76978400_wp, -18.56415522_wp, & + & -106.24131846_wp, -149.20104648_wp, -17.63779981_wp, -105.16372347_wp, & + & -149.56187629_wp, -16.46861043_wp, -105.07419356_wp, -150.96106564_wp, & + & -16.91782682_wp, -106.67735101_wp, -150.06265307_wp, -19.52831471_wp, & + & -105.81297553_wp, -148.72114858_wp, -18.78182434_wp, -107.33824775_wp, & + & -149.14412335_wp, -19.41261214_wp, -108.11575446_wp, -148.43612070_wp, & + & -17.82788023_wp, -107.77502675_wp, -147.83757778_wp, -19.26443805_wp, & + & -106.93137512_wp, -148.29414348_wp, -18.19828738_wp, -104.36680853_wp, & + & -147.51856751_wp, -17.46934091_wp, -103.38687908_wp, -146.13190112_wp, & + & -18.11660302_wp, -103.33817165_wp, -145.93104095_wp, -19.22525503_wp, & + & -103.82462721_wp, -147.97832440_wp, -19.15015828_wp, -104.51731018_wp, & + & -147.45038904_wp, -16.42572539_wp, -103.71029806_wp, -148.17066512_wp, & + & -17.54303978_wp, -102.00176168_wp, -149.16318101_wp, -17.10356405_wp, & + & -102.04979159_wp, -148.25642660_wp, -18.57974628_wp, -101.68622083_wp, & + & -147.57732627_wp, -16.99866516_wp, -101.27342603_wp, -155.30552283_wp, & + & -19.43005338_wp, -111.63192254_wp, -154.82502541_wp, -19.80353087_wp, & + & -110.31131655_wp, -154.01944847_wp, -18.65314745_wp, -109.71979797_wp, & + & -153.30235100_wp, -17.94070306_wp, -110.41595976_wp, -154.59468494_wp, & + & -18.85838627_wp, -112.08129681_wp, -155.69641591_wp, -20.01332924_wp, & + & -109.68054595_wp, -153.88250003_wp, -21.02214034_wp, -110.30104113_wp, & + & -154.41473606_wp, -21.91065879_wp, -110.63116812_wp, -153.04293334_wp, & + & -20.83899214_wp, -110.97023912_wp, -153.48746905_wp, -21.19204745_wp, & + & -109.30148975_wp, -154.14116462_wp, -18.49760614_wp, -108.39259924_wp, & + & -153.20387614_wp, -17.69880917_wp, -107.63067473_wp, -152.01928156_wp, & + & -18.58911560_wp, -107.22440059_wp, -152.07275230_wp, -19.81170246_wp, & + & -107.31150260_wp, -154.63180819_wp, -19.20920385_wp, -107.86979448_wp, & + & -152.84348105_wp, -16.91072146_wp, -108.29946853_wp, -153.87976532_wp, & + & -17.11205682_wp, -106.39472309_wp, -154.72963377_wp, -16.50610772_wp, & + & -106.69408474_wp, -154.22581245_wp, -17.91277537_wp, -105.74543212_wp, & + & -153.18123251_wp, -16.49235093_wp, -105.84069453_wp, -155.44152373_wp, & + & -20.25996689_wp, -112.19872443_wp, 4.30180152_wp, -0.82611439_wp, & + & 4.78867370_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_56 + +subroutine polyala_60(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 603 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.73109792_wp, -0.28768575_wp, -0.24182244_wp, 0.31489653_wp, & + & 0.55733444_wp, 0.29142744_wp, 1.45920737_wp, -0.35291659_wp, & + & 0.74022027_wp, 1.28349516_wp, -1.55064957_wp, 0.93164361_wp, & + & -0.80823131_wp, -1.19113049_wp, 0.20909300_wp, 0.63759885_wp, & + & 1.23212774_wp, -0.50749145_wp, -0.19016656_wp, 1.36008079_wp, & + & 1.49515784_wp, -1.02892624_wp, 1.97980701_wp, 1.19138792_wp, & + & -0.51144007_wp, 0.68355994_wp, 2.28327212_wp, 0.59685606_wp, & + & 1.99362760_wp, 1.89109973_wp, 2.64430319_wp, 0.25185005_wp, & + & 0.88562047_wp, 3.74666635_wp, -0.42306373_wp, 1.53718999_wp, & + & 3.44090003_wp, -0.57044606_wp, 3.02701153_wp, 2.50230059_wp, & + & -0.03791023_wp, 3.57431744_wp, 2.69570457_wp, 1.25815493_wp, & + & 0.82346667_wp, 3.81622920_wp, -1.43708092_wp, 1.12683490_wp, & + & 5.05339052_wp, 0.33357965_wp, 1.32698246_wp, 5.26132199_wp, & + & 0.41659072_wp, 0.26494585_wp, 4.98721400_wp, 1.32912392_wp, & + & 1.75890744_wp, 5.86477164_wp, -0.20467943_wp, 1.80658393_wp, & + & 4.31719934_wp, -1.33409505_wp, 3.64231791_wp, -6.45299929_wp, & + & -0.80688537_wp, -4.32366561_wp, -5.22556100_wp, -0.09832231_wp, & + & -4.03315336_wp, -4.44556159_wp, -0.94664603_wp, -3.02578937_wp, & + & -4.98450567_wp, -1.86673174_wp, -2.41886947_wp, -6.73886088_wp, & + & -1.45192099_wp, -3.59512364_wp, -4.66276470_wp, 0.01301452_wp, & + & -4.96556969_wp, -5.51495975_wp, 1.28256556_wp, -3.43456554_wp, & + & -6.08000043_wp, 1.87148405_wp, -4.15175461_wp, -6.09801860_wp, & + & 1.17840839_wp, -2.52325465_wp, -4.58866368_wp, 1.79992635_wp, & + & -3.20419110_wp, -3.17191050_wp, -0.59583560_wp, -2.86464393_wp, & + & -2.30185086_wp, -1.15896399_wp, -1.85540098_wp, -1.37712406_wp, & + & -0.03652414_wp, -1.37911964_wp, -1.25485225_wp, 1.00101883_wp, & + & -2.02164154_wp, -2.78376875_wp, 0.21064593_wp, -3.34105075_wp, & + & -2.92363211_wp, -1.52686971_wp, -1.03316141_wp, -1.46373351_wp, & + & -2.30769885_wp, -2.42734921_wp, -2.12583500_wp, -3.09707037_wp, & + & -2.77202332_wp, -0.86866182_wp, -1.95295980_wp, -3.26468201_wp, & + & -0.79958441_wp, -2.70950052_wp, -1.66776892_wp, -12.22617555_wp, & + & -1.34331988_wp, -8.37679985_wp, -10.88079424_wp, -0.83271417_wp, & + & -8.22765868_wp, -10.30244581_wp, -1.46067246_wp, -6.95676696_wp, & + & -11.02729725_wp, -2.01708612_wp, -6.13769920_wp, -12.64541787_wp, & + & -1.65718738_wp, -7.50821066_wp, -10.29996894_wp, -1.12994838_wp, & + & -9.10683123_wp, -10.88112079_wp, 0.69450930_wp, -8.09950740_wp, & + & -11.31250090_wp, 1.12823577_wp, -8.99756009_wp, -11.47399043_wp, & + & 0.99595338_wp, -7.23977974_wp, -9.86816633_wp, 1.06628458_wp, & + & -7.97899043_wp, -8.98476122_wp, -1.33847675_wp, -6.82049368_wp, & + & -8.25443114_wp, -1.73451164_wp, -5.63614227_wp, -7.06351773_wp, & + & -0.78201871_wp, -5.50546924_wp, -6.71419282_wp, -0.07070435_wp, & + & -6.44238326_wp, -8.42831489_wp, -0.82309196_wp, -7.49389489_wp, & + & -8.92106679_wp, -1.64448803_wp, -4.77244171_wp, -7.75269974_wp, & + & -3.17799460_wp, -5.75385349_wp, -8.60411940_wp, -3.84381630_wp, & + & -5.86546913_wp, -7.10736771_wp, -3.27825809_wp, -6.62270724_wp, & + & -7.19639120_wp, -3.46118272_wp, -4.86547533_wp, -17.89409265_wp, & + & -2.24536842_wp, -12.54814386_wp, -16.48873941_wp, -1.91635416_wp, & + & -12.44806524_wp, -16.07601084_wp, -2.16942844_wp, -10.99576370_wp, & + & -16.91730354_wp, -2.32373486_wp, -10.11565099_wp, -18.38126316_wp, & + & -2.23975114_wp, -11.65808768_wp, -15.92966401_wp, -2.56708389_wp, & + & -13.12851898_wp, -16.23702677_wp, -0.44997976_wp, -12.81600896_wp, & + & -16.55752716_wp, -0.28047800_wp, -13.84040049_wp, -16.80127638_wp, & + & 0.20266454_wp, -12.15481056_wp, -15.18093525_wp, -0.21238430_wp, & + & -12.73247122_wp, -14.76369762_wp, -2.19154848_wp, -10.78094486_wp, & + & -14.15929590_wp, -2.29015781_wp, -9.47018865_wp, -12.80200270_wp, & + & -1.58751310_wp, -9.55100207_wp, -12.30232200_wp, -1.29538573_wp, & + & -10.63305547_wp, -14.09973776_wp, -2.01485105_wp, -11.52752421_wp, & + & -14.81244212_wp, -1.79061874_wp, -8.74708304_wp, -13.96266348_wp, & + & -3.75444655_wp, -9.06170954_wp, -14.92957585_wp, -4.24959346_wp, & + & -9.03522834_wp, -13.32443990_wp, -4.25999970_wp, -9.78191875_wp, & + & -13.50620113_wp, -3.81818315_wp, -8.07861343_wp, -23.55516362_wp, & + & -3.27508665_wp, -16.70836324_wp, -22.11841609_wp, -3.13207538_wp, & + & -16.61157898_wp, -21.78029653_wp, -3.09946987_wp, -15.11894904_wp, & + & -22.65772405_wp, -2.94308605_wp, -14.27486067_wp, -24.04584192_wp, & + & -3.06043583_wp, -15.84585330_wp, -21.64462726_wp, -3.99219186_wp, & + & -17.09656705_wp, -21.64332722_wp, -1.84048757_wp, -17.28643941_wp, & + & -21.92545242_wp, -1.86568568_wp, -18.33562367_wp, -22.10826000_wp, & + & -0.97893669_wp, -16.81414936_wp, -20.56424360_wp, -1.74704889_wp, & + & -17.21343186_wp, -20.48950972_wp, -3.23485737_wp, -14.83063420_wp, & + & -19.93963727_wp, -3.10691178_wp, -13.49845844_wp, -18.48016430_wp, & + & -2.67561899_wp, -13.66154462_wp, -17.91603927_wp, -2.74812081_wp, & + & -14.74912500_wp, -19.78663439_wp, -3.32808491_wp, -15.55679458_wp, & + & -20.51075592_wp, -2.34605967_wp, -12.95612968_wp, -20.00851993_wp, & + & -4.43734256_wp, -12.74033868_wp, -21.04741573_wp, -4.74486413_wp, & + & -12.65660541_wp, -19.45334489_wp, -5.20217379_wp, -13.27732720_wp, & + & -19.59073317_wp, -4.32977219_wp, -11.74402809_wp, -29.28971473_wp, & + & -3.98530349_wp, -20.85195422_wp, -27.84643043_wp, -3.97183972_wp, & + & -20.74743357_wp, -27.51706122_wp, -3.85215904_wp, -19.25741060_wp, & + & -28.37845053_wp, -3.53124071_wp, -18.44376960_wp, -29.76210542_wp, & + & -3.67780782_wp, -20.00725783_wp, -27.45223165_wp, -4.90755086_wp, & + & -21.15793771_wp, -27.24465246_wp, -2.78644227_wp, -21.51052650_wp, & + & -27.51593348_wp, -2.86727804_wp, -22.55977807_wp, -27.63244828_wp, & + & -1.85149764_wp, -21.11421128_wp, -26.16261731_wp, -2.78831323_wp, & + & -21.42388543_wp, -26.24990422_wp, -4.09627950_wp, -18.93867633_wp, & + & -25.70010671_wp, -3.91635362_wp, -17.61220665_wp, -24.18973689_wp, & + & -3.73497162_wp, -17.78198137_wp, -23.63321214_wp, -4.02179824_wp, & + & -18.83779911_wp, -25.55832688_wp, -4.34545355_wp, -19.63884409_wp, & + & -26.15079429_wp, -3.02474240_wp, -17.16361031_wp, -25.98150816_wp, & + & -5.13242637_wp, -16.72263590_wp, -27.05624320_wp, -5.27381745_wp, & + & -16.64552741_wp, -25.53533874_wp, -6.02402625_wp, -17.15546081_wp, & + & -25.57341882_wp, -4.97749877_wp, -15.72872517_wp, -35.07974420_wp, & + & -4.45402650_wp, -24.98373427_wp, -33.63602748_wp, -4.46167997_wp, & + & -24.88405660_wp, -33.29892360_wp, -4.33141289_wp, -23.39664646_wp, & + & -34.14731316_wp, -3.96931804_wp, -22.58663799_wp, -35.54513485_wp, & + & -4.12468645_wp, -24.14347534_wp, -33.25836542_wp, -5.40724772_wp, & + & -25.28729113_wp, -33.01807069_wp, -3.29306752_wp, -25.65998457_wp, & + & -33.29945027_wp, -3.37543013_wp, -26.70644370_wp, -33.38400728_wp, & + & -2.34820433_wp, -25.26645771_wp, -31.93570793_wp, -3.31625136_wp, & + & -25.58192733_wp, -32.03881611_wp, -4.60952778_wp, -23.07816226_wp, & + & -31.48144060_wp, -4.44690918_wp, -21.75251900_wp, -29.95988426_wp, & + & -4.41524643_wp, -21.91615129_wp, -29.42840396_wp, -4.78993221_wp, & + & -22.95729390_wp, -31.36224974_wp, -4.91269694_wp, -23.77183202_wp, & + & -31.84656059_wp, -3.50549765_wp, -21.32850725_wp, -31.87976741_wp, & + & -5.60788859_wp, -20.83426316_wp, -32.96345076_wp, -5.64570349_wp, & + & -20.76179048_wp, -31.51724429_wp, -6.54814380_wp, -21.24174197_wp, & + & -31.46391331_wp, -5.46592201_wp, -19.84173439_wp, -40.89410595_wp, & + & -4.98671752_wp, -29.08479225_wp, -39.44998049_wp, -4.96684142_wp, & + & -28.99290444_wp, -39.10737499_wp, -4.81927302_wp, -27.50833727_wp, & + & -39.95671209_wp, -4.46151091_wp, -26.69740898_wp, -41.36109963_wp, & + & -4.66019274_wp, -28.24434846_wp, -39.05686015_wp, -5.90799376_wp, & + & -29.39162155_wp, -38.85790521_wp, -3.79235208_wp, -29.78005135_wp, & + & -39.14338756_wp, -3.88692884_wp, -30.82436622_wp, -39.23914073_wp, & + & -2.85181537_wp, -29.39064369_wp, -37.77493042_wp, -3.79531983_wp, & + & -29.70774461_wp, -37.84165377_wp, -5.07625802_wp, -27.19454538_wp, & + & -37.27975422_wp, -4.90287242_wp, -25.87213610_wp, -35.75846871_wp, & + & -4.89010580_wp, -26.04002751_wp, -35.23430120_wp, -5.28572556_wp, & + & -27.07716582_wp, -37.16660428_wp, -5.38405824_wp, -27.88780383_wp, & + & -37.63370095_wp, -3.95283928_wp, -25.45802856_wp, -37.68689587_wp, & + & -6.04904666_wp, -24.93918604_wp, -38.77067274_wp, -6.07470297_wp, & + & -24.86287705_wp, -37.33562083_wp, -6.99753462_wp, -25.33746521_wp, & + & -37.26614199_wp, -5.90017743_wp, -23.94976220_wp, -46.71768817_wp, & + & -5.64994854_wp, -33.15523801_wp, -45.27396789_wp, -5.59707522_wp, & + & -33.07002747_wp, -44.92761879_wp, -5.43925963_wp, -31.58743506_wp, & + & -45.78071186_wp, -5.09885970_wp, -30.77298949_wp, -47.18818918_wp, & + & -5.33395228_wp, -32.31277993_wp, -44.86101933_wp, -6.52934850_wp, & + & -33.46949878_wp, -44.71303340_wp, -4.41003001_wp, -33.86119861_wp, & + & -45.00090045_wp, -4.51253230_wp, -34.90411346_wp, -45.11459292_wp, & + & -3.47828457_wp, -33.47101547_wp, -43.62997541_wp, -4.38752564_wp, & + & -33.79371359_wp, -43.65482180_wp, -5.66702322_wp, -31.27969621_wp, & + & -43.09005212_wp, -5.47962924_wp, -29.96041135_wp, -41.57005591_wp, & + & -5.43976795_wp, -30.13571688_wp, -41.04389507_wp, -5.83058955_wp, & + & -31.17367835_wp, -42.97699402_wp, -5.96252121_wp, -31.97562365_wp, & + & -43.45926739_wp, -4.53508390_wp, -29.54709854_wp, -43.47178084_wp, & + & -6.63049454_wp, -29.02252127_wp, -44.55454185_wp, -6.67569566_wp, & + & -28.94105715_wp, -43.10514018_wp, -7.57347013_wp, -29.42005129_wp, & + & -43.04917574_wp, -6.47121881_wp, -28.03551714_wp, -52.53345154_wp, & + & -6.36792224_wp, -37.22233690_wp, -51.08998890_wp, -6.30969863_wp, & + & -37.13631622_wp, -50.74493151_wp, -6.15293381_wp, -35.65330889_wp, & + & -51.60041270_wp, -5.82072352_wp, -34.83797818_wp, -53.00550525_wp, & + & -6.05637882_wp, -36.37907602_wp, -50.67323606_wp, -7.23982197_wp, & + & -37.53688457_wp, -50.53315987_wp, -5.11946146_wp, -37.92560363_wp, & + & -50.82004284_wp, -5.22173954_wp, -38.96881298_wp, -50.93850897_wp, & + & -4.18974424_wp, -37.53451368_wp, -49.45021708_wp, -5.09278301_wp, & + & -37.85752839_wp, -49.47065050_wp, -6.37272791_wp, -35.34596240_wp, & + & -48.90660313_wp, -6.18061577_wp, -34.02705653_wp, -47.38789891_wp, & + & -6.11254672_wp, -34.20565170_wp, -46.85736498_wp, -6.49034272_wp, & + & -35.24621515_wp, -48.79007870_wp, -6.65865695_wp, -36.04319431_wp, & + & -49.29175062_wp, -5.24425128_wp, -33.60969590_wp, -49.26667972_wp, & + & -7.34141740_wp, -33.09297778_wp, -50.34833867_wp, -7.40514756_wp, & + & -33.00918813_wp, -48.88520782_wp, -8.27649972_wp, -33.49510933_wp, & + & -48.84450164_wp, -7.17892699_wp, -32.10632755_wp, -58.34415397_wp, & + & -7.09444467_wp, -41.29454320_wp, -56.90087140_wp, -7.03366165_wp, & + & -41.20749559_wp, -56.55715157_wp, -6.87828146_wp, -39.72402494_wp, & + & -57.41390106_wp, -6.54907322_wp, -38.90880357_wp, -58.81731058_wp, & + & -6.78455925_wp, -40.45128592_wp, -56.48215232_wp, -7.96249756_wp, & + & -41.60899884_wp, -56.34572033_wp, -5.84139413_wp, -41.99489139_wp, & + & -56.63161430_wp, -5.94293670_wp, -43.03844324_wp, -56.75313255_wp, & + & -4.91292742_wp, -41.60298712_wp, -55.26288108_wp, -5.81272253_wp, & + & -41.92596020_wp, -55.28266863_wp, -7.09595608_wp, -39.41605896_wp, & + & -54.72001963_wp, -6.90431721_wp, -38.09648503_wp, -53.20145854_wp, & + & -6.83052532_wp, -38.27413817_wp, -52.66910041_wp, -7.20389411_wp, & + & -39.31536953_wp, -54.60082540_wp, -7.37886750_wp, -40.11327778_wp, & + & -55.10867132_wp, -5.97004887_wp, -37.67767315_wp, -55.07668914_wp, & + & -8.06801954_wp, -37.16472601_wp, -56.15817615_wp, -8.13555721_wp, & + & -37.08166096_wp, -54.69183675_wp, -9.00107915_wp, -37.56831860_wp, & + & -54.65562774_wp, -7.90589353_wp, -36.17753548_wp, -64.15238331_wp, & + & -7.82866014_wp, -45.36818551_wp, -62.70916664_wp, -7.76625322_wp, & + & -45.28128265_wp, -62.36564935_wp, -7.61077218_wp, -43.79778873_wp, & + & -63.22283047_wp, -7.28276865_wp, -42.98252719_wp, -64.62573645_wp, & + & -7.51937966_wp, -44.52480808_wp, -62.28942852_wp, -8.69455965_wp, & + & -45.68294766_wp, -62.15538620_wp, -6.57325930_wp, -46.06853610_wp, & + & -62.44120347_wp, -6.67497949_wp, -47.11209149_wp, -62.56380597_wp, & + & -5.64529587_wp, -45.67649501_wp, -61.07257515_wp, -6.54339187_wp, & + & -45.99964020_wp, -61.09096584_wp, -7.82705295_wp, -43.48969620_wp, & + & -60.52909213_wp, -7.63514475_wp, -42.16984257_wp, -59.01063982_wp, & + & -7.55815105_wp, -42.34682456_wp, -58.47700432_wp, -7.93006176_wp, & + & -43.38791828_wp, -60.40858676_wp, -8.10879509_wp, -44.18684319_wp, & + & -60.91985089_wp, -6.70197318_wp, -41.75055335_wp, -60.88371271_wp, & + & -8.80021297_wp, -41.23899667_wp, -61.96508518_wp, -8.86996108_wp, & + & -41.15628018_wp, -60.49688427_wp, -9.73221797_wp, -41.64313529_wp, & + & -60.46324584_wp, -8.63793861_wp, -40.25157512_wp, -69.96017585_wp, & + & -8.56564671_wp, -49.44112024_wp, -68.51698496_wp, -8.50323649_wp, & + & -49.35393328_wp, -68.17358701_wp, -8.34833917_wp, -47.87037679_wp, & + & -69.03078827_wp, -8.02075428_wp, -47.05497717_wp, -70.43378120_wp, & + & -8.25661836_wp, -48.59780351_wp, -68.09715175_wp, -9.43134129_wp, & + & -49.75596061_wp, -67.96316038_wp, -7.30984596_wp, -50.14056910_wp, & + & -68.24874950_wp, -7.41114179_wp, -51.18422655_wp, -68.37176376_wp, & + & -6.38209826_wp, -49.74820641_wp, -66.88036632_wp, -7.27988128_wp, & + & -50.07143277_wp, -66.89886170_wp, -8.56458900_wp, -47.56241929_wp, & + & -66.33679393_wp, -8.37255109_wp, -46.24268950_wp, -64.81850987_wp, & + & -8.29352191_wp, -46.42017096_wp, -64.28468129_wp, -8.66492873_wp, & + & -47.46134294_wp, -66.21648010_wp, -8.84582719_wp, -48.25976382_wp, & + & -66.72866719_wp, -7.44010221_wp, -45.82284694_wp, -66.68947141_wp, & + & -9.53852304_wp, -45.31223416_wp, -67.77070972_wp, -9.60973979_wp, & + & -45.22903517_wp, -66.30159803_wp, -10.46982518_wp, -45.71698820_wp, & + & -66.26873470_wp, -9.37615605_wp, -44.32494017_wp, -75.76506109_wp, & + & -9.29751457_wp, -53.51883467_wp, -74.32189368_wp, -9.23668897_wp, & + & -53.43020971_wp, -73.97978402_wp, -9.08246859_wp, -51.94628047_wp, & + & -74.83743022_wp, -8.75421625_wp, -51.13161867_wp, -76.23914776_wp, & + & -8.98831816_wp, -52.67584916_wp, -73.90266273_wp, -10.16517089_wp, & + & -53.83199787_wp, -73.76597508_wp, -8.04374482_wp, -54.21604569_wp, & + & -74.05053484_wp, -8.14457015_wp, -55.26002914_wp, -74.17405007_wp, & + & -7.11563848_wp, -53.82397893_wp, -72.68322535_wp, -8.01490635_wp, & + & -54.14572778_wp, -72.70557772_wp, -9.30011112_wp, -51.63717543_wp, & + & -72.14434899_wp, -9.10848065_wp, -50.31702999_wp, -70.62593447_wp, & + & -9.02989769_wp, -50.49360571_wp, -70.09165449_wp, -9.40102942_wp, & + & -51.53464912_wp, -72.02279572_wp, -9.58162545_wp, -52.33402223_wp, & + & -72.53614534_wp, -8.17592793_wp, -49.89733974_wp, -72.49810681_wp, & + & -10.27441737_wp, -49.38695268_wp, -73.57943393_wp, -10.34534968_wp, & + & -49.30466865_wp, -72.11014062_wp, -11.20580265_wp, -49.79142039_wp, & + & -72.07817097_wp, -10.11221606_wp, -48.39929132_wp, -81.56756712_wp, & + & -10.02077244_wp, -57.60131990_wp, -80.12435317_wp, -9.96241410_wp, & + & -57.51177679_wp, -79.78303890_wp, -9.80905253_wp, -56.02755544_wp, & + & -80.64084663_wp, -9.47992841_wp, -55.21341055_wp, -82.04155975_wp, & + & -9.71121673_wp, -56.75840214_wp, -79.70638953_wp, -10.89152791_wp, & + & -57.91342696_wp, -79.56594726_wp, -8.77025075_wp, -58.29702886_wp, & + & -79.85000977_wp, -8.87041542_wp, -59.34121238_wp, -79.97276777_wp, & + & -7.84154983_wp, -57.90506207_wp, -78.48319891_wp, -8.74318842_wp, & + & -58.22601849_wp, -78.50935014_wp, -10.02843925_wp, -55.71754809_wp, & + & -77.94896763_wp, -9.83781884_wp, -54.39688981_wp, -76.43032823_wp, & + & -9.76064346_wp, -54.57213378_wp, -75.89548898_wp, -10.13187151_wp, & + & -55.61285168_wp, -77.82637342_wp, -10.31052968_wp, -56.41396191_wp, & + & -78.34022004_wp, -8.90504171_wp, -53.97719181_wp, -78.30458616_wp, & + & -11.00374746_wp, -53.46750482_wp, -79.38604748_wp, -11.07376073_wp, & + & -53.38620444_wp, -77.91706772_wp, -11.93534318_wp, -53.87191600_wp, & + & -77.88539110_wp, -10.84223392_wp, -52.47941568_wp, -87.37063657_wp, & + & -10.73155281_wp, -61.68536930_wp, -85.92729146_wp, -10.67627608_wp, & + & -61.59579135_wp, -85.58573725_wp, -10.52389483_wp, -60.11151406_wp, & + & -86.44302902_wp, -10.19353824_wp, -59.29732071_wp, -87.84394839_wp, & + & -10.42135458_wp, -60.84230065_wp, -85.51129482_wp, -11.60624024_wp, & + & -61.99752624_wp, -85.36634521_wp, -9.48523394_wp, -62.38092542_wp, & + & -85.65046835_wp, -9.58480281_wp, -63.42515090_wp, -85.77135294_wp, & + & -8.55572034_wp, -61.98900662_wp, -84.28355490_wp, -9.46036111_wp, & + & -62.30977178_wp, -84.31245511_wp, -10.74557457_wp, -59.80143702_wp, & + & -83.75205855_wp, -10.55640832_wp, -58.48056814_wp, -82.23320946_wp, & + & -10.48195545_wp, -58.65523863_wp, -81.69865415_wp, -10.85348830_wp, & + & -59.69598968_wp, -83.62986388_wp, -11.02859959_wp, -60.49783918_wp, & + & -84.14169763_wp, -9.62302170_wp, -58.06071507_wp, -84.11015124_wp, & + & -11.72192894_wp, -57.55162024_wp, -85.19177244_wp, -11.79009713_wp, & + & -57.47089079_wp, -83.72402129_wp, -12.65410733_wp, -57.95601753_wp, & + & -83.69120222_wp, -11.56134247_wp, -56.56327633_wp, -93.17423126_wp, & + & -11.43351248_wp, -65.77109305_wp, -91.73089597_wp, -11.37942154_wp, & + & -65.68050685_wp, -91.38990441_wp, -11.22781509_wp, -64.19602790_wp, & + & -92.24720166_wp, -10.89685474_wp, -63.38210069_wp, -93.64801640_wp, & + & -11.12314729_wp, -64.92837111_wp, -91.31541133_wp, -12.30955384_wp, & + & -66.08237787_wp, -91.16859136_wp, -10.18849568_wp, -66.46485547_wp, & + & -91.45218310_wp, -10.28743993_wp, -67.50928408_wp, -91.57314527_wp, & + & -9.25884026_wp, -66.07279842_wp, -90.08582693_wp, -10.16445601_wp, & + & -66.39306673_wp, -90.11690077_wp, -11.45074726_wp, -63.88566919_wp, & + & -89.55628675_wp, -11.26244120_wp, -62.56476744_wp, -88.03726835_wp, & + & -11.19096260_wp, -62.73943076_wp, -87.50349693_wp, -11.56315661_wp, & + & -63.78035290_wp, -89.43451231_wp, -11.73443404_wp, -64.58201969_wp, & + & -89.94408180_wp, -10.32821367_wp, -62.14506876_wp, -89.91666319_wp, & + & -12.42710610_wp, -61.63563364_wp, -90.99842080_wp, -12.49324490_wp, & + & -61.55503190_wp, -89.53222409_wp, -13.36008371_wp, -62.03980104_wp, & + & -89.49754207_wp, -12.26712089_wp, -60.64726564_wp, -98.97212758_wp, & + & -12.13067937_wp, -69.86641803_wp, -97.52894592_wp, -12.07701914_wp, & + & -69.77333784_wp, -97.19057166_wp, -11.92560731_wp, -68.28820735_wp, & + & -98.04925163_wp, -11.59445774_wp, -67.47581375_wp, -99.44717625_wp, & + & -11.82045355_wp, -69.02434569_wp, -97.11301965_wp, -13.00725852_wp, & + & -70.17450663_wp, -96.96488826_wp, -10.88621650_wp, -70.55660496_wp, & + & -97.24657120_wp, -10.98505174_wp, -71.60156010_wp, -97.36994444_wp, & + & -9.95647430_wp, -70.16527189_wp, -95.88225341_wp, -10.86244890_wp, & + & -70.48280326_wp, -95.91819795_wp, -12.14894819_wp, -67.97562494_wp, & + & -95.35954511_wp, -11.96095385_wp, -66.65383385_wp, -93.84016938_wp, & + & -11.89132749_wp, -66.82628548_wp, -93.30547541_wp, -12.26345722_wp, & + & -67.86676921_wp, -95.23472278_wp, -12.43285109_wp, -68.67084328_wp, & + & -95.74675850_wp, -11.02607088_wp, -66.23503603_wp, -95.72295881_wp, & + & -13.12482413_wp, -65.72490737_wp, -96.80493905_wp, -13.18958593_wp, & + & -65.64617354_wp, -95.33898905_wp, -14.05843591_wp, -66.12805279_wp, & + & -95.30538268_wp, -12.96499675_wp, -64.73586218_wp, -104.76815938_wp, & + & -12.82501570_wp, -73.96436729_wp, -103.32487326_wp, -12.77285936_wp, & + & -73.87204507_wp, -102.98607589_wp, -12.62128400_wp, -72.38701381_wp, & + & -103.84458367_wp, -12.28975315_wp, -71.57457057_wp, -105.24225136_wp, & + & -12.51419631_wp, -73.12194615_wp, -102.91009105_wp, -13.70375860_wp, & + & -74.27288435_wp, -102.75986756_wp, -11.58308919_wp, -74.65616278_wp, & + & -103.04216062_wp, -11.68216059_wp, -75.70093424_wp, -103.16371664_wp, & + & -10.65269351_wp, -74.26514025_wp, -101.67717336_wp, -11.56047305_wp, & + & -74.58290366_wp, -101.71382872_wp, -12.84506071_wp, -72.07425187_wp, & + & -101.15617876_wp, -12.65782369_wp, -70.75192312_wp, -99.63664885_wp, & + & -12.58815919_wp, -70.92266834_wp, -99.10067820_wp, -12.96005677_wp, & + & -71.96256408_wp, -101.03020813_wp, -13.12919485_wp, -72.76919002_wp, & + & -101.54384954_wp, -11.72321386_wp, -70.33294466_wp, -101.52043270_wp, & + & -13.82226947_wp, -69.82402365_wp, -102.60248352_wp, -13.88715011_wp, & + & -69.74637719_wp, -101.13599113_wp, -14.75561682_wp, -70.22733591_wp, & + & -101.10383454_wp, -13.66299024_wp, -68.83447867_wp, -110.56835287_wp, & + & -13.51827227_wp, -78.05685225_wp, -109.12504876_wp, -13.46570845_wp, & + & -77.96497325_wp, -108.78522766_wp, -13.31421580_wp, -76.48024082_wp, & + & -109.64291695_wp, -12.98223444_wp, -75.66714072_wp, -111.04270705_wp, & + & -13.20669608_wp, -77.21490744_wp, -108.71030171_wp, -14.39642109_wp, & + & -78.36627246_wp, -108.56082411_wp, -12.27564731_wp, -78.74924309_wp, & + & -108.84354569_wp, -12.37473006_wp, -79.79389704_wp, -108.96482919_wp, & + & -11.34544021_wp, -78.35793423_wp, -107.47810604_wp, -12.25265969_wp, & + & -78.67647031_wp, -107.51275667_wp, -13.53849168_wp, -76.16866575_wp, & + & -106.95346656_wp, -13.35115576_wp, -74.84707753_wp, -105.43407235_wp, & + & -13.28267080_wp, -75.01963552_wp, -104.89953804_wp, -13.65554924_wp, & + & -76.05991721_wp, -106.83003906_wp, -13.82313179_wp, -76.86429267_wp, & + & -107.33996678_wp, -12.41611865_wp, -74.42797469_wp, -107.31737404_wp, & + & -14.51501923_wp, -73.91831123_wp, -108.39936938_wp, -14.57908973_wp, & + & -73.83924989_wp, -106.93413619_wp, -15.44877856_wp, -74.32182148_wp, & + & -106.89936886_wp, -14.35571462_wp, -72.92936277_wp, -116.35811831_wp, & + & -14.23038904_wp, -82.16285060_wp, -114.91554106_wp, -14.16948185_wp, & + & -82.06562068_wp, -114.58149313_wp, -14.01500672_wp, -80.57990057_wp, & + & -115.44277260_wp, -13.68396088_wp, -79.77025902_wp, -116.83776508_wp, & + & -13.91809482_wp, -81.32423080_wp, -114.49422257_wp, -15.09800343_wp, & + & -82.46508549_wp, -114.35521077_wp, -12.97653089_wp, -82.84832485_wp, & + & -114.63387468_wp, -13.07730552_wp, -83.89389761_wp, -114.76546206_wp, & + & -12.04843909_wp, -82.45849885_wp, -113.27287789_wp, -12.94774491_wp, & + & -82.77189317_wp, -113.30941744_wp, -14.23557633_wp, -80.26416621_wp, & + & -112.75312739_wp, -14.04498051_wp, -78.94179263_wp, -111.23343267_wp, & + & -13.97690137_wp, -79.11219101_wp, -110.69767297_wp, -14.35077539_wp, & + & -80.15152270_wp, -112.62426280_wp, -14.51995205_wp, -80.95759103_wp, & + & -113.14019211_wp, -13.10882104_wp, -78.52570080_wp, -113.11904806_wp, & + & -15.20646502_wp, -78.01088003_wp, -114.20121459_wp, -15.27001077_wp, & + & -77.93369121_wp, -112.73540662_wp, -16.14132501_wp, -78.41144439_wp, & + & -112.70284314_wp, -15.04491956_wp, -77.02153715_wp, -122.13122972_wp, & + & -14.99210285_wp, -86.28171101_wp, -120.68897859_wp, -14.92658744_wp, & + & -86.18291297_wp, -120.35828591_wp, -14.76098768_wp, -84.69763301_wp, & + & -121.22242091_wp, -14.42751540_wp, -83.89200300_wp, -122.61256258_wp, & + & -14.67219281_wp, -85.44689571_wp, -120.26467638_wp, -15.85678534_wp, & + & -86.57521436_wp, -120.13063908_wp, -13.73759265_wp, -86.97298420_wp, & + & -120.40774965_wp, -13.84602382_wp, -88.01820480_wp, -120.54354124_wp, & + & -12.80788472_wp, -86.58986027_wp, -119.04846497_wp, -13.70563575_wp, & + & -86.89543836_wp, -119.08632780_wp, -14.97526171_wp, -84.37717670_wp, & + & -118.53580888_wp, -14.77556546_wp, -83.05373464_wp, -117.01602692_wp, & + & -14.69866221_wp, -83.21852103_wp, -116.47364813_wp, -15.07444748_wp, & + & -84.25370108_wp, -118.39793632_wp, -15.26100692_wp, -85.06674399_wp, & + & -118.93052164_wp, -13.84024055_wp, -82.64302598_wp, -118.89789740_wp, & + & -15.93567752_wp, -82.11958323_wp, -119.97990675_wp, -16.00512893_wp, & + & -82.04537699_wp, -118.50774140_wp, -16.86976063_wp, -82.51565571_wp, & + & -118.48556697_wp, -15.76816592_wp, -81.12960935_wp, -127.89855797_wp, & + & -15.74774137_wp, -90.39807958_wp, -126.45547111_wp, -15.71822523_wp, & + & -90.29498726_wp, -126.12480993_wp, -15.53677256_wp, -88.81167144_wp, & + & -126.98352535_wp, -15.17405325_wp, -88.01296122_wp, -128.37448270_wp, & + & -15.39629927_wp, -89.57290840_wp, -126.05460833_wp, -16.66562228_wp, & + & -90.67041198_wp, -125.86443653_wp, -14.55725639_wp, -91.10282040_wp, & + & -126.14089273_wp, -14.67607920_wp, -92.14708360_wp, -126.25477555_wp, & + & -13.61106773_wp, -90.73674793_wp, -124.78203706_wp, -14.55111764_wp, & + & -91.02202598_wp, -124.85813419_wp, -15.77202633_wp, -88.48479469_wp, & + & -124.30653474_wp, -15.55836834_wp, -87.16413666_wp, -122.78710933_wp, & + & -15.47818354_wp, -87.33059631_wp, -122.24344043_wp, -15.86661211_wp, & + & -88.36036707_wp, -124.17294890_wp, -16.07595259_wp, -89.16959945_wp, & + & -124.70449746_wp, -14.62071125_wp, -86.76213897_wp, -124.66379233_wp, & + & -16.71141674_wp, -86.21942452_wp, -125.74540742_wp, -16.78263694_wp, & + & -86.14141105_wp, -124.27275973_wp, -17.64787803_wp, -86.60898896_wp, & + & -124.24884843_wp, -16.53495968_wp, -85.23207117_wp, -133.64734283_wp, & + & -16.33742570_wp, -94.54906584_wp, -132.20731283_wp, -16.40792365_wp, & + & -94.42722660_wp, -131.88047600_wp, -16.19447249_wp, -92.94718957_wp, & + & -132.72064150_wp, -15.74574312_wp, -92.17287265_wp, -134.10373202_wp, & + & -15.90073965_wp, -93.75433822_wp, -131.87366205_wp, -17.39604479_wp, & + & -94.76105336_wp, -131.52511451_wp, -15.32514949_wp, -95.27081886_wp, & + & -131.79623232_wp, -15.46539974_wp, -96.31379501_wp, -131.85109666_wp, & + & -14.33978188_wp, -94.94777440_wp, -130.44602989_wp, -15.39225756_wp, & + & -95.17398854_wp, -130.63695001_wp, -16.50513223_wp, -92.59506193_wp, & + & -130.08499872_wp, -16.27456617_wp, -91.27752601_wp, -128.56307084_wp, & + & -16.24261792_wp, -91.43744771_wp, -128.02566779_wp, -16.67321900_wp, & + & -92.45360674_wp, -129.96414940_wp, -16.86829883_wp, -93.26285929_wp, & + & -130.45784215_wp, -15.31568449_wp, -90.90259503_wp, -130.48090614_wp, & + & -17.39261355_wp, -90.30655631_wp, -131.56444427_wp, -17.42994648_wp, & + & -90.23212292_wp, -130.11617811_wp, -18.34970332_wp, -90.67067062_wp, & + & -130.06517294_wp, -17.20421551_wp, -89.32169930_wp, -139.43065338_wp, & + & -16.99615654_wp, -98.65354221_wp, -137.99471058_wp, -17.11972161_wp, & + & -98.52576991_wp, -137.65135773_wp, -16.77843900_wp, -97.07383658_wp, & + & -138.46351802_wp, -16.21147844_wp, -96.34881175_wp, -139.86260552_wp, & + & -16.45781485_wp, -97.90923826_wp, -137.70750550_wp, -18.14959176_wp, & + & -98.76209457_wp, -137.26968169_wp, -16.15561728_wp, -99.47132659_wp, & + & -137.54561459_wp, -16.38955595_wp, -100.49606955_wp, -137.55715133_wp, & + & -15.13076558_wp, -99.25098339_wp, -136.19413128_wp, -16.25464439_wp, & + & -99.36319329_wp, -136.42479360_wp, -17.11855622_wp, -96.69049772_wp, & + & -135.86016445_wp, -16.79372528_wp, -95.39841507_wp, -134.33935005_wp, & + & -16.87631799_wp, -95.54791534_wp, -133.82777754_wp, -17.42552298_wp, & + & -96.51915219_wp, -135.77390540_wp, -17.58061162_wp, -97.31766703_wp, & + & -136.16899223_wp, -15.77969175_wp, -95.12359373_wp, -136.33002367_wp, & + & -17.78004603_wp, -94.32325360_wp, -137.41329549_wp, -17.73406608_wp, & + & -94.24972550_wp, -136.03408029_wp, -18.79143752_wp, -94.58975680_wp, & + & -135.89913067_wp, -17.52550594_wp, -93.35995807_wp, -145.16292607_wp, & + & -17.54335478_wp, -102.79772745_wp, -143.76313702_wp, -17.84744282_wp, & + & -102.59430241_wp, -143.41147252_wp, -17.38925175_wp, -101.17681631_wp, & + & -144.15737469_wp, -16.64366023_wp, -100.54909832_wp, -145.52733663_wp, & + & -16.84357745_wp, -102.15961692_wp, -143.62178127_wp, -18.92798583_wp, & + & -102.70044524_wp, -142.88314122_wp, -17.11159269_wp, -103.61083659_wp, & + & -143.16431991_wp, -17.42076523_wp, -104.61393047_wp, -143.02337764_wp, & + & -16.03777968_wp, -103.51731481_wp, -141.83611854_wp, -17.34821157_wp, & + & -103.44859268_wp, -142.25115464_wp, -17.84216227_wp, -100.71143126_wp, & + & -141.66651426_wp, -17.42873060_wp, -99.45423283_wp, -140.15195909_wp, & + & -17.60245643_wp, -99.59130173_wp, -139.67168813_wp, -18.27613867_wp, & + & -100.49789593_wp, -141.64523414_wp, -18.43357906_wp, -101.27077310_wp, & + & -141.92419279_wp, -16.37931054_wp, -99.27779280_wp, -142.18227948_wp, & + & -18.28659778_wp, -98.29347853_wp, -143.26191360_wp, -18.18291344_wp, & + & -98.22679398_wp, -141.93526247_wp, -19.33140450_wp, -98.46331042_wp, & + & -141.73756574_wp, -17.96402516_wp, -97.35715207_wp, -150.94331163_wp, & + & -18.17904783_wp, -106.88399108_wp, -149.59139053_wp, -18.60838475_wp, & + & -106.59902366_wp, -149.17293307_wp, -17.91535528_wp, -105.29984773_wp, & + & -149.82140574_wp, -16.97751680_wp, -104.84558084_wp, -151.21037966_wp, & + & -17.32430537_wp, -106.40644647_wp, -149.58902510_wp, -19.69651094_wp, & + & -106.47675415_wp, -148.63607784_wp, -18.21608019_wp, -107.73142694_wp, & + & -148.96388842_wp, -18.68977104_wp, -108.65285561_wp, -148.63994036_wp, & + & -17.13747332_wp, -107.86574750_wp, -147.62534477_wp, -18.54226906_wp, & + & -107.50663776_wp, -148.06766346_wp, -18.39470009_wp, -104.73748114_wp, & + & -147.43297985_wp, -17.81387647_wp, -103.57420832_wp, -145.95557648_wp, & + & -18.20908890_wp, -103.63229920_wp, -145.56530924_wp, -19.09149273_wp, & + & -104.39087959_wp, -147.53869924_wp, -19.15190466_wp, -105.15769556_wp, & + & -147.54609418_wp, -16.72572667_wp, -103.62014404_wp, -148.06278533_wp, & + & -18.34082020_wp, -102.28008251_wp, -149.11689591_wp, -18.07734126_wp, & + & -102.26565938_wp, -147.96627336_wp, -19.42234398_wp, -102.23174719_wp, & + & -147.57701638_wp, -17.90190443_wp, -101.41412364_wp, -156.71086017_wp, & + & -18.75984429_wp, -110.96286061_wp, -155.45703244_wp, -19.33959303_wp, & + & -110.53232320_wp, -154.94088080_wp, -18.47274040_wp, -109.38093573_wp, & + & -155.41882663_wp, -17.36413750_wp, -109.15973214_wp, -156.82031856_wp, & + & -17.78434982_wp, -110.70612003_wp, -155.64660190_wp, -20.36330019_wp, & + & -110.19342524_wp, -154.43342755_wp, -19.35564345_wp, -111.67267984_wp, & + & -154.82501757_wp, -19.94940171_wp, -112.49416679_wp, -154.24903919_wp, & + & -18.34335905_wp, -112.02280680_wp, -153.49712452_wp, -19.79088963_wp, & + & -111.33710678_wp, -153.94812042_wp, -19.00626845_wp, -108.67507636_wp, & + & -153.23479381_wp, -18.30518571_wp, -107.62965754_wp, -151.82254572_wp, & + & -18.89309567_wp, -107.58067352_wp, -151.55739495_wp, -19.95394276_wp, & + & -108.13780621_wp, -153.54962894_wp, -19.90848646_wp, -108.91268033_wp, & + & -153.20403941_wp, -17.24074831_wp, -107.88426185_wp, -153.92231060_wp, & + & -18.48992585_wp, -106.27233104_wp, -154.93190544_wp, -18.09191369_wp, & + & -106.32797031_wp, -153.97040901_wp, -19.54590599_wp, -106.01928352_wp, & + & -153.37704470_wp, -17.96321937_wp, -105.49522012_wp, -162.47004732_wp, & + & -19.30323040_wp, -115.02851968_wp, -161.35497533_wp, -19.96520142_wp, & + & -114.38841060_wp, -160.69182180_wp, -18.94290923_wp, -113.46253860_wp, & + & -160.92806152_wp, -17.74347879_wp, -113.56543163_wp, -162.37318374_wp, & + & -18.29687689_wp, -115.09698045_wp, -161.74435169_wp, -20.81440442_wp, & + & -113.81748925_wp, -160.33786340_wp, -20.46006845_wp, -115.42297191_wp, & + & -160.82679925_wp, -21.15830423_wp, -116.09727048_wp, -159.95639818_wp, & + & -19.62170641_wp, -116.00036386_wp, -159.50860089_wp, -20.96134777_wp, & + & -114.93304770_wp, -159.84772146_wp, -19.45919523_wp, -112.57261818_wp, & + & -159.00651882_wp, -18.66637931_wp, -111.70269173_wp, -157.71672342_wp, & + & -19.45980243_wp, -111.48011819_wp, -157.65138130_wp, -20.65457502_wp, & + & -111.75257007_wp, -159.63819861_wp, -20.45135099_wp, -112.55680390_wp, & + & -158.79797702_wp, -17.71347690_wp, -112.19944631_wp, -159.69192491_wp, & + & -18.40950395_wp, -110.35605787_wp, -160.61794820_wp, -17.86689157_wp, & + & -110.52484804_wp, -159.91780686_wp, -19.35383188_wp, -109.86753158_wp, & + & -159.04910876_wp, -17.82041099_wp, -109.70910177_wp, -166.89541546_wp, & + & -21.17825555_wp, -119.63774835_wp, -166.48121954_wp, -21.35994361_wp, & + & -118.25597471_wp, -165.56818910_wp, -20.21131431_wp, -117.84534158_wp, & + & -164.76072408_wp, -19.71678666_wp, -118.62595988_wp, -166.11413732_wp, & + & -20.78693210_wp, -120.15783358_wp, -167.38129620_wp, -21.36522834_wp, & + & -117.63093235_wp, -165.67374871_wp, -22.64691416_wp, -118.00110398_wp, & + & -166.29338693_wp, -23.52103975_wp, -118.18445678_wp, -164.81185528_wp, & + & -22.67361903_wp, -118.66635566_wp, -165.30987540_wp, -22.67409235_wp, & + & -116.97606461_wp, -165.70362244_wp, -19.80282338_wp, -116.57379037_wp, & + & -164.69234975_wp, -18.98956951_wp, -115.93050500_wp, -163.60079144_wp, & + & -19.91751420_wp, -115.37562551_wp, -163.77973675_wp, -21.12598595_wp, & + & -115.26288067_wp, -166.27630472_wp, -20.35678133_wp, -115.95293435_wp, & + & -164.25666587_wp, -18.35274705_wp, -116.70665950_wp, -165.30484274_wp, & + & -18.15718830_wp, -114.80836114_wp, -166.09135524_wp, -17.52398662_wp, & + & -115.20758720_wp, -165.72617641_wp, -18.81093079_wp, -114.04848650_wp, & + & -164.54673689_wp, -17.53146821_wp, -114.34705866_wp, -167.12591155_wp, & + & -22.07550181_wp, -120.05027167_wp, 4.13795640_wp, -1.43490953_wp, & + & 4.59831670_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_60 + +subroutine polyala_64(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 643 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.66728893_wp, -0.43022120_wp, -0.20175152_wp, 0.33445063_wp, & + & 0.44694661_wp, 0.36413795_wp, 1.40429669_wp, -0.43576381_wp, & + & 1.00760404_wp, 1.18129981_wp, -1.60977428_wp, 1.28092153_wp, & + & -0.76705232_wp, -1.31465209_wp, 0.28214330_wp, 0.75431861_wp, & + & 1.04840425_wp, -0.44842828_wp, -0.27713366_wp, 1.35770503_wp, & + & 1.43481144_wp, -1.05624088_wp, 1.96813733_wp, 0.98691289_wp, & + & -0.70733927_wp, 0.75536146_wp, 2.23121377_wp, 0.47931477_wp, & + & 2.00467701_wp, 1.86734764_wp, 2.58107711_wp, 0.16279305_wp, & + & 1.22471902_wp, 3.59906774_wp, -0.46816452_wp, 2.03760568_wp, & + & 3.17213447_wp, -0.43317132_wp, 3.50434020_wp, 2.21752124_wp, & + & 0.19044460_wp, 3.90988533_wp, 2.66107181_wp, 1.15935183_wp, & + & 1.08357458_wp, 3.65623571_wp, -1.52416864_wp, 1.74937528_wp, & + & 4.94965551_wp, 0.21463550_wp, 1.85334605_wp, 5.24594254_wp, & + & 0.16523780_wp, 0.81052371_wp, 4.89184915_wp, 1.25550731_wp, & + & 2.16129567_wp, 5.69611936_wp, -0.29016575_wp, 2.45837090_wp, & + & 3.96443095_wp, -1.15001492_wp, 4.27116497_wp, -6.29293908_wp, & + & -0.94787337_wp, -4.37334468_wp, -5.03478925_wp, -0.28295017_wp, & + & -4.11185011_wp, -4.29717881_wp, -1.11487210_wp, -3.06037049_wp, & + & -4.87647450_wp, -1.98544096_wp, -2.41837486_wp, -6.60089712_wp, & + & -1.55804388_wp, -3.62391225_wp, -4.46460415_wp, -0.24298725_wp, & + & -5.04579750_wp, -5.26155612_wp, 1.13835825_wp, -3.58414807_wp, & + & -5.79684583_wp, 1.71542825_wp, -4.33327019_wp, -5.85175473_wp, & + & 1.10708024_wp, -2.67181175_wp, -4.31317912_wp, 1.62404638_wp, & + & -3.37495093_wp, -3.01104624_wp, -0.80863653_wp, -2.90467079_wp, & + & -2.17790753_wp, -1.34411174_wp, -1.84998758_wp, -1.27603294_wp, & + & -0.20635721_wp, -1.36444490_wp, -1.13427563_wp, 0.81785290_wp, & + & -2.02457391_wp, -2.59498706_wp, -0.03153344_wp, -3.40543265_wp, & + & -2.83154630_wp, -1.69303087_wp, -1.04415413_wp, -1.31608200_wp, & + & -2.50339709_wp, -2.36171254_wp, -1.96199370_wp, -3.30100514_wp, & + & -2.71808228_wp, -0.68524858_wp, -2.16547748_wp, -3.17978829_wp, & + & -0.68576333_wp, -2.88828812_wp, -1.56568209_wp, -12.09652807_wp, & + & -1.36196744_wp, -8.41526808_wp, -10.73622932_wp, -0.89057424_wp, & + & -8.27229913_wp, -10.18357961_wp, -1.50929363_wp, -6.98568001_wp, & + & -10.92936370_wp, -2.02816554_wp, -6.16056990_wp, -12.51831776_wp, & + & -1.66901310_wp, -7.54516842_wp, -10.16085706_wp, -1.22424423_wp, & + & -9.14213492_wp, -10.68848964_wp, 0.63847388_wp, -8.17807562_wp, & + & -11.10458675_wp, 1.06456324_wp, -9.08702874_wp, -11.27325123_wp, & + & 0.97786374_wp, -7.32695063_wp, -9.66452147_wp, 0.98090251_wp, & + & -8.06384910_wp, -8.86404921_wp, -1.42192705_wp, -6.84307340_wp, & + & -8.15066421_wp, -1.81832263_wp, -5.64840340_wp, -6.91525913_wp, & + & -0.92017252_wp, -5.54882127_wp, -6.54279799_wp, -0.24620989_wp, & + & -6.50434549_wp, -8.28780713_wp, -0.94120186_wp, -7.52569081_wp, & + & -8.80932770_wp, -1.67044691_wp, -4.78633898_wp, -7.72104432_wp, & + & -3.28775687_wp, -5.72354143_wp, -8.60457740_wp, -3.91302090_wp, & + & -5.81921800_wp, -7.07980611_wp, -3.44500319_wp, -6.58705124_wp, & + & -7.18194789_wp, -3.57324786_wp, -4.82539677_wp, -17.83349596_wp, & + & -2.06795688_wp, -12.54498025_wp, -16.42687314_wp, -1.74340592_wp, & + & -12.44880732_wp, -16.00173740_wp, -2.03879089_wp, -11.00787444_wp, & + & -16.83619476_wp, -2.21214946_wp, -10.12469193_wp, -18.31447137_wp, & + & -2.07545944_wp, -11.65156300_wp, -15.87545794_wp, -2.37500893_wp, & + & -13.15304803_wp, -16.17698922_wp, -0.26729851_wp, -12.77663573_wp, & + & -16.51147869_wp, -0.06661134_wp, -13.79089246_wp, -16.73020670_wp, & + & 0.36655599_wp, -12.08837180_wp, -15.11921615_wp, -0.03474608_wp, & + & -12.70133373_wp, -14.68796535_wp, -2.07387383_wp, -10.80522759_wp, & + & -14.07329399_wp, -2.22050142_wp, -9.50363464_wp, -12.69432362_wp, & + & -1.56188994_wp, -9.58643651_wp, -12.19740719_wp, -1.26504417_wp, & + & -10.66864119_wp, -14.02751966_wp, -1.88529897_wp, -11.55223632_wp, & + & -14.70080609_wp, -1.71537236_wp, -8.76189565_wp, -13.92207499_wp, & + & -3.69891050_wp, -9.12771785_wp, -14.90517425_wp, -4.16111851_wp, & + & -9.10098545_wp, -13.30896133_wp, -4.21056591_wp, -9.86520710_wp, & + & -13.45842974_wp, -3.79846299_wp, -8.15104667_wp, -23.51274190_wp, & + & -3.13380412_wp, -16.67990233_wp, -22.07766228_wp, -2.97102357_wp, & + & -16.59022980_wp, -21.73276288_wp, -2.93677815_wp, -15.09916707_wp, & + & -22.60827476_wp, -2.79546646_wp, -14.25045952_wp, -24.00147680_wp, & + & -2.93116111_wp, -15.81336140_wp, -21.59425152_wp, -3.82378124_wp, & + & -17.07879849_wp, -21.62367759_wp, -1.67213087_wp, -17.26551014_wp, & + & -21.91000721_wp, -1.70023865_wp, -18.31349792_wp, -22.09863537_wp, & + & -0.81775349_wp, -16.79016859_wp, -20.54570274_wp, -1.56369316_wp, & + & -17.19715096_wp, -20.43877480_wp, -3.05375580_wp, -14.81788030_wp, & + & -19.88347572_wp, -2.92638755_wp, -13.48798885_wp, -18.42571224_wp, & + & -2.49163893_wp, -13.65759337_wp, -17.86879321_wp, -2.55508781_wp, & + & -14.74947849_wp, -19.73845697_wp, -3.13704420_wp, -15.54781768_wp, & + & -20.45334471_wp, -2.16740417_wp, -12.94165393_wp, -19.94636781_wp, & + & -4.25798825_wp, -12.73137741_wp, -20.98419382_wp, -4.56873078_wp, & + & -12.64603706_wp, -19.38993861_wp, -5.02043098_wp, -13.27046600_wp, & + & -19.52704419_wp, -4.15066023_wp, -11.73568828_wp, -29.25533352_wp, & + & -3.89925810_wp, -20.80365649_wp, -27.81233516_wp, -3.85885650_wp, & + & -20.70342369_wp, -27.47968465_wp, -3.74738870_wp, -19.21359862_wp, & + & -28.34272731_wp, -3.44656450_wp, -18.39410227_wp, -29.73131609_wp, & + & -3.60537735_wp, -19.95624069_wp, -27.40151934_wp, -4.78232831_wp, & + & -21.12506568_wp, -27.23651803_wp, -2.65404892_wp, -21.45618487_wp, & + & -27.50989301_wp, -2.72927306_wp, -22.50531105_wp, -27.64114734_wp, & + & -1.73104215_wp, -21.04885302_wp, -26.15434819_wp, -2.63572921_wp, & + & -21.37310933_wp, -26.20764689_wp, -3.97488252_wp, -18.90209982_wp, & + & -25.65397241_wp, -3.79620160_wp, -17.57713725_wp, -24.14714172_wp, & + & -3.59328818_wp, -17.75369609_wp, -23.59286091_wp, -3.86425099_wp, & + & -18.81487751_wp, -25.51547952_wp, -4.20769449_wp, -19.60739042_wp, & + & -26.11417357_wp, -2.91355323_wp, -17.12049475_wp, -25.91424365_wp, & + & -5.02148655_wp, -16.69383029_wp, -26.98652774_wp, -5.17892680_wp, & + & -16.61364726_wp, -25.45671973_wp, -5.90396124_wp, -17.13346678_wp, & + & -25.50472423_wp, -4.86640600_wp, -15.70053032_wp, -35.04058409_wp, & + & -4.46515926_wp, -24.93221808_wp, -33.59691919_wp, -4.44458570_wp, & + & -24.83448794_wp, -33.26122335_wp, -4.31124327_wp, -23.34698568_wp, & + & -34.11679389_wp, -3.97104054_wp, -22.53499551_wp, -35.51067799_wp, & + & -4.15086543_wp, -24.08876916_wp, -33.20062954_wp, -5.38153057_wp, & + & -25.24001152_wp, -33.00345612_wp, -3.26218871_wp, -25.60861795_wp, & + & -33.28442638_wp, -3.34813624_wp, -26.65491253_wp, -33.38818806_wp, & + & -2.32576567_wp, -25.21279383_wp, -31.92076219_wp, -3.26358703_wp, & + & -25.53190624_wp, -31.99487617_wp, -4.56171777_wp, -23.03073957_wp, & + & -31.43998551_wp, -4.39323532_wp, -21.70480486_wp, -29.91942746_wp, & + & -4.33395230_wp, -21.86968129_wp, -29.38268545_wp, -4.69229411_wp, & + & -22.91390207_wp, -31.31244654_wp, -4.84784884_wp, -23.72599609_wp, & + & -31.82104774_wp, -3.45950958_wp, -21.27776198_wp, -31.81785283_wp, & + & -5.56345963_wp, -20.78969833_wp, -32.90068727_wp, -5.61946627_wp, & + & -20.71624808_wp, -31.44026618_wp, -6.49630852_wp, -21.20045441_wp, & + & -31.40334932_wp, -5.41769406_wp, -19.79716628_wp, -40.85182553_wp, & + & -5.05118342_wp, -29.02854563_wp, -39.40788316_wp, -5.01465772_wp, & + & -28.93879566_wp, -39.06458486_wp, -4.87353339_wp, -27.45384387_wp, & + & -39.91724696_wp, -4.53401713_wp, -26.63855217_wp, -41.32136177_wp, & + & -4.73794469_wp, -28.18450936_wp, -39.00400627_wp, -5.94824250_wp, & + & -29.34452661_wp, -38.83181064_wp, -3.82778773_wp, -29.71920415_wp, & + & -39.11710915_wp, -3.91978537_wp, -30.76380821_wp, -39.22509430_wp, & + & -2.89473546_wp, -29.32380474_wp, -37.74881838_wp, -3.81695180_wp, & + & -29.64793135_wp, -37.79487617_wp, -5.11541073_wp, -27.14414887_wp, & + & -37.23367242_wp, -4.94341096_wp, -25.82127374_wp, -35.71307504_wp, & + & -4.90409006_wp, -25.99124559_wp, -35.18391916_wp, -5.28204135_wp, & + & -27.03243459_wp, -37.11635014_wp, -5.40676991_wp, -27.84106346_wp, & + & -37.60221587_wp, -4.00238644_wp, -25.39933277_wp, -37.62129157_wp, & + & -6.10296833_wp, -24.89664423_wp, -38.70448366_wp, -6.14724309_wp, & + & -24.82050779_wp, -37.25425545_wp, -7.04258350_wp, -25.30163362_wp, & + & -37.20303946_wp, -5.95410266_wp, -23.90616880_wp, -46.66643214_wp, & + & -5.70977103_wp, -33.10927747_wp, -45.22285672_wp, -5.65756919_wp, & + & -33.02171284_wp, -44.87859296_wp, -5.51020845_wp, -31.53758655_wp, & + & -45.73324926_wp, -5.17777507_wp, -30.72148173_wp, -47.13812760_wp, & + & -5.39810964_wp, -32.26588539_wp, -44.80949503_wp, -6.58712980_wp, & + & -33.42703465_wp, -44.66080857_wp, -4.46521280_wp, -33.80405968_wp, & + & -44.94656541_wp, -4.56107059_wp, -34.84818547_wp, -45.06355718_wp, & + & -3.53615755_wp, -33.40874502_wp, -43.57789065_wp, -4.44263170_wp, & + & -33.73429610_wp, -43.60576647_wp, -5.73785664_wp, -31.22992534_wp, & + & -43.04313276_wp, -5.55666275_wp, -29.90885298_wp, -41.52357267_wp, & + & -5.50105559_wp, -30.08349863_wp, -40.99370153_wp, -5.87683282_wp, & + & -31.12513895_wp, -42.92579537_wp, -6.02464227_wp, -31.92736929_wp, & + & -43.42102548_wp, -4.61885284_wp, -29.48807731_wp, -43.41540982_wp, & + & -6.71842535_wp, -28.98072947_wp, -44.49779648_wp, -6.77358233_wp, & + & -28.90034356_wp, -43.04043937_wp, -7.65493697_wp, -29.38564607_wp, & + & -42.99481799_wp, -6.56361162_wp, -27.99216487_wp, -52.47471676_wp, & + & -6.41129757_wp, -37.19058395_wp, -51.03150562_wp, -6.35210474_wp, & + & -37.10157184_wp, -50.68955365_wp, -6.20020434_wp, -35.61728817_wp, & + & -51.54679060_wp, -5.87079665_wp, -34.80266929_wp, -52.94859380_wp, & + & -6.10295633_wp, -36.34715528_wp, -50.61310562_wp, -7.28050093_wp, & + & -37.50442408_wp, -50.47417125_wp, -5.15876128_wp, -37.88579189_wp, & + & -50.75896912_wp, -5.25775947_wp, -38.92988819_wp, -50.88102718_wp, & + & -4.23068515_wp, -37.49239781_wp, -49.39138083_wp, -5.13144336_wp, & + & -37.81554388_wp, -49.41590508_wp, -6.42100110_wp, -35.30818865_wp, & + & -48.85416881_wp, -6.23464039_wp, -33.98749433_wp, -47.33514790_wp, & + & -6.16614938_wp, -34.16332132_wp, -46.80309734_wp, -6.53850913_wp, & + & -35.20507448_wp, -48.73415472_wp, -6.70482485_wp, -36.00514782_wp, & + & -49.23988379_wp, -5.30005241_wp, -33.56671256_wp, -49.21580343_wp, & + & -7.39943615_wp, -33.05897850_wp, -50.29761015_wp, -7.46405851_wp, & + & -32.97780880_wp, -48.83295176_wp, -8.33269378_wp, -33.46402003_wp, & + & -48.79586652_wp, -7.24078583_wp, -32.07074330_wp, -58.28154190_wp, & + & -7.12999847_wp, -41.26849969_wp, -56.83820348_wp, -7.07021224_wp, & + & -41.18121935_wp, -56.49464868_wp, -6.91848427_wp, -39.69736379_wp, & + & -57.35147893_wp, -6.59107629_wp, -38.88148482_wp, -58.75457087_wp, & + & -6.82238642_wp, -40.42433428_wp, -56.41994259_wp, -7.99841387_wp, & + & -41.58469630_wp, -56.28249322_wp, -5.87659939_wp, -41.96614635_wp, & + & -56.56731097_wp, -5.97661418_wp, -43.01014052_wp, -56.69057396_wp, & + & -4.94884055_wp, -41.57327461_wp, -55.19973244_wp, -5.84772828_wp, & + & -41.89607414_wp, -55.22045165_wp, -7.13773412_wp, -39.38923300_wp, & + & -54.65921569_wp, -6.94876998_wp, -38.06864061_wp, -53.14055774_wp, & + & -6.87301333_wp, -38.24417337_wp, -52.60626545_wp, -7.24372779_wp, & + & -39.28535440_wp, -54.53790772_wp, -7.41805601_wp, -40.08677190_wp, & + & -55.04920930_wp, -6.01584438_wp, -37.64805582_wp, -55.01606101_wp, & + & -8.11490913_wp, -37.13999132_wp, -56.09760390_wp, -8.18355951_wp, & + & -37.05858613_wp, -54.62982342_wp, -9.04673701_wp, -37.54508635_wp, & + & -54.59654502_wp, -7.95460484_wp, -36.15184233_wp, -64.08834728_wp, & + & -7.85145996_wp, -45.34559618_wp, -62.64511304_wp, -7.79211400_wp, & + & -45.25738257_wp, -62.30237732_wp, -7.63963128_wp, -43.77339120_wp, & + & -63.15937206_wp, -7.31105101_wp, -42.95819069_wp, -64.56195842_wp, & + & -7.54085461_wp, -44.50288093_wp, -62.22700397_wp, -8.72061448_wp, & + & -45.66025581_wp, -62.08820109_wp, -6.59889124_wp, -46.04210322_wp, & + & -62.37334031_wp, -6.69814819_wp, -47.08607937_wp, -62.49503692_wp, & + & -5.67078121_wp, -45.64875405_wp, -61.00539101_wp, -6.57137989_wp, & + & -45.97221798_wp, -61.02824983_wp, -7.85875367_wp, -43.46492676_wp, & + & -60.46648572_wp, -7.66958392_wp, -42.14464509_wp, -58.94802153_wp, & + & -7.59231085_wp, -42.32140497_wp, -58.41428918_wp, -7.96272837_wp, & + & -43.36298101_wp, -60.34614813_wp, -8.14092679_wp, -44.16215735_wp, & + & -60.85729293_wp, -6.73728145_wp, -41.72350336_wp, -60.82111696_wp, & + & -8.83657651_wp, -41.21620261_wp, -61.90248726_wp, -8.90659288_wp, & + & -41.13368317_wp, -60.43417623_wp, -9.76772771_wp, -41.62219340_wp, & + & -60.40071310_wp, -8.67631190_wp, -40.22842269_wp, -69.89453082_wp, & + & -8.56114654_wp, -49.42523398_wp, -68.45116916_wp, -8.50532178_wp, & + & -49.33647876_wp, -68.10860306_wp, -8.35445303_wp, -47.85229748_wp, & + & -68.96527293_wp, -8.02478157_wp, -47.03718340_wp, -70.36762031_wp, & + & -8.25164328_wp, -48.58179774_wp, -68.03508637_wp, -9.43460843_wp, & + & -49.73967467_wp, -67.89124330_wp, -7.31306555_wp, -50.12051814_wp, & + & -68.17551006_wp, -7.41169822_wp, -51.16479146_wp, -68.29681658_wp, & + & -6.38425636_wp, -49.72752012_wp, -66.80845556_wp, -7.28752082_wp, & + & -50.04953376_wp, -66.83505269_wp, -8.57633594_wp, -47.54340872_wp, & + & -66.27341753_wp, -8.38761476_wp, -46.22301619_wp, -64.75476744_wp, & + & -8.31245408_wp, -46.39912193_wp, -64.22104678_wp, -8.68372268_wp, & + & -47.44038767_wp, -66.15316435_wp, -8.85928707_wp, -48.24052526_wp, & + & -66.66320418_wp, -7.45467647_wp, -45.80232279_wp, -66.62972160_wp, & + & -9.55379759_wp, -45.29420091_wp, -67.71119567_wp, -9.62283582_wp, & + & -45.21230945_wp, -66.24328828_wp, -10.48551708_wp, -45.69936552_wp, & + & -66.20977630_wp, -9.39324927_wp, -44.30627091_wp, -75.69856682_wp, & + & -9.26720146_wp, -53.50908923_wp, -74.25533974_wp, -9.21049143_wp, & + & -53.41910465_wp, -73.91421639_wp, -9.05937442_wp, -51.93460077_wp, & + & -74.77164775_wp, -8.72941440_wp, -51.12040377_wp, -76.17252545_wp, & + & -8.95770614_wp, -52.66613151_wp, -73.83829302_wp, -10.13954189_wp, & + & -53.82184861_wp, -73.69549708_wp, -8.01794323_wp, -54.20274564_wp, & + & -73.97932813_wp, -8.11656628_wp, -55.24714094_wp, -74.10151881_wp, & + & -7.08930340_wp, -53.80981079_wp, -72.61274390_wp, -7.99206951_wp, & + & -54.13136181_wp, -72.64108400_wp, -9.28178383_wp, -51.62452938_wp, & + & -72.08022992_wp, -9.09373077_wp, -50.30370933_wp, -70.56135788_wp, & + & -9.02097325_wp, -50.47898314_wp, -70.02778432_wp, -9.39254077_wp, & + & -51.52023774_wp, -71.95860440_wp, -9.56447773_wp, -52.32121524_wp, & + & -72.46869461_wp, -8.16009853_wp, -49.88331400_wp, -72.43922693_wp, & + & -10.25925652_wp, -49.37511179_wp, -73.52088950_wp, -10.32633045_wp, & + & -49.29400461_wp, -72.05423671_wp, -11.19168041_wp, -49.78003047_wp, & + & -72.01973388_wp, -10.09952706_wp, -48.38685681_wp, -81.50008475_wp, & + & -9.97280482_wp, -57.59560961_wp, -80.05682523_wp, -9.91760555_wp, & + & -57.50537298_wp, -79.71610968_wp, -9.76636983_wp, -56.02079885_wp, & + & -80.57367700_wp, -9.43580948_wp, -55.20697437_wp, -81.97371455_wp, & + & -9.66279403_wp, -56.75263716_wp, -79.64061956_wp, -10.84723928_wp, & + & -57.90764510_wp, -79.49552171_wp, -8.72591831_wp, -58.28927140_wp, & + & -79.77893087_wp, -8.82474523_wp, -59.33376170_wp, -79.90092080_wp, & + & -7.79674797_wp, -57.89694652_wp, -78.41278133_wp, -8.70095924_wp, & + & -58.21736519_wp, -78.44324666_wp, -9.98933754_wp, -55.71008512_wp, & + & -77.88326261_wp, -9.80098694_wp, -54.38895237_wp, -76.36432098_wp, & + & -9.72771235_wp, -54.56320158_wp, -75.82981968_wp, -10.09941914_wp, & + & -55.60392685_wp, -77.76043542_wp, -10.27233576_wp, -56.40630680_wp, & + & -78.27227078_wp, -8.86739030_wp, -53.96897180_wp, -78.24263726_wp, & + & -10.96644441_wp, -53.46042344_wp, -79.32434576_wp, -11.03377173_wp, & + & -53.38012733_wp, -77.85710034_wp, -11.89884601_wp, -53.86486960_wp, & + & -77.82394966_wp, -10.80641427_wp, -52.47187624_wp, -87.30280148_wp, & + & -10.67498891_wp, -61.68132638_wp, -85.85955172_wp, -10.61958395_wp, & + & -61.59106827_wp, -85.51863889_wp, -10.46854345_wp, -60.10654041_wp, & + & -86.37591865_wp, -10.13764374_wp, -59.29256554_wp, -87.77666275_wp, & + & -10.36474188_wp, -60.83859613_wp, -85.44329455_wp, -11.54911373_wp, & + & -61.99352494_wp, -85.29841992_wp, -9.42772169_wp, -62.37482426_wp, & + & -85.58208680_wp, -9.52632439_wp, -63.41926483_wp, -85.70369655_wp, & + & -8.49863038_wp, -61.98218575_wp, -84.21566382_wp, -9.40282153_wp, & + & -62.30316981_wp, -84.24576774_wp, -10.69199064_wp, -59.79615169_wp, & + & -83.68534034_wp, -10.50449095_wp, -58.47510274_wp, -82.16635966_wp, & + & -10.43274194_wp, -58.64962570_wp, -81.63235826_wp, -10.80512372_wp, & + & -59.69036234_wp, -83.56339798_wp, -10.97564735_wp, -60.49253355_wp, & + & -84.07332921_wp, -9.57062689_wp, -58.05478690_wp, -84.04555190_wp, & + & -11.66985066_wp, -57.54676235_wp, -85.12730393_wp, -11.73636359_wp, & + & -57.46639195_wp, -83.66075056_wp, -12.60246974_wp, -57.95141273_wp, & + & -83.62665743_wp, -11.51032721_wp, -56.55821996_wp, -93.10443138_wp, & + & -11.37975298_wp, -65.76851082_wp, -91.66121426_wp, -11.32345792_wp, & + & -65.67826977_wp, -91.32051453_wp, -11.17212161_wp, -64.19371276_wp, & + & -92.17806962_wp, -10.84154858_wp, -63.37988896_wp, -93.57838505_wp, & + & -11.06940548_wp, -64.92586478_wp, -91.24437444_wp, -12.25270664_wp, & + & -66.08075549_wp, -91.10075236_wp, -10.13118162_wp, -66.46188349_wp, & + & -91.38423051_wp, -10.22984718_wp, -67.50636692_wp, -91.50664699_wp, & + & -9.20238251_wp, -66.06919230_wp, -90.01801977_wp, -10.10561429_wp, & + & -66.39008176_wp, -90.04757160_wp, -11.39478133_wp, -63.88302285_wp, & + & -89.48772643_wp, -11.20667638_wp, -62.56179463_wp, -87.96870197_wp, & + & -11.13476714_wp, -62.73567287_wp, -87.43421360_wp, -11.50698344_wp, & + & -63.77622042_wp, -89.36485325_wp, -11.67835922_wp, -64.57908819_wp, & + & -89.87602624_wp, -10.27266929_wp, -62.14207139_wp, -89.84823923_wp, & + & -12.37164684_wp, -61.63308751_wp, -90.93001118_wp, -12.43796398_wp, & + & -61.55284295_wp, -89.46352434_wp, -13.30446490_wp, -62.03735976_wp, & + & -89.42944803_wp, -12.21183470_wp, -60.64454910_wp, -98.90917553_wp, & + & -12.08929677_wp, -69.85053274_wp, -97.46586093_wp, -12.03211377_wp, & + & -69.76184159_wp, -97.12349403_wp, -11.88040965_wp, -68.27773587_wp, & + & -97.98031722_wp, -11.55050497_wp, -67.46287243_wp, -99.38256831_wp, & + & -11.77964106_wp, -69.00733085_wp, -97.04899875_wp, -12.96123591_wp, & + & -70.16462018_wp, -96.90695748_wp, -10.83977909_wp, -70.54646776_wp, & + & -97.19139312_wp, -10.93907502_wp, -71.59063204_wp, -97.31306705_wp, & + & -9.91108202_wp, -70.15376639_wp, -95.82417302_wp, -10.81348339_wp, & + & -70.47574140_wp, -95.84998750_wp, -12.10203576_wp, -67.96847969_wp, & + & -95.28919762_wp, -11.91370108_wp, -66.64767749_wp, -93.77034483_wp, & + & -11.84058360_wp, -66.82241642_wp, -93.23601461_wp, -12.21289223_wp, & + & -67.86299809_wp, -95.16784475_wp, -12.38524931_wp, -68.66522592_wp, & + & -95.67805428_wp, -10.98014588_wp, -66.22747863_wp, -95.64794340_wp, & + & -13.07921054_wp, -65.71894180_wp, -96.72959914_wp, -13.14680453_wp, & + & -65.63822649_wp, -95.26229158_wp, -14.01152901_wp, -66.12347826_wp, & + & -95.22890052_wp, -12.91898965_wp, -64.73057599_wp, -104.71300746_wp, & + & -12.80515799_wp, -73.93289916_wp, -103.26983756_wp, -12.74639445_wp, & + & -73.84320993_wp, -102.92849605_wp, -12.59455989_wp, -72.35885605_wp, & + & -103.78601959_wp, -12.26525358_wp, -71.54449930_wp, -105.18734177_wp, & + & -12.49540239_wp, -73.09026643_wp, -102.85159860_wp, -13.67483790_wp, & + & -74.24608737_wp, -102.71183213_wp, -11.55298957_wp, -74.62688774_wp, & + & -102.99570372_wp, -11.65188240_wp, -75.67124286_wp, -103.11906744_wp, & + & -10.62496426_wp, -74.23375335_wp, -101.62910347_wp, -11.52560526_wp, & + & -74.55567232_wp, -101.65497365_wp, -12.81524730_wp, -72.04904097_wp, & + & -101.09416274_wp, -12.62563722_wp, -70.72842465_wp, -99.57544464_wp, & + & -12.55089397_wp, -70.90387782_wp, -99.04134835_wp, -12.92262500_wp, & + & -71.94480344_wp, -100.97234029_wp, -13.09767042_wp, -72.74566743_wp, & + & -101.48391752_wp, -11.69230546_wp, -70.30855841_wp, -101.45135060_wp, & + & -13.79110080_wp, -69.79904692_wp, -102.53288760_wp, -13.85933183_wp, & + & -69.71728015_wp, -101.06555444_wp, -14.72328957_wp, -70.20374253_wp, & + & -101.03144195_wp, -13.63041334_wp, -68.81112218_wp, -110.51264835_wp, & + & -13.52094910_wp, -78.02113348_wp, -109.06957035_wp, -13.46267355_wp, & + & -77.92971989_wp, -108.72997948_wp, -13.31049209_wp, -76.44497187_wp, & + & -109.58848256_wp, -12.98110711_wp, -75.63168310_wp, -110.98786751_wp, & + & -13.21145300_wp, -77.17889582_wp, -108.65121251_wp, -14.39147850_wp, & + & -78.33166879_wp, -108.51006538_wp, -12.26988903_wp, -78.71324275_wp, & + & -108.79260664_wp, -12.36922977_wp, -79.75791583_wp, -108.91743999_wp, & + & -11.34148887_wp, -78.32114215_wp, -107.42741964_wp, -12.24291064_wp, & + & -78.64062158_wp, -107.45681353_wp, -13.53118105_wp, -76.13373707_wp, & + & -106.89716959_wp, -13.34177814_wp, -74.81261157_wp, -105.37828532_wp, & + & -13.26674617_wp, -74.98686404_wp, -104.84334598_wp, -13.63833361_wp, & + & -76.02740259_wp, -106.77362813_wp, -13.81395293_wp, -76.82968483_wp, & + & -107.28736588_wp, -12.40856597_wp, -74.39290342_wp, -107.25496456_wp, & + & -14.50745088_wp, -73.88373575_wp, -108.33658052_wp, -14.57643655_wp, & + & -73.80362158_wp, -106.86788976_wp, -15.43939344_wp, -74.28777306_wp, & + & -106.83670267_wp, -14.34640611_wp, -72.89517172_wp, -116.31005812_wp, & + & -14.23255149_wp, -82.11227714_wp, -114.86688714_wp, -14.17664550_wp, & + & -82.02095677_wp, -114.52737786_wp, -14.02510965_wp, -80.53611231_wp, & + & -115.38579635_wp, -13.69504800_wp, -79.72298647_wp, -116.78445464_wp, & + & -13.92257336_wp, -81.26972059_wp, -114.44991344_wp, -15.10606817_wp, & + & -82.42290852_wp, -114.30555885_wp, -12.98464958_wp, -82.80437886_wp, & + & -114.58834832_wp, -13.08339668_wp, -83.84904457_wp, -114.71148253_wp, & + & -12.05567329_wp, -82.41213423_wp, -113.22286660_wp, -12.95933271_wp, & + & -82.73186444_wp, -113.25458793_wp, -14.24712055_wp, -80.22435363_wp, & + & -112.69582030_wp, -14.05806198_wp, -78.90279983_wp, -111.17684256_wp, & + & -13.98252527_wp, -79.07579430_wp, -110.64089971_wp, -14.35378051_wp, & + & -80.11593153_wp, -112.57106893_wp, -14.52983930_wp, -80.91997859_wp, & + & -113.08668833_wp, -13.12517199_wp, -78.48300025_wp, -113.05389656_wp, & + & -15.22425960_wp, -77.97468093_wp, -114.13552855_wp, -15.29323390_wp, & + & -77.89479895_wp, -112.66680222_wp, -16.15598408_wp, -78.37920155_wp, & + & -112.63579085_wp, -15.06383844_wp, -76.98594864_wp, -122.10927271_wp, & + & -14.93269984_wp, -86.20322316_wp, -120.66607625_wp, -14.87880606_wp, & + & -86.11099003_wp, -120.32673072_wp, -14.72823100_wp, -84.62605970_wp, & + & -121.18468804_wp, -14.39702222_wp, -83.81293634_wp, -122.58411071_wp, & + & -14.62215581_wp, -85.36116566_wp, -120.25031893_wp, -15.80875076_wp, & + & -86.51301392_wp, -120.10271322_wp, -13.68749328_wp, -86.89398865_wp, & + & -120.38504589_wp, -13.78582729_wp, -87.93881657_wp, -120.50763619_wp, & + & -12.75800920_wp, -86.50191462_wp, -119.02003204_wp, -13.66362784_wp, & + & -86.82086896_wp, -119.05426676_wp, -14.95240306_wp, -84.31446644_wp, & + & -118.49464345_wp, -14.76484663_wp, -82.99309034_wp, -116.97554569_wp, & + & -14.69257233_wp, -83.16675887_wp, -116.44086202_wp, -15.06471307_wp, & + & -84.20722816_wp, -118.37145547_wp, -15.23623834_wp, -85.01034647_wp, & + & -118.88320133_wp, -13.83115089_wp, -82.57293350_wp, -118.85491519_wp, & + & -15.93040854_wp, -82.06503114_wp, -119.93668803_wp, -15.99755054_wp, & + & -81.98546888_wp, -118.46927292_wp, -16.86281285_wp, -82.46937516_wp, & + & -118.43685510_wp, -15.77062978_wp, -81.07617584_wp, -127.90006872_wp, & + & -15.64119074_wp, -90.30678157_wp, -126.45735601_wp, -15.58152326_wp, & + & -90.21100148_wp, -126.12209565_wp, -15.42925165_wp, -88.72530876_wp, & + & -126.98270380_wp, -15.09896249_wp, -87.91462921_wp, -128.37833107_wp, & + & -15.32988214_wp, -89.46696910_wp, -126.03703315_wp, -16.50982591_wp, & + & -90.61201562_wp, -125.89681334_wp, -14.38796037_wp, -90.99261591_wp, & + & -126.17648344_wp, -14.48711743_wp, -92.03807730_wp, -126.30602310_wp, & + & -13.46007407_wp, -90.60121366_wp, -124.81438892_wp, -14.36008629_wp, & + & -90.91710594_wp, -124.84997293_wp, -15.65081201_wp, -88.41053830_wp, & + & -124.29332236_wp, -15.46192805_wp, -87.08808211_wp, -122.77380660_wp, & + & -15.39158772_wp, -87.25879590_wp, -122.23771318_wp, -15.76416764_wp, & + & -88.29841016_wp, -124.16513006_wp, -15.93435324_wp, -89.10459130_wp, & + & -124.68161754_wp, -14.52713464_wp, -86.67009884_wp, -124.65710069_wp, & + & -16.62570110_wp, -86.15916485_wp, -125.73912569_wp, -16.69102069_wp, & + & -86.08152001_wp, -124.27223904_wp, -17.55923279_wp, -86.56165173_wp, & + & -124.24059945_wp, -16.46535669_wp, -85.16974675_wp, -133.68008423_wp, & + & -16.39013365_wp, -94.41845282_wp, -132.23773292_wp, -16.32511383_wp, & + & -94.32071811_wp, -131.90518845_wp, -16.16349365_wp, -92.83543693_wp, & + & -132.76805383_wp, -15.83161922_wp, -92.02781638_wp, -134.16100609_wp, & + & -16.07217780_wp, -93.58269487_wp, -131.81401291_wp, -17.25435131_wp, & + & -94.71592476_wp, -131.68000748_wp, -15.13418265_wp, -95.10832013_wp, & + & -131.95836803_wp, -15.23985208_wp, -96.15349206_wp, -132.09223470_wp, & + & -14.20536835_wp, -94.72231927_wp, -130.59773799_wp, -15.10270797_wp, & + & -95.03196270_wp, -130.63280899_wp, -16.37911765_wp, -92.51750929_wp, & + & -130.07963507_wp, -16.18325429_wp, -91.19463002_wp, -128.56008207_wp, & + & -16.10704209_wp, -91.36217236_wp, -128.01991581_wp, -16.48141771_wp, & + & -92.39901369_wp, -129.94590998_wp, -16.66402204_wp, -93.20892277_wp, & + & -130.47292433_wp, -15.24878792_wp, -90.78064214_wp, -130.44038307_wp, & + & -17.34561839_wp, -90.26275167_wp, -131.52227963_wp, -17.41526475_wp, & + & -90.18709464_wp, -130.05078746_wp, -18.27875089_wp, -90.66161167_wp, & + & -130.02656535_wp, -17.18046117_wp, -89.27299811_wp, -139.44493474_wp, & + & -17.14259551_wp, -98.54139784_wp, -138.00210280_wp, -17.10725445_wp, & + & -98.43658878_wp, -137.67347512_wp, -16.92971835_wp, -96.95234231_wp, & + & -138.53392511_wp, -16.57179545_wp, -96.15334218_wp, -139.92338584_wp, & + & -16.79490576_wp, -97.71612745_wp, -137.59683283_wp, -18.05149619_wp, & + & -98.81519870_wp, -137.41528682_wp, -15.94065249_wp, -99.23939664_wp, & + & -137.69008251_wp, -16.05668041_wp, -100.28441010_wp, -137.81019377_wp, & + & -14.99759370_wp, -98.87012166_wp, -136.33301083_wp, -15.93011137_wp, & + & -99.15736064_wp, -136.40641508_wp, -17.16248998_wp, -96.62514321_wp, & + & -135.85591492_wp, -16.95147189_wp, -95.30356760_wp, -134.33631922_wp, & + & -16.87206881_wp, -95.46902806_wp, -133.79264795_wp, -17.25746361_wp, & + & -96.49996449_wp, -135.72003813_wp, -17.46315420_wp, -97.31024868_wp, & + & -136.25328806_wp, -16.01407619_wp, -94.90032496_wp, -136.21503503_wp, & + & -18.10560068_wp, -94.36091050_wp, -137.29680414_wp, -18.17613458_wp, & + & -94.28433686_wp, -135.82422362_wp, -19.04181375_wp, -94.75127949_wp, & + & -135.80120386_wp, -17.93080549_wp, -93.37279828_wp, -145.18776026_wp, & + & -17.74260215_wp, -102.69870318_wp, -143.74780990_wp, -17.81497538_wp, & + & -102.57650072_wp, -143.42184801_wp, -17.59990359_wp, -101.09640058_wp, & + & -144.26365944_wp, -17.15356300_wp, -100.32246496_wp, -145.64365318_wp, & + & -17.30883848_wp, -101.90199604_wp, -143.41514784_wp, -18.80420166_wp, & + & -102.90816296_wp, -143.06362026_wp, -16.73492107_wp, -103.42190801_wp, & + & -143.33566941_wp, -16.87617565_wp, -104.46451379_wp, -143.38721729_wp, & + & -15.74833520_wp, -103.10017998_wp, -141.98461673_wp, -16.80428255_wp, & + & -103.32567245_wp, -142.17756512_wp, -17.90671444_wp, -100.74361325_wp, & + & -141.62798083_wp, -17.67679638_wp, -99.42496872_wp, -140.10600713_wp, & + & -17.63791084_wp, -99.58280476_wp, -139.56539419_wp, -18.06403989_wp, & + & -100.59913873_wp, -141.50324746_wp, -18.26774567_wp, -101.41099150_wp, & + & -142.00551644_wp, -16.72051982_wp, -99.04813289_wp, -142.02009143_wp, & + & -18.79915130_wp, -98.45739665_wp, -143.10354151_wp, -18.84152060_wp, & + & -98.38433780_wp, -141.65068218_wp, -19.75361348_wp, -98.82370577_wp, & + & -141.60633932_wp, -18.61162785_wp, -97.47154766_wp, -150.98253993_wp, & + & -18.39290493_wp, -106.79466547_wp, -149.54502806_wp, -18.50447342_wp, & + & -106.67325787_wp, -149.19881473_wp, -18.17240376_wp, -105.21978021_wp, & + & -150.01283474_wp, -17.61806495_wp, -104.48707320_wp, -151.41645040_wp, & + & -17.86262805_wp, -106.04570597_wp, -149.24959394_wp, -19.52964751_wp, & + & -106.91975423_wp, -148.83232771_wp, -17.52545009_wp, -107.61298488_wp, & + & -149.11009279_wp, -17.75260379_wp, -108.63876769_wp, -149.12806027_wp, & + & -16.50520542_wp, -107.38222900_wp, -147.75555284_wp, -17.61583215_wp, & + & -107.50973804_wp, -147.96760910_wp, -18.50455198_wp, -104.84429254_wp, & + & -147.40141413_wp, -18.18775027_wp, -103.55079724_wp, -145.88080290_wp, & + & -18.27278751_wp, -103.70147467_wp, -145.37070932_wp, -18.81637337_wp, & + & -104.67665886_wp, -147.31642851_wp, -18.95934713_wp, -105.47650695_wp, & + & -147.70756171_wp, -17.17438044_wp, -103.27033480_wp, -147.87291686_wp, & + & -19.17835139_wp, -102.48024938_wp, -148.95611151_wp, -19.13070615_wp, & + & -102.40659080_wp, -147.57876669_wp, -20.18902390_wp, -102.75153367_wp, & + & -147.44162778_wp, -18.92906788_wp, -101.51576024_wp, -156.72069076_wp, & + & -18.96249591_wp, -110.92540709_wp, -155.32004054_wp, -19.26398409_wp, & + & -110.72417716_wp, -154.96698245_wp, -18.80604188_wp, -109.30684980_wp, & + & -155.71394174_wp, -18.06326320_wp, -108.67695025_wp, -157.08541849_wp, & + & -18.26298919_wp, -110.28702489_wp, -155.17644291_wp, -20.34417973_wp, & + & -110.83131463_wp, -154.44322545_wp, -18.52518042_wp, -111.74149795_wp, & + & -154.72529651_wp, -18.83394738_wp, -112.74448133_wp, -154.58588445_wp, & + & -17.45175044_wp, -111.64660466_wp, -153.39533778_wp, -18.75943560_wp, & + & -111.58124117_wp, -153.80422570_wp, -19.25594179_wp, -108.84444802_wp, & + & -153.21783176_wp, -18.84270888_wp, -107.58799006_wp, -151.70221357_wp, & + & -19.00156491_wp, -107.73225699_wp, -151.21952645_wp, -19.66672910_wp, & + & -108.64387337_wp, -153.19765450_wp, -19.84410505_wp, -109.40652651_wp, & + & -153.48478289_wp, -17.79659716_wp, -107.40573646_wp, -153.72034555_wp, & + & -19.71119987_wp, -106.42922527_wp, -154.80056539_wp, -19.61781079_wp, & + & -106.35686720_wp, -153.46457036_wp, -20.75282932_wp, -106.60578693_wp, & + & -153.27414310_wp, -19.38957309_wp, -105.49328206_wp, -162.50558892_wp, & + & -19.59407432_wp, -115.00822495_wp, -161.15006239_wp, -20.01571481_wp, & + & -114.72906620_wp, -160.73206243_wp, -19.32774328_wp, -113.42694351_wp, & + & -161.38182108_wp, -18.39306610_wp, -112.96792184_wp, -162.77603080_wp, & + & -18.74033995_wp, -114.53084480_wp, -161.14030658_wp, -21.10455989_wp, & + & -114.61350965_wp, -160.20036146_wp, -19.60996757_wp, -115.86160269_wp, & + & -160.52746771_wp, -20.08005424_wp, -116.78515871_wp, -160.21180757_wp, & + & -18.53052357_wp, -115.98906517_wp, -159.18691556_wp, -19.93086972_wp, & + & -115.64144076_wp, -159.62506799_wp, -19.80741670_wp, -112.86804869_wp, & + & -158.99077233_wp, -19.23115835_wp, -111.70225748_wp, -157.51345520_wp, & + & -19.62740520_wp, -111.76059470_wp, -157.12376061_wp, -20.50945183_wp, & + & -112.51995289_wp, -159.09625558_wp, -20.56346230_wp, -113.29089982_wp, & + & -159.10294776_wp, -18.14266643_wp, -111.74452229_wp, -159.62164969_wp, & + & -19.76188817_wp, -110.41000129_wp, -160.67580792_wp, -19.49840423_wp, & + & -110.39554320_wp, -159.52507310_wp, -20.84365057_wp, -110.36466733_wp, & + & -159.13647895_wp, -19.32532644_wp, -109.54247999_wp, -168.25470406_wp, & + & -20.18516211_wp, -119.10307152_wp, -167.00681549_wp, -20.76921153_wp, & + & -118.66116868_wp, -166.49414587_wp, -19.90067352_wp, -117.50935565_wp, & + & -166.96730908_wp, -18.78854352_wp, -117.29579296_wp, -168.35700193_wp, & + & -19.20531894_wp, -118.86021377_wp, -167.20415950_wp, -21.79078704_wp, & + & -118.32005965_wp, -165.97511749_wp, -20.79370342_wp, -119.79432001_wp, & + & -166.36349049_wp, -21.38791991_wp, -120.61705506_wp, -165.78333441_wp, & + & -19.78315794_wp, -120.14590814_wp, -165.04323761_wp, -21.23237623_wp, & + & -119.45088673_wp, -165.50954343_wp, -20.43716258_wp, -116.79411647_wp, & + & -164.79848763_wp, -19.73461360_wp, -115.74811774_wp, -163.38210216_wp, & + & -20.31304667_wp, -115.70344468_wp, -163.11152829_wp, -21.37189650_wp, & + & -116.26189586_wp, -165.11186368_wp, -21.34064542_wp, -117.02795868_wp, & + & -164.77599999_wp, -18.66928197_wp, -115.99983905_wp, -165.48159047_wp, & + & -19.92895333_wp, -114.38977107_wp, -166.49424325_wp, -19.53822139_wp, & + & -114.44137688_wp, -165.52121820_wp, -20.98622280_wp, -114.14042637_wp, & + & -164.93820216_wp, -19.40108900_wp, -113.61212238_wp, -174.02569059_wp, & + & -20.74293638_wp, -123.15309822_wp, -172.91613283_wp, -21.40599922_wp, & + & -122.50431771_wp, -172.23867537_wp, -20.37409880_wp, -121.59971286_wp, & + & -172.46123898_wp, -19.17410755_wp, -121.72521117_wp, -173.92023819_wp, & + & -19.73808996_wp, -123.23259414_wp, -173.31266707_wp, -22.24043788_wp, & + & -121.91664362_wp, -171.90775766_wp, -21.93123649_wp, -123.53260500_wp, & + & -172.40615320_wp, -22.63777193_wp, -124.19122038_wp, -171.52022504_wp, & + & -21.10818086_wp, -124.12781110_wp, -171.08166179_wp, -22.43102758_wp, & + & -123.03583684_wp, -171.39842741_wp, -20.88266196_wp, -120.70177409_wp, & + & -170.54799571_wp, -20.08183831_wp, -119.84803950_wp, -169.26651919_wp, & + & -20.88436222_wp, -119.60988389_wp, -169.21244487_wp, -22.08416717_wp, & + & -119.86207348_wp, -171.19965247_wp, -21.87656521_wp, -120.66652745_wp, & + & -170.32903119_wp, -19.14164781_wp, -120.36433409_wp, -171.23029205_wp, & + & -19.78966469_wp, -118.50692104_wp, -172.14994586_wp, -19.23969970_wp, & + & -118.68679378_wp, -171.46712643_wp, -20.72128990_wp, -117.99938847_wp, & + & -170.58071398_wp, -19.19515355_wp, -117.87175769_wp, -178.45731398_wp, & + & -22.59133092_wp, -127.78492807_wp, -178.04739654_wp, -22.77729019_wp, & + & -126.40245096_wp, -177.12758813_wp, -21.63475758_wp, -125.98896265_wp, & + & -176.32348200_wp, -21.13707541_wp, -126.77128616_wp, -177.67431889_wp, & + & -22.19805187_wp, -128.30108443_wp, -178.94872746_wp, -22.77672072_wp, & + & -125.77901500_wp, -177.24971030_wp, -24.07033763_wp, -126.14736929_wp, & + & -177.87326632_wp, -24.93965913_wp, -126.33971455_wp, -176.38312169_wp, & + & -24.09943905_wp, -126.80638120_wp, -176.89385458_wp, -24.10498991_wp, & + & -125.11978749_wp, -177.25315271_wp, -21.23625063_wp, -124.71351007_wp, & + & -176.24077693_wp, -20.42458109_wp, -124.07037392_wp, -175.15793573_wp, & + & -21.35386920_wp, -123.50127529_wp, -175.34440423_wp, -22.56020698_wp, & + & -123.37820417_wp, -177.82530903_wp, -21.79141619_wp, -124.09322789_wp, & + & -175.79721109_wp, -19.79610735_wp, -124.84898070_wp, -176.85504993_wp, & + & -19.57950960_wp, -122.95828020_wp, -177.63573616_wp, -18.94532501_wp, & + & -123.36725153_wp, -177.28440236_wp, -20.22478522_wp, -122.19557146_wp, & + & -176.09604308_wp, -18.95416405_wp, -122.49797285_wp, -178.68649769_wp, & + & -23.48699594_wp, -128.20159558_wp, 3.70834428_wp, -1.13305430_wp, & + & 5.21467324_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_64 + +subroutine polyala_68(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 683 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.50166687_wp, -0.15675796_wp, -0.19632642_wp, 0.65783596_wp, & + & 0.61559627_wp, 0.19297212_wp, 1.57222146_wp, -0.31116189_wp, & + & 0.99500129_wp, 1.15555682_wp, -1.36296026_wp, 1.46732348_wp, & + & -0.73241494_wp, -0.90997508_wp, 0.44104957_wp, 1.15144477_wp, & + & 0.96709383_wp, -0.71881233_wp, 0.25437777_wp, 1.80794251_wp, & + & 1.06786905_wp, -0.43328012_wp, 2.44296321_wp, 0.51626419_wp, & + & -0.23152359_wp, 1.45532269_wp, 1.97433798_wp, 1.12585723_wp, & + & 2.38880074_wp, 1.35197494_wp, 2.83880609_wp, 0.10243520_wp, & + & 1.11888621_wp, 3.73910074_wp, -0.54035243_wp, 2.05273630_wp, & + & 3.31622644_wp, -0.19764460_wp, 3.48089714_wp, 2.45089631_wp, & + & 0.60471494_wp, 3.74919069_wp, 3.08816989_wp, 1.02973477_wp, & + & 0.80691455_wp, 3.62461632_wp, -1.62508198_wp, 1.94166862_wp, & + & 5.18307211_wp, -0.12208365_wp, 1.80142181_wp, 5.47022967_wp, & + & -0.38617320_wp, 0.78859090_wp, 5.29515528_wp, 0.95061873_wp, & + & 1.93847656_wp, 5.83524016_wp, -0.63591020_wp, 2.50064864_wp, & + & 4.00109021_wp, -0.87154636_wp, 4.37893660_wp, -6.24982993_wp, & + & -0.56444637_wp, -4.24917501_wp, -4.91766793_wp, -0.02730929_wp, & + & -4.07765792_wp, -4.29011306_wp, -0.75329396_wp, -2.88470770_wp, & + & -4.97838343_wp, -1.40046561_wp, -2.10167490_wp, -6.65913129_wp, & + & -0.92965962_wp, -3.39637615_wp, -4.35060035_wp, -0.22141086_wp, & + & -4.99372206_wp, -4.96122618_wp, 1.47916227_wp, -3.79963318_wp, & + & -5.41988743_wp, 1.98730843_wp, -4.64325507_wp, -5.54796616_wp, & + & 1.67542835_wp, -2.90583133_wp, -3.95774556_wp, 1.86816956_wp, & + & -3.65543173_wp, -2.97147951_wp, -0.61096950_wp, -2.77241735_wp, & + & -2.20500253_wp, -1.07754329_wp, -1.63760677_wp, -1.10780510_wp, & + & -0.04301805_wp, -1.37615148_wp, -0.82103320_wp, 0.80565157_wp, & + & -2.21424212_wp, -2.45319992_wp, -0.00990812_wp, -3.40325830_wp, & + & -2.87929056_wp, -1.15409815_wp, -0.77846682_wp, -1.57065672_wp, & + & -2.44307818_wp, -1.92461901_wp, -2.35513709_wp, -3.16856821_wp, & + & -2.12155811_wp, -0.92241331_wp, -2.37678717_wp, -2.79468266_wp, & + & -0.98577817_wp, -2.77748731_wp, -1.07296448_wp, -11.90632371_wp, & + & -1.45820877_wp, -8.40493324_wp, -10.49943968_wp, -1.13234926_wp, & + & -8.31864443_wp, -10.06801766_wp, -1.41458847_wp, -6.87736002_wp, & + & -10.89816177_wp, -1.58960435_wp, -5.99051654_wp, -12.38065797_wp, & + & -1.46663109_wp, -7.50791513_wp, -9.95067194_wp, -1.77002006_wp, & + & -9.01958254_wp, -10.25141531_wp, 0.34082997_wp, -8.66112854_wp, & + & -10.58783680_wp, 0.53122053_wp, -9.67672629_wp, -10.80423826_wp, & + & 0.98075794_wp, -7.97817553_wp, -9.19383662_wp, 0.57574634_wp, & + & -8.58966021_wp, -8.75319938_wp, -1.43872268_wp, -6.67825462_wp, & + & -8.13717639_wp, -1.55995017_wp, -5.37508158_wp, -6.80824428_wp, & + & -0.80356616_wp, -5.43346092_wp, -6.31550256_wp, -0.46645668_wp, & + & -6.50533166_wp, -8.09921973_wp, -1.24003388_wp, -7.42756679_wp, & + & -8.80701862_wp, -1.11311300_wp, -4.63315882_wp, -7.87940942_wp, & + & -3.02912935_wp, -5.02094901_wp, -8.82567621_wp, -3.56283684_wp, & + & -5.00058827_wp, -7.23132657_wp, -3.48364007_wp, -5.76597993_wp, & + & -7.40722787_wp, -3.10947865_wp, -4.04638899_wp, -17.61937226_wp, & + & -2.46627066_wp, -12.50313886_wp, -16.18356081_wp, -2.30633937_wp, & + & -12.42114582_wp, -15.82740854_wp, -2.28882315_wp, -10.93266320_wp, & + & -16.69500463_wp, -2.14820087_wp, -10.07580107_wp, -18.10402826_wp, & + & -2.26665224_wp, -11.63380291_wp, -15.70521092_wp, -3.15419272_wp, & + & -12.92297164_wp, -15.73272002_wp, -1.00051389_wp, -13.08513446_wp, & + & -16.02811562_wp, -1.01583440_wp, -14.13085425_wp, -16.20178527_wp, & + & -0.15083029_wp, -12.59569766_wp, -14.65395848_wp, -0.89515769_wp, & + & -13.02491184_wp, -14.53215968_wp, -2.41906578_wp, -10.66288927_wp, & + & -13.96475778_wp, -2.30773007_wp, -9.33684202_wp, -12.50774961_wp, & + & -1.87442789_wp, -9.51526988_wp, -11.95901172_wp, -1.93312403_wp, & + & -10.61155507_wp, -13.83858104_wp, -2.50072664_wp, -11.39943362_wp, & + & -14.52811927_wp, -1.55386165_wp, -8.77691840_wp, -14.02332551_wp, & + & -3.64760747_wp, -8.59458481_wp, -15.06087854_wp, -3.95745476_wp, & + & -8.50303550_wp, -13.47344789_wp, -4.40504886_wp, -9.14726996_wp, & + & -13.59454451_wp, -3.55186783_wp, -7.60175430_wp, -23.36611554_wp, & + & -3.19100516_wp, -16.62793298_wp, -21.92313275_wp, -3.15913500_wp, & + & -16.52511489_wp, -21.59182825_wp, -3.05500311_wp, -15.03444709_wp, & + & -22.45386506_wp, -2.75211558_wp, -14.21471037_wp, -23.84211096_wp, & + & -2.89675110_wp, -15.78069637_wp, -21.51682577_wp, -4.08322737_wp, & + & -16.94973934_wp, -21.33919063_wp, -1.95457482_wp, -17.27206208_wp, & + & -21.61092242_wp, -2.02404004_wp, -18.32200193_wp, -21.73944962_wp, & + & -1.03096886_wp, -16.86176394_wp, -20.25708135_wp, -1.94257730_wp, & + & -17.18684153_wp, -20.32139413_wp, -3.29135221_wp, -14.72296250_wp, & + & -19.76542707_wp, -3.11855263_wp, -13.39822418_wp, -18.25871641_wp, & + & -2.91734191_wp, -13.57759381_wp, -17.70804997_wp, -3.18245335_wp, & + & -14.64216053_wp, -19.63042432_wp, -3.52358542_wp, -15.42967664_wp, & + & -20.22327070_wp, -2.23676489_wp, -12.93755002_wp, -20.02600877_wp, & + & -4.34672292_wp, -12.51909724_wp, -21.09842170_wp, -4.50074340_wp, & + & -12.43437419_wp, -19.57382628_wp, -5.22881347_wp, -12.96495882_wp, & + & -19.61100302_wp, -4.19770446_wp, -11.52714504_wp, -29.14975609_wp, & + & -3.72317178_wp, -20.76479359_wp, -27.70605467_wp, -3.70754685_wp, & + & -20.66589098_wp, -27.37091800_wp, -3.57744010_wp, -19.17794883_wp, & + & -28.22556147_wp, -3.23406498_wp, -18.36633224_wp, -29.61958345_wp, & + & -3.40642945_wp, -19.92213427_wp, -27.31295074_wp, -4.64533367_wp, & + & -21.07255230_wp, -27.10775644_wp, -2.52619988_wp, -21.43786736_wp, & + & -27.38681153_wp, -2.61037226_wp, -22.48480882_wp, -27.49050688_wp, & + & -1.58900220_wp, -21.04198319_wp, -26.02522214_wp, -2.53083211_wp, & + & -21.35891787_wp, -26.10605390_wp, -3.83440436_wp, -18.86071850_wp, & + & -25.55208886_wp, -3.66983903_wp, -17.53384536_wp, -24.03093695_wp, & + & -3.61959877_wp, -17.69606217_wp, -23.49444267_wp, -3.97893674_wp, & + & -18.74004670_wp, -25.42440049_wp, -4.12293255_wp, -19.55569448_wp, & + & -25.92800870_wp, -2.73382612_wp, -17.10718842_wp, -25.93885117_wp, & + & -4.83784989_wp, -16.61965088_wp, -27.02222141_wp, -4.88849339_wp, & + & -16.55021333_wp, -25.56430380_wp, -5.77274560_wp, -17.02853077_wp, & + & -25.52743930_wp, -4.69365051_wp, -15.62560834_wp, -34.96278140_wp, & + & -4.33618570_wp, -24.85716589_wp, -33.51896782_wp, -4.29138785_wp, & + & -24.76878770_wp, -33.17529077_wp, -4.14450167_wp, -23.28438324_wp, & + & -34.02896824_wp, -3.80571285_wp, -22.46984313_wp, -35.43300111_wp, & + & -4.02168729_wp, -24.01394914_wp, -33.11011958_wp, -5.22348828_wp, & + & -25.17286724_wp, -32.95030606_wp, -3.10275681_wp, -25.55197118_wp, & + & -33.23669758_wp, -3.19774121_wp, -26.59600774_wp, -33.34776837_wp, & + & -2.17115638_wp, -25.15730197_wp, -31.86727277_wp, -3.08627032_wp, & + & -25.48236446_wp, -31.90448870_wp, -4.38035579_wp, -22.97458637_wp, & + & -31.34324552_wp, -4.20358126_wp, -21.65230689_wp, -29.82260645_wp, & + & -4.16522714_wp, -21.82234216_wp, -29.29357040_wp, -4.54695992_wp, & + & -22.86220847_wp, -31.22541855_wp, -4.67236228_wp, -23.67073311_wp, & + & -31.71183389_wp, -3.26120056_wp, -21.23347926_wp, -31.73046430_wp, & + & -5.36014917_wp, -20.72372295_wp, -32.81358326_wp, -5.40361286_wp, & + & -20.64610222_wp, -31.36450280_wp, -6.30113804_wp, -21.12652559_wp, & + & -31.31083975_wp, -5.20870951_wp, -19.73420624_wp, -40.77728009_wp, & + & -5.03434757_wp, -28.93061694_wp, -39.33383030_wp, -4.97773690_wp, & + & -28.84358012_wp, -38.98977691_wp, -4.82326873_wp, -27.36004955_wp, & + & -39.84558668_wp, -4.49093139_wp, -26.54510508_wp, -41.24935105_wp, & + & -4.72299682_wp, -28.08727082_wp, -38.91769214_wp, -5.90774548_wp, & + & -29.24504368_wp, -38.77527421_wp, -3.78699673_wp, -29.63087909_wp, & + & -39.06184353_wp, -3.88739974_wp, -30.67435812_wp, -39.17971156_wp, & + & -2.85738002_wp, -29.23861043_wp, -37.69233275_wp, -3.76169604_wp, & + & -29.56232250_wp, -37.71608660_wp, -5.04516928_wp, -27.05193615_wp, & + & -37.15278046_wp, -4.85657584_wp, -25.73220217_wp, -35.63360439_wp, & + & -4.79428650_wp, -25.90910884_wp, -35.10346969_wp, -5.17213016_wp, & + & -26.94986873_wp, -37.03538055_wp, -5.33146158_wp, -27.74891785_wp, & + & -37.53456497_wp, -3.91911530_wp, -25.31419673_wp, -37.51844122_wp, & + & -6.01688783_wp, -24.79966461_wp, -38.60044649_wp, -6.07649955_wp, & + & -24.71724177_wp, -37.14014335_wp, -6.95306963_wp, -25.20224478_wp, & + & -37.09684934_wp, -5.85705342_wp, -23.81232052_wp, -46.58858996_wp, & + & -5.74725229_wp, -33.00405352_wp, -45.14512194_wp, -5.69094186_wp, & + & -32.91693220_wp, -44.80101213_wp, -5.53701614_wp, -31.43341791_wp, & + & -45.65714887_wp, -5.20696143_wp, -30.61788496_wp, -47.06075639_wp, & + & -5.43700991_wp, -32.16036624_wp, -44.72919619_wp, -6.62099555_wp, & + & -33.31855080_wp, -44.58629031_wp, -4.50026415_wp, -33.70413257_wp, & + & -44.87257915_wp, -4.60073902_wp, -34.74768046_wp, -44.99080495_wp, & + & -3.57060367_wp, -33.31205036_wp, -43.50336551_wp, -4.47495900_wp, & + & -33.63529297_wp, -43.52683288_wp, -5.75678820_wp, -31.12568493_wp, & + & -42.96412210_wp, -5.56719338_wp, -29.80585524_wp, -41.44541637_wp, & + & -5.49533565_wp, -29.98302943_wp, -40.91320020_wp, -5.86862019_wp, & + & -31.02436118_wp, -42.84545561_wp, -6.04045181_wp, -31.82303406_wp, & + & -43.35149116_wp, -4.63273142_wp, -29.38627981_wp, -43.32278362_wp, & + & -6.73121060_wp, -28.87525589_wp, -44.40441157_wp, -6.79740866_wp, & + & -28.79291062_wp, -42.93889439_wp, -7.66443583_wp, -29.27938462_wp, & + & -42.90212472_wp, -6.57044240_wp, -27.88767512_wp, -52.39560892_wp, & + & -6.44841089_wp, -37.08541122_wp, -50.95222327_wp, -6.39481599_wp, & + & -36.99539579_wp, -50.61030702_wp, -6.24365295_wp, -35.51110527_wp, & + & -51.46706065_wp, -5.91312007_wp, -34.69643666_wp, -52.86906202_wp, & + & -6.13782014_wp, -36.24260142_wp, -50.53720299_wp, -7.32493661_wp, & + & -37.39777550_wp, -50.38995783_wp, -5.20377089_wp, -37.77962762_wp, & + & -50.67440415_wp, -5.30208280_wp, -38.82388173_wp, -50.79376716_wp, & + & -4.27410974_wp, -37.38680949_wp, -49.30712832_wp, -5.18027438_wp, & + & -37.70867027_wp, -49.33697139_wp, -6.46624043_wp, -35.20179867_wp, & + & -48.77526151_wp, -6.27809073_wp, -33.88133597_wp, -47.25642294_wp, & + & -6.20644761_wp, -34.05745450_wp, -46.72368683_wp, -6.57830110_wp, & + & -35.09904149_wp, -48.65509719_wp, -6.74971019_wp, -35.89874663_wp, & + & -49.16265616_wp, -5.34386908_wp, -33.46123992_wp, -49.13500205_wp, & + & -7.44278069_wp, -32.95200901_wp, -50.21669782_wp, -7.50846146_wp, & + & -32.87018147_wp, -48.75145411_wp, -8.37583888_wp, -33.35683273_wp, & + & -48.71465900_wp, -7.28318563_wp, -31.96410209_wp, -58.19468507_wp, & + & -7.14042149_wp, -41.18067211_wp, -56.75143318_wp, -7.08785536_wp, & + & -41.08804293_wp, -56.41257397_wp, -6.93622477_wp, -39.60301456_wp, & + & -57.27090432_wp, -6.60448727_wp, -38.79048761_wp, -58.66917348_wp, & + & -6.82923584_wp, -40.33863144_wp, -56.33632812_wp, -8.01855482_wp, & + & -41.48899692_wp, -56.18661209_wp, -5.89774671_wp, -41.87182114_wp, & + & -56.46908148_wp, -5.99638336_wp, -42.91658143_wp, -56.59036454_wp, & + & -4.96750652_wp, -41.48032405_wp, -55.10390296_wp, -5.87517549_wp, & + & -41.79873796_wp, -55.14019198_wp, -7.15991345_wp, -39.29064220_wp, & + & -54.58147491_wp, -6.97284108_wp, -37.96873300_wp, -53.06200858_wp, & + & -6.90487278_wp, -38.14093350_wp, -52.52755920_wp, -7.27704962_wp, & + & -39.18152688_wp, -54.45708546_wp, -7.44454214_wp, -39.98591082_wp, & + & -54.96756587_wp, -6.03752782_wp, -37.54984552_wp, -54.94665300_wp, & + & -8.13638288_wp, -37.04008667_wp, -56.02873942_wp, -8.19950219_wp, & + & -36.96142086_wp, -54.56410512_wp, -9.07047967_wp, -37.44345812_wp, & + & -54.52887804_wp, -7.97746354_wp, -36.05098410_wp, -63.99734600_wp, & + & -7.83631522_wp, -45.27001532_wp, -62.55389120_wp, -7.78285349_wp, & + & -45.18048239_wp, -62.21219917_wp, -7.63075355_wp, -43.69616512_wp, & + & -63.06932230_wp, -7.29959076_wp, -42.88211181_wp, -64.47015149_wp, & + & -7.52542246_wp, -44.42690578_wp, -62.13908108_wp, -8.71339823_wp, & + & -45.58210543_wp, -61.99151807_wp, -6.59261276_wp, -45.96579808_wp, & + & -62.27597737_wp, -6.69185395_wp, -47.00996402_wp, -62.39520089_wp, & + & -5.66253257_wp, -45.57385657_wp, -60.90868731_wp, -6.56919957_wp, & + & -45.89486460_wp, -60.93912971_wp, -7.85341077_wp, -43.38574840_wp, & + & -60.37971414_wp, -7.66648216_wp, -42.06409381_wp, -58.86029148_wp, & + & -7.59807847_wp, -42.23621638_wp, -58.32538793_wp, -7.97113435_wp, & + & -43.27622983_wp, -60.25674689_wp, -8.13785147_wp, -44.08174111_wp, & + & -60.76615209_wp, -6.73151658_wp, -41.64477082_wp, -60.74396933_wp, & + & -8.83053145_wp, -41.13567568_wp, -61.82598347_wp, -8.89412636_wp, & + & -41.05645583_wp, -60.36122119_wp, -9.76431118_wp, -41.53960351_wp, & + & -60.32571987_wp, -8.67179439_wp, -40.14674055_wp, -69.80415087_wp, & + & -8.53733245_wp, -49.35241217_wp, -68.36076625_wp, -8.48205376_wp, & + & -49.26313437_wp, -68.01857253_wp, -8.33012383_wp, -47.77893450_wp, & + & -68.87538054_wp, -7.99931477_wp, -46.96442447_wp, -70.27738337_wp, & + & -8.22675347_wp, -48.50945090_wp, -67.94488490_wp, -9.41180942_wp, & + & -49.66545029_wp, -67.80018396_wp, -7.29059336_wp, -50.04791292_wp, & + & -68.08490835_wp, -7.38949885_wp, -51.09203731_wp, -68.20487236_wp, & + & -6.36127604_wp, -49.65519572_wp, -66.71735357_wp, -7.26588452_wp, & + & -49.97736505_wp, -66.74523979_wp, -8.55249994_wp, -47.46947511_wp, & + & -66.18392413_wp, -8.36458411_wp, -46.14878017_wp, -64.66483075_wp, & + & -8.29512797_wp, -46.32382467_wp, -64.13179428_wp, -8.66826452_wp, & + & -47.36478572_wp, -66.06334824_wp, -8.83642581_wp, -48.16621203_wp, & + & -66.57031205_wp, -7.42972368_wp, -45.72918334_wp, -66.54572515_wp, & + & -9.52850846_wp, -45.21926646_wp, -67.62754785_wp, -9.59265873_wp, & + & -45.13787615_wp, -66.16331175_wp, -10.46222151_wp, -45.62366241_wp, & + & -66.12558889_wp, -9.36923828_wp, -44.23121464_wp, -75.60703180_wp, & + & -9.24427804_wp, -53.43898744_wp, -74.16380002_wp, -9.18760645_wp, & + & -53.34859699_wp, -73.82313728_wp, -9.03481018_wp, -51.86414279_wp, & + & -74.68097649_wp, -8.70434386_wp, -51.05057030_wp, -76.08115531_wp, & + & -8.93396608_wp, -52.59641827_wp, -73.74675289_wp, -10.11718472_wp, & + & -53.75012888_wp, -73.60356655_wp, -7.99605701_wp, -54.13346790_wp, & + & -73.88723454_wp, -8.09578572_wp, -55.17780216_wp, -74.00943425_wp, & + & -7.06688546_wp, -53.74163185_wp, -72.52082264_wp, -7.97036286_wp, & + & -54.06192550_wp, -72.54999222_wp, -9.25626155_wp, -51.55340656_wp, & + & -71.98993953_wp, -9.06751375_wp, -50.23230720_wp, -70.47080808_wp, & + & -8.99681626_wp, -50.40643377_wp, -69.93692866_wp, -9.36952537_wp, & + & -51.44712736_wp, -71.86720387_wp, -9.53985344_wp, -52.24941898_wp, & + & -72.37737488_wp, -8.13282136_wp, -49.81329738_wp, -72.35162199_wp, & + & -10.23143320_wp, -49.30276057_wp, -73.43346967_wp, -10.29638391_wp, & + & -49.22230445_wp, -71.96815358_wp, -11.16497702_wp, -49.70654308_wp, & + & -71.93248574_wp, -10.07153877_wp, -48.31438792_wp, -81.40876261_wp, & + & -9.96007411_wp, -57.52450873_wp, -79.96556781_wp, -9.90177408_wp, & + & -57.43499423_wp, -79.62445759_wp, -9.74830443_wp, -55.95076012_wp, & + & -80.48229916_wp, -9.41845847_wp, -55.13692716_wp, -81.88269505_wp, & + & -9.64976814_wp, -56.68182277_wp, -79.54767997_wp, -10.83095223_wp, & + & -57.83657158_wp, -79.40711326_wp, -8.70972593_wp, -58.22037592_wp, & + & -79.69132070_wp, -8.80991210_wp, -59.26451942_wp, -79.81374422_wp, & + & -7.78094247_wp, -57.82841334_wp, -78.32435503_wp, -8.68284557_wp, & + & -58.14949987_wp, -78.35103742_wp, -9.96846707_wp, -55.64030061_wp, & + & -77.79142038_wp, -9.77894947_wp, -54.31915711_wp, -76.27243296_wp, & + & -9.70573746_wp, -54.49292515_wp, -75.73752372_wp, -10.07835441_wp, & + & -55.53311723_wp, -77.66800478_wp, -10.25155905_wp, -56.33625128_wp, & + & -78.18060364_wp, -8.84502881_wp, -53.90006183_wp, -78.15115769_wp, & + & -10.94367939_wp, -53.38985255_wp, -79.23288661_wp, -11.01033101_wp, & + & -53.30922527_wp, -77.76630000_wp, -11.87650845_wp, -53.79396734_wp, & + & -77.73207709_wp, -10.78339376_wp, -52.40151839_wp, -87.21138989_wp, & + & -10.67924020_wp, -61.60728623_wp, -85.76822143_wp, -10.62066045_wp, & + & -61.51785165_wp, -85.42689396_wp, -10.46707776_wp, -60.03371962_wp, & + & -86.28446239_wp, -10.13699294_wp, -59.21971062_wp, -87.68548632_wp, & + & -10.36862748_wp, -60.76482505_wp, -85.35021664_wp, -11.54976141_wp, & + & -61.91948045_wp, -85.21001116_wp, -9.42849427_wp, -62.30324297_wp, & + & -85.49429172_wp, -9.52867588_wp, -63.34736395_wp, -85.61673107_wp, & + & -8.49978806_wp, -61.91118742_wp, -84.12724861_wp, -9.40146500_wp, & + & -62.23244987_wp, -84.15339873_wp, -10.68735557_wp, -59.72363954_wp, & + & -83.59312892_wp, -10.49734429_wp, -58.40288730_wp, -82.07434734_wp, & + & -10.42282897_wp, -58.57773376_wp, -81.53975242_wp, -10.79556738_wp, & + & -59.61804160_wp, -83.47069692_wp, -10.97057955_wp, -60.41985823_wp, & + & -83.98283870_wp, -9.56374503_wp, -57.98357223_wp, -83.95120388_wp, & + & -11.66235037_wp, -57.47328793_wp, -85.03281742_wp, -11.72999297_wp, & + & -57.39195663_wp, -83.56573961_wp, -12.59484708_wp, -57.87758990_wp, & + & -83.53162525_wp, -11.50160499_wp, -56.48523766_wp, -93.01297016_wp, & + & -11.39652885_wp, -65.69139024_wp, -91.56978059_wp, -11.33904807_wp, & + & -65.60150066_wp, -91.22878423_wp, -11.18578457_wp, -64.11725873_wp, & + & -92.08629963_wp, -10.85496773_wp, -63.30349750_wp, -93.48708280_wp, & + & -11.08541109_wp, -64.84912664_wp, -91.15235258_wp, -12.26842136_wp, & + & -66.00308938_wp, -91.01038555_wp, -10.14720011_wp, -66.38654160_wp, & + & -91.29423614_wp, -10.24706944_wp, -67.43080692_wp, -91.41664445_wp, & + & -9.21825220_wp, -65.99457794_wp, -89.92763557_wp, -10.12092147_wp, & + & -66.31522577_wp, -89.95555781_wp, -11.40710895_wp, -63.80676961_wp, & + & -89.39552685_wp, -11.21705112_wp, -62.48592436_wp, -87.87674299_wp, & + & -11.14241218_wp, -62.66049093_wp, -87.34186336_wp, -11.51542398_wp, & + & -63.70054992_wp, -89.27285073_wp, -11.69076207_wp, -64.50279697_wp, & + & -89.78542304_wp, -10.28348833_wp, -62.06670493_wp, -89.75359328_wp, & + & -12.38208269_wp, -61.55635365_wp, -90.83520568_wp, -12.44988115_wp, & + & -61.47517764_wp, -89.36791718_wp, -13.31453403_wp, -61.96055722_wp, & + & -89.33417718_wp, -12.22123149_wp, -60.56824966_wp, -98.81438696_wp, & + & -12.10802902_wp, -69.77660288_wp, -97.37113464_wp, -12.05231212_wp, & + & -69.68628796_wp, -97.03027494_wp, -11.89975540_wp, -68.20192056_wp, & + & -97.88756067_wp, -11.56799128_wp, -67.38830994_wp, -99.28836903_wp, & + & -11.79639513_wp, -68.93445973_wp, -96.95473902_wp, -12.98208605_wp, & + & -70.08801263_wp, -96.81008970_wp, -10.86092669_wp, -70.47085799_wp, & + & -97.09377572_wp, -10.96014305_wp, -71.51522974_wp, -97.21531859_wp, & + & -9.93159211_wp, -70.07874117_wp, -95.72732580_wp, -10.83598872_wp, & + & -70.39924693_wp, -95.75738234_wp, -12.12272804_wp, -67.89117284_wp, & + & -95.19729506_wp, -11.93321833_wp, -66.57025945_wp, -93.67842968_wp, & + & -11.85951173_wp, -66.74462873_wp, -93.14361189_wp, -12.23311004_wp, & + & -67.78450180_wp, -95.07489652_wp, -12.40705152_wp, -68.58713601_wp, & + & -95.58670677_wp, -10.99951679_wp, -66.15091251_wp, -95.55599264_wp, & + & -13.09822283_wp, -65.64088945_wp, -96.63764161_wp, -13.16565938_wp, & + & -65.55992282_wp, -95.17054809_wp, -14.03076858_wp, -66.04509856_wp, & + & -95.13670812_wp, -12.93761001_wp, -64.65268741_wp, -104.61458944_wp, & + & -12.81160035_wp, -73.86489950_wp, -103.17132155_wp, -12.75798760_wp, & + & -73.77349817_wp, -102.83127561_wp, -12.60649920_wp, -72.28881274_wp, & + & -103.68867211_wp, -12.27380684_wp, -71.47569957_wp, -105.08872823_wp, & + & -12.49964089_wp, -73.02296380_wp, -102.75597370_wp, -13.68816784_wp, & + & -74.17535998_wp, -102.60803005_wp, -11.56702265_wp, -74.55710085_wp, & + & -102.89087050_wp, -11.66546111_wp, -75.60177572_wp, -103.01246073_wp, & + & -10.63732969_wp, -74.16500471_wp, -101.52530243_wp, -11.54347765_wp, & + & -74.48447070_wp, -101.55891661_wp, -12.83141467_wp, -71.97727228_wp, & + & -100.99912326_wp, -12.64233577_wp, -70.65615354_wp, -99.48008863_wp, & + & -12.57027098_wp, -70.83002137_wp, -98.94538931_wp, -12.94443254_wp, & + & -71.86975562_wp, -100.87636953_wp, -13.11635896_wp, -72.67293063_wp, & + & -101.38769040_wp, -11.70814916_wp, -70.23710219_wp, -101.35939882_wp, & + & -13.80679296_wp, -69.72671544_wp, -102.44114671_wp, -13.87306272_wp, & + & -69.64609677_wp, -100.97482056_wp, -14.73982878_wp, -70.13061740_wp, & + & -100.94027882_wp, -13.64644965_wp, -68.73839759_wp, -110.41307544_wp, & + & -13.50710048_wp, -77.95697043_wp, -108.96978578_wp, -13.45556688_wp, & + & -77.86491170_wp, -108.63039188_wp, -13.30456845_wp, -76.38002201_wp, & + & -109.48791341_wp, -12.97100475_wp, -75.56738645_wp, -110.88707621_wp, & + & -13.19485419_wp, -77.11505179_wp, -108.55559310_wp, -14.38639295_wp, & + & -78.26648726_wp, -108.40436395_wp, -12.26551654_wp, -78.64835071_wp, & + & -108.68685558_wp, -12.36367433_wp, -79.69314837_wp, -108.80763366_wp, & + & -11.33518622_wp, -78.25657226_wp, -107.32163940_wp, -12.24355194_wp, & + & -78.57521345_wp, -107.35851737_wp, -13.53103747_wp, -76.06769463_wp, & + & -106.79942276_wp, -13.34274700_wp, -74.74616581_wp, -105.28017122_wp, & + & -13.27257300_wp, -74.91894685_wp, -104.74524940_wp, -13.64702128_wp, & + & -75.95846672_wp, -106.67582496_wp, -13.81665363_wp, -76.76293417_wp, & + & -107.18713529_wp, -12.40810094_wp, -74.32734175_wp, -107.16185080_wp, & + & -14.50680655_wp, -73.81706613_wp, -108.24374625_wp, -14.57180248_wp, & + & -73.73737175_wp, -106.77803468_wp, -15.44028799_wp, -74.22066306_wp, & + & -106.74339564_wp, -14.34698743_wp, -72.82838304_wp, -116.21257006_wp, & + & -14.19730689_wp, -82.04849557_wp, -114.76923573_wp, -14.14651154_wp, & + & -81.95693983_wp, -114.42931181_wp, -13.99628705_wp, -80.47213369_wp, & + & -115.28646179_wp, -13.66280406_wp, -79.65906371_wp, -116.68612256_wp, & + & -13.88540379_wp, -81.20619322_wp, -114.35560922_wp, -15.07738021_wp, & + & -82.35901070_wp, -114.20357768_wp, -12.95643743_wp, -82.74017329_wp, & + & -114.48632441_wp, -13.05422535_wp, -83.78493681_wp, -114.60648507_wp, & + & -12.02609077_wp, -82.34806251_wp, -113.12083446_wp, -12.93483158_wp, & + & -82.66725607_wp, -113.15743001_wp, -14.22328104_wp, -80.16025693_wp, & + & -112.59822623_wp, -14.03569266_wp, -78.83868872_wp, -111.07891384_wp, & + & -13.96708910_wp, -79.01127140_wp, -110.54420351_wp, -14.34178559_wp, & + & -80.05081253_wp, -112.47493788_wp, -14.50888760_wp, -80.85569083_wp, & + & -112.98499571_wp, -13.10066883_wp, -78.41981674_wp, -112.96199604_wp, & + & -15.19942598_wp, -77.90970344_wp, -114.04397081_wp, -15.26320859_wp, & + & -77.83011172_wp, -112.57919372_wp, -16.13330475_wp, -78.31334470_wp, & + & -112.54344686_wp, -15.04014775_wp, -76.92097537_wp, -122.01124816_wp, & + & -14.88780922_wp, -86.14180957_wp, -120.56804146_wp, -14.83570496_wp, & + & -86.04935747_wp, -120.22911716_wp, -14.68502696_wp, -84.56436065_wp, & + & -121.08692158_wp, -14.35201414_wp, -83.75179865_wp, -122.48561810_wp, & + & -14.57631245_wp, -85.29981984_wp, -120.15325647_wp, -15.76623072_wp, & + & -86.45102914_wp, -120.00297792_wp, -13.64518138_wp, -86.83234156_wp, & + & -120.28543894_wp, -13.74306083_wp, -87.87717298_wp, -120.40656056_wp, & + & -12.71513028_wp, -86.44022272_wp, -118.92026468_wp, -13.62289350_wp, & + & -86.75919833_wp, -118.95721978_wp, -14.91114012_wp, -84.25199422_wp, & + & -118.39821152_wp, -14.72393197_wp, -82.93031838_wp, -116.87886053_wp, & + & -14.65622666_wp, -83.10294191_wp, -116.34448763_wp, -15.03063599_wp, & + & -84.14277189_wp, -118.27444556_wp, -15.19651728_wp, -84.94727975_wp, & + & -118.78433899_wp, -13.78867096_wp, -82.51137820_wp, -118.76281968_wp, & + & -15.88750221_wp, -82.00145851_wp, -119.84484714_wp, -15.95063144_wp, & + & -81.92204473_wp, -118.38053820_wp, -16.82158245_wp, -82.40512790_wp, & + & -118.34432956_wp, -15.72858714_wp, -81.01264881_wp, -127.80888515_wp, & + & -15.58105641_wp, -90.23657245_wp, -126.36564383_wp, -15.52845746_wp, & + & -90.14430321_wp, -126.02658811_wp, -15.37727415_wp, -88.65939854_wp, & + & -126.88456746_wp, -15.04497136_wp, -87.84672336_wp, -128.28324921_wp, & + & -15.27027639_wp, -89.39431229_wp, -125.95063412_wp, -16.45903918_wp, & + & -90.54563982_wp, -125.80103452_wp, -14.33815565_wp, -90.92792986_wp, & + & -126.08343374_wp, -14.43676503_wp, -91.97271016_wp, -126.20499703_wp, & + & -13.40803853_wp, -90.53636550_wp, -124.71833243_wp, -14.31538759_wp, & + & -90.85478653_wp, -124.75445181_wp, -15.60220109_wp, -88.34706843_wp, & + & -124.19604229_wp, -15.41483678_wp, -87.02514521_wp, -122.67663269_wp, & + & -15.34659622_wp, -87.19690202_wp, -122.14146345_wp, -15.72046736_wp, & + & -88.23650655_wp, -124.07135588_wp, -15.88700675_wp, -89.04225137_wp, & + & -124.58259017_wp, -14.47964674_wp, -86.60641625_wp, -124.56090123_wp, & + & -16.57844618_wp, -86.09643936_wp, -125.64297095_wp, -16.64201860_wp, & + & -86.01796544_wp, -124.17785776_wp, -17.51241898_wp, -86.49963263_wp, & + & -124.14336468_wp, -16.41919636_wp, -85.10728349_wp, -133.60451195_wp, & + & -16.27917956_wp, -94.33416277_wp, -132.16140440_wp, -16.22469509_wp, & + & -94.24074675_wp, -131.82355621_wp, -16.07326527_wp, -92.75553757_wp, & + & -132.68248551_wp, -15.74195264_wp, -91.94347218_wp, -134.07992495_wp, & + & -15.96853267_wp, -93.49244450_wp, -131.74477804_wp, -17.15457185_wp, & + & -94.64201033_wp, -131.59789698_wp, -15.03332639_wp, -95.02356924_wp, & + & -131.87988358_wp, -15.13166622_wp, -96.06848821_wp, -132.00302252_wp, & + & -14.10388149_wp, -94.63160300_wp, -130.51524244_wp, -15.00936089_wp, & + & -94.95011386_wp, -130.55133930_wp, -16.29671024_wp, -92.44247247_wp, & + & -129.99345840_wp, -16.10914760_wp, -91.12033050_wp, -128.47402753_wp, & + & -16.03985001_wp, -91.29181701_wp, -127.93854410_wp, -16.41302511_wp, & + & -92.33151992_wp, -129.86760515_wp, -16.58082003_wp, -93.13734304_wp, & + & -130.38074646_wp, -15.17432942_wp, -90.70147040_wp, -130.35760433_wp, & + & -17.27323859_wp, -90.19194402_wp, -131.43962436_wp, -17.33738084_wp, & + & -90.11325838_wp, -129.97419923_wp, -18.20688372_wp, -90.59555498_wp, & + & -129.93991883_wp, -17.11415991_wp, -89.20282058_wp, -139.39581988_wp, & + & -16.98406350_wp, -98.43801621_wp, -137.95292807_wp, -16.92644898_wp, & + & -98.34302676_wp, -137.61691006_wp, -16.77390480_wp, -96.85746765_wp, & + & -138.47726221_wp, -16.44368332_wp, -96.04647369_wp, -139.87291601_wp, & + & -16.67317277_wp, -97.59735612_wp, -137.53405732_wp, -17.85562717_wp, & + & -98.74356617_wp, -137.39095666_wp, -15.73423268_wp, -99.12563824_wp, & + & -137.67149968_wp, -15.83353715_wp, -100.17085315_wp, -137.79838857_wp, & + & -14.80545314_wp, -98.73449788_wp, -136.30843954_wp, -15.70807921_wp, & + & -99.05089356_wp, -136.34461700_wp, -16.99509777_wp, -96.54305743_wp, & + & -135.78817738_wp, -16.80711127_wp, -95.22034678_wp, -134.26851480_wp, & + & -16.73760403_wp, -95.39028712_wp, -133.73200934_wp, -17.11031519_wp, & + & -96.42962793_wp, -135.65997448_wp, -17.27895986_wp, -97.23714419_wp, & + & -136.17591550_wp, -15.87217133_wp, -94.80216578_wp, -136.15327173_wp, & + & -17.97091439_wp, -94.29198639_wp, -137.23539639_wp, -18.03553173_wp, & + & -94.21509045_wp, -135.76874936_wp, -18.90458950_wp, -94.69446459_wp, & + & -135.73735616_wp, -17.81111999_wp, -93.30223540_wp, -145.18548530_wp, & + & -17.72762996_wp, -102.53911839_wp, -143.74289784_wp, -17.66009095_wp, & + & -102.44569872_wp, -143.40630523_wp, -17.50104229_wp, -100.96099314_wp, & + & -144.26768888_wp, -17.17284683_wp, -100.15027106_wp, -145.66414084_wp, & + & -17.41420477_wp, -101.70032298_wp, -143.31852930_wp, -18.58763415_wp, & + & -102.84419092_wp, -143.18965544_wp, -16.46641582_wp, -103.23230180_wp, & + & -143.47124838_wp, -16.57007439_wp, -104.27680895_wp, -143.60206483_wp, & + & -15.53915647_wp, -102.84278962_wp, -142.10719664_wp, -16.43345392_wp, & + & -103.15939193_wp, -142.13255104_wp, -17.71429360_wp, -100.64687413_wp, & + & -141.57710037_wp, -17.52102135_wp, -99.32449109_wp, -140.05761862_wp, & + & -17.44676868_wp, -99.49371101_wp, -139.51917745_wp, -17.81996164_wp, & + & -100.53186599_wp, -141.44686325_wp, -17.99714019_wp, -101.34031295_wp, & + & -141.96839062_wp, -16.58650675_wp, -98.90869054_wp, -141.93839287_wp, & + & -18.68400163_wp, -98.39358200_wp, -143.02029265_wp, -18.75176715_wp, & + & -98.31625969_wp, -141.55115026_wp, -19.61730036_wp, -98.79434086_wp, & + & -141.52266484_wp, -18.52094580_wp, -97.40428609_wp, -150.96595762_wp, & + & -18.51633931_wp, -106.64092009_wp, -149.52348086_wp, -18.45421966_wp, & + & -106.54282943_wp, -149.19027037_wp, -18.28217734_wp, -105.05894230_wp, & + & -150.05239009_wp, -17.94394897_wp, -104.25319577_wp, -151.44698399_wp, & + & -18.18682143_wp, -105.80977956_wp, -149.10210465_wp, -19.38730039_wp, & + & -106.93135695_wp, -148.96311827_wp, -17.27006793_wp, -107.33883952_wp, & + & -149.24166216_wp, -17.38235555_wp, -108.38327010_wp, -149.37338572_wp, & + & -16.33772220_wp, -106.95925316_wp, -147.88078380_wp, -17.24023838_wp, & + & -107.26267467_wp, -147.91771904_wp, -18.49606413_wp, -104.74020221_wp, & + & -147.36336373_wp, -18.28888355_wp, -103.41955013_wp, -145.84449938_wp, & + & -18.20504418_wp, -103.59001333_wp, -145.30376051_wp, -18.58359197_wp, & + & -104.62503595_wp, -147.23109121_wp, -18.78464479_wp, -105.43032490_wp, & + & -147.76142516_wp, -17.35413048_wp, -103.01083132_wp, -147.71617307_wp, & + & -19.44761463_wp, -102.48015570_wp, -148.79751124_wp, -19.52140289_wp, & + & -102.40054718_wp, -147.32401300_wp, -20.38123369_wp, -102.87535692_wp, & + & -147.29975215_wp, -19.27543018_wp, -101.49268720_wp, -156.70991814_wp, & + & -19.20011499_wp, -110.79031074_wp, -155.26793183_wp, -19.22421182_wp, & + & -110.67254143_wp, -154.94549948_wp, -19.02969912_wp, -109.18890324_wp, & + & -155.79951534_wp, -18.62727686_wp, -108.40431095_wp, -157.17960522_wp, & + & -18.81359289_wp, -109.97725315_wp, -154.90032483_wp, -20.19297367_wp, & + & -111.02697605_wp, -154.62426183_wp, -18.10153846_wp, -111.49414589_wp, & + & -154.89470985_wp, -18.22801148_wp, -112.53906883_wp, -154.98083263_wp, & + & -17.13449741_wp, -111.14877497_wp, -153.54323047_wp, -18.13568421_wp, & + & -111.40211056_wp, -153.69043814_wp, -19.30120221_wp, -108.84566677_wp, & + & -153.14258840_wp, -19.07800034_wp, -107.52504638_wp, -151.62196072_wp, & + & -19.00924003_wp, -107.68662309_wp, -151.07729316_wp, -19.41123833_wp, & + & -108.71066117_wp, -153.00766647_wp, -19.63039378_wp, -109.52106615_wp, & + & -153.53602212_wp, -18.13341461_wp, -107.13506181_wp, -153.51225676_wp, & + & -20.21877791_wp, -106.57036182_wp, -154.59463848_wp, -20.28089635_wp, & + & -106.49530680_wp, -153.12726859_wp, -21.16209995_wp, -106.94920671_wp, & + & -153.09930963_wp, -20.03591697_wp, -105.58331996_wp, -162.47636185_wp, & + & -19.77754549_wp, -114.93180132_wp, -161.03718510_wp, -19.86824276_wp, & + & -114.81259475_wp, -160.70060220_wp, -19.60611526_wp, -113.34248473_wp, & + & -161.52880434_wp, -19.11148513_wp, -112.58336650_wp, -162.92056052_wp, & + & -19.29142537_wp, -114.15927307_wp, -160.72285953_wp, -20.87400123_wp, & + & -115.11047624_wp, -160.34066918_wp, -18.82975132_wp, -115.69893981_wp, & + & -160.61685462_wp, -19.00550830_wp, -116.73518614_wp, -160.65031902_wp, & + & -17.82767785_wp, -115.41338522_wp, -159.26249231_wp, -18.91004807_wp, & + & -115.60194814_wp, -159.46266146_wp, -19.92898087_wp, -112.98144618_wp, & + & -158.90782323_wp, -19.66973826_wp, -111.67035897_wp, -157.38500903_wp, & + & -19.69881784_wp, -111.82112508_wp, -156.85738119_wp, -20.17615187_wp, & + & -112.82133899_wp, -158.79932638_wp, -20.33246438_wp, -113.63532651_wp, & + & -159.24617336_wp, -18.68425412_wp, -111.33330956_wp, -159.35018464_wp, & + & -20.73509206_wp, -110.66087430_wp, -160.43459447_wp, -20.72662655_wp, & + & -110.58989058_wp, -159.02283633_wp, -21.71851582_wp, -110.98852818_wp, & + & -158.93019590_wp, -20.52799047_wp, -109.68159245_wp, -168.25913995_wp, & + & -20.44230842_wp, -119.00423428_wp, -166.84093574_wp, -20.67985060_wp, & + & -118.84277004_wp, -166.48236179_wp, -20.25252724_wp, -117.41743768_wp, & + & -167.25604865_wp, -19.57611261_wp, -116.74614661_wp, -168.64872273_wp, & + & -19.80696930_wp, -118.31497293_wp, -166.64512139_wp, -21.74732273_wp, & + & -118.98920732_wp, -166.02334623_wp, -19.86635294_wp, -119.85233768_wp, & + & -166.31427651_wp, -20.15508211_wp, -120.85883922_wp, -166.21371285_wp, & + & -18.80462603_wp, -119.71802624_wp, -164.96229207_wp, -20.05627375_wp, & + & -119.72315352_wp, -165.28655148_wp, -20.65067157_wp, -116.99418358_wp, & + & -164.70343597_wp, -20.25565398_wp, -115.73029782_wp, -163.18540476_wp, & + & -20.37077095_wp, -115.88724611_wp, -162.69103726_wp, -20.98970091_wp, & + & -116.82481707_wp, -164.66031221_wp, -21.18807706_wp, -117.58496761_wp, & + & -164.99569020_wp, -19.22203757_wp, -115.51756440_wp, -165.17697512_wp, & + & -21.16720626_wp, -114.59251375_wp, -166.25866982_wp, -21.10153490_wp, & + & -114.51173082_wp, -164.89766712_wp, -22.19724014_wp, -114.79898799_wp, & + & -164.73290260_wp, -20.86061024_wp, -113.65051726_wp, -174.04610946_wp, & + & -21.00940592_wp, -123.08393350_wp, -172.66629085_wp, -21.37985939_wp, & + & -122.85586342_wp, -172.27192249_wp, -20.79831663_wp, -121.49583380_wp, & + & -172.96268599_wp, -19.94394051_wp, -120.94859655_wp, -174.35649236_wp, & + & -20.22277633_wp, -122.52274494_wp, -172.59423595_wp, -22.47240850_wp, & + & -122.84798757_wp, -171.75344317_wp, -20.81202862_wp, -123.94846596_wp, & + & -172.06189334_wp, -21.20985417_wp, -124.91156409_wp, -171.82923848_wp, & + & -19.72790897_wp, -123.97135854_wp, -170.72080752_wp, -21.09204711_wp, & + & -123.76462456_wp, -171.13817257_wp, -21.27246056_wp, -120.98831461_wp, & + & -170.52209881_wp, -20.77160002_wp, -119.77866994_wp, -169.02672628_wp, & + & -21.08103495_wp, -119.88203262_wp, -168.60131644_wp, -21.87920312_wp, & + & -120.71181126_wp, -170.57647471_wp, -21.95933681_wp, -121.48105296_wp, & + & -170.69302040_wp, -19.69157939_wp, -119.72055124_wp, -171.10869421_wp, & + & -21.45103489_wp, -118.53614828_wp, -172.17542891_wp, -21.24849639_wp, & + & -118.49117644_wp, -170.95277174_wp, -22.52545134_wp, -118.58970693_wp, & + & -170.63809105_wp, -21.06810826_wp, -117.63594607_wp, -179.81533556_wp, & + & -21.54258412_wp, -127.16866045_wp, -178.51939941_wp, -22.07359623_wp, & + & -126.80543509_wp, -178.04744778_wp, -21.29502988_wp, -125.57465040_wp, & + & -178.58818954_wp, -20.24425711_wp, -125.24357353_wp, -179.98083839_wp, & + & -20.59872758_wp, -126.83580419_wp, -178.63508802_wp, -23.13711138_wp, & + & -126.57232198_wp, -177.51191491_wp, -21.90118589_wp, -127.94749107_wp, & + & -177.86909244_wp, -22.43778827_wp, -128.82231968_wp, -177.40675550_wp, & + & -20.84816388_wp, -128.19582837_wp, -176.54197501_wp, -22.29667085_wp, & + & -127.66195152_wp, -177.01892612_wp, -21.83619333_wp, -124.92785160_wp, & + & -176.33599616_wp, -21.20096402_wp, -123.82179462_wp, -174.88977964_wp, & + & -21.70200162_wp, -123.84329535_wp, -174.56842719_wp, -22.68314734_wp, & + & -124.50689888_wp, -176.56945217_wp, -22.68454798_wp, -125.25610802_wp, & + & -176.37420851_wp, -20.11639434_wp, -123.96695201_wp, -176.99143055_wp, & + & -21.56511834_wp, -122.48488747_wp, -178.02583977_wp, -21.23241040_wp, & + & -122.49324023_wp, -176.96579452_wp, -22.64187545_wp, -122.33816215_wp, & + & -176.47165150_wp, -21.08233944_wp, -121.66310046_wp, -185.54004780_wp, & + & -22.14132482_wp, -131.24450232_wp, -184.41388374_wp, -22.79786373_wp, & + & -130.61786582_wp, -183.79287553_wp, -21.79567256_wp, -129.64192268_wp, & + & -184.06821841_wp, -20.60128465_wp, -129.69549951_wp, -185.47463828_wp, & + & -21.12984649_wp, -131.25895423_wp, -184.78473037_wp, -23.68096229_wp, & + & -130.08711033_wp, -183.37034784_wp, -23.22031945_wp, -131.65831712_wp, & + & -183.82958827_wp, -23.90704651_wp, -132.36460337_wp, -183.00906786_wp, & + & -22.34865013_wp, -132.19836447_wp, -182.53068099_wp, -23.71417122_wp, & + & -131.17839827_wp, -182.94243141_wp, -22.32249079_wp, -128.76388274_wp, & + & -182.12849353_wp, -21.53976278_wp, -127.85935498_wp, -180.78847993_wp, & + & -22.26592826_wp, -127.71621726_wp, -180.65660363_wp, -23.43222055_wp, & + & -128.07434511_wp, -182.69309947_wp, -23.30468486_wp, -128.79889422_wp, & + & -181.98875365_wp, -20.54606581_wp, -128.29700612_wp, -182.79566682_wp, & + & -21.41348192_wp, -126.48519006_wp, -183.75559803_wp, -20.91709465_wp, & + & -126.59769922_wp, -182.95406340_wp, -22.39982905_wp, -126.05661804_wp, & + & -182.17273966_wp, -20.83130113_wp, -125.81288146_wp, -189.93318599_wp, & + & -23.79812702_wp, -136.02371187_wp, -189.48894512_wp, -24.08006050_wp, & + & -134.66827963_wp, -188.61884755_wp, -22.93206623_wp, -134.17034887_wp, & + & -187.86002887_wp, -22.32365525_wp, -134.91885723_wp, -189.18362732_wp, & + & -23.31511659_wp, -136.51281883_wp, -190.37767117_wp, -24.17751330_wp, & + & -134.03414702_wp, -188.62550114_wp, -25.34905233_wp, -134.53621651_wp, & + & -189.20868200_wp, -26.22776914_wp, -134.80016533_wp, -187.76676039_wp, & + & -25.27674587_wp, -135.20239736_wp, -188.25639568_wp, -25.45727622_wp, & + & -133.51843148_wp, -188.73567735_wp, -22.65862830_wp, -132.86180366_wp, & + & -187.75911472_wp, -21.85180138_wp, -132.16036519_wp, -186.64475489_wp, & + & -22.77274079_wp, -131.64137283_wp, -186.78474101_wp, -23.99075617_wp, & + & -131.59581275_wp, -189.26422657_wp, -23.29819682_wp, -132.28544324_wp, & + & -187.33733453_wp, -21.15697274_wp, -132.89325789_wp, -188.41265235_wp, & + & -21.10575373_wp, -131.00019253_wp, -189.21462114_wp, -20.47619651_wp, & + & -131.37366889_wp, -188.82220117_wp, -21.81626638_wp, -130.28609118_wp, & + & -187.68166994_wp, -20.48400199_wp, -130.49221927_wp, -190.11789644_wp, & + & -24.66564234_wp, -136.51535563_wp, 3.74428772_wp, -0.66258959_wp, & + & 5.29914091_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_68 + +subroutine polyala_72(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 723 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.44713763_wp, -0.20325446_wp, -0.14037146_wp, 0.74732853_wp, & + & 0.53835931_wp, 0.19943528_wp, 1.62225188_wp, -0.38232553_wp, & + & 1.05118649_wp, 1.16275308_wp, -1.39301164_wp, 1.57124942_wp, & + & -0.69384094_wp, -0.92095225_wp, 0.53136750_wp, 1.25246142_wp, & + & 0.81420138_wp, -0.73182850_wp, 0.40108700_wp, 1.79676074_wp, & + & 1.00333282_wp, -0.26806329_wp, 2.42272904_wp, 0.41963245_wp, & + & -0.08748456_wp, 1.51984675_wp, 1.93424183_wp, 1.29727327_wp, & + & 2.36013192_wp, 1.24200557_wp, 2.90331593_wp, -0.01312823_wp, & + & 1.16296059_wp, 3.77213205_wp, -0.64542892_wp, 2.13319850_wp, & + & 3.33607785_wp, -0.24128944_wp, 3.54097665_wp, 2.50084084_wp, & + & 0.60462457_wp, 3.76702364_wp, 3.19031226_wp, 0.88741726_wp, & + & 0.80825791_wp, 3.63206429_wp, -1.73020504_wp, 2.05947596_wp, & + & 5.23005449_wp, -0.27300349_wp, 1.89066002_wp, 5.52695254_wp, & + & -0.58450439_wp, 0.89428804_wp, 5.36669167_wp, 0.80117953_wp, & + & 1.98703428_wp, 5.85774305_wp, -0.77411282_wp, 2.62092454_wp, & + & 3.97603447_wp, -0.91224273_wp, 4.47382333_wp, -6.21635536_wp, & + & -0.76863782_wp, -4.20428151_wp, -4.90799555_wp, -0.18021618_wp, & + & -4.01726170_wp, -4.28021500_wp, -0.86649958_wp, -2.80158753_wp, & + & -4.96097132_wp, -1.53255961_wp, -2.02760664_wp, -6.60332108_wp, & + & -1.18648592_wp, -3.36482863_wp, -4.31441538_wp, -0.36614095_wp, & + & -4.91830288_wp, -5.01054588_wp, 1.32850308_wp, -3.76771429_wp, & + & -5.47864646_wp, 1.80135325_wp, -4.62676631_wp, -5.61416336_wp, & + & 1.52014819_wp, -2.88425864_wp, -4.02391353_wp, 1.75760829_wp, & + & -3.62226844_wp, -2.97261830_wp, -0.66843937_wp, -2.65755363_wp, & + & -2.21166105_wp, -1.11392815_wp, -1.51071382_wp, -1.07072477_wp, & + & -0.11377993_wp, -1.31259527_wp, -0.76871455_wp, 0.68855392_wp, & + & -2.19020122_wp, -2.45394239_wp, -0.06830598_wp, -3.28973032_wp, & + & -2.87413009_wp, -1.12444822_wp, -0.63889371_wp, -1.63831556_wp, & + & -2.51704085_wp, -1.73990038_wp, -2.45633005_wp, -3.21521976_wp, & + & -1.89553970_wp, -0.99782771_wp, -2.51900822_wp, -2.61813357_wp, & + & -1.05938278_wp, -2.83744480_wp, -0.87890574_wp, -11.88678502_wp, & + & -1.59904495_wp, -8.37080025_wp, -10.50128082_wp, -1.19857032_wp, & + & -8.25627102_wp, -10.04416118_wp, -1.58601464_wp, -6.84801931_wp, & + & -10.85622851_wp, -1.88922772_wp, -5.97909491_wp, -12.34461606_wp, & + & -1.75139543_wp, -7.47787263_wp, -9.91859396_wp, -1.73242683_wp, & + & -9.01436663_wp, -10.34220630_wp, 0.31269975_wp, -8.45798067_wp, & + & -10.69672191_wp, 0.57745997_wp, -9.45052661_wp, -10.92625302_wp, & + & 0.85185448_wp, -7.71655262_wp, -9.29950249_wp, 0.60109443_wp, & + & -8.36653106_wp, -8.72905460_wp, -1.54839692_wp, -6.65446259_wp, & + & -8.09504966_wp, -1.73999940_wp, -5.36826554_wp, -6.79078413_wp, & + & -0.93956596_wp, -5.39181529_wp, -6.32763658_wp, -0.51233152_wp, & + & -6.44491474_wp, -8.09210725_wp, -1.24942194_wp, -7.38557850_wp, & + & -8.76723034_wp, -1.36470734_wp, -4.58958451_wp, -7.79103752_wp, & + & -3.22112871_wp, -5.11601816_wp, -8.72168421_wp, -3.78202904_wp, & + & -5.12322803_wp, -7.13842579_wp, -3.60568286_wp, -5.89564584_wp, & + & -7.30729199_wp, -3.35190051_wp, -4.15276063_wp, -17.64084929_wp, & + & -2.27363735_wp, -12.47875494_wp, -16.21745126_wp, -2.02930089_wp, & + & -12.39162897_wp, -15.82119610_wp, -2.23981892_wp, -10.92823351_wp, & + & -16.67042718_wp, -2.28998899_wp, -10.04348086_wp, -18.12204851_wp, & + & -2.21508592_wp, -11.58718728_wp, -15.69979105_wp, -2.74269161_wp, & + & -13.04127858_wp, -15.87342572_wp, -0.59916298_wp, -12.82258315_wp, & + & -16.18597040_wp, -0.45370692_wp, -13.85308374_wp, -16.39222584_wp, & + & 0.11595706_wp, -12.18937978_wp, -14.80394301_wp, -0.42727708_wp, & + & -12.75008588_wp, -14.51359573_wp, -2.33908966_wp, -10.70876905_wp, & + & -13.91666174_wp, -2.41355875_wp, -9.39296463_wp, -12.48975933_wp, & + & -1.87532824_wp, -9.52310280_wp, -11.96279775_wp, -1.73761936_wp, & + & -10.62303953_wp, -13.83757971_wp, -2.26437491_wp, -11.46207618_wp, & + & -14.50439992_wp, -1.79496672_wp, -8.70673863_wp, -13.88308076_wp, & + & -3.85784935_wp, -8.88080089_wp, -14.89951261_wp, -4.23794799_wp, & + & -8.82389761_wp, -13.30804863_wp, -4.48154675_wp, -9.56034118_wp, & + & -13.43406248_wp, -3.90042831_wp, -7.89332306_wp, -23.38515995_wp, & + & -3.06638981_wp, -16.59378489_wp, -21.94452113_wp, -2.96245326_wp, & + & -16.50595346_wp, -21.59601687_wp, -2.93580175_wp, -15.01558391_wp, & + & -22.46215906_wp, -2.74712891_wp, -14.16647511_wp, -23.86515488_wp, & + & -2.83744554_wp, -15.72898568_wp, -21.49734905_wp, -3.83641443_wp, & + & -16.99154757_wp, -21.43855705_wp, -1.68616901_wp, -17.18741478_wp, & + & -21.72503745_wp, -1.70797278_wp, -18.23553170_wp, -21.87932699_wp, & + & -0.81110950_wp, -16.71676964_wp, -20.35717427_wp, -1.62082311_wp, & + & -17.11838315_wp, -20.30836456_wp, -3.11188991_wp, -14.73639837_wp, & + & -19.74371808_wp, -3.01240042_wp, -13.40814053_wp, -18.26111994_wp, & + & -2.67510209_wp, -13.58398689_wp, -17.71012294_wp, -2.79509905_wp, & + & -14.67418459_wp, -19.61524441_wp, -3.24101245_wp, -15.46668544_wp, & + & -20.26240674_wp, -2.21590825_wp, -12.86440963_wp, -19.88903558_wp, & + & -4.33345632_wp, -12.64434293_wp, -20.94426179_wp, -4.57746345_wp, & + & -12.55537950_wp, -19.38342092_wp, -5.13220024_wp, -13.18098942_wp, & + & -19.46122791_wp, -4.24713592_wp, -11.65028930_wp, -29.14977655_wp, & + & -3.71484234_wp, -20.72468962_wp, -27.70671175_wp, -3.68585316_wp, & + & -20.62211039_wp, -27.37571855_wp, -3.57099046_wp, -19.13208103_wp, & + & -28.23668711_wp, -3.25484201_wp, -18.31614422_wp, -29.62462359_wp, & + & -3.41347377_wp, -19.87924945_wp, -27.30278250_wp, -4.61429501_wp, & + & -21.03945079_wp, -27.11957302_wp, -2.48867700_wp, -21.37824793_wp, & + & -27.39283545_wp, -2.56470822_wp, -22.42734523_wp, -27.51616549_wp, & + & -1.56083862_wp, -20.97398831_wp, -26.03737776_wp, -2.48011240_wp, & + & -21.29436492_wp, -26.10706980_wp, -3.81198297_wp, -18.81762041_wp, & + & -25.55211896_wp, -3.64082578_wp, -17.49211773_wp, -24.03741121_wp, & + & -3.50396495_wp, -17.66594039_wp, -23.49328941_wp, -3.80362738_wp, & + & -18.72478598_wp, -25.41813592_wp, -4.06423564_wp, -19.51963203_wp, & + & -25.97470992_wp, -2.73344833_wp, -17.04753428_wp, -25.86951758_wp, & + & -4.84244819_wp, -16.59515400_wp, -26.94811178_wp, -4.94946058_wp, & + & -16.51598530_wp, -25.45247044_wp, -5.75009730_wp, -17.02361173_wp, & + & -25.45546983_wp, -4.69483956_wp, -15.60262955_wp, -34.94165685_wp, & + & -4.30141615_wp, -24.84621947_wp, -33.49806475_wp, -4.26369470_wp, & + & -24.75284067_wp, -33.15997140_wp, -4.12525271_wp, -23.26636515_wp, & + & -34.01601138_wp, -3.78823395_wp, -22.45352313_wp, -35.41263948_wp, & + & -3.98709254_wp, -24.00329956_wp, -33.09219076_wp, -5.19614036_wp, & + & -25.15914489_wp, -32.92074215_wp, -3.07475317_wp, -25.52910642_wp, & + & -33.20244951_wp, -3.16493693_wp, -26.57483793_wp, -33.31626231_wp, & + & -2.14286062_wp, -25.13321899_wp, -31.83798920_wp, -3.06293456_wp, & + & -25.45418034_wp, -31.89149852_wp, -4.36708356_wp, -22.95205278_wp, & + & -31.33660921_wp, -4.19742482_wp, -21.62623667_wp, -29.81564346_wp, & + & -4.14891638_wp, -21.78984473_wp, -29.28023516_wp, -4.51503686_wp, & + & -22.83206325_wp, -31.20919959_wp, -4.65442546_wp, -23.64694968_wp, & + & -31.71180999_wp, -3.25985389_wp, -21.20242405_wp, -31.72251444_wp, & + & -5.36223194_wp, -20.70753367_wp, -32.80580417_wp, -5.41226952_wp, & + & -20.63648143_wp, -31.34885443_wp, -6.29855659_wp, -21.11401809_wp, & + & -31.30962343_wp, -5.21483123_wp, -19.71458748_wp, -40.76071077_wp, & + & -4.99459626_wp, -28.91372454_wp, -39.31711898_wp, -4.93597915_wp, & + & -28.83017261_wp, -38.96967278_wp, -4.78190217_wp, -27.34754488_wp, & + & -39.82339303_wp, -4.44904936_wp, -26.53062625_wp, -41.23142519_wp, & + & -4.68251339_wp, -28.06992849_wp, -38.90084939_wp, -5.86518962_wp, & + & -29.23331446_wp, -38.76212496_wp, -3.74403338_wp, -29.61816198_wp, & + & -39.05094723_wp, -3.84427990_wp, -30.66102859_wp, -39.16691153_wp, & + & -2.81519631_wp, -29.22442492_wp, -37.67906771_wp, -3.71732043_wp, & + & -29.55204081_wp, -37.69545181_wp, -5.00449301_wp, -27.04199885_wp, & + & -37.13117643_wp, -4.81784311_wp, -25.72246857_wp, -35.61202958_wp, & + & -4.75824303_wp, -25.89897988_wp, -35.08167956_wp, -5.13726739_wp, & + & -26.93915585_wp, -37.01609472_wp, -5.29197045_wp, -27.73972305_wp, & + & -37.51155261_wp, -3.88027181_wp, -25.30346743_wp, -37.49780214_wp, & + & -5.97855690_wp, -24.79070498_wp, -38.57981690_wp, -6.03716431_wp, & + & -24.70791624_wp, -37.12048984_wp, -6.91477830_wp, -25.19414285_wp, & + & -37.07564162_wp, -5.81988903_wp, -23.80340097_wp, -46.57173857_wp, & + & -5.71926494_wp, -32.98383398_wp, -45.12846727_wp, -5.66064440_wp, & + & -32.89558438_wp, -44.78543373_wp, -5.50615210_wp, -31.41191673_wp, & + & -45.64182597_wp, -5.17489921_wp, -30.59716168_wp, -47.04527593_wp, & + & -5.40847262_wp, -32.14114286_wp, -44.71079592_wp, -6.58985621_wp, & + & -33.29728275_wp, -44.57096407_wp, -4.46871337_wp, -33.68188159_wp, & + & -44.85574950_wp, -4.56943546_wp, -34.72581242_wp, -44.97771644_wp, & + & -3.53992735_wp, -33.29003772_wp, -43.48816536_wp, -4.44137341_wp, & + & -33.61164618_wp, -43.51160981_wp, -5.72679371_wp, -31.10340318_wp, & + & -42.94812337_wp, -5.53392720_wp, -29.78440080_wp, -41.42981799_wp, & + & -5.45944751_wp, -29.96378626_wp, -40.89838007_wp, -5.83407128_wp, & + & -31.00505534_wp, -42.83010712_wp, -6.01086571_wp, -31.80051171_wp, & + & -43.33691816_wp, -4.59952471_wp, -29.36603251_wp, -43.30339701_wp, & + & -6.69702555_wp, -28.85137301_wp, -44.38477107_wp, -6.76486600_wp, & + & -28.76707681_wp, -42.91867881_wp, -7.63028795_wp, -29.25461450_wp, & + & -42.88131678_wp, -6.53394789_wp, -27.86476580_wp, -52.37437457_wp, & + & -6.43482626_wp, -37.06706587_wp, -50.93110878_wp, -6.37870632_wp, & + & -36.97735570_wp, -50.58991901_wp, -6.22493061_wp, -35.49316208_wp, & + & -51.44733624_wp, -5.89362182_wp, -34.67948383_wp, -52.84805988_wp, & + & -6.12418621_wp, -36.22437176_wp, -50.51459283_wp, -7.30881469_wp, & + & -37.37822980_wp, -50.37064888_wp, -5.18810576_wp, -37.76350258_wp, & + & -50.65475396_wp, -5.28871948_wp, -38.80763561_wp, -50.77601419_wp, & + & -4.25840859_wp, -37.37239457_wp, -49.28786671_wp, -5.16276318_wp, & + & -37.69239201_wp, -49.31678648_wp, -6.44669439_wp, -35.18261106_wp, & + & -48.75649219_wp, -6.25679191_wp, -33.86182178_wp, -47.23770114_wp, & + & -6.18231849_wp, -34.03673157_wp, -46.70326844_wp, -6.55544078_wp, & + & -35.07698992_wp, -48.63424842_wp, -6.73062379_wp, -35.87870258_wp, & + & -49.14628306_wp, -5.32327954_wp, -33.44240976_wp, -49.11447386_wp, & + & -7.42197859_wp, -32.93240738_wp, -50.19610574_wp, -7.49041593_wp, & + & -32.85196394_wp, -48.72797784_wp, -8.35423981_wp, -33.33626640_wp, & + & -48.69586193_wp, -7.26079747_wp, -31.94402001_wp, -58.17879702_wp, & + & -7.14313109_wp, -41.14920146_wp, -56.73546891_wp, -7.08767443_wp, & + & -41.06001269_wp, -56.39346540_wp, -6.93543551_wp, -39.57589247_wp, & + & -57.25025923_wp, -6.60434198_wp, -38.76147725_wp, -58.65208155_wp, & + & -6.83279871_wp, -40.30617945_wp, -56.31942449_wp, -8.01746659_wp, & + & -41.46209018_wp, -56.17504965_wp, -5.89632980_wp, -41.84509108_wp, & + & -56.45959334_wp, -5.99570150_wp, -42.88921995_wp, -56.58007952_wp, & + & -4.96699659_wp, -41.45276596_wp, -55.09223642_wp, -5.87127594_wp, & + & -41.77438006_wp, -55.12027011_wp, -7.15810807_wp, -39.26615137_wp, & + & -54.55943136_wp, -6.96914743_wp, -37.94547975_wp, -53.04058699_wp, & + & -6.89641375_wp, -38.12044456_wp, -52.50649579_wp, -7.26949359_wp, & + & -39.16088161_wp, -54.43815196_wp, -7.44168334_wp, -39.96278558_wp, & + & -54.94801135_wp, -6.03524394_wp, -37.52578798_wp, -54.91855285_wp, & + & -8.13404907_wp, -37.01613585_wp, -56.00022551_wp, -8.20091821_wp, & + & -36.93501074_wp, -54.53367040_wp, -9.06676494_wp, -37.42048675_wp, & + & -54.49905051_wp, -7.97374067_wp, -36.02798038_wp, -63.98125773_wp, & + & -7.84561441_wp, -45.23592873_wp, -62.53800365_wp, -7.79059748_wp, & + & -45.14508311_wp, -62.19753047_wp, -7.63874604_wp, -43.66053484_wp, & + & -63.05503672_wp, -7.30743216_wp, -42.84696802_wp, -64.45535088_wp, & + & -7.53533539_wp, -44.39333930_wp, -62.12179640_wp, -8.72046816_wp, & + & -45.54681157_wp, -61.97628924_wp, -6.59933471_wp, -45.92934741_wp, & + & -62.25948088_wp, -6.69856165_wp, -46.97385687_wp, -62.38160779_wp, & + & -5.66993017_wp, -45.53748990_wp, -60.89356186_wp, -6.57454457_wp, & + & -45.85721127_wp, -60.92472237_wp, -7.86202303_wp, -43.34969197_wp, & + & -60.36446832_wp, -7.67386727_wp, -42.02864509_wp, -58.84543547_wp, & + & -7.60302285_wp, -42.20303914_wp, -58.31156540_wp, -7.97586502_wp, & + & -43.24368529_wp, -60.24220546_wp, -8.14586124_wp, -44.04586264_wp, & + & -60.75190296_wp, -6.73941101_wp, -41.60910915_wp, -60.72573483_wp, & + & -8.83826379_wp, -41.09951970_wp, -61.80756929_wp, -8.90409891_wp, & + & -41.01967117_wp, -60.34125346_wp, -9.77142902_wp, -41.50321161_wp, & + & -60.30729355_wp, -8.67815864_wp, -40.11088256_wp, -69.78079328_wp, & + & -8.54848001_wp, -49.32699298_wp, -68.33754353_wp, -8.49341927_wp, & + & -49.23586746_wp, -67.99770000_wp, -8.34107395_wp, -47.75117791_wp, & + & -68.85575319_wp, -8.00976423_wp, -46.93816777_wp, -70.25483773_wp, & + & -8.23786248_wp, -48.48447514_wp, -67.92120695_wp, -9.42343555_wp, & + & -49.63711970_wp, -67.77563146_wp, -7.30244778_wp, -50.02040911_wp, & + & -68.05873135_wp, -7.40195963_wp, -51.06492031_wp, -68.18089404_wp, & + & -6.37287903_wp, -49.62888490_wp, -66.69290984_wp, -7.27774798_wp, & + & -49.94818119_wp, -66.72505071_wp, -8.56395598_wp, -47.43946698_wp, & + & -66.16604738_wp, -8.37595402_wp, -46.11783582_wp, -64.64681710_wp, & + & -8.30516971_wp, -46.29060362_wp, -64.11188118_wp, -8.67787576_wp, & + & -47.33074873_wp, -66.04192471_wp, -8.84793773_wp, -48.13497565_wp, & + & -66.55391153_wp, -7.44156275_wp, -45.69856381_wp, -66.52823374_wp, & + & -9.54049079_wp, -45.18923775_wp, -67.61014001_wp, -9.60623172_wp, & + & -45.11029336_wp, -66.14351366_wp, -10.47361929_wp, -45.59279014_wp, & + & -66.11059415_wp, -9.38063309_wp, -44.20022115_wp, -75.58235066_wp, & + & -9.25283976_wp, -53.41481410_wp, -74.13905244_wp, -9.19733007_wp, & + & -53.32477995_wp, -73.79816456_wp, -9.04491799_wp, -51.84034944_wp, & + & -74.65572648_wp, -8.71376915_wp, -51.02674877_wp, -76.05587918_wp, & + & -8.94205145_wp, -52.57207093_wp, -73.72276056_wp, -10.12720459_wp, & + & -53.72640100_wp, -73.57811670_wp, -8.00615872_wp, -54.10971930_wp, & + & -73.86188145_wp, -8.10578753_wp, -55.15403974_wp, -73.98347020_wp, & + & -7.07674156_wp, -53.71793069_wp, -72.49535895_wp, -7.98105306_wp, & + & -54.03820767_wp, -72.52524780_wp, -9.26744145_wp, -51.52948185_wp, & + & -71.96565704_wp, -9.07934910_wp, -50.20811203_wp, -70.44648361_wp, & + & -9.00839724_wp, -50.38140982_wp, -69.91182126_wp, -9.38136074_wp, & + & -51.42160093_wp, -71.84249848_wp, -9.55154617_wp, -52.22530063_wp, & + & -72.35350750_wp, -8.14501572_wp, -49.78870472_wp, -72.32729420_wp, & + & -10.24391705_wp, -49.27933416_wp, -73.40915826_wp, -10.30977416_wp, & + & -49.19989418_wp, -71.94265675_wp, -11.17701081_wp, -49.68304799_wp, & + & -71.90921682_wp, -10.08398785_wp, -48.29051463_wp, -81.38497732_wp, & + & -9.95949609_wp, -57.50063087_wp, -79.94173922_wp, -9.90310957_wp, & + & -57.41048075_wp, -79.60081951_wp, -9.75057536_wp, -55.92610643_wp, & + & -80.45827795_wp, -9.41941810_wp, -55.11241369_wp, -81.85895156_wp, & + & -9.64868974_wp, -56.65816939_wp, -79.52491757_wp, -10.83269110_wp, & + & -57.81222827_wp, -79.38145650_wp, -8.71151353_wp, -58.19525844_wp, & + & -79.66522770_wp, -8.81111203_wp, -59.23957702_wp, -79.78724096_wp, & + & -7.78236721_wp, -57.80327371_wp, -78.29870670_wp, -8.68589555_wp, & + & -58.12379094_wp, -78.32781049_wp, -9.97297584_wp, -55.61551057_wp, & + & -77.76764459_wp, -9.78455502_wp, -54.29445821_wp, -76.24859873_wp, & + & -9.71318416_wp, -54.46867771_wp, -75.71447395_wp, -10.08625095_wp, & + & -55.50911381_wp, -77.64531683_wp, -10.25723472_wp, -56.31152390_wp, & + & -78.15556866_wp, -8.85029458_wp, -53.87496302_wp, -78.12838717_wp, & + & -10.94913343_wp, -53.36534607_wp, -79.21018264_wp, -11.01527412_wp, & + & -53.28521110_wp, -77.74376130_wp, -11.88215448_wp, -53.76923935_wp, & + & -77.70970696_wp, -10.78901128_wp, -52.37681342_wp, -87.18549258_wp, & + & -10.66945786_wp, -61.58852339_wp, -85.74231581_wp, -10.61264731_wp, & + & -61.49776068_wp, -85.40205576_wp, -10.45993467_wp, -60.01326727_wp, & + & -86.25984771_wp, -10.12871121_wp, -59.19996003_wp, -87.65994522_wp, & + & -10.35856081_wp, -60.74636859_wp, -85.32505432_wp, -11.54209717_wp, & + & -61.89934807_wp, -85.18200059_wp, -9.42085163_wp, -62.28222452_wp, & + & -85.46508728_wp, -9.52052569_wp, -63.32671770_wp, -85.58834113_wp, & + & -8.49185309_wp, -61.89046606_wp, -84.09930081_wp, -9.39485016_wp, & + & -62.21007856_wp, -84.12916103_wp, -10.68223080_wp, -59.70207335_wp, & + & -83.56959758_wp, -10.49305670_wp, -58.38088128_wp, -82.05057218_wp, & + & -10.42066835_wp, -58.55456739_wp, -81.51576323_wp, -10.79369404_wp, & + & -59.59466382_wp, -83.44631291_wp, -10.96635126_wp, -60.39778479_wp, & + & -83.95834267_wp, -9.55894485_wp, -57.96181073_wp, -83.92985630_wp, & + & -11.65761129_wp, -57.45155153_wp, -85.01162478_wp, -11.72433090_wp, & + & -57.37157137_wp, -83.54464385_wp, -12.59051126_wp, -57.85516313_wp, & + & -83.51141026_wp, -11.49701367_wp, -56.46299596_wp, -92.98504174_wp, & + & -11.38190214_wp, -65.67694766_wp, -91.54186322_wp, -11.32507504_wp, & + & -65.58602982_wp, -91.20176226_wp, -11.17205732_wp, -64.10151811_wp, & + & -92.05959646_wp, -10.84046871_wp, -63.28841126_wp, -93.45960353_wp, & + & -11.07087184_wp, -64.83490320_wp, -91.12458117_wp, -12.25461955_wp, & + & -65.98737452_wp, -90.98139374_wp, -10.13346179_wp, -66.37065704_wp, & + & -91.26433843_wp, -10.23331273_wp, -67.41517114_wp, -91.38771434_wp, & + & -9.20435738_wp, -65.97913048_wp, -89.89869863_wp, -10.10751950_wp, & + & -66.29836974_wp, -89.92895416_wp, -11.39457044_wp, -63.79005960_wp, & + & -89.36956764_wp, -11.20499113_wp, -62.46884729_wp, -87.85055939_wp, & + & -11.13179544_wp, -62.64230611_wp, -87.31529121_wp, -11.50524844_wp, & + & -63.68200242_wp, -89.24605985_wp, -11.67880257_wp, -64.48566584_wp, & + & -89.75893528_wp, -10.27111446_wp, -62.04984586_wp, -89.72913666_wp, & + & -12.36975837_wp, -61.53950297_wp, -90.81086179_wp, -12.43721242_wp, & + & -61.45957594_wp, -89.34325881_wp, -13.30241085_wp, -61.94305338_wp, & + & -89.31085075_wp, -12.20883999_wp, -60.55092792_wp, -98.78472352_wp, & + & -12.09427332_wp, -69.76467289_wp, -97.34150146_wp, -12.03819396_wp, & + & -69.67387384_wp, -97.00123239_wp, -11.88550606_wp, -68.18935236_wp, & + & -97.85888122_wp, -11.55352927_wp, -67.37620576_wp, -99.25901937_wp, & + & -11.78304921_wp, -68.92254484_wp, -96.92472861_wp, -12.96788181_wp, & + & -70.07540696_wp, -96.78051054_wp, -10.84672613_wp, -70.45835098_wp, & + & -97.06349990_wp, -10.94629979_wp, -71.50288062_wp, -97.18642460_wp, & + & -9.91749441_wp, -70.06670321_wp, -95.69780207_wp, -10.82126359_wp, & + & -70.38606658_wp, -95.72855430_wp, -12.10876163_wp, -67.87788116_wp, & + & -95.16900683_wp, -11.91880019_wp, -66.55677798_wp, -93.65003177_wp, & + & -11.84508149_wp, -66.73042404_wp, -93.11473449_wp, -12.21886094_wp, & + & -67.76998398_wp, -95.04573052_wp, -12.39301761_wp, -68.57354334_wp, & + & -95.55871495_wp, -10.98503232_wp, -66.13785675_wp, -95.52795572_wp, & + & -13.08358924_wp, -65.62722152_wp, -96.60963046_wp, -13.15128205_wp, & + & -65.54682097_wp, -95.14204673_wp, -14.01618356_wp, -66.03087595_wp, & + & -95.10927520_wp, -12.92251885_wp, -64.63883444_wp, -104.58480477_wp, & + & -12.80328976_wp, -73.85202521_wp, -103.14155537_wp, -12.74838843_wp, & + & -73.76109353_wp, -102.80131662_wp, -12.59612240_wp, -72.27652633_wp, & + & -103.65880772_wp, -12.26363148_wp, -71.46341981_wp, -105.05890787_wp, & + & -12.49194276_wp, -73.00983099_wp, -102.72549925_wp, -13.67838039_wp, & + & -74.16267274_wp, -102.57954289_wp, -11.55731497_wp, -74.54543399_wp, & + & -102.86246066_wp, -11.65664321_wp, -75.59000751_wp, -102.98482968_wp, & + & -10.62779462_wp, -74.15381999_wp, -101.49682669_wp, -11.53266578_wp, & + & -74.47299618_wp, -101.52885318_wp, -12.82042545_wp, -71.96499068_wp, & + & -100.96906395_wp, -12.63061963_wp, -70.64397280_wp, -99.45008204_wp, & + & -12.55742841_wp, -70.81791327_wp, -98.91515104_wp, -12.93153823_wp, & + & -71.85754672_wp, -100.84616805_wp, -13.10496169_wp, -72.66068462_wp, & + & -101.35841192_wp, -11.69671835_wp, -70.22501830_wp, -101.32822994_wp, & + & -13.79527168_wp, -69.71433129_wp, -102.40991451_wp, -13.86267258_wp, & + & -69.63380343_wp, -100.94262277_wp, -14.72799029_wp, -70.11798652_wp, & + & -100.90939575_wp, -13.63426925_wp, -68.72599714_wp, -110.38409426_wp, & + & -13.50737052_wp, -77.94108837_wp, -108.94086439_wp, -13.45361759_wp, & + & -77.84953864_wp, -108.60114890_wp, -13.30189434_wp, -76.36482463_wp, & + & -109.45870397_wp, -12.96890968_wp, -75.55198591_wp, -110.85832289_wp, & + & -13.19595755_wp, -77.09898966_wp, -108.52535880_wp, -14.38385494_wp, & + & -78.25112472_wp, -108.37758715_wp, -12.26282664_wp, -78.63340523_wp, & + & -108.66016632_wp, -12.36171918_wp, -79.67811100_wp, -108.78231041_wp, & + & -11.33307292_wp, -78.24176084_wp, -107.29488286_wp, -12.23904848_wp, & + & -78.56052190_wp, -107.32898162_wp, -13.52721682_wp, -76.05289120_wp, & + & -106.76940305_wp, -13.33788788_wp, -74.73173956_wp, -105.25035551_wp, & + & -13.26572038_wp, -74.90543969_wp, -104.71554684_wp, -13.63994474_wp, & + & -75.94510074_wp, -106.64629017_wp, -13.81223967_wp, -76.74838701_wp, & + & -107.15820080_wp, -12.40373860_wp, -74.31282522_wp, -107.12956218_wp, & + & -14.50234032_wp, -73.80223673_wp, -108.21130903_wp, -14.56897199_wp, & + & -73.72190299_wp, -106.74455540_wp, -15.43530857_wp, -74.20588761_wp, & + & -106.71078291_wp, -14.34170279_wp, -72.81382125_wp, -116.18136917_wp, & + & -14.20605903_wp, -82.03382201_wp, -114.73818210_wp, -14.15329901_wp, & + & -81.94142750_wp, -114.39933438_wp, -14.00209911_wp, -80.45647772_wp, & + & -115.25721205_wp, -13.66886189_wp, -79.64408085_wp, -116.65586209_wp, & + & -13.89453818_wp, -81.19190892_wp, -114.32303636_wp, -15.08375350_wp, & + & -82.34288921_wp, -114.17364447_wp, -12.96275896_wp, -82.72476472_wp, & + & -114.45569758_wp, -13.06130429_wp, -83.76964556_wp, -114.57798737_wp, & + & -12.03280239_wp, -82.33320754_wp, -113.09096862_wp, -12.93970549_wp, & + & -82.65126182_wp, -113.12748791_wp, -14.22815621_wp, -80.14384207_wp, & + & -112.56863605_wp, -14.03958405_wp, -78.82229657_wp, -111.04944943_wp, & + & -13.96869728_wp, -78.99508920_wp, -110.51435559_wp, -14.34286788_wp, & + & -80.03462843_wp, -112.44452368_wp, -14.51338738_wp, -80.83898902_wp, & + & -112.95683240_wp, -13.10514670_wp, -78.40345319_wp, -112.93047094_wp, & + & -15.20386089_wp, -77.89322937_wp, -114.01233558_wp, -15.26955830_wp, & + & -77.81371450_wp, -112.54597744_wp, -16.13710440_wp, -78.29673133_wp, & + & -112.51229242_wp, -15.04373324_wp, -76.90447906_wp, -121.97799835_wp, & + & -14.90016575_wp, -86.12847029_wp, -120.53478015_wp, -14.84831765_wp, & + & -86.03607216_wp, -120.19598418_wp, -14.69712090_wp, -84.55111245_wp, & + & -121.05385372_wp, -14.36369256_wp, -83.73877932_wp, -122.45224144_wp, & + & -14.58843963_wp, -85.28648364_wp, -120.12018483_wp, -15.77914069_wp, & + & -86.43726127_wp, -119.96946356_wp, -13.65834649_wp, -86.81969867_wp, & + & -120.25169602_wp, -13.75693608_wp, -87.86452805_wp, -120.37311577_wp, & + & -12.72801769_wp, -86.42831375_wp, -118.88676604_wp, -13.63603520_wp, & + & -86.74632421_wp, -118.92422378_wp, -14.92342984_wp, -84.23833680_wp, & + & -118.36581357_wp, -14.73574816_wp, -82.91648859_wp, -116.84650262_wp, & + & -14.66615671_wp, -83.08848953_wp, -116.31116047_wp, -15.04023185_wp, & + & -84.12793268_wp, -118.24122023_wp, -15.20889478_wp, -84.93334136_wp, & + & -118.75332694_wp, -13.80107024_wp, -82.49753932_wp, -118.72918358_wp, & + & -15.89995981_wp, -81.98793410_wp, -119.81115488_wp, -15.96481416_wp, & + & -81.90918784_wp, -118.34514227_wp, -16.83341242_wp, -82.39138356_wp, & + & -118.31157239_wp, -15.74039678_wp, -80.99885517_wp, -127.77559306_wp, & + & -15.59175195_wp, -90.22291821_wp, -126.33234928_wp, -15.53993441_wp, & + & -90.13054922_wp, -125.99338667_wp, -15.38870834_wp, -88.64561919_wp, & + & -126.85118395_wp, -15.05537390_wp, -87.83317405_wp, -128.24979955_wp, & + & -15.28009057_wp, -89.38088923_wp, -125.91774475_wp, -16.47075855_wp, & + & -90.53172470_wp, -125.76712926_wp, -14.34996209_wp, -90.91424702_wp, & + & -126.04956236_wp, -14.44852949_wp, -91.95902479_wp, -126.17069341_wp, & + & -13.41963407_wp, -90.52276594_wp, -124.68441932_wp, -14.32766736_wp, & + & -90.84108489_wp, -124.72153060_wp, -15.61482436_wp, -88.33305753_wp, & + & -124.16291261_wp, -15.42765821_wp, -87.01121510_wp, -122.64354105_wp, & + & -15.35934893_wp, -87.18327181_wp, -122.10855663_wp, -15.73358994_wp, & + & -88.22284061_wp, -124.03864261_wp, -15.90034953_wp, -89.02815882_wp, & + & -124.54953667_wp, -14.49264716_wp, -86.59218087_wp, -124.52724762_wp, & + & -16.59158186_wp, -86.08267684_wp, -125.60927519_wp, -16.65558147_wp, & + & -86.00401060_wp, -124.14391070_wp, -17.52533743_wp, -86.48609729_wp, & + & -124.10958596_wp, -16.43235396_wp, -85.09356551_wp, -133.57288154_wp, & + & -16.28266254_wp, -94.31891646_wp, -132.12962235_wp, -16.23038947_wp, & + & -94.22648026_wp, -131.79083925_wp, -16.07876556_wp, -92.74149432_wp, & + & -132.64891443_wp, -15.74566365_wp, -91.92924130_wp, -134.04704715_wp, & + & -15.97129810_wp, -93.47673966_wp, -131.71466559_wp, -17.16117664_wp, & + & -94.62737662_wp, -131.56468656_wp, -15.04043148_wp, -95.01039343_wp, & + & -131.84703819_wp, -15.13928519_wp, -96.05516669_wp, -131.96851373_wp, & + & -14.11012751_wp, -94.61912723_wp, -130.48198543_wp, -15.01783454_wp, & + & -94.93718331_wp, -130.51893316_wp, -16.30427950_wp, -92.42868297_wp, & + & -129.96066020_wp, -16.11739360_wp, -91.10661115_wp, -128.44116005_wp, & + & -16.04997576_wp, -91.27813242_wp, -127.90611242_wp, -16.42403800_wp, & + & -92.31773682_wp, -129.83578386_wp, -16.58971579_wp, -93.12357466_wp, & + & -130.34678259_wp, -15.18210415_wp, -90.68772811_wp, -130.32613904_wp, & + & -17.28103405_wp, -90.17817321_wp, -131.40824924_wp, -17.34444578_wp, & + & -90.10014958_wp, -129.94306293_wp, -18.21503679_wp, -90.58126876_wp, & + & -129.90900300_wp, -17.12194018_wp, -89.18882068_wp, -139.37282523_wp, & + & -16.97695860_wp, -98.41146300_wp, -137.92946701_wp, -16.92384521_wp, & + & -98.32026064_wp, -137.58936812_wp, -16.77167759_wp, -96.83560704_wp, & + & -138.44702970_wp, -16.43932966_wp, -96.02260658_wp, -139.84648512_wp, & + & -16.66578100_wp, -97.56893676_wp, -137.51435944_wp, -17.85450927_wp, & + & -98.72129222_wp, -137.36595091_wp, -15.73381311_wp, -99.10507886_wp, & + & -137.64927600_wp, -15.83314989_wp, -100.14954595_wp, -137.76989466_wp, & + & -14.80360361_wp, -98.71371053_wp, -136.28319187_wp, -15.71060282_wp, & + & -99.03295744_wp, -136.31693101_wp, -16.99584458_wp, -96.52388031_wp, & + & -135.75799365_wp, -16.80902042_wp, -95.20203993_wp, -134.23854815_wp, & + & -16.74095103_wp, -95.37406644_wp, -133.70369133_wp, -17.11469281_wp, & + & -96.41387572_wp, -135.63410057_wp, -17.28092391_wp, -97.21921986_wp, & + & -136.14434798_wp, -15.87403103_wp, -94.78271626_wp, -136.12248079_wp, & + & -17.97310581_wp, -94.27375755_wp, -137.20452388_wp, -18.03710105_wp, & + & -94.19528181_wp, -135.73909251_wp, -18.90679672_wp, -94.67728426_wp, & + & -135.70499682_wp, -17.81407805_wp, -93.28454133_wp, -145.17097151_wp, & + & -17.67431914_wp, -102.50693779_wp, -143.72780798_wp, -17.61987203_wp, & + & -102.41349095_wp, -143.38955156_wp, -17.46791896_wp, -100.92839244_wp, & + & -144.24821784_wp, -17.13618648_wp, -100.11622770_wp, -145.64652207_wp, & + & -17.36376509_wp, -101.66528742_wp, -143.31130794_wp, -18.54994558_wp, & + & -102.81443757_wp, -143.16436352_wp, -16.42890507_wp, -103.19697248_wp, & + & -143.44619548_wp, -16.52799276_wp, -104.24186645_wp, -143.56973440_wp, & + & -15.49928576_wp, -102.80567191_wp, -142.08172718_wp, -16.40469040_wp, & + & -103.12337998_wp, -142.11721161_wp, -17.69138849_wp, -100.61568579_wp, & + & -141.55841567_wp, -17.50374698_wp, -99.29388921_wp, -140.03895270_wp, & + & -17.43530064_wp, -99.46629494_wp, -139.50444044_wp, -17.80877209_wp, & + & -100.50639473_wp, -141.43390340_wp, -17.97607163_wp, -101.31075615_wp, & + & -141.94492724_wp, -16.56861149_wp, -98.87503000_wp, -141.92260054_wp, & + & -18.66741039_wp, -98.36498431_wp, -143.00462792_wp, -18.73153483_wp, & + & -98.28635158_wp, -141.53914574_wp, -19.60125392_wp, -98.76809127_wp, & + & -141.50502441_wp, -18.50782708_wp, -97.37589676_wp, -150.96180916_wp, & + & -18.37637683_wp, -106.61239182_wp, -149.51880920_wp, -18.31992995_wp, & + & -106.51791855_wp, -149.18237111_wp, -18.16731286_wp, -105.03245324_wp, & + & -150.04250212_wp, -17.83663573_wp, -104.22138306_wp, -151.43824346_wp, & + & -18.06595431_wp, -105.77116845_wp, -149.10080901_wp, -19.24959996_wp, & + & -106.91825325_wp, -148.95615255_wp, -17.12851812_wp, -107.30124890_wp, & + & -149.23667697_wp, -17.22841383_wp, -108.34641779_wp, -149.36320604_wp, & + & -16.19928526_wp, -106.91079614_wp, -147.87363198_wp, -17.10281805_wp, & + & -107.22643878_wp, -147.91022414_wp, -18.38917963_wp, -104.71783788_wp, & + & -147.35439823_wp, -18.20122104_wp, -103.39480736_wp, -145.83461766_wp, & + & -18.13194187_wp, -103.56369497_wp, -145.29754985_wp, -18.50417128_wp, & + & -104.60292345_wp, -147.22542766_wp, -18.67313687_wp, -105.41170948_wp, & + & -147.74233465_wp, -17.26621305_wp, -102.97695075_wp, -147.72037142_wp, & + & -19.36491545_wp, -102.46665113_wp, -148.80257126_wp, -19.42946532_wp, & + & -102.39075205_wp, -147.33552053_wp, -20.29866025_wp, -102.86864841_wp, & + & -147.30539189_wp, -19.20500419_wp, -101.47653202_wp, -156.75518253_wp, & + & -19.11509387_wp, -110.70933864_wp, -155.31250586_wp, -19.04805987_wp, & + & -110.61705695_wp, -154.97452254_wp, -18.88976146_wp, -109.13261357_wp, & + & -155.83501380_wp, -18.56166413_wp, -108.32091071_wp, -157.23326077_wp, & + & -18.80235041_wp, -109.86998090_wp, -154.88874938_wp, -19.97560973_wp, & + & -111.01620827_wp, -154.75966885_wp, -17.85434120_wp, -111.40388283_wp, & + & -155.04226725_wp, -17.95777399_wp, -112.44814466_wp, -155.17154978_wp, & + & -16.92707681_wp, -111.01382665_wp, -153.67714109_wp, -17.82161585_wp, & + & -111.33198001_wp, -153.70053414_wp, -19.10369258_wp, -108.81979236_wp, & + & -153.14387939_wp, -18.91196264_wp, -107.49770654_wp, -151.62450269_wp, & + & -18.83813530_wp, -107.66795775_wp, -151.08689931_wp, -19.21088724_wp, & + & -108.70670236_wp, -153.01574672_wp, -19.38646410_wp, -109.51413242_wp, & + & -153.53460462_wp, -17.97782750_wp, -107.08053832_wp, -153.50465247_wp, & + & -20.07593197_wp, -106.56779882_wp, -154.58650631_wp, -20.14380945_wp, & + & -106.48995513_wp, -153.11759288_wp, -21.00879821_wp, -106.96974488_wp, & + & -153.08838792_wp, -19.91389859_wp, -105.57856233_wp, -162.53789451_wp, & + & -19.90247878_wp, -114.80952106_wp, -161.09548086_wp, -19.83764544_wp, & + & -114.71216357_wp, -160.76175416_wp, -19.66703492_wp, -113.22825181_wp, & + & -161.62394645_wp, -19.33119706_wp, -112.42158059_wp, -163.01914367_wp, & + & -19.57643105_wp, -113.97714603_wp, -160.67245736_wp, -20.76937255_wp, & + & -115.10217409_wp, -160.53783787_wp, -18.65139744_wp, -115.50695399_wp, & + & -160.81566944_wp, -18.76356805_wp, -116.55158600_wp, -160.95069982_wp, & + & -17.72044107_wp, -115.12678367_wp, -159.45561889_wp, -18.61882596_wp, & + & -115.43028541_wp, -159.48869810_wp, -19.87942423_wp, -112.91044928_wp, & + & -158.93393679_wp, -19.67289912_wp, -111.58985707_wp, -157.41505656_wp, & + & -19.59040728_wp, -111.76066380_wp, -156.87498402_wp, -19.96792804_wp, & + & -112.79641255_wp, -158.80211950_wp, -20.16646530_wp, -113.60127440_wp, & + & -159.33087293_wp, -18.73767709_wp, -111.18105652_wp, -159.28791671_wp, & + & -20.83110897_wp, -110.65027784_wp, -160.36934678_wp, -20.90406129_wp, & + & -110.57115171_wp, -158.89625461_wp, -21.76515151_wp, -111.04495807_wp, & + & -158.87186639_wp, -20.65886413_wp, -109.66266709_wp, -168.28524132_wp, & + & -20.60155447_wp, -118.95427743_wp, -166.84285048_wp, -20.61655312_wp, & + & -118.83910926_wp, -166.51922721_wp, -20.42345611_wp, -117.35552212_wp, & + & -167.37472159_wp, -20.02897849_wp, -116.56849356_wp, -168.75606986_wp, & + & -20.22197283_wp, -118.13857024_wp, -166.46979628_wp, -21.58236298_wp, & + & -119.19601722_wp, -166.20741040_wp, -19.48864174_wp, -119.65990502_wp, & + & -166.48065710_wp, -19.61397447_wp, -120.70424861_wp, -166.56745762_wp, & + & -18.52412905_wp, -119.31112932_wp, -165.12592943_wp, -19.51780314_wp, & + & -119.57152509_wp, -165.26178255_wp, -20.68723450_wp, -117.01510245_wp, & + & -164.71372453_wp, -20.46662693_wp, -115.69413063_wp, -163.19341253_wp, & + & -20.39342053_wp, -115.85645648_wp, -162.64840372_wp, -20.79078821_wp, & + & -116.88211890_wp, -164.57817897_wp, -21.01108461_wp, -117.69225220_wp, & + & -165.10950323_wp, -19.52447202_wp, -115.30067624_wp, -165.07935774_wp, & + & -21.61166607_wp, -114.74295489_wp, -166.16150735_wp, -21.67764083_wp, & + & -114.66782651_wp, -164.69130846_wp, -22.55247419_wp, -115.12493331_wp, & + & -164.66676105_wp, -21.43057207_wp, -113.75544693_wp, -174.05166075_wp, & + & -21.18805682_wp, -123.09195406_wp, -172.61222167_wp, -21.27606561_wp, & + & -122.97351706_wp, -172.27615556_wp, -21.02170201_wp, -121.50188560_wp, & + & -173.10662140_wp, -20.53667005_wp, -120.73905039_wp, -174.49668312_wp, & + & -20.70924213_wp, -122.31530027_wp, -172.29545737_wp, -22.27936932_wp, & + & -123.27707700_wp, -171.91837968_wp, -20.23102175_wp, -123.85421942_wp, & + & -172.19324208_wp, -20.40266621_wp, -124.89151210_wp, -172.23154458_wp, & + & -19.23138155_wp, -123.56405409_wp, -170.84001835_wp, -20.30817786_wp, & + & -123.75684571_wp, -171.03621115_wp, -21.34005985_wp, -121.14387737_wp, & + & -170.48109746_wp, -21.08651579_wp, -119.83185107_wp, -168.95840078_wp, & + & -21.10107459_wp, -119.98593858_wp, -168.42891774_wp, -21.56955833_wp, & + & -120.98935886_wp, -170.37134855_wp, -21.73580072_wp, -121.80094234_wp, & + & -170.82811804_wp, -20.10727065_wp, -119.48577608_wp, -170.91053247_wp, & + & -22.16483897_wp, -118.83053147_wp, -171.99482106_wp, -22.16874085_wp, & + & -118.75765127_wp, -170.57307826_wp, -23.14192800_wp, -119.16681433_wp, & + & -170.49104833_wp, -21.96118442_wp, -117.85030333_wp, -179.83112576_wp, & + & -21.84449414_wp, -127.17446418_wp, -178.41118592_wp, -22.07197721_wp, & + & -127.01416985_wp, -178.05692326_wp, -21.65572919_wp, -125.58443684_wp, & + & -178.83630121_wp, -20.99198378_wp, -124.90714601_wp, -180.22566041_wp, & + & -21.21661001_wp, -126.48122519_wp, -178.20659791_wp, -23.13623170_wp, & + & -127.17125331_wp, -177.59920800_wp, -21.24151863_wp, -128.01439010_wp, & + & -177.88681386_wp, -21.52190986_wp, -129.02414188_wp, -177.79805490_wp, & + & -20.18282346_wp, -127.86911995_wp, -176.53680940_wp, -21.42440002_wp, & + & -127.88596314_wp, -176.85792067_wp, -22.04793420_wp, -125.16491615_wp, & + & -176.27747004_wp, -21.66139629_wp, -123.89718502_wp, -174.75905089_wp, & + & -21.77296046_wp, -124.05357839_wp, -174.26310224_wp, -22.38209168_wp, & + & -124.99675219_wp, -176.22777325_wp, -22.57613285_wp, -125.75997136_wp, & + & -176.57127902_wp, -20.62977926_wp, -123.67697287_wp, -176.75107544_wp, & + & -22.58191664_wp, -122.76671144_wp, -177.83298038_wp, -22.51842554_wp, & + & -122.68695223_wp, -176.46994646_wp, -23.60998634_wp, -122.98035399_wp, & + & -176.30873099_wp, -22.28151980_wp, -121.82190864_wp, -185.60922883_wp, & + & -22.41345743_wp, -131.26416490_wp, -184.22809509_wp, -22.77940819_wp, & + & -131.03696455_wp, -183.83841768_wp, -22.20673424_wp, -129.67183799_wp, & + & -184.53390154_wp, -21.35988117_wp, -129.11888195_wp, -185.92450148_wp, & + & -21.63320590_wp, -130.69683703_wp, -184.15134507_wp, -23.87167994_wp, & + & -131.03729765_wp, -183.31573734_wp, -22.19950056_wp, -132.12358660_wp, & + & -183.62234591_wp, -22.58948709_wp, -133.09044094_wp, -183.39402985_wp, & + & -21.11540917_wp, -132.13691561_wp, -182.28261226_wp, -22.47876441_wp, & + & -131.94126815_wp, -182.70338631_wp, -22.67991472_wp, -129.16614759_wp, & + & -182.09119979_wp, -22.18510031_wp, -127.95206422_wp, -180.59345286_wp, & + & -22.48211540_wp, -128.05763534_wp, -180.16175427_wp, -23.27054524_wp, & + & -128.89341649_wp, -182.13778521_wp, -23.35995886_wp, -129.66377159_wp, & + & -182.27061330_wp, -21.10700464_wp, -127.88450622_wp, -182.67235999_wp, & + & -22.88015180_wp, -126.71559411_wp, -183.74098610_wp, -22.68810987_wp, & + & -126.66984586_wp, -182.50614800_wp, -23.95258703_wp, -126.77767364_wp, & + & -182.20605514_wp, -22.50002136_wp, -125.81194786_wp, -191.38874989_wp, & + & -22.95608766_wp, -135.33432198_wp, -190.08848979_wp, -23.48252371_wp, & + & -134.98010986_wp, -189.61642114_wp, -22.70948756_wp, -133.74594134_wp, & + & -190.16317742_wp, -21.66488681_wp, -133.40529506_wp, -191.55948931_wp, & + & -22.01757173_wp, -134.98896350_wp, -190.19656625_wp, -24.54839894_wp, & + & -134.75441538_wp, -189.08614657_wp, -23.29541374_wp, -136.12441957_wp, & + & -189.44322042_wp, -23.82732915_wp, -137.00211915_wp, -188.98809876_wp, & + & -22.23988294_wp, -136.36488262_wp, -188.11291109_wp, -23.68733255_wp, & + & -135.84524128_wp, -188.58096537_wp, -23.24732801_wp, -133.10749932_wp, & + & -187.89884497_wp, -22.61425600_wp, -131.99973342_wp, -186.44967393_wp, & + & -23.10618584_wp, -132.02720643_wp, -186.12306142_wp, -24.08054894_wp, & + & -132.69812266_wp, -188.12808086_wp, -24.09106294_wp, -133.44252798_wp, & + & -187.94416812_wp, -21.52912630_wp, -132.13888834_wp, -188.54861400_wp, & + & -22.98980646_wp, -130.66315786_wp, -189.58448082_wp, -22.66153155_wp, & + & -130.66626308_wp, -188.51786949_wp, -24.06742149_wp, -130.52353835_wp, & + & -188.02849130_wp, -22.51014998_wp, -129.83973339_wp, -197.12575818_wp, & + & -23.54791590_wp, -139.39981179_wp, -195.98723320_wp, -24.19892128_wp, & + & -138.79024616_wp, -195.37413612_wp, -23.20485017_wp, -137.80106698_wp, & + & -195.66375910_wp, -22.01314831_wp, -137.83413124_wp, -197.07319837_wp, & + & -22.53573119_wp, -139.40389798_wp, -196.34348431_wp, -25.09553113_wp, & + & -138.27241396_wp, -194.94335491_wp, -24.58967906_wp, -139.84270637_wp, & + & -195.39629988_wp, -25.27140902_wp, -140.55786595_wp, -194.59739128_wp, & + & -23.70433928_wp, -140.37039482_wp, -194.09423754_wp, -25.07896185_wp, & + & -139.37493123_wp, -194.51272915_wp, -23.73546030_wp, -136.93604776_wp, & + & -193.70196851_wp, -22.95749508_wp, -136.02452177_wp, -192.35753780_wp, & + & -23.67753437_wp, -135.89183263_wp, -192.21875734_wp, -24.83791795_wp, & + & -136.26635610_wp, -194.25210160_wp, -24.71419585_wp, -136.98729048_wp, & + & -193.56829585_wp, -21.95845371_wp, -136.45171889_wp, -194.36780097_wp, & + & -22.84887950_wp, -134.64829024_wp, -195.33169381_wp, -22.35896180_wp, & + & -134.75509242_wp, -194.51798136_wp, -23.84011910_wp, -134.22825247_wp, & + & -193.74847197_wp, -22.26774633_wp, -133.97180206_wp, -201.49978038_wp, & + & -25.20335095_wp, -144.17790144_wp, -201.06330210_wp, -25.49399421_wp, & + & -142.82194502_wp, -200.19813390_wp, -24.34792523_wp, -142.31143475_wp, & + & -199.43272331_wp, -23.73654953_wp, -143.05086601_wp, -200.74726399_wp, & + & -24.71805008_wp, -144.65983906_wp, -201.95551180_wp, -25.59730459_wp, & + & -142.19379991_wp, -200.19841772_wp, -26.76241727_wp, -142.69341957_wp, & + & -200.77993710_wp, -27.64090047_wp, -142.96160576_wp, -199.33878791_wp, & + & -26.68635726_wp, -143.35788646_wp, -199.83040110_wp, -26.87374200_wp, & + & -141.67551263_wp, -200.32644286_wp, -24.07848816_wp, -141.00306922_wp, & + & -199.35493329_wp, -23.27191720_wp, -140.29419145_wp, -198.22576021_wp, & + & -24.18724742_wp, -139.79752107_wp, -198.35090686_wp, -25.40737002_wp, & + & -139.76833147_wp, -200.86011145_wp, -24.71878102_wp, -140.43258661_wp, & + & -198.94570770_wp, -22.56059289_wp, -141.01836830_wp, -200.00907433_wp, & + & -22.55266227_wp, -139.11785188_wp, -200.82136326_wp, -21.92707437_wp, & + & -139.47519584_wp, -200.40425236_wp, -23.27923201_wp, -138.41188178_wp, & + & -199.28176640_wp, -21.93015342_wp, -138.60545769_wp, -201.68289337_wp, & + & -26.06743443_wp, -144.67610395_wp, 3.70887843_wp, -0.66067638_wp, & + & 5.38028163_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_72 + +subroutine polyala_76(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 763 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.41266399_wp, -0.15710549_wp, -0.13368263_wp, 0.78014380_wp, & + & 0.58510406_wp, 0.21077615_wp, 1.62845515_wp, -0.32058157_wp, & + & 1.10431787_wp, 1.15224449_wp, -1.32054847_wp, 1.63027064_wp, & + & -0.66023368_wp, -0.87506746_wp, 0.53788105_wp, 1.30855769_wp, & + & 0.83207688_wp, -0.71589144_wp, 0.42825871_wp, 1.86807520_wp, & + & 0.97247540_wp, -0.22457360_wp, 2.48189929_wp, 0.35813167_wp, & + & -0.08061145_wp, 1.62110861_wp, 1.90094397_wp, 1.32379203_wp, & + & 2.43195042_wp, 1.21247277_wp, 2.90672014_wp, 0.04813606_wp, & + & 1.24404699_wp, 3.74986537_wp, -0.57000909_wp, 2.24534761_wp, & + & 3.28609343_wp, -0.13694947_wp, 3.63569830_wp, 2.44921609_wp, & + & 0.71570430_wp, 3.82765966_wp, 3.20456770_wp, 0.94193701_wp, & + & 0.88123217_wp, 3.60509113_wp, -1.65521845_wp, 2.18880482_wp, & + & 5.21485571_wp, -0.20999180_wp, 2.02785101_wp, 5.53123891_wp, & + & -0.54071639_wp, 1.04371847_wp, 5.35571559_wp, 0.86495490_wp, & + & 2.10845866_wp, 5.82376452_wp, -0.70170704_wp, 2.78000822_wp, & + & 3.90352752_wp, -0.79306258_wp, 4.59379019_wp, -6.19164477_wp, & + & -0.71454491_wp, -4.18124841_wp, -4.88075566_wp, -0.12918483_wp, & + & -4.00279323_wp, -4.24897197_wp, -0.81439270_wp, -2.78842003_wp, & + & -4.92779755_wp, -1.47839982_wp, -2.01094826_wp, -6.57695786_wp, & + & -1.12534279_wp, -3.33758547_wp, -4.29250662_wp, -0.31927087_wp, & + & -4.90647738_wp, -4.97800404_wp, 1.38034137_wp, -3.75645249_wp, & + & -5.44992220_wp, 1.85220566_wp, -4.61395943_wp, -5.57606256_wp, & + & 1.57571605_wp, -2.87003247_wp, -3.98952409_wp, 1.80745153_wp, & + & -3.61773896_wp, -2.94043953_wp, -0.61854942_wp, -2.64965912_wp, & + & -2.17634061_wp, -1.06561565_wp, -1.50560515_wp, -1.03682228_wp, & + & -0.06407204_wp, -1.30532239_wp, -0.73590418_wp, 0.74106287_wp, & + & -2.18067002_wp, -2.42331406_wp, -0.02128250_wp, -3.28557029_wp, & + & -2.83774990_wp, -1.08033412_wp, -0.63308631_wp, -1.59988559_wp, & + & -2.46658419_wp, -1.73991656_wp, -2.41629565_wp, -3.16631101_wp, & + & -1.89687520_wp, -0.96029816_wp, -2.46423964_wp, -2.61879986_wp, & + & -1.01944093_wp, -2.78821126_wp, -0.88040772_wp, -11.87048892_wp, & + & -1.60103971_wp, -8.33022889_wp, -10.48623288_wp, -1.19463589_wp, & + & -8.22195231_wp, -10.02618186_wp, -1.56528943_wp, -6.81032280_wp, & + & -10.83578374_wp, -1.86719281_wp, -5.93859052_wp, -12.32507927_wp, & + & -1.75216755_wp, -7.43543492_wp, -9.90254081_wp, -1.73504163_wp, & + & -8.97468654_wp, -10.33321101_wp, 0.31460556_wp, -8.44210624_wp, & + & -10.68896705_wp, 0.56520477_wp, -9.43788615_wp, -10.91965100_wp, & + & 0.86049076_wp, -7.70754361_wp, -9.29181097_wp, 0.60865457_wp, & + & -8.35455857_wp, -8.71153709_wp, -1.51515077_wp, -6.61712091_wp, & + & -8.07612683_wp, -1.69236923_wp, -5.32963738_wp, -6.77008431_wp, & + & -0.89538770_wp, -5.36532952_wp, -6.30982046_wp, -0.47853186_wp, & + & -6.42386056_wp, -8.07626980_wp, -1.22129961_wp, -7.35173913_wp, & + & -8.74608377_wp, -1.30545201_wp, -4.55465693_wp, -7.77615977_wp, & + & -3.17102598_wp, -5.05887952_wp, -8.70863505_wp, -3.72900066_wp, & + & -5.05937693_wp, -7.12457490_wp, -3.56737135_wp, -5.83342075_wp, & + & -7.29310905_wp, -3.29141711_wp, -4.09394604_wp, -17.63002225_wp, & + & -2.27196859_wp, -12.42746239_wp, -16.20679514_wp, -2.02669800_wp, & + & -12.34159905_wp, -15.80918396_wp, -2.23769990_wp, -10.87867167_wp, & + & -16.65709632_wp, -2.28450187_wp, -9.99243029_wp, -18.11143491_wp, & + & -2.20545366_wp, -11.53657305_wp, -15.68969652_wp, -2.73968553_wp, & + & -12.99216964_wp, -15.86359046_wp, -0.59614581_wp, -12.77191466_wp, & + & -16.17823609_wp, -0.44940895_wp, -13.80164452_wp, -16.38066743_wp, & + & 0.11857659_wp, -12.13675480_wp, -14.79385140_wp, -0.42474346_wp, & + & -12.70159968_wp, -14.50165244_wp, -2.34183590_wp, -10.66176099_wp, & + & -13.90208262_wp, -2.41821997_wp, -9.34736948_wp, -12.47619583_wp, & + & -1.87834434_wp, -9.48068510_wp, -11.95195704_wp, -1.74029431_wp, & + & -10.58190914_wp, -13.82671414_wp, -2.26877102_wp, -11.41625980_wp, & + & -14.48875119_wp, -1.80119428_wp, -8.65879993_wp, -13.86599977_wp, & + & -3.86344534_wp, -8.83802546_wp, -14.88201663_wp, -4.24442408_wp, & + & -8.77862076_wp, -13.29269010_wp, -4.48545900_wp, -9.52065865_wp, & + & -13.41384762_wp, -3.90768376_wp, -7.85204568_wp, -23.36397650_wp, & + & -3.10072052_wp, -16.54185553_wp, -21.92289696_wp, -3.00695490_wp, & + & -16.45090440_wp, -21.57833185_wp, -2.96631872_wp, -14.96015331_wp, & + & -22.44502424_wp, -2.76172861_wp, -14.11531412_wp, -23.84440980_wp, & + & -2.85975577_wp, -15.68058443_wp, -21.48084900_wp, -3.88916542_wp, & + & -16.92606643_wp, -21.40474143_wp, -1.74151752_wp, -17.14351151_wp, & + & -21.68576222_wp, -1.77262153_wp, -18.19284269_wp, -21.84203313_wp, & + & -0.85857761_wp, -16.68448087_wp, -20.32332065_wp, -1.68261778_wp, & + & -17.06914387_wp, -20.29251786_wp, -3.14775628_wp, -14.67600564_wp, & + & -19.72941033_wp, -3.02994417_wp, -13.34865685_wp, -18.24777650_wp, & + & -2.69049709_wp, -13.52771829_wp, -17.69514395_wp, -2.82323372_wp, & + & -14.61562763_wp, -19.59851982_wp, -3.28849910_wp, -15.40327725_wp, & + & -20.25093096_wp, -2.22795893_wp, -12.81579334_wp, -19.87144505_wp, & + & -4.34145715_wp, -12.56805801_wp, -20.92602259_wp, -4.58705897_wp, & + & -12.47601458_wp, -19.36367982_wp, -5.14567563_wp, -13.09437333_wp, & + & -19.44389147_wp, -4.24138715_wp, -11.57516427_wp, -29.12456222_wp, & + & -3.73615237_wp, -20.68365788_wp, -27.68150807_wp, -3.71012311_wp, & + & -20.57933983_wp, -27.35244360_wp, -3.58811050_wp, -19.08942367_wp, & + & -28.21366849_wp, -3.26459514_wp, -18.27665120_wp, -29.59987985_wp, & + & -3.42949931_wp, -19.84038386_wp, -27.27953095_wp, -4.64205004_wp, & + & -20.99079213_wp, -27.08998133_wp, -2.51898989_wp, -21.34149477_wp, & + & -27.36345934_wp, -2.59951359_wp, -22.39020252_wp, -27.48307373_wp, & + & -1.58757884_wp, -20.94207959_wp, -26.00777576_wp, -2.51410424_wp, & + & -21.25762264_wp, -26.08514179_wp, -3.83157296_wp, -18.77143084_wp, & + & -25.53301445_wp, -3.65936148_wp, -17.44485849_wp, -24.01661120_wp, & + & -3.53730772_wp, -17.61416900_wp, -23.47149650_wp, -3.84768518_wp, & + & -18.66940517_wp, -25.39588993_wp, -4.09151051_wp, -19.47028887_wp, & + & -25.94863932_wp, -2.74623586_wp, -17.00554801_wp, -25.86416186_wp, & + & -4.85413646_wp, -16.54369542_wp, -26.94391533_wp, -4.95100633_wp, & + & -16.46747742_wp, -25.45406820_wp, -5.76735219_wp, -16.96701056_wp, & + & -25.45184607_wp, -4.70595587_wp, -15.55055217_wp, -34.91722047_wp, & + & -4.33159769_wp, -24.80340462_wp, -33.47356743_wp, -4.29324881_wp, & + & -24.71092528_wp, -33.13471481_wp, -4.15230496_wp, -23.22483652_wp, & + & -33.99062635_wp, -3.81464002_wp, -22.41212767_wp, -35.38805877_wp, & + & -4.01658734_wp, -23.96066815_wp, -33.06756893_wp, -5.22611813_wp, & + & -25.11612012_wp, -32.89735591_wp, -3.10517110_wp, -25.48934881_wp, & + & -33.17997806_wp, -3.19694873_wp, -26.53470373_wp, -33.29292605_wp, & + & -2.17288491_wp, -25.09442894_wp, -31.81454526_wp, -3.09277930_wp, & + & -25.41546109_wp, -31.86592933_wp, -4.39269196_wp, -22.91048320_wp, & + & -31.31122361_wp, -4.21989130_wp, -21.58494601_wp, -29.79012958_wp, & + & -4.17332391_wp, -21.74779431_wp, -29.25436454_wp, -4.54394599_wp, & + & -22.78822514_wp, -31.18346558_wp, -4.68054105_wp, -23.60497636_wp, & + & -31.68587275_wp, -3.28093682_wp, -21.16370976_wp, -31.69824422_wp, & + & -5.38202938_wp, -20.66332416_wp, -32.78152838_wp, -5.42985026_wp, & + & -20.59077590_wp, -31.32692203_wp, -6.31987444_wp, -21.06847438_wp, & + & -31.28370580_wp, -5.23338423_wp, -19.67124478_wp, -40.73538958_wp, & + & -5.01561418_wp, -28.87280312_wp, -39.29180505_wp, -4.96033363_wp, & + & -28.78767826_wp, -38.94549113_wp, -4.80741614_wp, -27.30464732_wp, & + & -39.79931777_wp, -4.47344800_wp, -26.48831478_wp, -41.20663651_wp, & + & -4.70313746_wp, -28.02946760_wp, -38.87732506_wp, -5.89055621_wp, & + & -29.19037166_wp, -38.73323373_wp, -3.76978629_wp, -29.57522277_wp, & + & -39.02097286_wp, -3.86977426_wp, -30.61842097_wp, -39.13659058_wp, & + & -2.83997566_wp, -29.18231603_wp, -37.65020642_wp, -3.74531295_wp, & + & -29.50779315_wp, -37.67195488_wp, -5.03280065_wp, -26.99829323_wp, & + & -37.10743089_wp, -4.84708784_wp, -25.67877125_wp, -35.58822987_wp, & + & -4.78844979_wp, -25.85573722_wp, -35.05857213_wp, -5.16799149_wp, & + & -26.89608393_wp, -36.99285656_wp, -5.32033866_wp, -27.69626192_wp, & + & -37.48703805_wp, -3.90939261_wp, -25.25933961_wp, -37.47480414_wp, & + & -6.00788547_wp, -24.74742378_wp, -38.55690326_wp, -6.06664125_wp, & + & -24.66575545_wp, -37.09696090_wp, -6.94406209_wp, -25.15046145_wp, & + & -37.05372219_wp, -5.84915191_wp, -23.75967130_wp, -46.54283945_wp, & + & -5.72896818_wp, -32.95017393_wp, -45.09967525_wp, -5.67153232_wp, & + & -32.86005946_wp, -44.75843168_wp, -5.51826823_wp, -31.37586991_wp, & + & -45.61547000_wp, -5.18652555_wp, -30.56200555_wp, -47.01730714_wp, & + & -5.41781587_wp, -32.10814920_wp, -44.68222168_wp, -6.60083977_wp, & + & -33.26175939_wp, -44.54031215_wp, -4.47956633_wp, -33.64497610_wp, & + & -44.82448608_wp, -4.57916721_wp, -34.68918370_wp, -44.94635330_wp, & + & -3.55065671_wp, -33.25268452_wp, -43.45753634_wp, -4.45344777_wp, & + & -33.57400077_wp, -43.48528133_wp, -5.74073537_wp, -31.06598113_wp, & + & -42.92293312_wp, -5.54965521_wp, -29.74627221_wp, -41.40432912_wp, & + & -5.47792143_wp, -29.92407942_wp, -40.87261416_wp, -5.85246833_wp, & + & -30.96523940_wp, -42.80322298_wp, -6.02464684_wp, -31.76263397_wp, & + & -43.31042373_wp, -4.61481679_wp, -29.32765504_wp, -43.28115893_wp, & + & -6.71276291_wp, -28.81437789_wp, -44.36272102_wp, -6.77873242_wp, & + & -28.73107795_wp, -42.89775728_wp, -7.64641274_wp, -29.21798226_wp, & + & -42.85962457_wp, -6.55118982_wp, -27.82729004_wp, -52.33955647_wp, & + & -6.43642691_wp, -37.04306009_wp, -50.89639263_wp, -6.38181316_wp, & + & -36.95085396_wp, -50.55767812_wp, -6.22913014_wp, -35.46597001_wp, & + & -51.41619581_wp, -5.89737593_wp, -34.65363715_wp, -52.81421956_wp, & + & -6.12534758_wp, -36.20106721_wp, -50.48013019_wp, -7.31215391_wp, & + & -37.35143846_wp, -50.33331156_wp, -5.19138591_wp, -37.73537393_wp, & + & -50.61535061_wp, -5.29131552_wp, -38.78013093_wp, -50.73868995_wp, & + & -4.26150292_wp, -37.34471749_wp, -49.25065603_wp, -5.16699194_wp, & + & -37.66202360_wp, -49.28533271_wp, -6.45231152_wp, -35.15333991_wp, & + & -48.72691702_wp, -6.26313213_wp, -33.83165726_wp, -47.20779469_wp, & + & -6.19044094_wp, -34.00436310_wp, -46.67233938_wp, -6.56352469_wp, & + & -35.04411539_wp, -48.60164774_wp, -6.73628909_wp, -35.84831574_wp, & + & -49.11612857_wp, -5.32911991_wp, -33.41280046_wp, -49.08764446_wp, & + & -7.42784243_wp, -32.90272255_wp, -50.16947487_wp, -7.49530189_wp, & + & -32.82420581_wp, -48.70123993_wp, -8.36052243_wp, -33.30570010_wp, & + & -48.67066855_wp, -7.26684569_wp, -31.91361098_wp, -58.13916280_wp, & + & -7.14190483_wp, -41.13292851_wp, -56.69589316_wp, -7.08636490_wp, & + & -41.04261808_wp, -56.35541220_wp, -6.93379220_wp, -39.55812234_wp, & + & -57.21315642_wp, -6.60250885_wp, -38.74477137_wp, -58.61287784_wp, & + & -6.83078776_wp, -40.29041351_wp, -56.27952238_wp, -8.01630683_wp, & + & -41.44399583_wp, -56.13471348_wp, -5.89532581_wp, -41.82757519_wp, & + & -56.41872003_wp, -5.99479757_wp, -42.87184537_wp, -56.53964530_wp, & + & -4.96578254_wp, -41.43565010_wp, -55.05193142_wp, -5.87062346_wp, & + & -41.75629347_wp, -55.08262955_wp, -7.15640138_wp, -39.24682302_wp, & + & -54.52367773_wp, -6.96830767_wp, -37.92519233_wp, -53.00449889_wp, & + & -6.89668778_wp, -38.09778466_wp, -52.46914610_wp, -7.26973750_wp, & + & -39.13759078_wp, -54.39940338_wp, -7.44031571_wp, -39.94225418_wp, & + & -54.91226815_wp, -6.03435487_wp, -37.50564318_wp, -54.88482221_wp, & + & -8.13342850_wp, -36.99689194_wp, -55.96664774_wp, -8.19995044_wp, & + & -36.91756257_wp, -54.49959565_wp, -9.06613357_wp, -37.40094783_wp, & + & -54.46688406_wp, -7.97365278_wp, -36.00798564_wp, -63.94179358_wp, & + & -7.84995788_wp, -45.21872870_wp, -62.49855386_wp, -7.79317911_wp, & + & -45.12859069_wp, -62.15759074_wp, -7.64071693_wp, -43.64421811_wp, & + & -63.01515132_wp, -7.31021072_wp, -42.83037094_wp, -64.41588592_wp, & + & -7.53953842_wp, -44.37619551_wp, -62.08150346_wp, -8.72261840_wp, & + & -45.53043021_wp, -61.93860668_wp, -6.60137981_wp, -45.91328961_wp, & + & -62.22239074_wp, -6.70097717_wp, -46.95760559_wp, -62.34460916_wp, & + & -5.67236142_wp, -45.52122671_wp, -60.85586096_wp, -6.57549223_wp, & + & -45.84187209_wp, -60.88443331_wp, -7.86245020_wp, -43.33375611_wp, & + & -60.32432731_wp, -7.67370571_wp, -42.01270648_wp, -58.80528438_wp, & + & -7.60217822_wp, -42.18689091_wp, -58.27109412_wp, -7.97514768_wp, & + & -43.22733013_wp, -60.20159387_wp, -8.14595234_wp, -44.02975279_wp, & + & -60.71235227_wp, -6.73941462_wp, -41.59336237_wp, -60.68489372_wp, & + & -8.83815121_wp, -41.08336539_wp, -61.76667702_wp, -8.90445351_wp, & + & -41.00323002_wp, -60.30010817_wp, -9.77119007_wp, -41.48706609_wp, & + & -60.26624399_wp, -8.67775555_wp, -40.09486260_wp, -69.74142747_wp, & + & -8.56148870_wp, -49.30824011_wp, -68.29826139_wp, -8.50438899_wp, & + & -49.21731857_wp, -67.95836370_wp, -8.35121362_wp, -47.73275064_wp, & + & -68.81666291_wp, -8.02086171_wp, -46.91961299_wp, -70.21594829_wp, & + & -8.25099704_wp, -48.46596043_wp, -67.88074785_wp, -9.43395883_wp, & + & -49.61837986_wp, -67.73807969_wp, -7.31290469_wp, -50.00232438_wp, & + & -68.02151202_wp, -7.41296041_wp, -51.04669468_wp, -68.14423914_wp, & + & -6.38372666_wp, -49.61080456_wp, -66.65535843_wp, -7.28694639_wp, & + & -49.93057117_wp, -66.68532420_wp, -8.57219982_wp, -47.42131469_wp, & + & -66.12625180_wp, -8.38315104_wp, -46.09986693_wp, -64.60717718_wp, & + & -8.31032148_wp, -46.27313934_wp, -64.07214475_wp, -8.68245974_wp, & + & -47.31345050_wp, -66.00184884_wp, -8.85533911_wp, -48.11683721_wp, & + & -66.51535109_wp, -7.44926304_wp, -45.68062421_wp, -66.48649222_wp, & + & -9.54808880_wp, -45.17101419_wp, -67.56827405_wp, -9.61526767_wp, & + & -45.09157965_wp, -66.10072181_wp, -10.48072872_wp, -45.57469469_wp, & + & -66.06859604_wp, -9.38760820_wp, -44.18220980_wp, -75.54191923_wp, & + & -9.27358146_wp, -53.39630746_wp, -74.09868308_wp, -9.21675705_wp, & + & -53.30610740_wp, -73.75803416_wp, -9.06339096_wp, -51.82174439_wp, & + & -74.61597852_wp, -8.73312121_wp, -51.00819727_wp, -76.01596084_wp, & + & -8.96315999_wp, -52.55373025_wp, -73.68153761_wp, -10.14648732_wp, & + & -53.70718828_wp, -73.53869603_wp, -8.02553838_wp, -54.09164832_wp, & + & -73.82261074_wp, -8.12582806_wp, -55.13586523_wp, -73.94457701_wp, & + & -7.09621692_wp, -53.70017944_wp, -72.45594132_wp, -7.99968317_wp, & + & -54.02039062_wp, -72.48480934_wp, -9.28415260_wp, -51.51084886_wp, & + & -71.92554300_wp, -9.09516988_wp, -50.18947788_wp, -70.40648080_wp, & + & -9.02221899_wp, -50.36270685_wp, -69.87127015_wp, -9.39455967_wp, & + & -51.40284170_wp, -71.80158374_wp, -9.56728973_wp, -52.20659502_wp, & + & -72.31466284_wp, -8.16133178_wp, -49.77014204_wp, -72.28564973_wp, & + & -10.26018451_wp, -49.26066179_wp, -73.36742181_wp, -10.32743442_wp, & + & -49.18116997_wp, -71.89983037_wp, -11.19277367_wp, -49.66441418_wp, & + & -71.86770721_wp, -10.09972147_wp, -48.27187423_wp, -81.34270097_wp, & + & -9.98258243_wp, -57.48456796_wp, -79.89947518_wp, -9.92613247_wp, & + & -57.39396429_wp, -79.55910501_wp, -9.77319164_wp, -55.90948202_wp, & + & -80.41705171_wp, -9.44257398_wp, -55.09608433_wp, -81.81689501_wp, & + & -9.67190048_wp, -56.64217528_wp, -79.48245016_wp, -10.85584776_wp, & + & -57.79519254_wp, -79.33902080_wp, -8.73481809_wp, -58.17903476_wp, & + & -79.62277337_wp, -8.83469212_wp, -59.22333616_wp, -79.74471628_wp, & + & -7.80550866_wp, -57.78734244_wp, -78.25627045_wp, -8.70928323_wp, & + & -58.10757786_wp, -78.28606173_wp, -9.99473314_wp, -55.59842708_wp, & + & -77.72657765_wp, -9.80616523_wp, -54.27708643_wp, -76.20750827_wp, & + & -9.73377950_wp, -54.45065866_wp, -75.67275251_wp, -10.10604378_wp, & + & -55.49106118_wp, -77.60289759_wp, -10.27797330_wp, -56.29420978_wp, & + & -78.11522793_wp, -8.87222550_wp, -53.85754256_wp, -78.08701251_wp, & + & -10.97117120_wp, -53.34839288_wp, -79.16879919_wp, -11.03800211_wp, & + & -53.26873625_wp, -77.70163778_wp, -11.90385781_wp, -53.75234321_wp, & + & -77.66884875_wp, -10.81103102_wp, -52.35964590_wp, -87.14203772_wp, & + & -10.68803235_wp, -61.57534092_wp, -85.69881612_wp, -10.63245934_wp, & + & -61.48416118_wp, -85.35901062_wp, -10.47976423_wp, -59.99951959_wp, & + & -86.21712336_wp, -10.14859905_wp, -59.18651663_wp, -87.61635315_wp, & + & -10.37691728_wp, -60.73317496_wp, -85.28222505_wp, -11.56244506_wp, & + & -61.88521364_wp, -85.13731345_wp, -9.44151739_wp, -62.26903523_wp, & + & -85.42064253_wp, -9.54130659_wp, -63.31346119_wp, -85.54267078_wp, & + & -8.51195138_wp, -61.87760196_wp, -84.05458236_wp, -9.41659196_wp, & + & -62.19708244_wp, -84.08627717_wp, -10.70219529_wp, -59.68787319_wp, & + & -83.52728194_wp, -10.51405999_wp, -58.36625893_wp, -82.00809739_wp, & + & -10.44241102_wp, -58.53919592_wp, -81.47311896_wp, -10.81488838_wp, & + & -59.57940960_wp, -83.40295204_wp, -10.98583406_wp, -60.38333728_wp, & + & -83.91563771_wp, -9.57996288_wp, -57.94679363_wp, -83.88873599_wp, & + & -11.67897424_wp, -57.43785237_wp, -84.97059820_wp, -11.74535924_wp, & + & -57.35883302_wp, -83.50351384_wp, -12.61180004_wp, -57.84162587_wp, & + & -83.47109056_wp, -11.51906342_wp, -56.44884957_wp, -92.94077300_wp, & + & -11.39084108_wp, -65.66701147_wp, -91.49753519_wp, -11.33596437_wp, & + & -65.57594704_wp, -91.15772536_wp, -11.18331733_wp, -64.09131375_wp, & + & -92.01572379_wp, -10.85157612_wp, -63.27841743_wp, -93.41482588_wp, & + & -11.07918542_wp, -64.82489115_wp, -91.08141324_wp, -12.26618068_wp, & + & -65.97694947_wp, -90.93550090_wp, -10.14534192_wp, -66.36091818_wp, & + & -91.21898817_wp, -10.24504295_wp, -67.40531038_wp, -91.34035922_wp, & + & -9.21555516_wp, -65.96949183_wp, -89.85275125_wp, -10.12096114_wp, & + & -66.28907522_wp, -89.88519298_wp, -11.40652941_wp, -63.77946683_wp, & + & -89.32650233_wp, -11.21870672_wp, -62.45768788_wp, -87.80725095_wp, & + & -11.14773019_wp, -62.63013137_wp, -87.27206996_wp, -11.52059334_wp, & + & -63.67010250_wp, -89.20188584_wp, -11.69063044_wp, -64.47475117_wp, & + & -89.71462618_wp, -10.28448288_wp, -62.03829416_wp, -89.68871150_wp, & + & -12.38353487_wp, -61.52946287_wp, -90.77062219_wp, -12.44942414_wp, & + & -61.45069707_wp, -89.30382802_wp, -13.31650006_wp, -61.93323879_wp, & + & -89.27121193_wp, -12.22390645_wp, -60.54035284_wp, -98.74078738_wp, & + & -12.09138693_wp, -69.75681772_wp, -97.29752676_wp, -12.03683402_wp, & + & -69.66622990_wp, -96.95719059_wp, -11.88436198_wp, -68.18174212_wp, & + & -97.81473093_wp, -11.55217610_wp, -67.36854484_wp, -99.21458867_wp, & + & -11.77944498_wp, -68.91467117_wp, -96.88177421_wp, -12.96713081_wp, & + & -70.06743209_wp, -96.73551062_wp, -10.84631558_wp, -70.45137234_wp, & + & -97.01936750_wp, -10.94596750_wp, -71.49566887_wp, -97.14005846_wp, & + & -9.91645237_wp, -70.05980812_wp, -95.65273385_wp, -10.82215640_wp, & + & -70.37988793_wp, -95.68467556_wp, -12.10824729_wp, -67.87033593_wp, & + & -95.12556943_wp, -11.92078485_wp, -66.54870982_wp, -93.60635060_wp, & + & -11.85060110_wp, -66.72152421_wp, -93.07154142_wp, -12.22405770_wp, & + & -67.76147259_wp, -95.00176972_wp, -12.39277556_wp, -68.56583243_wp, & + & -95.51312028_wp, -10.98638681_wp, -66.12917362_wp, -95.48813591_wp, & + & -13.08547466_wp, -65.62044740_wp, -96.57006465_wp, -13.15089713_wp, & + & -65.54154244_wp, -95.10370065_wp, -14.01859904_wp, -66.02428354_wp, & + & -95.07043534_wp, -12.92602155_wp, -64.63139472_wp, -104.54047448_wp, & + & -12.79169421_wp, -73.84682253_wp, -103.09726311_wp, -12.73680284_wp, & + & -73.75594494_wp, -102.75723271_wp, -12.58434010_wp, -72.27141243_wp, & + & -103.61482184_wp, -12.25186806_wp, -71.45838800_wp, -105.01455891_wp, & + & -12.47967064_wp, -73.00487121_wp, -102.68119597_wp, -13.66695265_wp, & + & -74.15715646_wp, -102.53540424_wp, -11.54605202_wp, -74.54085499_wp, & + & -102.81911574_wp, -11.64561866_wp, -75.58519784_wp, -102.94019324_wp, & + & -10.61633136_wp, -74.14920086_wp, -101.45264096_wp, -11.52167932_wp, & + & -74.46923518_wp, -101.48484226_wp, -12.80859856_wp, -71.95980638_wp, & + & -100.92577162_wp, -12.62113106_wp, -70.63818875_wp, -99.40657665_wp, & + & -12.55132661_wp, -70.81110330_wp, -98.87189488_wp, -12.92517361_wp, & + & -71.85098169_wp, -100.80192575_wp, -13.09327538_wp, -72.65523785_wp, & + & -101.31308246_wp, -11.68658980_wp, -70.21874769_wp, -101.28863064_wp, & + & -13.78563192_wp, -69.70980473_wp, -102.37057508_wp, -13.85073570_wp, & + & -69.63085711_wp, -100.90447784_wp, -14.71890117_wp, -70.11357407_wp, & + & -100.87084371_wp, -13.62620692_wp, -68.72078411_wp, -110.33930002_wp, & + & -13.49328297_wp, -77.93751914_wp, -108.89608854_wp, -13.43829246_wp, & + & -77.84667703_wp, -108.55617182_wp, -13.28545259_wp, -76.36215027_wp, & + & -109.41381526_wp, -12.95268082_wp, -75.54930475_wp, -110.81331297_wp, & + & -13.18106067_wp, -77.09559235_wp, -108.47994224_wp, -14.36853309_wp, & + & -78.24759178_wp, -108.33426903_wp, -12.24773520_wp, -78.63190652_wp, & + & -108.61801757_wp, -12.34754910_wp, -79.67621570_wp, -108.73902828_wp, & + & -11.31791395_wp, -78.24046161_wp, -107.25150146_wp, -12.22335156_wp, & + & -78.56033877_wp, -107.28383782_wp, -13.50969667_wp, -76.05032310_wp, & + & -106.72507573_wp, -13.32214305_wp, -74.72859175_wp, -105.20587319_wp, & + & -13.25211058_wp, -74.90114539_wp, -104.67081967_wp, -13.62622372_wp, & + & -75.94073388_wp, -106.60079510_wp, -13.79446467_wp, -76.74558782_wp, & + & -107.11262023_wp, -12.38767640_wp, -74.30920550_wp, -107.08794757_wp, & + & -14.48673900_wp, -73.80032568_wp, -108.16989781_wp, -14.55207553_wp, & + & -73.72166444_wp, -106.70348086_wp, -15.41991753_wp, -74.20400697_wp, & + & -106.67045699_wp, -14.32723994_wp, -72.81119149_wp, -116.13944780_wp, & + & -14.19649878_wp, -82.02602702_wp, -114.69619578_wp, -14.14118830_wp, & + & -81.93573107_wp, -114.35569743_wp, -13.98817753_wp, -80.45134192_wp, & + & -115.21305178_wp, -13.65535633_wp, -79.63821372_wp, -116.61320158_wp, & + & -13.88425783_wp, -81.18396149_wp, -114.27999615_wp, -15.07134410_wp, & + & -82.33677997_wp, -114.13493286_wp, -12.95052495_wp, -82.72120067_wp, & + & -114.41904567_wp, -13.05041615_wp, -83.76540372_wp, -114.53974055_wp, & + & -12.02078193_wp, -82.32961964_wp, -113.05214291_wp, -12.92590845_wp, & + & -82.65003368_wp, -113.08322173_wp, -14.21228900_wp, -80.13996194_wp, & + & -112.52399992_wp, -14.02456096_wp, -78.81843962_wp, -111.00484910_wp, & + & -13.95434956_wp, -78.99146350_wp, -110.47001342_wp, -14.32891892_wp, & + & -80.03099389_wp, -112.40042484_wp, -14.49718269_wp, -80.83541321_wp, & + & -112.91153840_wp, -13.09013310_wp, -78.39897282_wp, -112.88632905_wp, & + & -15.18916002_wp, -77.88995876_wp, -113.96823670_wp, -15.25469973_wp, & + & -77.81088706_wp, -112.50182720_wp, -16.12229685_wp, -78.29370563_wp, & + & -112.46850152_wp, -15.02950184_wp, -76.90098985_wp, -121.94022808_wp, & + & -14.90118964_wp, -86.11376245_wp, -120.49699006_wp, -14.84542713_wp, & + & -86.02333193_wp, -120.15651056_wp, -14.69234129_wp, -84.53892793_wp, & + & -121.01391076_wp, -14.35967135_wp, -83.72579270_wp, -122.41421193_wp, & + & -14.58896353_wp, -85.27182967_wp, -120.08049490_wp, -15.77542707_wp, & + & -86.42442841_wp, -119.93602789_wp, -13.65453671_wp, -86.80868161_wp, & + & -120.22004369_wp, -13.75441567_wp, -87.85291181_wp, -120.34111758_wp, & + & -12.72494057_wp, -86.41704274_wp, -118.85324878_wp, -13.62962125_wp, & + & -86.73743916_wp, -118.88394299_wp, -14.91611494_wp, -84.22764102_wp, & + & -118.32442378_wp, -14.72815761_wp, -82.90626165_wp, -116.80530542_wp, & + & -14.65766732_wp, -83.07973632_wp, -116.27076629_wp, -15.03218184_wp, & + & -84.11944172_wp, -118.20119401_wp, -15.20103832_wp, -84.92313717_wp, & + & -118.71203504_wp, -13.79377526_wp, -82.48676837_wp, -118.68624150_wp, & + & -15.89275959_wp, -81.97758738_wp, -119.76811215_wp, -15.95851714_wp, & + & -81.89817922_wp, -118.30167737_wp, -16.82585005_wp, -82.38138249_wp, & + & -118.26814360_wp, -15.73294904_wp, -80.98875694_wp, -127.73999567_wp, & + & -15.60664244_wp, -90.20301199_wp, -126.29678170_wp, -15.55099197_wp, & + & -90.11202196_wp, -125.95674945_wp, -15.39812822_wp, -88.62747854_wp, & + & -126.81440381_wp, -15.06564354_wp, -87.81454006_wp, -128.21430935_wp, & + & -15.29450510_wp, -89.36123695_wp, -125.88022923_wp, -16.48095742_wp, & + & -90.51313659_wp, -125.73539456_wp, -14.36000263_wp, -90.89692698_wp, & + & -126.01883594_wp, -14.45971957_wp, -91.94132675_wp, -126.14068917_wp, & + & -13.43045947_wp, -90.50537266_wp, -124.65265401_wp, -14.33510184_wp, & + & -90.82507539_wp, -124.68421418_wp, -15.62173100_wp, -88.31586599_wp, & + & -124.12496244_wp, -15.43347732_wp, -86.99439920_wp, -122.60581673_wp, & + & -15.36250163_wp, -87.16759896_wp, -122.07100233_wp, -15.73684386_wp, & + & -88.20722481_wp, -124.00127059_wp, -15.90662430_wp, -89.01118137_wp, & + & -124.51297663_wp, -14.49918633_wp, -86.57507619_wp, -124.48652443_wp, & + & -16.59810181_wp, -86.06565564_wp, -125.56838269_wp, -16.66421734_wp, & + & -85.98638408_wp, -124.10158934_wp, -17.53110713_wp, -86.46929356_wp, & + & -124.06860981_wp, -16.43803785_wp, -85.07678812_wp, -133.53914550_wp, & + & -16.31207138_wp, -94.29341602_wp, -132.09591303_wp, -16.25690770_wp, & + & -94.20233962_wp, -131.75596968_wp, -16.10384664_wp, -92.71777398_wp, & + & -132.61372086_wp, -15.77135614_wp, -91.90493955_wp, -134.01336887_wp, & + & -15.99977111_wp, -93.45164623_wp, -131.67965516_wp, -17.18710468_wp, & + & -94.60322722_wp, -131.53397265_wp, -15.06627126_wp, -94.98738237_wp, & + & -131.81736200_wp, -15.16602032_wp, -96.03179181_wp, -131.93891117_wp, & + & -14.13650116_wp, -94.59599794_wp, -130.45122740_wp, -15.04180879_wp, & + & -94.91543508_wp, -130.48343848_wp, -16.32729848_wp, -92.40597656_wp, & + & -129.92445208_wp, -16.13892286_wp, -91.08440223_wp, -128.40526044_wp, & + & -16.06773892_wp, -91.25717557_wp, -127.87011479_wp, -16.44181689_wp, & + & -92.29672173_wp, -129.80041296_wp, -16.61231585_wp, -93.10114970_wp, & + & -130.31274506_wp, -15.20469563_wp, -90.66519776_wp, -130.28599331_wp, & + & -17.30360019_wp, -90.15570908_wp, -131.36785067_wp, -17.36984496_wp, & + & -90.07654680_wp, -129.90090681_wp, -18.23655061_wp, -90.55933132_wp, & + & -129.86819229_wp, -17.14351656_wp, -89.16679670_wp, -139.33996992_wp, & + & -17.01629719_wp, -98.38198368_wp, -137.89667990_wp, -16.96171786_wp, & + & -98.29119640_wp, -137.55615445_wp, -16.80897188_wp, -96.80674092_wp, & + & -138.41355093_wp, -16.47663783_wp, -95.99347586_wp, -139.81401325_wp, & + & -16.70430768_wp, -97.54000990_wp, -137.48092416_wp, -17.89202957_wp, & + & -98.69235044_wp, -137.33446395_wp, -15.77120135_wp, -99.07622602_wp, & + & -137.61794473_wp, -15.87082859_wp, -100.12062042_wp, -137.73913032_wp, & + & -14.84134050_wp, -98.68477394_wp, -136.25170823_wp, -15.74703351_wp, & + & -99.00434027_wp, -136.28346999_wp, -17.03249783_wp, -96.49550994_wp, & + & -135.72389738_wp, -16.84395947_wp, -95.17419962_wp, -134.20473621_wp, & + & -16.77301305_wp, -95.34746305_wp, -133.66995104_wp, -17.14714633_wp, & + & -96.38716780_wp, -135.60078123_wp, -17.31745967_wp, -97.19102603_wp, & + & -136.11192926_wp, -15.90960280_wp, -94.75503558_wp, -136.08518080_wp, & + & -18.00840220_wp, -94.24511253_wp, -137.16701021_wp, -18.07450966_wp, & + & -94.16548082_wp, -135.70036342_wp, -18.94147773_wp, -94.64870347_wp, & + & -135.66694079_wp, -17.84815330_wp, -93.25641109_wp, -145.14012758_wp, & + & -17.71845442_wp, -102.47216038_wp, -143.69684717_wp, -17.66431819_wp, & + & -102.38100486_wp, -143.35675567_wp, -17.51188952_wp, -100.89639356_wp, & + & -144.21441655_wp, -17.17967958_wp, -100.08334909_wp, -145.61420968_wp, & + & -17.40680451_wp, -101.63006960_wp, -143.28121888_wp, -18.59468930_wp, & + & -102.78215783_wp, -143.13408020_wp, -16.47385334_wp, -103.16571666_wp, & + & -143.41722962_wp, -16.57329825_wp, -104.21022002_wp, -143.53867258_wp, & + & -15.54393901_wp, -102.77431547_wp, -142.05134255_wp, -16.44993440_wp, & + & -103.09346730_wp, -142.08421361_wp, -17.73561480_wp, -100.58475022_wp, & + & -141.52493737_wp, -17.54698700_wp, -99.26331036_wp, -140.00571586_wp, & + & -17.47644973_wp, -99.43629141_wp, -139.47094228_wp, -17.85014755_wp, & + & -100.47616612_wp, -141.40124150_wp, -18.02021727_wp, -101.28014933_wp, & + & -141.91278968_wp, -16.61242167_wp, -98.84442676_wp, -141.88686077_wp, & + & -18.71111507_wp, -98.33408741_wp, -142.96873082_wp, -18.77670594_wp, & + & -98.25456962_wp, -141.50244712_wp, -19.64443591_wp, -98.73749205_wp, & + & -141.46866591_wp, -18.55092048_wp, -97.34535916_wp, -150.94091858_wp, & + & -18.41836587_wp, -106.56190599_wp, -149.49759331_wp, -18.36494086_wp, & + & -106.47087239_wp, -149.15725560_wp, -18.21266679_wp, -104.98630866_wp, & + & -150.01476541_wp, -17.88050285_wp, -104.17308399_wp, -151.41479752_wp, & + & -18.10694523_wp, -105.71961579_wp, -149.08245554_wp, -19.29556091_wp, & + & -106.87197445_wp, -148.93437821_wp, -17.17486281_wp, -107.25584010_wp, & + & -149.21777444_wp, -17.27434877_wp, -108.30027498_wp, -149.33846315_wp, & + & -16.24469365_wp, -106.86452201_wp, -147.85161693_wp, -17.15144431_wp, & + & -107.18381574_wp, -147.88468910_wp, -18.43658798_wp, -104.67491251_wp, & + & -147.32519326_wp, -18.24846097_wp, -103.35350171_wp, -145.80596628_wp, & + & -18.17814254_wp, -103.52660761_wp, -145.27134908_wp, -18.55159644_wp, & + & -104.56664859_wp, -147.20187056_wp, -18.72107788_wp, -105.37050939_wp, & + & -147.71282755_wp, -17.31396810_wp, -102.93425663_wp, -147.68718749_wp, & + & -19.41284365_wp, -102.42462033_wp, -148.76906336_wp, -19.47842351_wp, & + & -102.34516281_wp, -147.30278873_wp, -20.34606345_wp, -102.82827388_wp, & + & -147.26903131_wp, -19.25295103_wp, -101.43582710_wp, -156.73921424_wp, & + & -19.11383043_wp, -110.65611766_wp, -155.29597133_wp, -19.06115770_wp, & + & -110.56321986_wp, -154.95718253_wp, -18.90966598_wp, -109.07824595_wp, & + & -155.81530540_wp, -18.57722620_wp, -108.26578597_wp, -157.21406946_wp, & + & -18.80275818_wp, -109.81425874_wp, -154.88080626_wp, -19.99179100_wp, & + & -110.96426549_wp, -154.73128190_wp, -17.87098861_wp, -111.34699906_wp, & + & -155.01333840_wp, -17.96999125_wp, -112.39184111_wp, -155.13557172_wp, & + & -16.94082846_wp, -110.95586852_wp, -153.64860851_wp, -17.84797283_wp, & + & -111.27354119_wp, -153.68508696_wp, -19.13464204_wp, -108.76571538_wp, & + & -153.12622125_wp, -18.94659633_wp, -107.44402353_wp, -151.60686954_wp, & + & -18.87728536_wp, -107.61659609_wp, -151.07223223_wp, -19.25065501_wp, & + & -108.65667126_wp, -153.00174311_wp, -19.41904225_wp, -109.46086135_wp, & + & -153.51333388_wp, -18.01168470_wp, -107.02521103_wp, -153.48958088_wp, & + & -20.11042737_wp, -106.51500712_wp, -154.57154935_wp, -20.17509870_wp, & + & -106.43605539_wp, -153.10576729_wp, -21.04407568_wp, -106.91822084_wp, & + & -153.07177898_wp, -19.95061231_wp, -105.52605173_wp, -162.53059487_wp, & + & -19.81206045_wp, -114.76039992_wp, -161.08758091_wp, -19.75686794_wp, & + & -114.66576260_wp, -160.75130074_wp, -19.60455118_wp, -113.18024327_wp, & + & -161.61119280_wp, -19.27275162_wp, -112.36937733_wp, -163.00671823_wp, & + & -19.50057517_wp, -113.91937826_wp, -160.67025627_wp, -20.68684604_wp, & + & -115.06605957_wp, -160.52388790_wp, -18.56582902_wp, -115.44891618_wp, & + & -160.80450537_wp, -18.66530370_wp, -116.49410145_wp, -160.93013934_wp, & + & -17.63630628_wp, -115.05831032_wp, -159.44134239_wp, -18.54107177_wp, & + & -115.37412959_wp, -159.47955888_wp, -19.82812567_wp, -112.86544613_wp, & + & -158.92333218_wp, -19.64021264_wp, -111.54259988_wp, -157.40362034_wp, & + & -19.57172092_wp, -111.71221789_wp, -156.86727104_wp, -19.94475299_wp, & + & -112.75154622_wp, -158.79466797_wp, -20.11222707_wp, -113.55921356_wp, & + & -159.31071334_wp, -18.70502822_wp, -111.12463517_wp, -159.28930437_wp, & + & -20.80373627_wp, -110.61422714_wp, -160.37147773_wp, -20.86775767_wp, & + & -110.53755378_wp, -158.90521208_wp, -21.73765551_wp, -111.01654819_wp, & + & -158.87351133_wp, -20.64408999_wp, -109.62440129_wp, -168.32178971_wp, & + & -20.54259034_wp, -118.86088574_wp, -166.87907136_wp, -20.47826870_wp, & + & -118.76749738_wp, -166.54225607_wp, -20.31977059_wp, -117.28278630_wp, & + & -167.40292503_wp, -19.98934070_wp, -116.47220554_wp, -168.79965637_wp, & + & -20.22779939_wp, -118.02214438_wp, -166.45674207_wp, -21.40688383_wp, & + & -119.16566559_wp, -166.32326015_wp, -19.28611264_wp, -119.55456734_wp, & + & -166.60502853_wp, -19.38972391_wp, -120.59903915_wp, -166.73381288_wp, & + & -18.35781892_wp, -119.16555346_wp, -165.24074136_wp, -19.25533989_wp, & + & -119.48164112_wp, -165.26915957_wp, -20.53644732_wp, -116.96855389_wp, & + & -164.71312531_wp, -20.34493649_wp, -115.64617672_wp, -163.19355214_wp, & + & -20.27348032_wp, -115.81585738_wp, -162.65620552_wp, -20.64755809_wp, & + & -116.85427494_wp, -164.58391947_wp, -20.82053202_wp, -117.66196536_wp, & + & -165.10256482_wp, -19.40998006_wp, -115.22965198_wp, -165.07621369_wp, & + & -21.50788833_wp, -114.71592336_wp, -166.15822396_wp, -21.57439554_wp, & + & -114.63905968_wp, -164.68992113_wp, -22.44148587_wp, -115.11690794_wp, & + & -164.66070485_wp, -21.34574561_wp, -113.72638383_wp, -174.10245731_wp, & + & -21.31609889_wp, -122.96474472_wp, -172.65992444_wp, -21.25692816_wp, & + & -122.86624997_wp, -172.32696635_wp, -21.08571141_wp, -121.38223512_wp, & + & -173.18850676_wp, -20.74495416_wp, -120.57693039_wp, -174.58306081_wp, & + & -20.98473588_wp, -122.13410400_wp, -172.24036258_wp, -22.19086914_wp, & + & -123.25466576_wp, -172.09699504_wp, -20.07390790_wp, -123.66211114_wp, & + & -172.37499935_wp, -20.18602431_wp, -124.70670867_wp, -172.50605507_wp, & + & -19.14081271_wp, -123.28305806_wp, -171.01467137_wp, -20.04581000_wp, & + & -123.58518115_wp, -171.05525903_wp, -21.30341449_wp, -121.06283965_wp, & + & -170.50092926_wp, -21.09769700_wp, -119.74196965_wp, -168.98180681_wp, & + & -21.01800931_wp, -119.91199599_wp, -168.44184640_wp, -21.39781252_wp, & + & -120.94697510_wp, -170.36898943_wp, -21.59370370_wp, -121.75262090_wp, & + & -170.89653278_wp, -20.16180738_wp, -119.33345588_wp, -170.85728429_wp, & + & -22.25534838_wp, -118.80259220_wp, -171.93886462_wp, -22.32659739_wp, & + & -118.72396694_wp, -170.46692174_wp, -23.19000188_wp, -119.19712392_wp, & + & -170.44140386_wp, -22.08380973_wp, -117.81478346_wp, -179.84949622_wp, & + & -22.00365244_wp, -127.11079066_wp, -178.40734090_wp, -22.02523503_wp, & + & -126.99470737_wp, -178.08359694_wp, -21.82774940_wp, -125.51183587_wp, & + & -178.93716513_wp, -21.42498751_wp, -124.72693662_wp, -180.31918130_wp, & + & -21.61705304_wp, -126.29781235_wp, -178.03881876_wp, -22.99420307_wp, & + & -127.34768751_wp, -177.76624381_wp, -20.90343892_wp, -127.81947523_wp, & + & -178.03852327_wp, -21.03225202_wp, -128.86364498_wp, -178.12313017_wp, & + & -19.93608589_wp, -127.47531440_wp, -176.68502050_wp, -20.93640339_wp, & + & -127.72938554_wp, -176.82789321_wp, -22.09737281_wp, -125.16948134_wp, & + & -176.27984985_wp, -21.87366577_wp, -123.84906757_wp, -174.75912576_wp, & + & -21.80826309_wp, -124.01035492_wp, -174.21495861_wp, -22.21210100_wp, & + & -125.03393165_wp, -176.14558398_wp, -22.42762736_wp, -125.84480520_wp, & + & -176.67141528_wp, -20.92783015_wp, -123.46021428_wp, -176.65201037_wp, & + & -23.01259971_wp, -122.89312757_wp, -177.73455867_wp, -23.07309329_wp, & + & -122.81915697_wp, -176.26791245_wp, -23.95698374_wp, -123.27023567_wp, & + & -176.23988268_wp, -22.82889593_wp, -121.90590583_wp, -185.61790644_wp, & + & -22.57968772_wp, -131.24732244_wp, -184.17872457_wp, -22.67135334_wp, & + & -131.12977138_wp, -183.84099323_wp, -22.41281448_wp, -129.65935981_wp, & + & -184.66885356_wp, -21.92090969_wp, -128.89811214_wp, -186.06150536_wp, & + & -22.09761619_wp, -130.47189500_wp, -183.86482213_wp, -23.67647122_wp, & + & -131.43026904_wp, -183.48271940_wp, -21.63094782_wp, -132.01427094_wp, & + & -183.75862760_wp, -21.80533950_wp, -133.05082858_wp, -183.79332571_wp, & + & -20.62961025_wp, -131.72718445_wp, -182.40450594_wp, -21.71045864_wp, & + & -131.91720397_wp, -182.60243514_wp, -22.73546570_wp, -129.30024950_wp, & + & -182.04697569_wp, -22.47805529_wp, -127.98911802_wp, -180.52434677_wp, & + & -22.50347579_wp, -128.14122892_wp, -179.99640157_wp, -22.97941508_wp, & + & -129.14192688_wp, -181.93938960_wp, -23.13700037_wp, -129.95557378_wp, & + & -182.38751572_wp, -21.49422212_wp, -127.64951596_wp, -182.48556448_wp, & + & -23.54686423_wp, -126.98164502_wp, -183.56990368_wp, -23.54142960_wp, & + & -126.90953429_wp, -182.15589282_wp, -24.52865252_wp, -127.31185103_wp, & + & -182.06506767_wp, -23.34079253_wp, -126.00236537_wp, -191.40478796_wp, & + & -23.22521088_wp, -135.32336972_wp, -189.98401925_wp, -23.44911687_wp, & + & -135.16602198_wp, -189.62770060_wp, -23.03382377_wp, -133.73653923_wp, & + & -190.40559690_wp, -22.36991974_wp, -133.05774813_wp, -191.79909275_wp, & + & -22.59475128_wp, -134.63246837_wp, -189.77729182_wp, -24.51270038_wp, & + & -135.32491338_wp, -189.17628011_wp, -22.61516538_wp, -136.16680341_wp, & + & -189.46584042_wp, -22.89421233_wp, -137.17639149_wp, -189.37690970_wp, & + & -21.55711961_wp, -136.01898504_wp, -188.11318989_wp, -22.79614243_wp, & + & -136.04140737_wp, -188.42797891_wp, -23.42671570_wp, -133.31965914_wp, & + & -187.84553900_wp, -23.04466404_wp, -132.05161448_wp, -186.32767596_wp, & + & -23.16179592_wp, -132.20890034_wp, -185.83437382_wp, -23.77304438_wp, & + & -133.15205812_wp, -187.80062150_wp, -23.95661664_wp, -133.91611212_wp, & + & -188.13548407_wp, -22.01247288_wp, -131.82910785_wp, -188.32158998_wp, & + & -23.96595748_wp, -130.92277611_wp, -189.40336210_wp, -23.90004965_wp, & + & -130.84318422_wp, -188.04280195_wp, -24.99430653_wp, -131.13812906_wp, & + & -187.87874750_wp, -23.66818276_wp, -129.97739715_wp, -197.18642874_wp, & + & -23.81515667_wp, -139.40274124_wp, -195.80706752_wp, -24.18617671_wp, & + & -139.17292234_wp, -195.41416822_wp, -23.60385487_wp, -137.81288426_wp, & + & -196.10666013_wp, -22.75070472_wp, -137.26589103_wp, -197.49750241_wp, & + & -23.02921094_wp, -138.84098705_wp, -195.73573329_wp, -25.27878732_wp, & + & -139.16395270_wp, -194.89251040_wp, -23.62007758_wp, -140.26495540_wp, & + & -195.20084382_wp, -24.01775142_wp, -141.22813365_wp, -194.96659128_wp, & + & -22.53585731_wp, -140.28826476_wp, -193.86043581_wp, -23.90165290_wp, & + & -140.08026629_wp, -194.28007660_wp, -24.07628408_wp, -137.30446239_wp, & + & -193.66566125_wp, -23.57276978_wp, -136.09514828_wp, -192.16772550_wp, & + & -23.86786435_wp, -136.20239740_wp, -191.73625210_wp, -24.65923035_wp, & + & -137.03552014_wp, -193.71633809_wp, -24.76099802_wp, -137.79763991_wp, & + & -193.84667788_wp, -22.49454669_wp, -136.03450386_wp, -194.24295488_wp, & + & -24.26053443_wp, -134.85285244_wp, -195.31156395_wp, -24.06886843_wp, & + & -134.80523887_wp, -194.07626623_wp, -25.33321856_wp, -134.90888885_wp, & + & -193.77433646_wp, -23.87472307_wp, -133.95282716_wp, -202.96470666_wp, & + & -24.36334758_wp, -143.47392159_wp, -201.66739493_wp, -24.89314677_wp, & + & -143.11396838_wp, -201.19316102_wp, -24.11161335_wp, -141.88600094_wp, & + & -201.73635915_wp, -23.06227512_wp, -141.55423224_wp, -203.13302227_wp, & + & -23.42284264_wp, -143.13269182_wp, -201.78074935_wp, -25.95643166_wp, & + & -142.87864208_wp, -200.66346416_wp, -24.72187202_wp, -144.25933654_wp, & + & -201.02376139_wp, -25.25924317_wp, -145.13243632_wp, -200.55900170_wp, & + & -23.66909186_wp, -144.50898531_wp, -199.69267530_wp, -25.11733357_wp, & + & -143.97668420_wp, -200.16009473_wp, -24.64804564_wp, -141.24268906_wp, & + & -199.47654536_wp, -24.00967961_wp, -140.13889568_wp, -198.03001149_wp, & + & -24.50954845_wp, -140.16063984_wp, -197.70804280_wp, -25.49111577_wp, & + & -140.82329199_wp, -199.70999727_wp, -25.49613505_wp, -141.57057406_wp, & + & -199.51589235_wp, -22.92544872_wp, -140.28641308_wp, -200.13020357_wp, & + & -24.37137312_wp, -138.80044129_wp, -201.16488245_wp, -24.03948632_wp, & + & -138.80848704_wp, -200.10354828_wp, -25.44778320_wp, -138.65130978_wp, & + & -199.61000644_wp, -23.88632820_wp, -137.98023892_wp, -208.69066252_wp, & + & -24.93963337_wp, -147.56321138_wp, -207.55277041_wp, -25.59274268_wp, & + & -146.95475522_wp, -206.93967672_wp, -24.60066775_wp, -145.96362524_wp, & + & -207.22865786_wp, -23.40873021_wp, -145.99544760_wp, -208.63808672_wp, & + & -23.92738190_wp, -147.56138462_wp, -207.90899386_wp, -26.49046607_wp, & + & -146.43890732_wp, -206.50920723_wp, -25.98110647_wp, -148.00834698_wp, & + & -206.96256259_wp, -26.66064738_wp, -148.72530171_wp, -206.16312800_wp, & + & -25.09441248_wp, -148.53362051_wp, -205.66024209_wp, -26.47194869_wp, & + & -147.54200544_wp, -206.07877099_wp, -25.13260476_wp, -145.09925063_wp, & + & -205.27227421_wp, -24.35659384_wp, -144.18233439_wp, -203.93144366_wp, & + & -25.08129613_wp, -144.03912447_wp, -203.79391909_wp, -26.24227798_wp, & + & -144.41235047_wp, -205.81928000_wp, -26.11171916_wp, -145.14943288_wp, & + & -205.13179874_wp, -23.35823004_wp, -144.60900770_wp, -205.94863066_wp, & + & -24.24472409_wp, -142.81151716_wp, -206.90967242_wp, -23.75104150_wp, & + & -142.92656123_wp, -206.10624988_wp, -25.23519765_wp, -142.39237390_wp, & + & -205.33259122_wp, -23.66568863_wp, -142.13026433_wp, -213.04296943_wp, & + & -26.56629734_wp, -152.37203997_wp, -212.60706863_wp, -26.86728925_wp, & + & -151.01782386_wp, -211.74842857_wp, -25.72173070_wp, -150.49531534_wp, & + & -210.98316647_wp, -25.10128939_wp, -151.22728906_wp, -212.29222733_wp, & + & -26.07212074_wp, -152.84777394_wp, -213.49973195_wp, -26.98099422_wp, & + & -150.39217306_wp, -211.73608319_wp, -28.13250986_wp, -150.90009642_wp, & + & -212.31339742_wp, -29.01152005_wp, -151.17565946_wp, -210.87709078_wp, & + & -28.04652298_wp, -151.56422345_wp, -211.36731163_wp, -28.25093133_wp, & + & -149.88325493_wp, -211.88212645_wp, -25.46344686_wp, -149.18526776_wp, & + & -210.91575003_wp, -24.65999039_wp, -148.46589367_wp, -209.78862492_wp, & + & -25.57735159_wp, -147.96853964_wp, -209.91382616_wp, -26.79758801_wp, & + & -147.94509951_wp, -212.41515253_wp, -26.11038521_wp, -148.62158795_wp, & + & -210.50318375_wp, -23.94365280_wp, -149.18313614_wp, -211.57709874_wp, & + & -23.94863797_wp, -147.28870938_wp, -212.38910025_wp, -23.32275431_wp, & + & -147.64622869_wp, -211.97388157_wp, -24.68000765_wp, -146.58864382_wp, & + & -210.85339945_wp, -23.32745770_wp, -146.76961957_wp, -213.21921171_wp, & + & -27.42701970_wp, -152.87846627_wp, 3.62002550_wp, -0.52486219_wp, & + & 5.49039356_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_76 + +subroutine polyala_80(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 803 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.53380849_wp, -0.29202912_wp, -0.10773662_wp, 0.38094636_wp, & + & 0.58771369_wp, 0.58653214_wp, 1.55868515_wp, -0.26294153_wp, & + & 1.06395818_wp, 1.48473485_wp, -1.48586039_wp, 1.10747185_wp, & + & -0.52661075_wp, -1.24781820_wp, 0.22804120_wp, 0.70945689_wp, & + & 1.35711086_wp, -0.11945650_wp, -0.29740679_wp, 1.23537651_wp, & + & 1.79902961_wp, -1.16790886_wp, 1.79520519_wp, 1.46882851_wp, & + & -0.61020460_wp, 0.46768176_wp, 2.50259139_wp, 0.38517487_wp, & + & 1.90723507_wp, 2.30910007_wp, 2.65640018_wp, 0.42148009_wp, & + & 1.40683484_wp, 3.74125904_wp, -0.22853066_wp, 2.11170741_wp, & + & 3.27817638_wp, -0.59805515_wp, 3.52046209_wp, 2.23138522_wp, & + & -0.22687733_wp, 4.00070953_wp, 2.61448587_wp, 1.42887001_wp, & + & 1.45843539_wp, 3.96833030_wp, -1.16931105_wp, 1.59708307_wp, & + & 4.97365593_wp, 0.66662825_wp, 2.16735495_wp, 5.29702463_wp, & + & 0.90812262_wp, 1.15980692_wp, 4.74891422_wp, 1.58563613_wp, & + & 2.70292951_wp, 5.77561572_wp, 0.14680338_wp, 2.68215446_wp, & + & 4.15048317_wp, -1.35513209_wp, 4.14960141_wp, -6.15833787_wp, & + & -0.80054876_wp, -4.25466537_wp, -4.96544031_wp, -0.04917450_wp, & + & -3.93008597_wp, -4.12105913_wp, -0.92844476_wp, -3.00438960_wp, & + & -4.59718467_wp, -1.92273369_wp, -2.46554123_wp, -6.39445661_wp, & + & -1.51248788_wp, -3.57196110_wp, -4.42838969_wp, 0.16325017_wp, & + & -4.86032881_wp, -5.31545777_wp, 1.26410670_wp, -3.22143115_wp, & + & -5.92411043_wp, 1.87563375_wp, -3.88185451_wp, -5.87499843_wp, & + & 1.05876018_wp, -2.31239600_wp, -4.41329786_wp, 1.81110010_wp, & + & -2.96428742_wp, -2.86384219_wp, -0.52311125_wp, -2.83852400_wp, & + & -1.95019074_wp, -1.11010755_wp, -1.88255620_wp, -1.17259758_wp, & + & 0.03540486_wp, -1.22944025_wp, -1.14908790_wp, 1.15518170_wp, & + & -1.72947712_wp, -2.54030675_wp, 0.34879955_wp, -3.24110380_wp, & + & -2.54178258_wp, -1.65247436_wp, -1.13830852_wp, -0.97159152_wp, & + & -2.06680351_wp, -2.57230068_wp, -1.52749667_wp, -2.87210970_wp, & + & -3.04427123_wp, -0.40447459_wp, -1.53469877_wp, -3.33178791_wp, & + & -0.28130397_wp, -2.49052206_wp, -1.84891635_wp, -11.94365859_wp, & + & -1.38327449_wp, -8.27404527_wp, -10.61767771_wp, -0.82619968_wp, & + & -8.11738713_wp, -9.99464540_wp, -1.49464407_wp, -6.88926819_wp, & + & -10.68313425_wp, -2.12459615_wp, -6.09232332_wp, -12.32979952_wp, & + & -1.77176047_wp, -7.42022940_wp, -10.03876773_wp, -1.05318594_wp, & + & -9.01861219_wp, -10.67699801_wp, 0.69122819_wp, -7.90987385_wp, & + & -11.14048643_wp, 1.15219396_wp, -8.77785677_wp, -11.26675182_wp, & + & 0.92386740_wp, -7.02691719_wp, -9.67789948_wp, 1.09765059_wp, & + & -7.78531163_wp, -8.68128788_wp, -1.32367161_wp, -6.76389478_wp, & + & -7.91760563_wp, -1.74605207_wp, -5.61006161_wp, -6.78393370_wp, & + & -0.73386145_wp, -5.42706922_wp, -6.48940874_wp, 0.05767473_wp, & + & -6.31720024_wp, -8.15963685_wp, -0.74461296_wp, -7.41296327_wp, & + & -8.58103414_wp, -1.74854956_wp, -4.73913348_wp, -7.33202231_wp, & + & -3.14711487_wp, -5.81908366_wp, -8.14305082_wp, -3.85543609_wp, & + & -5.96459076_wp, -6.69157543_wp, -3.15565432_wp, -6.69737506_wp, & + & -6.74973625_wp, -3.44960961_wp, -4.95392576_wp, -17.65561285_wp, & + & -2.27627679_wp, -12.40661144_wp, -16.27427217_wp, -1.85954887_wp, & + & -12.29802840_wp, -15.81775396_wp, -2.20867598_wp, -10.87944750_wp, & + & -16.62927245_wp, -2.50595433_wp, -10.00787749_wp, -18.11096775_wp, & + & -2.42548566_wp, -11.51183799_wp, -15.68370666_wp, -2.40674711_wp, & + & -13.04048161_wp, -16.12976684_wp, -0.35286823_wp, -12.53974168_wp, & + & -16.48782318_wp, -0.11880361_wp, -13.53874325_wp, -16.71838503_wp, & + & 0.20049467_wp, -11.81257388_wp, -15.08987389_wp, -0.05214541_wp, & + & -12.45809339_wp, -14.50460909_wp, -2.14515129_wp, -10.68080455_wp, & + & -13.87017110_wp, -2.31543059_wp, -9.39176707_wp, -12.54113231_wp, & + & -1.55856269_wp, -9.44933347_wp, -12.08082970_wp, -1.16573688_wp, & + & -10.51706412_wp, -13.86663989_wp, -1.86254703_wp, -11.41776924_wp, & + & -14.52342284_wp, -1.89200175_wp, -8.62150188_wp, -13.61602192_wp, & + & -3.79696190_wp, -9.09155800_wp, -14.56611187_wp, -4.32427398_wp, & + & -9.07798758_wp, -12.98049693_wp, -4.22973079_wp, -9.85987622_wp, & + & -13.13356809_wp, -3.91354732_wp, -8.12594175_wp, -23.40002226_wp, & + & -3.05369628_wp, -16.51984181_wp, -21.98461054_wp, -2.76896333_wp, & + & -16.42678244_wp, -21.58757581_wp, -2.97033993_wp, -14.96225657_wp, & + & -22.43747368_wp, -3.03702269_wp, -14.07922950_wp, -23.88850069_wp, & + & -2.99858204_wp, -15.63210813_wp, -21.44484347_wp, -3.46614684_wp, & + & -17.07597937_wp, -21.68042902_wp, -1.32838059_wp, -16.85303003_wp, & + & -21.99321225_wp, -1.18889715_wp, -17.88434284_wp, -22.22191921_wp, & + & -0.63019104_wp, -16.21977180_wp, -20.61656095_wp, -1.12622697_wp, & + & -16.77593178_wp, -20.27859791_wp, -3.04203084_wp, -14.74037982_wp, & + & -19.68145385_wp, -3.10818546_wp, -13.42423167_wp, -18.25883852_wp, & + & -2.55945622_wp, -13.55702011_wp, -17.73439914_wp, -2.42066277_wp, & + & -14.65810576_wp, -19.60302164_wp, -2.95808022_wp, -15.49324351_wp, & + & -20.27345996_wp, -2.49211075_wp, -12.73932095_wp, -19.63697016_wp, & + & -4.55082824_wp, -12.90814493_wp, -20.65051861_wp, -4.93878742_wp, & + & -12.85183526_wp, -19.05597592_wp, -5.17169031_wp, -13.58529231_wp, & + & -19.18927586_wp, -4.58726149_wp, -11.91985093_wp, -29.09666717_wp, & + & -3.96457058_wp, -20.65472411_wp, -27.65555406_wp, -3.87368788_wp, & + & -20.56073610_wp, -27.31578555_wp, -3.82798213_wp, -19.06884453_wp, & + & -28.18665867_wp, -3.62623395_wp, -18.22759518_wp, -29.57737129_wp, & + & -3.72618581_wp, -19.79273126_wp, -27.21329045_wp, -4.75830648_wp, & + & -21.03121053_wp, -27.13361005_wp, -2.61141535_wp, -21.25634722_wp, & + & -27.41074787_wp, -2.64644185_wp, -22.30660288_wp, -27.57218721_wp, & + & -1.72637136_wp, -20.80259132_wp, -26.05243811_wp, -2.55251446_wp, & + & -21.17819992_wp, -26.03024012_wp, -4.00282969_wp, -18.77845672_wp, & + & -25.47460894_wp, -3.86682225_wp, -17.44948587_wp, -24.00117703_wp, & + & -3.49022805_wp, -17.62256010_wp, -23.44009730_wp, -3.61070822_wp, & + & -18.70750747_wp, -25.33175102_wp, -4.13454132_wp, -19.50292011_wp, & + & -26.01853062_wp, -3.07601542_wp, -16.92228911_wp, -25.58723734_wp, & + & -5.17827651_wp, -16.66410652_wp, -26.63562519_wp, -5.44994038_wp, & + & -16.57502607_wp, -25.05712388_wp, -5.97172592_wp, -17.18461257_wp, & + & -25.16638852_wp, -5.06334016_wp, -15.66994069_wp, -34.86843406_wp, & + & -4.53100155_wp, -24.78769278_wp, -33.42475913_wp, -4.52666261_wp, & + & -24.68740340_wp, -33.08978865_wp, -4.41345716_wp, -23.19805202_wp, & + & -33.94508903_wp, -4.08323886_wp, -22.38169290_wp, -35.33673713_wp, & + & -4.22185915_wp, -23.94135862_wp, -33.03778747_wp, -5.46352780_wp, & + & -25.10209866_wp, -32.81782998_wp, -3.34280900_wp, -25.44875486_wp, & + & -33.09455284_wp, -3.41765138_wp, -26.49703224_wp, -33.19668864_wp, & + & -2.40650691_wp, -25.04707706_wp, -31.73548858_wp, -3.35340736_wp, & + & -25.36712949_wp, -31.82452155_wp, -4.67255499_wp, -22.88396128_wp, & + & -31.26830912_wp, -4.50916035_wp, -21.55791648_wp, -29.75136070_wp, & + & -4.39408703_wp, -21.72867809_wp, -29.20882625_wp, -4.70284249_wp, & + & -22.78564916_wp, -31.13953655_wp, -4.93636426_wp, -23.58544455_wp, & + & -31.67835377_wp, -3.59560677_wp, -21.11424372_wp, -31.60441878_wp, & + & -5.70563106_wp, -20.66085423_wp, -32.68457910_wp, -5.79956985_wp, & + & -20.58670881_wp, -31.19614630_wp, -6.61889172_wp, -21.08578466_wp, & + & -31.19355395_wp, -5.56132254_wp, -19.66653790_wp, -40.67435878_wp, & + & -5.02681076_wp, -28.90240403_wp, -39.23030227_wp, -5.01286542_wp, & + & -28.80844653_wp, -38.88951810_wp, -4.88078313_wp, -27.32193406_wp, & + & -39.73956595_wp, -4.53013838_wp, -26.50861293_wp, -41.14098635_wp, & + & -4.70549531_wp, -28.05972647_wp, -38.83990920_wp, -5.95162944_wp, & + & -29.21539039_wp, -38.63322495_wp, -3.83319295_wp, -29.58395663_wp, & + & -38.91700717_wp, -3.91757844_wp, -30.62961325_wp, -39.01242857_wp, & + & -2.89499697_wp, -29.18701972_wp, -37.55038068_wp, -3.83993817_wp, & + & -29.50971136_wp, -37.62495865_wp, -5.14372753_wp, -27.00852279_wp, & + & -37.06473152_wp, -4.98106600_wp, -25.68400684_wp, -35.54343615_wp, & + & -4.95537268_wp, -25.85105439_wp, -35.01614624_wp, -5.33014516_wp, & + & -26.89434264_wp, -36.94792915_wp, -5.44093951_wp, -27.70446427_wp, & + & -37.42518087_wp, -4.03774383_wp, -25.26017453_wp, -37.46526713_wp, & + & -6.13937790_wp, -24.76334373_wp, -38.54891867_wp, -6.17279121_wp, & + & -24.68822680_wp, -37.10752697_wp, -7.08151942_wp, -25.17072277_wp, & + & -37.04641460_wp, -5.99798944_wp, -23.77200667_wp, -46.49650794_wp, & + & -5.66392098_wp, -32.98061092_wp, -45.05291196_wp, -5.61026165_wp, & + & -32.89408722_wp, -44.70770536_wp, -5.45832401_wp, -31.41060332_wp, & + & -45.56129248_wp, -5.12058465_wp, -30.59556806_wp, -46.96802869_wp, & + & -5.34956140_wp, -32.13813491_wp, -44.63920843_wp, -6.54070798_wp, & + & -33.29702071_wp, -44.49220586_wp, -4.41983661_wp, -33.68029169_wp, & + & -44.77900425_wp, -4.51870353_wp, -34.72385240_wp, -44.89484230_wp, & + & -3.48984304_wp, -33.28708104_wp, -43.40922958_wp, -4.39678621_wp, & + & -33.61169166_wp, -43.43533497_wp, -5.68826321_wp, -31.10283394_wp, & + & -42.87117241_wp, -5.50745671_wp, -29.78237114_wp, -41.35090104_wp, & + & -5.47150057_wp, -29.95644478_wp, -40.82526724_wp, -5.85761381_wp, & + & -30.99644701_wp, -42.75722612_wp, -5.98165800_wp, -31.79941511_wp, & + & -43.23767747_wp, -4.56325925_wp, -29.36582629_wp, -43.25722863_wp, & + & -6.66047631_wp, -28.84890956_wp, -44.34022249_wp, -6.70301534_wp, & + & -28.76905304_wp, -42.89261829_wp, -7.60311417_wp, -29.24909303_wp, & + & -42.83556433_wp, -6.50573205_wp, -27.86077764_wp, -52.30843435_wp, & + & -6.39680727_wp, -37.05033033_wp, -50.86519421_wp, -6.33433857_wp, & + & -36.96398544_wp, -50.52106279_wp, -6.17705655_wp, -35.48085282_wp, & + & -51.37767087_wp, -5.84721050_wp, -34.66573776_wp, -52.78152924_wp, & + & -6.08642251_wp, -36.20722112_wp, -50.44560581_wp, -7.26304226_wp, & + & -37.36487282_wp, -50.31157872_wp, -5.14209241_wp, -37.75251747_wp, & + & -50.59768236_wp, -5.24471750_wp, -38.79590158_wp, -50.71982452_wp, & + & -4.21376205_wp, -37.36115564_wp, -49.22874926_wp, -5.11225495_wp, & + & -37.68391278_wp, -49.24634721_wp, -6.39354109_wp, -35.17300486_wp, & + & -48.68360612_wp, -6.19982035_wp, -33.85378979_wp, -47.16502292_wp, & + & -6.12809767_wp, -34.03140483_wp, -46.63286058_wp, -6.50462965_wp, & + & -35.07160307_wp, -48.56459579_wp, -6.67776546_wp, -35.86977926_wp, & + & -49.07144684_wp, -5.26441573_wp, -33.43677585_wp, -49.04117562_wp, & + & -7.36143394_wp, -32.91973453_wp, -50.12269334_wp, -7.42768834_wp, & + & -32.83612395_wp, -48.65744964_wp, -8.29563046_wp, -33.32178369_wp, & + & -48.61951540_wp, -7.19793149_wp, -31.93302178_wp, -58.11782191_wp, & + & -7.13369607_wp, -41.12114294_wp, -56.67453855_wp, -7.07270003_wp, & + & -41.03417912_wp, -56.33064279_wp, -6.91741237_wp, -39.55077648_wp, & + & -57.18748846_wp, -6.58949416_wp, -38.73514422_wp, -58.59105464_wp, & + & -6.82455643_wp, -40.27766278_wp, -56.25568985_wp, -8.00144902_wp, & + & -41.43576707_wp, -56.11958509_wp, -5.88030876_wp, -41.82154113_wp, & + & -56.40532660_wp, -5.98194787_wp, -42.86512298_wp, -56.52726758_wp, & + & -4.95193245_wp, -41.42970405_wp, -55.03675934_wp, -5.85134470_wp, & + & -41.75248270_wp, -55.05578507_wp, -7.13363071_wp, -39.24322124_wp, & + & -54.49315558_wp, -6.94120519_wp, -37.92378751_wp, -52.97494641_wp, & + & -6.86226466_wp, -38.10183516_wp, -52.44143299_wp, -7.23441739_wp, & + & -39.14290005_wp, -54.37378698_wp, -7.41536947_wp, -39.94072930_wp, & + & -54.88490777_wp, -6.00866581_wp, -37.50404198_wp, -54.84530646_wp, & + & -8.10695968_wp, -36.99284909_wp, -55.92650274_wp, -8.17847466_wp, & + & -36.90939556_wp, -54.45722217_wp, -9.03828112_wp, -37.39736200_wp, & + & -54.42439890_wp, -7.94410565_wp, -36.00570914_wp, -63.92228807_wp, & + & -7.85510828_wp, -45.20199587_wp, -62.47906722_wp, -7.79731369_wp, & + & -45.11175978_wp, -62.13786647_wp, -7.64458040_wp, -43.62744365_wp, & + & -62.99560335_wp, -7.31566273_wp, -42.81316222_wp, -64.39676979_wp, & + & -7.54596949_wp, -44.35922664_wp, -62.06131956_wp, -8.72640928_wp, & + & -45.51368139_wp, -61.91998247_wp, -6.60502571_wp, -45.89636777_wp, & + & -62.20352443_wp, -6.70480122_wp, -46.94072946_wp, -62.32680523_wp, & + & -5.67635766_wp, -45.50432056_wp, -60.83726296_wp, -6.57820821_wp, & + & -45.82479787_wp, -60.86411745_wp, -7.86420582_wp, -43.31768772_wp, & + & -60.30278217_wp, -7.67320636_wp, -41.99747779_wp, -58.78423657_wp, & + & -7.59624337_wp, -42.17399600_wp, -58.25041553_wp, -7.96711135_wp, & + & -43.21537063_wp, -60.18140974_wp, -8.14593561_wp, -44.01453438_wp, & + & -60.69353004_wp, -6.74018673_wp, -41.57782884_wp, -60.65785503_wp, & + & -8.83868928_wp, -41.06734283_wp, -61.73925747_wp, -8.90843448_wp, & + & -40.98505928_wp, -60.27090521_wp, -9.77053384_wp, -41.47172296_wp, & + & -60.23775003_wp, -8.67688007_wp, -40.07968661_wp, -69.71964224_wp, & + & -8.56335207_wp, -49.29576708_wp, -68.27647854_wp, -8.50767139_wp, & + & -49.20334973_wp, -67.93774051_wp, -8.35582269_wp, -47.71832298_wp, & + & -68.79665689_wp, -8.02599055_wp, -46.90563297_wp, -70.19466706_wp, & + & -8.25370206_wp, -48.45345784_wp, -67.85943380_wp, -9.43732890_wp, & + & -49.60470625_wp, -67.71442296_wp, -7.31611031_wp, -49.98690113_wp, & + & -67.99630318_wp, -7.41544982_wp, -51.03175782_wp, -68.12068503_wp, & + & -6.38691220_wp, -49.59553380_wp, -66.63179527_wp, -7.29075361_wp, & + & -49.91347068_wp, -66.66498517_wp, -8.57743489_wp, -47.40600715_wp, & + & -66.10642400_wp, -8.38835706_wp, -46.08431299_wp, -64.58726224_wp, & + & -8.31480702_wp, -46.25701573_wp, -64.05178627_wp, -8.68565419_wp, & + & -47.29755139_wp, -65.98116112_wp, -8.85984916_wp, -48.10147992_wp, & + & -66.49598930_wp, -7.45459972_wp, -45.66518869_wp, -66.46664317_wp, & + & -9.55339913_wp, -45.15560447_wp, -67.54843137_wp, -9.62090427_wp, & + & -45.07654086_wp, -66.08045268_wp, -10.48593563_wp, -45.55911204_wp, & + & -66.04915822_wp, -9.39277914_wp, -44.16664636_wp, -75.51694862_wp, & + & -9.26816306_wp, -53.38988904_wp, -74.07372965_wp, -9.21311117_wp, & + & -53.29807171_wp, -73.73450021_wp, -9.06133740_wp, -51.81315982_wp, & + & -74.59306787_wp, -8.73094149_wp, -51.00032100_wp, -75.99141821_wp, & + & -8.95788522_wp, -52.54748960_wp, -73.65725052_wp, -10.14297602_wp, & + & -53.69952745_wp, -73.51148336_wp, -8.02183242_wp, -54.08190613_wp, & + & -73.79390661_wp, -8.12106339_wp, -55.12662762_wp, -73.91713407_wp, & + & -7.09243969_wp, -53.69036655_wp, -72.42881281_wp, -7.99698499_wp, & + & -54.00898276_wp, -72.46182850_wp, -9.28360983_wp, -51.50100435_wp, & + & -71.90344946_wp, -9.09520626_wp, -50.17914772_wp, -70.38415878_wp, & + & -9.02288670_wp, -50.35112829_wp, -69.84836205_wp, -9.39456754_wp, & + & -51.39119263_wp, -71.77820599_wp, -9.56670371_wp, -52.19637912_wp, & + & -72.29249467_wp, -8.16128054_wp, -49.75992924_wp, -72.26473145_wp, & + & -10.26022037_wp, -49.25079090_wp, -73.34658327_wp, -10.32701018_wp, & + & -49.17201010_wp, -71.87906113_wp, -11.19292554_wp, -49.65441432_wp, & + & -71.84737811_wp, -10.10010824_wp, -48.26169234_wp, -81.31618381_wp, & + & -9.97086649_wp, -57.48128910_wp, -79.87292149_wp, -9.91645352_wp, & + & -57.39003248_wp, -79.53306703_wp, -9.76469623_wp, -55.90528888_wp, & + & -80.39110127_wp, -9.43362698_wp, -55.09216067_wp, -81.79021362_wp, & + & -9.66005614_wp, -56.63884272_wp, -79.45702129_wp, -10.84652808_wp, & + & -57.79159926_wp, -79.31043603_wp, -8.72546299_wp, -58.17413758_wp, & + & -79.59316822_wp, -8.82468788_wp, -59.21877490_wp, -79.71564259_wp, & + & -7.79588576_wp, -57.78257405_wp, -78.22773790_wp, -8.70101459_wp, & + & -58.10148748_wp, -78.26041912_wp, -9.98771359_wp, -55.59360645_wp, & + & -77.70138301_wp, -9.79919222_wp, -54.27206317_wp, -76.18214819_wp, & + & -9.72772302_wp, -54.44478508_wp, -75.64701635_wp, -10.10003010_wp, & + & -55.48496990_wp, -77.57722626_wp, -10.27141105_wp, -56.28916011_wp, & + & -78.08973821_wp, -8.86490992_wp, -53.85299525_wp, -78.06288584_wp, & + & -10.96367794_wp, -53.34313321_wp, -79.14473562_wp, -11.02975462_wp, & + & -53.26372964_wp, -77.67803155_wp, -11.89675728_wp, -53.74667068_wp, & + & -77.64487532_wp, -10.80350207_wp, -52.35432235_wp, -87.11688726_wp, & + & -10.67156782_wp, -61.57063034_wp, -85.67359210_wp, -10.61764042_wp, & + & -61.47973476_wp, -85.33324673_wp, -10.46595460_wp, -59.99512850_wp, & + & -86.19079952_wp, -10.13427036_wp, -59.18174958_wp, -87.59070813_wp, & + & -10.36035981_wp, -60.72822575_wp, -85.25815774_wp, -11.54788233_wp, & + & -61.88139802_wp, -85.11087523_wp, -9.42689022_wp, -62.26403984_wp, & + & -85.39387557_wp, -9.52608540_wp, -63.30860615_wp, -85.51566357_wp, & + & -8.49714781_wp, -61.87243650_wp, -84.02815192_wp, -9.40282776_wp, & + & -62.19162971_wp, -84.06063711_wp, -10.68975579_wp, -59.68384594_wp, & + & -83.50108152_wp, -10.50140492_wp, -58.36251522_wp, -81.98190670_wp, & + & -10.43056967_wp, -58.53578574_wp, -81.44724186_wp, -10.80348421_wp, & + & -59.57599214_wp, -83.37785765_wp, -10.97399709_wp, -60.37957771_wp, & + & -83.88894272_wp, -9.56696333_wp, -57.94335191_wp, -83.86266000_wp, & + & -11.66573012_wp, -57.43341008_wp, -84.94450318_wp, -11.73146275_wp, & + & -57.35365226_wp, -83.47822070_wp, -12.59894725_wp, -57.83702632_wp, & + & -83.44426944_wp, -11.50562758_wp, -56.44474775_wp, -92.91695261_wp, & + & -11.37222813_wp, -65.66071048_wp, -91.47372192_wp, -11.31794228_wp, & + & -65.56925127_wp, -91.13390091_wp, -11.16640463_wp, -64.08452230_wp, & + & -91.99159357_wp, -10.83434879_wp, -63.27145256_wp, -93.39126170_wp, & + & -11.06074653_wp, -64.81869165_wp, -91.05791296_wp, -12.24796869_wp, & + & -65.97100756_wp, -90.91102551_wp, -10.12681808_wp, -66.35302078_wp, & + & -91.19355372_wp, -10.22578157_wp, -67.39773501_wp, -91.31622930_wp, & + & -9.19730063_wp, -65.96131134_wp, -89.82833780_wp, -10.10247898_wp, & + & -66.28013886_wp, -89.86146262_wp, -11.39065847_wp, -63.77287043_wp, & + & -89.30196808_wp, -11.20205414_wp, -62.45156234_wp, -87.78279942_wp, & + & -11.13151470_wp, -62.62489926_wp, -87.24823102_wp, -11.50486985_wp, & + & -63.66499952_wp, -89.17863988_wp, -11.67515102_wp, -64.46846406_wp, & + & -89.68970044_wp, -10.26744894_wp, -62.03264644_wp, -89.66369545_wp, & + & -12.36609518_wp, -61.52216203_wp, -90.74553849_wp, -12.43152383_wp, & + & -61.44217085_wp, -89.27958987_wp, -13.29949405_wp, -61.92567649_wp, & + & -89.24504896_wp, -12.20591274_wp, -60.53361951_wp, -98.71471037_wp, & + & -12.07509297_wp, -69.75331212_wp, -97.27155085_wp, -12.02041364_wp, & + & -69.66116186_wp, -96.93256506_wp, -11.86847062_wp, -68.17628119_wp, & + & -97.79070812_wp, -11.53618321_wp, -67.36378294_wp, -99.18951795_wp, & + & -11.76363483_wp, -68.91156434_wp, -96.85533426_wp, -12.95044328_wp, & + & -70.06249294_wp, -96.70868454_wp, -10.82935741_wp, -70.44489975_wp, & + & -96.99065169_wp, -10.92861767_wp, -71.48973674_wp, -97.11425613_wp, & + & -9.89982324_wp, -70.05361419_wp, -95.62603782_wp, -10.80481223_wp, & + & -70.37145565_wp, -95.66032824_wp, -12.09276075_wp, -67.86385336_wp, & + & -95.10150165_wp, -11.90375340_wp, -66.54232950_wp, -93.58227626_wp, & + & -11.83294766_wp, -66.71501445_wp, -93.04714705_wp, -12.20675422_wp, & + & -67.75466125_wp, -94.97718477_wp, -12.37747213_wp, -68.55903849_wp, & + & -95.48963372_wp, -10.96914213_wp, -66.12380330_wp, -95.46338947_wp, & + & -13.06767095_wp, -65.61283603_wp, -96.54525668_wp, -13.13341256_wp, & + & -65.53342362_wp, -95.07877188_wp, -14.00105549_wp, -66.01589607_wp, & + & -95.04534205_wp, -12.90709989_wp, -64.62410163_wp, -104.51329363_wp, & + & -12.78188534_wp, -73.84328561_wp, -103.07005788_wp, -12.72688481_wp, & + & -73.75268204_wp, -102.72992476_wp, -12.57456800_wp, -72.26810153_wp, & + & -103.58761337_wp, -12.24239599_wp, -71.45505874_wp, -104.98709692_wp, & + & -12.47028605_wp, -73.00099890_wp, -102.65399173_wp, -13.65689362_wp, & + & -74.15421190_wp, -102.50820853_wp, -11.53583931_wp, -74.53715776_wp, & + & -102.79110249_wp, -11.63534421_wp, -75.58172140_wp, -102.91364718_wp, & + & -10.60633334_wp, -74.14567017_wp, -101.42550012_wp, -11.51101222_wp, & + & -74.46470234_wp, -101.45746917_wp, -12.79844121_wp, -71.95630715_wp, & + & -100.89858256_wp, -12.60893073_wp, -70.63488162_wp, -99.37944940_wp, & + & -12.53691795_wp, -70.80751414_wp, -98.84386342_wp, -12.91080391_wp, & + & -71.84688837_wp, -100.77443895_wp, -13.08290823_wp, -72.65167828_wp, & + & -101.28753343_wp, -11.67465703_wp, -70.21636419_wp, -101.25942258_wp, & + & -13.77314106_wp, -69.70533448_wp, -102.34121790_wp, -13.83954053_wp, & + & -69.62550797_wp, -100.87439253_wp, -14.70625690_wp, -70.10862352_wp, & + & -100.84108236_wp, -13.61239357_wp, -68.71675122_wp, -110.31730819_wp, & + & -13.49197014_wp, -77.92470718_wp, -108.87401958_wp, -13.43616361_wp, & + & -77.83545434_wp, -108.53221905_wp, -13.28369432_wp, -76.35130990_wp, & + & -109.38893483_wp, -12.95167377_wp, -75.53720026_wp, -110.79073771_wp, & + & -13.18041247_wp, -77.08222390_wp, -108.45789555_wp, -14.36593401_wp, & + & -78.23747649_wp, -108.31361487_wp, -12.24480057_wp, -78.62049590_wp, & + & -108.59766230_wp, -12.34437171_wp, -79.66473943_wp, -108.71900378_wp, & + & -11.31550009_wp, -78.22846929_wp, -107.23083414_wp, -12.21950869_wp, & + & -78.54928668_wp, -107.25925477_wp, -13.50720803_wp, -76.04130022_wp, & + & -106.69823740_wp, -13.31747738_wp, -74.72084453_wp, -105.17941756_wp, & + & -13.24485603_wp, -74.89608174_wp, -104.64537972_wp, -13.61928542_wp, & + & -75.93605172_wp, -106.57728305_wp, -13.79169697_wp, -76.73770734_wp, & + & -107.08689530_wp, -12.38342081_wp, -74.30159210_wp, -107.05680898_wp, & + & -14.48194269_wp, -73.79072986_wp, -108.13842523_wp, -14.54904535_wp, & + & -73.70909947_wp, -106.67184480_wp, -15.41479712_wp, -74.19469145_wp, & + & -106.63691127_wp, -14.32094963_wp, -72.80284388_wp, -116.11915878_wp, & + & -14.20285729_wp, -82.00900550_wp, -114.67599332_wp, -14.14671740_wp, & + & -81.91812183_wp, -114.33567762_wp, -13.99481858_wp, -80.43359169_wp, & + & -115.19309363_wp, -13.66291111_wp, -79.62018113_wp, -116.59365913_wp, & + & -13.89168426_wp, -81.16699253_wp, -114.25920517_wp, -15.07613584_wp, & + & -82.32025729_wp, -114.11503948_wp, -12.95472049_wp, -82.70182960_wp, & + & -114.39760070_wp, -13.05387424_wp, -83.74651226_wp, -114.52137863_wp, & + & -12.02580059_wp, -82.30988136_wp, -113.03236697_wp, -12.92898563_wp, & + & -82.62909893_wp, -113.06301715_wp, -14.21862112_wp, -80.12257146_wp, & + & -112.50244748_wp, -14.02807117_wp, -78.80204095_wp, -110.98363957_wp, & + & -13.95508964_wp, -78.97730127_wp, -110.44963987_wp, -14.32929214_wp, & + & -80.01738768_wp, -112.38049324_wp, -14.50280765_wp, -80.81859126_wp, & + & -112.89135580_wp, -13.09382643_wp, -78.38342237_wp, -112.86101358_wp, & + & -15.19201802_wp, -77.87130798_wp, -113.94263313_wp, -15.25910468_wp, & + & -77.78970309_wp, -112.47601332_wp, -16.12509225_wp, -78.27471845_wp, & + & -112.44117784_wp, -15.03044882_wp, -76.88349003_wp, -121.91651726_wp, & + & -14.91326865_wp, -86.09928960_wp, -120.47338962_wp, -14.85771592_wp, & + & -86.00762017_wp, -120.13425535_wp, -14.70570748_wp, -84.52279104_wp, & + & -120.99239744_wp, -14.37369619_wp, -83.71017506_wp, -122.39111911_wp, & + & -14.60187178_wp, -85.25738771_wp, -120.05669807_wp, -15.78742508_wp, & + & -86.40918742_wp, -119.91137635_wp, -13.66618008_wp, -86.79124492_wp, & + & -120.19349908_wp, -13.76534851_wp, -87.83604681_wp, -120.31735922_wp, & + & -12.73695047_wp, -86.39966527_wp, -118.82872285_wp, -13.64106113_wp, & + & -86.71801260_wp, -118.86195424_wp, -14.92965853_wp, -84.21049213_wp, & + & -118.30298990_wp, -14.73964149_wp, -82.88919912_wp, -116.78402132_wp, & + & -14.66592830_wp, -83.06255962_wp, -116.24856362_wp, -15.03963392_wp, & + & -84.10207318_wp, -118.17868051_wp, -15.21380877_wp, -84.90577990_wp, & + & -118.69287145_wp, -13.80586795_wp, -82.47044992_wp, -118.66206561_wp, & + & -15.90438843_wp, -81.95964760_wp, -119.74374584_wp, -15.97218683_wp, & + & -81.87945191_wp, -118.27597892_wp, -16.83697650_wp, -82.36314475_wp, & + & -118.24357946_wp, -15.74318806_wp, -80.97119706_wp, -127.71691811_wp, & + & -15.62119969_wp, -90.18525079_wp, -126.27364182_wp, -15.56688660_wp, & + & -90.09500432_wp, -125.93286976_wp, -15.41532794_wp, -88.61053828_wp, & + & -126.79002168_wp, -15.08314495_wp, -87.79694448_wp, -128.19048868_wp, & + & -15.30970663_wp, -89.34280870_wp, -125.85816124_wp, -16.49691452_wp, & + & -90.49709671_wp, -125.71146461_wp, -14.37576436_wp, -90.87913896_wp, & + & -125.99458567_wp, -14.47475857_wp, -91.92368806_wp, -126.11645940_wp, & + & -13.44624589_wp, -90.48722083_wp, -124.62873190_wp, -14.35139937_wp, & + & -90.80686888_wp, -124.66033370_wp, -15.63980772_wp, -88.29952744_wp, & + & -124.10042519_wp, -15.45012217_wp, -86.97859566_wp, -122.58153568_wp, & + & -15.37657465_wp, -87.15263668_wp, -122.04644038_wp, -15.75062781_wp, & + & -88.19219726_wp, -123.97778443_wp, -15.92417517_wp, -88.99541053_wp, & + & -124.49000248_wp, -14.51640373_wp, -86.55944520_wp, -124.45899728_wp, & + & -16.61501247_wp, -86.04901969_wp, -125.54062966_wp, -16.68277618_wp, & + & -85.96817719_wp, -124.07318022_wp, -17.54754858_wp, -86.45289793_wp, & + & -124.03989938_wp, -16.45397658_wp, -85.06079972_wp, -133.51727340_wp, & + & -16.32445216_wp, -94.27251173_wp, -132.07408675_wp, -16.27048498_wp, & + & -94.18093250_wp, -131.73437810_wp, -16.11960528_wp, -92.69616162_wp, & + & -132.59189814_wp, -15.78724281_wp, -91.88304029_wp, -133.99164787_wp, & + & -16.01332631_wp, -93.43039929_wp, -131.65842430_wp, -17.20039070_wp, & + & -94.58311532_wp, -131.51104756_wp, -15.07907099_wp, -94.96402477_wp, & + & -131.79338238_wp, -15.17747988_wp, -96.00884179_wp, -131.91618406_wp, & + & -14.14968071_wp, -94.57194304_wp, -130.42836783_wp, -15.05494601_wp, & + & -94.89090433_wp, -130.46212144_wp, -16.34482691_wp, -92.38461194_wp, & + & -129.90200158_wp, -16.15540113_wp, -91.06374554_wp, -128.38307663_wp, & + & -16.08337505_wp, -91.23834339_wp, -127.84889319_wp, -16.45749996_wp, & + & -92.27836595_wp, -129.77949811_wp, -16.62931320_wp, -93.08041593_wp, & + & -130.29049356_wp, -15.22115945_wp, -90.64474200_wp, -130.26163965_wp, & + & -17.31967299_wp, -90.13382613_wp, -131.34333312_wp, -17.38630075_wp, & + & -90.05283199_wp, -129.87685524_wp, -18.25271606_wp, -90.53751551_wp, & + & -129.84225466_wp, -17.15882246_wp, -89.14569843_wp, -139.31353552_wp, & + & -17.02173878_wp, -98.36668356_wp, -137.87038126_wp, -16.96869566_wp, & + & -98.27419506_wp, -137.53189257_wp, -16.81829614_wp, -96.78906984_wp, & + & -138.39009139_wp, -16.48592168_wp, -95.97665246_wp, -139.78801631_wp, & + & -16.71072319_wp, -97.52456390_wp, -137.45498090_wp, -17.89885203_wp, & + & -98.67608405_wp, -137.30600521_wp, -15.77762406_wp, -99.05681773_wp, & + & -137.58767411_wp, -15.87581845_wp, -100.10183584_wp, -137.71081356_wp, & + & -14.84797820_wp, -98.66500843_wp, -136.22336164_wp, -15.75420729_wp, & + & -98.98294419_wp, -136.26006782_wp, -17.04410502_wp, -96.47626788_wp, & + & -135.70160332_wp, -16.85592910_wp, -95.15451583_wp, -134.18240812_wp, & + & -16.78492678_wp, -95.32699556_wp, -133.64712040_wp, -17.15830877_wp, & + & -96.36672049_wp, -135.57673441_wp, -17.32851565_wp, -97.17140196_wp, & + & -136.08988839_wp, -15.92160297_wp, -94.73549178_wp, -136.06358028_wp, & + & -18.02042672_wp, -94.22578975_wp, -137.14545809_wp, -18.08634560_wp, & + & -94.14667798_wp, -135.67874550_wp, -18.95353659_wp, -94.62927082_wp, & + & -135.64579493_wp, -17.86035412_wp, -93.23686285_wp, -145.11269788_wp, & + & -17.71784804_wp, -102.45705675_wp, -143.66940089_wp, -17.66536530_wp, & + & -102.36600876_wp, -143.32929967_wp, -17.51481283_wp, -100.88128849_wp, & + & -144.18663202_wp, -17.18242189_wp, -100.06796209_wp, -145.58626281_wp, & + & -17.40661569_wp, -101.61450692_wp, -143.25477459_wp, -18.59579590_wp, & + & -102.76807329_wp, -143.10542221_wp, -16.47474385_wp, -103.14959899_wp, & + & -143.38831529_wp, -16.57315047_wp, -104.19426783_wp, -143.50942607_wp, & + & -15.54482360_wp, -102.75761048_wp, -142.02268879_wp, -16.45172283_wp, & + & -103.07697460_wp, -142.05712576_wp, -17.74051546_wp, -100.56974274_wp, & + & -141.49787698_wp, -17.55291099_wp, -99.24824362_wp, -139.97873776_wp, & + & -17.48217747_wp, -99.42114416_wp, -139.44365697_wp, -17.85575324_wp, & + & -100.46089223_wp, -141.37441562_wp, -18.02496622_wp, -101.26544543_wp, & + & -141.88582499_wp, -16.61870394_wp, -98.82865004_wp, -141.85954563_wp, & + & -18.71775108_wp, -98.31980376_wp, -142.94139139_wp, -18.78362138_wp, & + & -98.24025000_wp, -141.47493644_wp, -19.65072532_wp, -98.72382030_wp, & + & -141.44131571_wp, -18.55810030_wp, -97.33099507_wp, -150.91148760_wp, & + & -18.41191544_wp, -106.54929253_wp, -149.46827892_wp, -18.35937907_wp, & + & -106.45662182_wp, -149.12943213_wp, -18.20887662_wp, -104.97158929_wp, & + & -149.98729692_wp, -17.87621141_wp, -104.15895553_wp, -151.38609666_wp, & + & -18.10093948_wp, -105.70725370_wp, -149.05315844_wp, -19.28970483_wp, & + & -106.85840768_wp, -148.90356257_wp, -17.16855873_wp, -107.23940443_wp, & + & -149.18541934_wp, -17.26673091_wp, -108.28437374_wp, -149.30799105_wp, & + & -16.23874697_wp, -106.84758744_wp, -147.82090174_wp, -17.14551174_wp, & + & -107.16570280_wp, -147.85747294_wp, -18.43480250_wp, -104.65929201_wp, & + & -147.29810172_wp, -18.24687597_wp, -103.33787403_wp, -145.77889799_wp, & + & -18.17751134_wp, -103.51121523_wp, -145.24458567_wp, -18.55134500_wp, & + & -104.55128144_wp, -147.17456357_wp, -18.71951016_wp, -105.35473580_wp, & + & -147.68506344_wp, -17.31201430_wp, -102.91881499_wp, -147.66079145_wp, & + & -19.41076202_wp, -102.40866025_wp, -148.74269180_wp, -19.47545220_wp, & + & -102.32886025_wp, -147.27725738_wp, -20.34438894_wp, -102.81218848_wp, & + & -147.24220686_wp, -19.25096582_wp, -101.42002482_wp, -156.70575249_wp, & + & -19.10183170_wp, -110.64934568_wp, -155.26259388_wp, -19.04937893_wp, & + & -110.55563218_wp, -154.92506522_wp, -18.89952817_wp, -109.07016712_wp, & + & -155.78380023_wp, -18.56733778_wp, -108.25824655_wp, -157.18076833_wp, & + & -18.79090094_wp, -109.80750235_wp, -154.84724531_wp, -19.97960336_wp, & + & -110.95741588_wp, -154.69714379_wp, -17.85833938_wp, -111.33752163_wp, & + & -154.97803497_wp, -17.95617762_wp, -112.38278294_wp, -155.10190986_wp, & + & -16.92863364_wp, -110.94580870_wp, -153.61455144_wp, -17.83534444_wp, & + & -111.26280248_wp, -153.65342052_wp, -19.12545247_wp, -108.75654960_wp, & + & -153.09589735_wp, -18.93871355_wp, -107.43413386_wp, -151.57637187_wp, & + & -18.86999871_wp, -107.60500836_wp, -151.04064602_wp, -19.24302385_wp, & + & -108.64463505_wp, -152.96970463_wp, -19.40999556_wp, -109.45125311_wp, & + & -153.48299797_wp, -18.00390707_wp, -107.01507233_wp, -153.46072611_wp, & + & -20.10297706_wp, -106.50623211_wp, -154.54280086_wp, -20.16734827_wp, & + & -106.42854266_wp, -153.07671918_wp, -21.03652714_wp, -106.90948470_wp, & + & -153.04401116_wp, -19.94382509_wp, -105.51670734_wp, -162.50402046_wp, & + & -19.80411061_wp, -114.74285069_wp, -161.06083570_wp, -19.74720167_wp, & + & -114.65186083_wp, -160.72095152_wp, -19.59552597_wp, -113.16711695_wp, & + & -161.57908186_wp, -19.26489571_wp, -112.35392053_wp, -162.97858638_wp, & + & -19.49241312_wp, -113.90105642_wp, -160.64360178_wp, -20.67643467_wp, & + & -115.05396938_wp, -160.50040809_wp, -18.55497933_wp, -115.43555076_wp, & + & -160.78328682_wp, -18.65407727_wp, -116.48015775_wp, -160.90680734_wp, & + & -17.62618551_wp, -115.04338243_wp, -159.41772263_wp, -18.52902743_wp, & + & -115.36319160_wp, -159.44818684_wp, -19.81800286_wp, -112.85544374_wp, & + & -158.88977910_wp, -19.63055355_wp, -111.53348557_wp, -157.37038742_wp, & + & -19.56057523_wp, -111.70496635_wp, -156.83462151_wp, -19.93349975_wp, & + & -112.74458958_wp, -158.76497255_wp, -20.10199544_wp, -113.55083027_wp, & + & -159.27759612_wp, -18.69614885_wp, -111.11421055_wp, -159.25272389_wp, & + & -20.79519249_wp, -110.60527490_wp, -160.33466399_wp, -20.86057149_wp, & + & -110.52659250_wp, -158.86821655_wp, -21.72836000_wp, -111.00895132_wp, & + & -158.83522373_wp, -20.63571430_wp, -109.61613284_wp, -168.30340390_wp, & + & -20.55416759_wp, -118.82861493_wp, -166.86075770_wp, -20.48558927_wp, & + & -118.73708375_wp, -166.52161100_wp, -20.32629311_wp, -117.25305699_wp, & + & -167.38133213_wp, -19.99772258_wp, -116.44075834_wp, -168.78162579_wp, & + & -20.24059477_wp, -117.98968008_wp, -166.43637882_wp, -21.41274529_wp, & + & -119.13644976_wp, -166.30956461_wp, -19.29134161_wp, -119.52430181_wp, & + & -166.59163420_wp, -19.39558072_wp, -120.56861893_wp, -166.72299813_wp, & + & -18.36457476_wp, -119.13469304_wp, -165.22710669_wp, -19.25689832_wp, & + & -119.45200423_wp, -165.24719787_wp, -20.53968556_wp, -116.94161142_wp, & + & -164.68783633_wp, -20.34413857_wp, -115.62125982_wp, -163.16895198_wp, & + & -20.26912821_wp, -115.79553043_wp, -162.63364636_wp, -20.64373523_wp, & + & -116.83479921_wp, -164.56321581_wp, -20.82272161_wp, -117.63668968_wp, & + & -165.07855829_wp, -19.40936743_wp, -115.20550886_wp, -165.04494052_wp, & + & -21.50610135_wp, -114.68746489_wp, -166.12649471_wp, -21.57474813_wp, & + & -114.60628692_wp, -164.65822068_wp, -22.43962727_wp, -115.08820189_wp, & + & -164.62590705_wp, -21.34121452_wp, -113.69985728_wp, -174.08075964_wp, & + & -21.33224179_wp, -122.93430127_wp, -172.63821643_wp, -21.27531854_wp, & + & -122.83476948_wp, -172.30654337_wp, -21.10514219_wp, -121.35024183_wp, & + & -173.16871838_wp, -20.76432282_wp, -120.54563544_wp, -174.56091526_wp, & + & -21.00262298_wp, -122.10264542_wp, -172.21956389_wp, -22.20967858_wp, & + & -123.22316669_wp, -172.07247490_wp, -20.09270440_wp, -123.62924195_wp, & + & -172.34910198_wp, -20.20379356_wp, -124.67430539_wp, -172.48070065_wp, & + & -19.15921545_wp, -123.25025607_wp, -170.99021292_wp, -20.06621664_wp, & + & -123.55068899_wp, -171.03531779_wp, -21.32379572_wp, -121.02959857_wp, & + & -170.48143709_wp, -21.11645458_wp, -119.70878262_wp, -168.96261552_wp, & + & -21.03195513_wp, -119.87922485_wp, -168.42185568_wp, -21.41033632_wp, & + & -120.91430841_wp, -170.34850964_wp, -21.61341016_wp, -121.71912920_wp, & + & -170.88007098_wp, -20.18188243_wp, -119.30021506_wp, -170.83377213_wp, & + & -22.27529099_wp, -118.76935290_wp, -171.91506468_wp, -22.34973576_wp, & + & -118.68980194_wp, -170.44098740_wp, -23.20873519_wp, -119.16433014_wp, & + & -170.41754085_wp, -22.10269395_wp, -117.78186941_wp, -179.84213176_wp, & + & -22.00578927_wp, -127.06290746_wp, -178.39930523_wp, -22.02865667_wp, & + & -126.95383829_wp, -178.06877546_wp, -21.83762179_wp, -125.47156753_wp, & + & -178.91968699_wp, -21.44053572_wp, -124.68085590_wp, -180.30753246_wp, & + & -21.62718658_wp, -126.24363408_wp, -178.03298593_wp, -22.99650983_wp, & + & -127.31226455_wp, -177.76108956_wp, -20.90441181_wp, -127.77743231_wp, & + & -178.03826081_wp, -21.02926343_wp, -128.82079931_wp, -178.11542870_wp, & + & -19.93794548_wp, -127.42823908_wp, -176.67949171_wp, -20.93872951_wp, & + & -127.69249171_wp, -176.81108572_wp, -22.10628377_wp, -125.13575742_wp, & + & -176.25915821_wp, -21.88788116_wp, -123.81602282_wp, -174.73879593_wp, & + & -21.82175249_wp, -123.98034525_wp, -174.19649120_wp, -22.22308953_wp, & + & -125.00584443_wp, -176.13074322_wp, -22.43258378_wp, -125.81493448_wp, & + & -176.65002167_wp, -20.94386645_wp, -123.42209948_wp, -176.62801101_wp, & + & -23.03092033_wp, -122.86364615_wp, -177.71027621_wp, -23.09197516_wp, & + & -122.78620603_wp, -176.24493923_wp, -23.97361693_wp, -123.24600257_wp, & + & -176.21250551_wp, -22.85122016_wp, -121.87709462_wp, -185.61867197_wp, & + & -22.57465728_wp, -131.19303627_wp, -184.17879454_wp, -22.65426614_wp, & + & -131.07355801_wp, -183.84479955_wp, -22.41127451_wp, -129.59968772_wp, & + & -184.67769969_wp, -21.93709891_wp, -128.83276516_wp, -186.06960085_wp, & + & -22.11529360_wp, -130.40811882_wp, -183.85454492_wp, -23.65227634_wp, & + & -131.38659941_wp, -183.49054176_wp, -21.59618361_wp, -131.94315696_wp, & + & -183.76653169_wp, -21.75706568_wp, -132.98187450_wp, -183.80696774_wp, & + & -20.60117368_wp, -131.64084857_wp, -182.41174298_wp, -21.67043754_wp, & + & -131.84849807_wp, -182.60278770_wp, -22.72593858_wp, -129.24568234_wp, & + & -182.04386717_wp, -22.47842111_wp, -127.93414008_wp, -180.52166149_wp, & + & -22.49841549_wp, -128.09359362_wp, -179.99797279_wp, -22.96479250_wp, & + & -129.10109619_wp, -181.93755667_wp, -23.11453564_wp, -129.90685086_wp, & + & -182.38580071_wp, -21.49890071_wp, -127.58374068_wp, -182.47433193_wp, & + & -23.55808309_wp, -126.93477191_wp, -183.55836743_wp, -23.55749124_wp, & + & -126.85808819_wp, -182.14238212_wp, -24.53553380_wp, -127.27542204_wp, & + & -182.05047456_wp, -23.35940163_wp, -125.95540262_wp, -191.38411195_wp, & + & -23.23467182_wp, -135.31445575_wp, -189.95403804_wp, -23.39582404_wp, & + & -135.16493957_wp, -189.61653687_wp, -23.02281302_wp, -133.71934819_wp, & + & -190.42051648_wp, -22.41526795_wp, -133.01852417_wp, -191.80878412_wp, & + & -22.65782587_wp, -134.59527775_wp, -189.69513015_wp, -24.44025087_wp, & + & -135.36807487_wp, -189.18941327_wp, -22.48158979_wp, -136.12885270_wp, & + & -189.46219890_wp, -22.73501280_wp, -137.14979388_wp, -189.44592904_wp, & + & -21.44233630_wp, -135.93989389_wp, -188.11863848_wp, -22.61148822_wp, & + & -136.00639290_wp, -188.40301931_wp, -23.38447274_wp, -133.31460928_wp, & + & -187.83679115_wp, -23.03271360_wp, -132.03029436_wp, -186.31660368_wp, & + & -23.13203781_wp, -132.17752168_wp, -185.81053725_wp, -23.70962529_wp, & + & -133.13515835_wp, -187.75717607_wp, -23.87450507_wp, -133.92566112_wp, & + & -188.13728186_wp, -22.00959440_wp, -131.78114265_wp, -188.31549113_wp, & + & -23.98860821_wp, -130.93182153_wp, -189.39832601_wp, -23.93183540_wp, & + & -130.85966308_wp, -188.02810336_wp, -25.00865738_wp, -131.17363200_wp, & + & -187.88250469_wp, -23.71454454_wp, -129.97481927_wp, -197.12514745_wp, & + & -23.90181409_wp, -139.44570834_wp, -195.72627444_wp, -24.20373598_wp, & + & -139.23254006_wp, -195.36961833_wp, -23.68003274_wp, -137.83916950_wp, & + & -196.11304239_wp, -22.90465570_wp, -137.24519303_wp, -197.48833993_wp, & + & -23.18586990_wp, -138.82455327_wp, -195.58923279_wp, -25.28881061_wp, & + & -139.28694631_wp, -194.84546835_wp, -23.52238315_wp, -140.28584335_wp, & + & -195.13139245_wp, -23.87901248_wp, -141.27175031_wp, -194.98052823_wp, & + & -22.44459763_wp, -140.24466031_wp, -193.79914348_wp, -23.75607104_wp, & + & -140.11526433_wp, -194.20844234_wp, -24.11136192_wp, -137.35615389_wp, & + & -193.62382082_wp, -23.64492571_wp, -136.11752258_wp, -192.11324337_wp, & + & -23.86348673_wp, -136.23126349_wp, -191.64247157_wp, -24.58805615_wp, & + & -137.10300173_wp, -193.60613946_wp, -24.73359261_wp, -137.88546723_wp, & + & -193.85529967_wp, -22.58111693_wp, -136.00009095_wp, -194.17233307_wp, & + & -24.42449658_wp, -134.91713316_wp, -195.24934375_wp, -24.28837400_wp, & + & -134.86764042_wp, -193.95236695_wp, -25.48325429_wp, -135.02763016_wp, & + & -193.72777363_wp, -24.06353443_wp, -133.99487618_wp, -202.87247083_wp, & + & -24.50737609_wp, -143.57943642_wp, -201.52097059_wp, -24.93457852_wp, & + & -143.28917362_wp, -201.11168945_wp, -24.25029019_wp, -141.98251922_wp, & + & -201.75861134_wp, -23.31003252_wp, -141.53091101_wp, -203.14232338_wp, & + & -23.65149934_wp, -143.10556483_wp, -201.51640207_wp, -26.02366771_wp, & + & -143.17587840_wp, -200.55918159_wp, -24.52965380_wp, -144.41177020_wp, & + & -200.87939286_wp, -24.99544819_wp, -145.33986064_wp, -200.56445176_wp, & + & -23.44976766_wp, -144.53584228_wp, -199.54932481_wp, -24.85573979_wp, & + & -144.18279965_wp, -200.01499161_wp, -24.73894686_wp, -141.41124517_wp, & + & -199.38971360_wp, -24.16669620_wp, -140.23867874_wp, -197.91408109_wp, & + & -24.57067618_wp, -140.28116772_wp, -197.52298199_wp, -25.46312369_wp, & + & -141.02751935_wp, -199.48876195_wp, -25.50072112_wp, -141.82678026_wp, & + & -199.49662480_wp, -23.07775339_wp, -140.28127401_wp, -200.03608765_wp, & + & -24.69583339_wp, -138.95344230_wp, -201.08923574_wp, -24.42793461_wp, & + & -138.94952318_wp, -199.94445484_wp, -25.77803838_wp, -138.90814355_wp, & + & -199.55780489_wp, -24.26185091_wp, -138.08088508_wp, -208.65574865_wp, & + & -25.18116807_wp, -147.63301051_wp, -207.38701947_wp, -25.73238891_wp, & + & -147.20857158_wp, -206.88257370_wp, -24.85274251_wp, -146.06191254_wp, & + & -207.38222601_wp, -23.75393586_wp, -145.83960421_wp, -208.79050095_wp, & + & -24.21128197_wp, -147.36657851_wp, -207.55068721_wp, -26.75996278_wp, & + & -146.86753124_wp, -206.36945668_wp, -25.72653329_wp, -148.35481041_wp, & + & -206.75234662_wp, -26.32970763_wp, -149.17357504_wp, -206.20967267_wp, & + & -24.71047512_wp, -148.70644384_wp, -205.42184882_wp, -26.14056322_wp, & + & -148.02416053_wp, -205.87348869_wp, -25.36400988_wp, -145.36282059_wp, & + & -205.16426010_wp, -24.64743845_wp, -144.32509897_wp, -203.74947603_wp, & + & -25.22897561_wp, -144.27114373_wp, -203.47992168_wp, -26.29226279_wp, & + & -144.82175702_wp, -205.45991175_wp, -26.25998817_wp, -145.59921159_wp, & + & -205.13797685_wp, -23.58538763_wp, -144.59047652_wp, -205.85059062_wp, & + & -24.82066164_wp, -142.96553901_wp, -206.86169899_wp, -24.42699805_wp, & + & -143.02529995_wp, -205.89469322_wp, -25.87419632_wp, -142.70157385_wp, & + & -205.30738536_wp, -24.28386198_wp, -142.19388366_wp, -214.36430033_wp, & + & -25.81184926_wp, -151.75892701_wp, -213.24461003_wp, -26.46502791_wp, & + & -151.11623000_wp, -212.61283374_wp, -25.43967936_wp, -150.17097572_wp, & + & -212.88783836_wp, -24.24663196_wp, -150.25470593_wp, -214.29747745_wp, & + & -24.79961081_wp, -151.77066532_wp, -213.62185604_wp, -27.32805902_wp, & + & -150.55798977_wp, -212.20928415_wp, -26.92875969_wp, -152.14684814_wp, & + & -212.67499700_wp, -27.63745703_wp, -152.82629209_wp, -211.84423058_wp, & + & -26.07826349_wp, -152.71690655_wp, -211.37080819_wp, -27.41092744_wp, & + & -151.65352793_wp, -211.75414735_wp, -25.94335957_wp, -149.28867841_wp, & + & -210.94479504_wp, -25.13881184_wp, -148.39935001_wp, -209.63601397_wp, & + & -25.89974320_wp, -148.17315490_wp, -209.53512798_wp, -27.08799062_wp, & + & -148.46302407_wp, -211.51479800_wp, -26.92904969_wp, -149.28473277_wp, & + & -210.75692071_wp, -24.17388961_wp, -148.88110264_wp, -211.65153489_wp, & + & -24.91798441_wp, -147.05723846_wp, -212.59099554_wp, -24.39987371_wp, & + & -147.22933125_wp, -211.85521046_wp, -25.87411571_wp, -146.58190412_wp, & + & -211.03282612_wp, -24.31838897_wp, -146.39657753_wp, -220.00705221_wp, & + & -26.45427104_wp, -155.94923148_wp, -219.07531598_wp, -27.09290778_wp, & + & -155.04612627_wp, -218.24011783_wp, -25.98614506_wp, -154.39748560_wp, & + & -218.20828754_wp, -24.85378594_wp, -154.86833804_wp, -219.68674333_wp, & + & -25.56637128_wp, -156.31772865_wp, -219.65250873_wp, -27.63960087_wp, & + & -154.29346320_wp, -218.15224853_wp, -28.05964990_wp, -155.79648280_wp, & + & -218.75318239_wp, -28.82649735_wp, -156.27816178_wp, -217.59081832_wp, & + & -27.52273404_wp, -156.55704937_wp, -217.45687665_wp, -28.53303570_wp, & + & -155.10975031_wp, -217.56100593_wp, -26.35917331_wp, -153.31492603_wp, & + & -216.59176728_wp, -25.52138396_wp, -152.64239089_wp, -215.47506062_wp, & + & -26.43880393_wp, -152.13738842_wp, -215.62802292_wp, -27.65512868_wp, & + & -152.08196732_wp, -217.56221187_wp, -27.32317660_wp, -153.00058662_wp, & + & -216.20367623_wp, -24.79782800_wp, -153.36650952_wp, -217.22749338_wp, & + & -24.78343990_wp, -151.45902461_wp, -218.03159053_wp, -24.14972724_wp, & + & -151.82279811_wp, -217.63334924_wp, -25.49961302_wp, -150.74907098_wp, & + & -216.48985821_wp, -24.16561335_wp, -150.95591946_wp, -224.84762243_wp, & + & -28.56840971_wp, -160.07448302_wp, -224.44809010_wp, -28.43832114_wp, & + & -158.68258503_wp, -223.28100423_wp, -27.46372567_wp, -158.57947227_wp, & + & -222.40608381_wp, -27.40924979_wp, -159.43845219_wp, -224.01232037_wp, & + & -28.52768786_wp, -160.65288453_wp, -225.30616167_wp, -28.05503845_wp, & + & -158.11866885_wp, -223.95778908_wp, -29.74915534_wp, -158.03858853_wp, & + & -224.76695496_wp, -30.47416360_wp, -158.00092661_wp, -223.13757131_wp, & + & -30.15928554_wp, -158.62618747_wp, -223.59331573_wp, -29.56680779_wp, & + & -157.02970221_wp, -223.27875255_wp, -26.69534083_wp, -157.47960341_wp, & + & -222.09901817_wp, -25.96846206_wp, -157.05967303_wp, -221.25025368_wp, & + & -26.88466710_wp, -156.16535615_wp, -221.70193008_wp, -27.92315200_wp, & + & -155.69353138_wp, -223.94648251_wp, -26.90098753_wp, -156.75014133_wp, & + & -221.53369374_wp, -25.73280434_wp, -157.96680803_wp, -222.49060145_wp, & + & -24.70116027_wp, -156.30475625_wp, -223.10699476_wp, -24.07173170_wp, & + & -156.93952307_wp, -223.05152877_wp, -24.96050943_wp, -155.41001681_wp, & + & -221.60407881_wp, -24.14724785_wp, -156.01089813_wp, -225.28814491_wp, & + & -29.46915805_wp, -160.22592093_wp, 3.87066243_wp, -1.59491086_wp, & + & 5.05539678_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_80 + +subroutine polyala_84(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 843 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.33464555_wp, -0.11206828_wp, -0.09921022_wp, 0.87093853_wp, & + & 0.62406288_wp, 0.21252373_wp, 1.70867282_wp, -0.25732093_wp, & + & 1.13938862_wp, 1.21647879_wp, -1.22012621_wp, 1.71732867_wp, & + & -0.59625735_wp, -0.79342454_wp, 0.60422245_wp, 1.39937470_wp, & + & 0.82655089_wp, -0.72479743_wp, 0.54196126_wp, 1.94086432_wp, & + & 0.92527983_wp, -0.09409711_wp, 2.54613581_wp, 0.28538238_wp, & + & 0.02273437_wp, 1.73794678_wp, 1.85867068_wp, 1.44814603_wp, & + & 2.49337973_wp, 1.15144385_wp, 2.99584018_wp, 0.08997907_wp, & + & 1.24928188_wp, 3.83730160_wp, -0.49771909_wp, 2.27009137_wp, & + & 3.40411404_wp, 0.01711231_wp, 3.64222651_wp, 2.59893326_wp, & + & 0.90629130_wp, 3.80085431_wp, 3.30975711_wp, 0.95755468_wp, & + & 0.83933724_wp, 3.66526169_wp, -1.58033524_wp, 2.27098227_wp, & + & 5.30766357_wp, -0.18583170_wp, 2.01664503_wp, 5.60311573_wp, & + & -0.57461068_wp, 1.04734405_wp, 5.47540681_wp, 0.88806801_wp, & + & 2.03955418_wp, 5.91442059_wp, -0.65289165_wp, 2.78612835_wp, & + & 4.01141339_wp, -0.61210364_wp, 4.62450179_wp, -6.10901001_wp, & + & -0.76553379_wp, -4.15781613_wp, -4.79912879_wp, -0.17600838_wp, & + & -3.98484970_wp, -4.18112254_wp, -0.82398997_wp, -2.74336175_wp, & + & -4.86809804_wp, -1.46787454_wp, -1.95607305_wp, -6.49008613_wp, & + & -1.17614788_wp, -3.31186571_wp, -4.20039531_wp, -0.39474333_wp, & + & -4.87520165_wp, -4.89714236_wp, 1.34104503_wp, -3.78992274_wp, & + & -5.36037659_wp, 1.78327535_wp, -4.66786395_wp, -5.50391227_wp, & + & 1.56663031_wp, -2.91671890_wp, -3.90976731_wp, 1.77223135_wp, & + & -3.65645334_wp, -2.87543662_wp, -0.61948962_wp, -2.59327791_wp, & + & -2.12172940_wp, -1.03685164_wp, -1.43108484_wp, -0.96242288_wp, & + & -0.05102770_wp, -1.27079492_wp, -0.64871747_wp, 0.71406138_wp, & + & -2.17716143_wp, -2.34929072_wp, -0.04261985_wp, -3.24093663_wp, & + & -2.78268856_wp, -1.00418752_wp, -0.55869713_wp, -1.57382882_wp, & + & -2.45740167_wp, -1.60972276_wp, -2.40448760_wp, -3.14572359_wp, & + & -1.74058530_wp, -0.93384920_wp, -2.50221933_wp, -2.48718637_wp, & + & -1.00066590_wp, -2.75712372_wp, -0.73755343_wp, -11.82371592_wp, & + & -1.59087641_wp, -8.27810119_wp, -10.44033774_wp, -1.18124317_wp, & + & -8.17039262_wp, -9.97207940_wp, -1.57188230_wp, -6.76659127_wp, & + & -10.77650852_wp, -1.88917193_wp, -5.89553023_wp, -12.27370820_wp, & + & -1.75446698_wp, -7.38308387_wp, -9.85843361_wp, -1.70802264_wp, & + & -8.93406664_wp, -10.29290057_wp, 0.33176521_wp, -8.36725130_wp, & + & -10.65448197_wp, 0.59752888_wp, -9.35698846_wp, -10.87687529_wp, & + & 0.86409843_wp, -7.62083190_wp, -9.25181465_wp, 0.62720009_wp, & + & -8.28028115_wp, -8.65669432_wp, -1.52013198_wp, -6.57953177_wp, & + & -8.01190277_wp, -1.71665320_wp, -5.29941146_wp, -6.70150485_wp, & + & -0.92648942_wp, -5.33745779_wp, -6.24962366_wp, -0.49843896_wp, & + & -6.39522426_wp, -8.02605758_wp, -1.21456031_wp, -7.31355121_wp, & + & -8.67230040_wp, -1.33469543_wp, -4.51378595_wp, -7.71915966_wp, & + & -3.20023030_wp, -5.04883528_wp, -8.65521051_wp, -3.75226407_wp, & + & -5.04921134_wp, -7.07589775_wp, -3.59107677_wp, -5.83310871_wp, & + & -7.22999985_wp, -3.33523080_wp, -4.08897877_wp, -17.59928199_wp, & + & -2.27467773_wp, -12.35774066_wp, -16.17813936_wp, -2.01615418_wp, & + & -12.27494873_wp, -15.77242506_wp, -2.23477854_wp, -10.81538735_wp, & + & -16.61635598_wp, -2.30034230_wp, -9.92653373_wp, -18.07756208_wp, & + & -2.22528728_wp, -11.46407293_wp, -15.65624330_wp, -2.71871233_wp, & + & -12.93301647_wp, -15.85142553_wp, -0.57891059_wp, -12.69564935_wp, & + & -16.17200378_wp, -0.42790332_wp, -13.72292527_wp, -16.37349966_wp, & + & 0.12545712_wp, -12.05306102_wp, -14.78330739_wp, -0.39671109_wp, & + & -12.62852736_wp, -14.46278198_wp, -2.32398773_wp, -10.60433388_wp, & + & -13.85673862_wp, -2.40662167_wp, -9.29320980_wp, -12.43444714_wp, & + & -1.85742409_wp, -9.42848558_wp, -11.91738616_wp, -1.70388241_wp, & + & -10.53107319_wp, -13.79194191_wp, -2.23627484_wp, -11.36099986_wp, & + & -14.44377901_wp, -1.79844225_wp, -8.59708980_wp, -13.80995501_wp, & + & -3.85550873_wp, -8.79509139_wp, -14.82337080_wp, -4.24349289_wp, & + & -8.73640212_wp, -13.23418951_wp, -4.46851368_wp, -9.48379549_wp, & + & -13.35534125_wp, -3.90452701_wp, -7.81046941_wp, -23.33342059_wp, & + & -3.10200085_wp, -16.47914665_wp, -21.89389754_wp, -2.98842522_wp, & + & -16.38620349_wp, -21.54919971_wp, -2.96368882_wp, -14.89511315_wp, & + & -22.41778000_wp, -2.78106285_wp, -14.04723718_wp, -23.81842652_wp, & + & -2.87792462_wp, -15.61597707_wp, -21.43924833_wp, -3.85736153_wp, & + & -16.87377363_wp, -21.39456402_wp, -1.70587775_wp, -17.06097704_wp, & + & -21.67780576_wp, -1.72513271_wp, -18.10999190_wp, -21.84258740_wp, & + & -0.83586236_wp, -16.58780732_wp, -20.31385016_wp, -1.63359353_wp, & + & -16.98838219_wp, -20.26109342_wp, -3.13386155_wp, -14.61427807_wp, & + & -19.69752682_wp, -3.02902594_wp, -13.28598117_wp, -18.21825101_wp, & + & -2.67800265_wp, -13.46294744_wp, -17.66809243_wp, -2.78856039_wp, & + & -14.55462788_wp, -19.56612002_wp, -3.25658987_wp, -15.34396566_wp, & + & -20.22293523_wp, -2.23652156_wp, -12.74279603_wp, -19.83174346_wp, & + & -4.35069987_wp, -12.52137447_wp, -20.88496247_wp, -4.60292672_wp, & + & -12.43158137_wp, -19.32023896_wp, -5.14571596_wp, -13.05792146_wp, & + & -19.40400429_wp, -4.26059156_wp, -11.52764103_wp, -29.07644011_wp, & + & -3.74848034_wp, -20.63819967_wp, -27.63359590_wp, -3.72226304_wp, & + & -20.53136763_wp, -27.30764591_wp, -3.61012461_wp, -19.03996890_wp, & + & -28.17161606_wp, -3.29595612_wp, -18.22641663_wp, -29.55284760_wp, & + & -3.44844802_wp, -19.79311715_wp, -27.23010083_wp, -4.65112600_wp, & + & -20.94824411_wp, -27.04175682_wp, -2.52564885_wp, -21.28463663_wp, & + & -27.31133974_wp, -2.60072075_wp, -22.33475655_wp, -27.43832167_wp, & + & -1.59735937_wp, -20.88141125_wp, -25.95985980_wp, -2.51882689_wp, & + & -21.19682762_wp, -26.04030636_wp, -3.85183056_wp, -18.72065322_wp, & + & -25.49270378_wp, -3.68386153_wp, -17.39160322_wp, -23.97804183_wp, & + & -3.53779020_wp, -17.55676008_wp, -23.42656904_wp, -3.82958508_wp, & + & -18.61398684_wp, -25.34766044_wp, -4.10083934_wp, -19.42005646_wp, & + & -25.92294019_wp, -2.78104660_wp, -16.94509086_wp, -25.80791150_wp, & + & -4.89150791_wp, -16.50196698_wp, -26.88623806_wp, -5.00646800_wp, & + & -16.43086838_wp, -25.38133124_wp, -5.79437458_wp, -16.93112159_wp, & + & -25.40197111_wp, -4.74511264_wp, -15.50593919_wp, -34.87057490_wp, & + & -4.32693071_wp, -24.75818934_wp, -33.42670377_wp, -4.29204770_wp, & + & -24.66716977_wp, -33.08600912_wp, -4.15426779_wp, -23.18120160_wp, & + & -33.94055521_wp, -3.81688965_wp, -22.36693337_wp, -35.33978726_wp, & + & -4.01216451_wp, -23.91445267_wp, -33.02341939_wp, -5.22540856_wp, & + & -25.07397416_wp, -32.84836791_wp, -3.10448813_wp, -25.44476997_wp, & + & -33.13252242_wp, -3.19417997_wp, -26.48988954_wp, -33.24092520_wp, & + & -2.17163884_wp, -25.04819727_wp, -31.76543244_wp, -3.09508089_wp, & + & -25.37221473_wp, -31.81727665_wp, -4.39719381_wp, -22.86842493_wp, & + & -31.26212361_wp, -4.22891416_wp, -21.54249164_wp, -29.74104714_wp, & + & -4.18075377_wp, -21.70496110_wp, -29.20465015_wp, -4.54569273_wp, & + & -22.74703757_wp, -31.13576190_wp, -4.68430794_wp, -23.56409112_wp, & + & -31.63732119_wp, -3.29170908_wp, -21.11785912_wp, -31.64839183_wp, & + & -5.39455023_wp, -20.62494072_wp, -32.73166455_wp, -5.44390841_wp, & + & -20.55327931_wp, -31.27560939_wp, -6.33065653_wp, -21.03273537_wp, & + & -31.23478045_wp, -5.24866173_wp, -19.63206217_wp, -40.69662677_wp, & + & -5.01711986_wp, -28.81752996_wp, -39.25297526_wp, -4.95806494_wp, & + & -28.73549608_wp, -38.90375031_wp, -4.80395701_wp, -27.25329097_wp, & + & -39.75646808_wp, -4.47098980_wp, -26.43538041_wp, -41.16687381_wp, & + & -4.70522198_wp, -27.97342440_wp, -38.83691818_wp, -5.88708854_wp, & + & -29.13928531_wp, -38.69930886_wp, -3.76582727_wp, -29.52398926_wp, & + & -38.98872295_wp, -3.86639704_wp, -30.56666237_wp, -39.10453688_wp, & + & -2.83724634_wp, -29.13009926_wp, -37.61623059_wp, -3.73831474_wp, & + & -29.45855338_wp, -37.62914549_wp, -5.02670403_wp, -26.94936801_wp, & + & -37.06268126_wp, -4.83918695_wp, -25.63087544_wp, -35.54363131_wp, & + & -4.78261721_wp, -25.80976381_wp, -35.01574432_wp, -5.16255013_wp, & + & -26.85086843_wp, -36.95094833_wp, -5.31423668_wp, -27.64821521_wp, & + & -37.44055638_wp, -3.90015630_wp, -25.21282335_wp, -37.43057118_wp, & + & -5.99759274_wp, -24.69677789_wp, -38.51261899_wp, -6.05365614_wp, & + & -24.61256233_wp, -37.05588369_wp, -6.93531205_wp, -25.09917392_wp, & + & -37.00687260_wp, -5.83828895_wp, -23.71023657_wp, -46.50700302_wp, & + & -5.74369606_wp, -32.88806919_wp, -45.06387079_wp, -5.68475064_wp, & + & -32.79857268_wp, -44.72204267_wp, -5.52953512_wp, -31.31470516_wp, & + & -45.57898297_wp, -5.19792230_wp, -30.50069496_wp, -46.98151797_wp, & + & -5.43265871_wp, -32.04603113_wp, -44.64569917_wp, -6.61411312_wp, & + & -33.19941240_wp, -44.50582821_wp, -4.49316469_wp, -33.58501045_wp, & + & -44.79039392_wp, -4.59408903_wp, -34.62898391_wp, -44.91238848_wp, & + & -3.56415236_wp, -33.19350044_wp, -43.42303670_wp, -4.46614821_wp, & + & -33.51454417_wp, -43.44840336_wp, -5.75019275_wp, -31.00555811_wp, & + & -42.88464460_wp, -5.55713342_wp, -29.68675145_wp, -41.36643921_wp, & + & -5.48216069_wp, -29.86704233_wp, -40.83568259_wp, -5.85662606_wp, & + & -30.90872791_wp, -42.76685451_wp, -6.03435275_wp, -31.70262383_wp, & + & -43.27361372_wp, -4.62293512_wp, -29.26811189_wp, -43.23897598_wp, & + & -6.72056453_wp, -28.75377925_wp, -44.32028865_wp, -6.78917550_wp, & + & -28.66930045_wp, -42.85369923_wp, -7.65350641_wp, -29.15723623_wp, & + & -42.81682538_wp, -6.55735120_wp, -27.76722696_wp, -52.30435143_wp, & + & -6.45596817_wp, -36.97857744_wp, -50.86121650_wp, -6.40072002_wp, & + & -36.88671829_wp, -50.52215751_wp, -6.24827021_wp, -35.40192634_wp, & + & -51.38052644_wp, -5.91689904_wp, -34.58928345_wp, -52.77901502_wp, & + & -6.14511355_wp, -36.13650712_wp, -50.44461612_wp, -7.33066947_wp, & + & -37.28784507_wp, -50.29888680_wp, -5.20961924_wp, -37.67078748_wp, & + & -50.58100679_wp, -5.30915880_wp, -38.71555572_wp, -50.70470787_wp, & + & -4.28015272_wp, -37.27959673_wp, -49.21623407_wp, -5.18468254_wp, & + & -37.59754209_wp, -49.24962617_wp, -6.47103466_wp, -35.08972594_wp, & + & -48.69079879_wp, -6.28096175_wp, -33.76837109_wp, -47.17186079_wp, & + & -6.20640137_wp, -33.94179946_wp, -46.63640141_wp, -6.57920189_wp, & + & -34.98164510_wp, -48.56619805_wp, -6.75484881_wp, -35.78500407_wp, & + & -49.08103031_wp, -5.34735158_wp, -33.34957084_wp, -49.04967181_wp, & + & -7.44592564_wp, -32.83904537_wp, -50.13136736_wp, -7.51420717_wp, & + & -32.75939624_wp, -48.66298846_wp, -8.37830816_wp, -33.24243984_wp, & + & -48.63175940_wp, -7.28460534_wp, -31.85038402_wp, -58.10148198_wp, & + & -7.15782271_wp, -41.07164032_wp, -56.65831939_wp, -7.10389043_wp, & + & -40.97940813_wp, -56.31942605_wp, -6.95228893_wp, -39.49448283_wp, & + & -57.17759529_wp, -6.62023118_wp, -38.68191800_wp, -58.57612693_wp, & + & -6.84641871_wp, -40.22977337_wp, -56.24247888_wp, -8.03409873_wp, & + & -41.38071949_wp, -56.09475426_wp, -5.91306025_wp, -41.76299385_wp, & + & -56.37726690_wp, -6.01174252_wp, -42.80773904_wp, -56.49934746_wp, & + & -4.98329811_wp, -41.37123255_wp, -55.01205568_wp, -5.88948161_wp, & + & -41.69002774_wp, -55.04717331_wp, -7.17649704_wp, -39.18216141_wp, & + & -54.48843132_wp, -6.98845381_wp, -37.86049771_wp, -52.96927676_wp, & + & -6.91647267_wp, -38.03319677_wp, -52.43390425_wp, -7.28937568_wp, & + & -39.07304327_wp, -54.36402588_wp, -7.46111515_wp, -39.87738235_wp, & + & -54.87723378_wp, -6.05458925_wp, -37.44095168_wp, -54.84935559_wp, & + & -8.15368061_wp, -36.93225790_wp, -55.93117253_wp, -8.22056597_wp, & + & -36.85311281_wp, -54.46374569_wp, -9.08626752_wp, -37.33621652_wp, & + & -54.43164301_wp, -7.99373305_wp, -35.94328351_wp, -63.89891071_wp, & + & -7.85438080_wp, -45.16574929_wp, -62.45569171_wp, -7.80134151_wp, & + & -45.07358832_wp, -62.11657819_wp, -7.65043513_wp, -43.58866108_wp, & + & -62.97454094_wp, -7.31829938_wp, -42.77590180_wp, -64.37333860_wp, & + & -7.54316776_wp, -44.32369404_wp, -62.04047613_wp, -8.73165536_wp, & + & -45.47530624_wp, -61.89148855_wp, -6.61056296_wp, -45.85679190_wp, & + & -62.17350042_wp, -6.70907225_wp, -46.90168634_wp, -62.29610210_wp, & + & -5.68076748_wp, -45.46513258_wp, -60.80882386_wp, -6.58720243_wp, & + & -45.78326507_wp, -60.84439521_wp, -7.87521935_wp, -43.27638725_wp, & + & -60.28585716_wp, -7.68720378_wp, -41.95460815_wp, -58.76655562_wp, & + & -7.61710302_wp, -42.12671771_wp, -58.23120832_wp, -7.99024196_wp, & + & -43.16649059_wp, -60.16128270_wp, -8.16002698_wp, -43.97154985_wp, & + & -60.67357974_wp, -6.75253873_wp, -41.53580601_wp, -60.64882228_wp, & + & -8.85129311_wp, -41.02576093_wp, -61.73077068_wp, -8.91645444_wp, & + & -40.94696542_wp, -60.26450469_wp, -9.78473269_wp, -41.42897532_wp, & + & -60.23123124_wp, -8.69133688_wp, -40.03673898_wp, -69.69650110_wp, & + & -8.55297853_wp, -49.25984090_wp, -68.25331668_wp, -8.49888506_wp, & + & -49.16776634_wp, -67.91425420_wp, -8.34733073_wp, -47.68287578_wp, & + & -68.77240464_wp, -8.01548960_wp, -46.87019632_wp, -70.17111081_wp, & + & -8.24181709_wp, -48.41786825_wp, -67.83744549_wp, -9.42902922_wp, & + & -49.56919988_wp, -67.68999983_wp, -7.30795992_wp, -49.95138140_wp, & + & -67.97242502_wp, -7.40676939_wp, -50.99613755_wp, -68.09485302_wp, & + & -6.37828181_wp, -49.55969256_wp, -66.60731419_wp, -7.28410722_wp, & + & -49.87834443_wp, -66.64192879_wp, -8.57129995_wp, -47.37060132_wp, & + & -66.08343894_wp, -8.38345689_wp, -46.04877222_wp, -64.56413252_wp, & + & -8.31344048_wp, -46.22083836_wp, -64.02881948_wp, -8.68654058_wp, & + & -47.26064802_wp, -65.95873840_wp, -8.85599235_wp, -48.06574110_wp, & + & -66.47119350_wp, -7.44890733_wp, -45.62975926_wp, -66.44632694_wp, & + & -9.54780560_wp, -45.12019868_wp, -67.52826965_wp, -9.61311876_wp, & + & -45.04145291_wp, -66.06188795_wp, -10.48109821_wp, -45.52364361_wp, & + & -66.02877850_wp, -9.38806394_wp, -44.13112432_wp, -75.49467078_wp, & + & -9.25462567_wp, -53.35253491_wp, -74.05146519_wp, -9.20017119_wp, & + & -53.26086560_wp, -73.71200065_wp, -9.04844161_wp, -51.77609899_wp, & + & -74.57004117_wp, -8.71695442_wp, -50.96315650_wp, -75.96913310_wp, & + & -8.94373794_wp, -52.51037851_wp, -73.63549421_wp, -10.13023179_wp, & + & -53.66239211_wp, -73.48866075_wp, -8.00914257_wp, -54.04469193_wp, & + & -73.77107324_wp, -8.10822505_wp, -55.08942398_wp, -73.89388905_wp, & + & -7.07957571_wp, -53.65312826_wp, -72.40598277_wp, -7.98482665_wp, & + & -53.97168034_wp, -72.43948514_wp, -9.27184499_wp, -51.46415360_wp, & + & -71.88082716_wp, -9.08328441_wp, -50.14249133_wp, -70.36157607_wp, & + & -9.01260243_wp, -50.31478511_wp, -69.82620773_wp, -9.38562469_wp, & + & -51.35459060_wp, -71.75630466_wp, -9.55620193_wp, -52.15943299_wp, & + & -72.26889825_wp, -8.14871053_wp, -49.72381046_wp, -72.24316853_wp, & + & -10.24736873_wp, -49.21338562_wp, -73.32507816_wp, -10.31295376_wp, & + & -49.13440644_wp, -71.85854451_wp, -11.18071162_wp, -49.61653494_wp, & + & -71.82547898_wp, -10.08710333_wp, -48.22445616_wp, -81.29305810_wp, & + & -9.96036742_wp, -57.44429814_wp, -79.84989108_wp, -9.90471694_wp, & + & -57.35288822_wp, -79.51039613_wp, -9.75242644_wp, -55.86817153_wp, & + & -80.36859880_wp, -9.42129568_wp, -55.05525301_wp, -81.76758149_wp, & + & -9.64954282_wp, -56.60214539_wp, -79.43321167_wp, -10.83452304_wp, & + & -57.75425949_wp, -79.28815682_wp, -8.71340591_wp, -58.13705424_wp, & + & -79.57088310_wp, -8.81277910_wp, -59.18167616_wp, -79.69383692_wp, & + & -7.78405721_wp, -57.74544259_wp, -78.20546759_wp, -8.68838272_wp, & + & -58.06444480_wp, -78.23771305_wp, -9.97490545_wp, -55.55630699_wp, & + & -77.67899437_wp, -9.78600403_wp, -54.23471752_wp, -76.15980063_wp, & + & -9.71466593_wp, -54.40725925_wp, -75.62447833_wp, -10.08753094_wp, & + & -55.44714903_wp, -77.55440561_wp, -10.25895028_wp, -56.25160120_wp, & + & -78.06746121_wp, -8.85162538_wp, -53.81597380_wp, -78.04061688_wp, & + & -10.95029090_wp, -53.30558122_wp, -79.12247932_wp, -11.01638195_wp, & + & -53.22637964_wp, -77.65565061_wp, -11.88344147_wp, -53.70885241_wp, & + & -77.62279389_wp, -10.78987798_wp, -52.31673241_wp, -87.09210988_wp, & + & -10.66912289_wp, -61.53425720_wp, -85.64894398_wp, -10.61299643_wp, & + & -61.44322173_wp, -85.30909395_wp, -10.46051851_wp, -59.95862160_wp, & + & -86.16720287_wp, -10.12975957_wp, -59.14545168_wp, -87.56656584_wp, & + & -10.35841485_wp, -60.69202658_wp, -85.23207120_wp, -11.54267614_wp, & + & -61.84469604_wp, -85.08781755_wp, -9.42152078_wp, -62.22756543_wp, & + & -85.37072559_wp, -9.52109287_wp, -63.27211833_wp, -85.49376435_wp, & + & -8.49229163_wp, -61.83594506_wp, -84.00512300_wp, -9.39609153_wp, & + & -62.15518162_wp, -84.03625346_wp, -10.68256358_wp, -59.64711635_wp, & + & -83.47724209_wp, -10.49334694_wp, -58.32570833_wp, -81.95814482_wp, & + & -10.42108257_wp, -58.49874243_wp, -81.42291288_wp, -10.79382861_wp, & + & -59.53872026_wp, -83.35304888_wp, -10.96640344_wp, -60.34259405_wp, & + & -83.86613400_wp, -9.55918530_wp, -57.90687713_wp, -83.83789715_wp, & + & -11.65780519_wp, -57.39641771_wp, -84.91969908_wp, -11.72452967_wp, & + & -57.31690984_wp, -83.45249392_wp, -12.59074089_wp, -57.79976579_wp, & + & -83.41988829_wp, -11.49709915_wp, -56.40769412_wp, -92.89073861_wp, & + & -11.37847155_wp, -65.62429923_wp, -91.44760879_wp, -11.32225813_wp, & + & -65.53305220_wp, -91.10799104_wp, -11.16997965_wp, -64.04839767_wp, & + & -91.96614029_wp, -10.83910467_wp, -63.23531979_wp, -93.36535763_wp, & + & -11.06762342_wp, -64.78221592_wp, -91.03061531_wp, -12.25184142_wp, & + & -65.93461194_wp, -90.88646256_wp, -10.13060531_wp, -66.31712628_wp, & + & -91.16923695_wp, -10.22998371_wp, -67.36173357_wp, -91.29251311_wp, & + & -9.20147962_wp, -65.92536821_wp, -89.80377874_wp, -10.10512204_wp, & + & -66.24460079_wp, -89.83521248_wp, -11.39218007_wp, -63.73679010_wp, & + & -89.27622177_wp, -11.20290303_wp, -62.41539917_wp, -87.75718477_wp, & + & -11.13005648_wp, -62.58860037_wp, -87.22193701_wp, -11.50261749_wp, & + & -63.62864037_wp, -89.15196657_wp, -11.67598293_wp, -64.43224543_wp, & + & -89.66544386_wp, -10.26893777_wp, -61.99644073_wp, -89.63640345_wp, & + & -12.36761647_wp, -61.48624517_wp, -90.71817410_wp, -12.43468466_wp, & + & -61.40659256_wp, -89.25077743_wp, -13.30037167_wp, -61.88979619_wp, & + & -89.21829597_wp, -12.20694001_wp, -60.49756013_wp, -98.68855544_wp, & + & -12.08595751_wp, -69.71535748_wp, -97.24541905_wp, -12.03049630_wp, & + & -69.62385223_wp, -96.90601394_wp, -11.87828817_wp, -68.13915488_wp, & + & -97.76411727_wp, -11.54687630_wp, -67.32624995_wp, -99.16317609_wp, & + & -11.77473756_wp, -68.87341458_wp, -96.82885044_wp, -12.96033531_wp, & + & -70.02526705_wp, -96.68346158_wp, -10.83920257_wp, -70.40788361_wp, & + & -96.96601662_wp, -10.93854311_wp, -71.45255199_wp, -97.08913360_wp, & + & -9.90982928_wp, -70.01631973_wp, -95.60078218_wp, -10.81427422_wp, & + & -70.33507812_wp, -95.63344830_wp, -12.10130872_wp, -67.82726959_wp, & + & -95.07466461_wp, -11.91222916_wp, -66.50577716_wp, -93.55561030_wp, & + & -11.83951030_wp, -66.67872019_wp, -93.02017082_wp, -12.21224752_wp, & + & -67.71859544_wp, -94.95021463_wp, -12.38545770_wp, -68.52258817_wp, & + & -95.46386681_wp, -10.97825989_wp, -66.08681283_wp, -95.43510746_wp, & + & -13.07698139_wp, -65.57677135_wp, -96.51689758_wp, -13.14401890_wp, & + & -65.49737133_wp, -95.04941001_wp, -14.00972341_wp, -65.98028303_wp, & + & -95.01722097_wp, -12.91636902_wp, -64.58798143_wp, -104.48637775_wp, & + & -12.79099822_wp, -73.80654639_wp, -103.04321506_wp, -12.73619811_wp, & + & -73.71504891_wp, -102.70373593_wp, -12.58433838_wp, -72.23034430_wp, & + & -103.56162741_wp, -12.25241269_wp, -71.41742642_wp, -104.96086700_wp, & + & -12.47955345_wp, -72.96461571_wp, -102.62707828_wp, -13.66616743_wp, & + & -74.11660203_wp, -102.48076049_wp, -11.54504415_wp, -74.49894063_wp, & + & -102.76334904_wp, -11.64413353_wp, -75.54362468_wp, -102.88605721_wp, & + & -10.61555456_wp, -74.10726388_wp, -101.39807176_wp, -11.52056686_wp, & + & -74.42612474_wp, -101.43131133_wp, -12.80814854_wp, -71.91843790_wp, & + & -100.87252038_wp, -12.61927447_wp, -70.59692118_wp, -99.35344438_wp, & + & -12.54706533_wp, -70.76973996_wp, -98.81798810_wp, -12.92024780_wp, & + & -71.80944350_wp, -100.74820780_wp, -13.09264671_wp, -72.61373347_wp, & + & -101.26148319_wp, -11.68520958_wp, -70.17795114_wp, -101.23332849_wp, & + & -13.78395924_wp, -69.66796785_wp, -102.31513566_wp, -13.85064543_wp, & + & -69.58852530_wp, -100.84794710_wp, -14.71680918_wp, -70.07153399_wp, & + & -100.81534341_wp, -13.62352567_wp, -68.67918943_wp, -110.28381859_wp, & + & -13.49247345_wp, -77.89867536_wp, -108.84065204_wp, -13.43846477_wp, & + & -77.80683436_wp, -108.50142370_wp, -13.28701650_wp, -76.32203081_wp, & + & -109.35927650_wp, -12.95459431_wp, -75.50927606_wp, -110.75834603_wp, & + & -13.18077015_wp, -77.05686316_wp, -108.42493285_wp, -14.36858540_wp, & + & -78.20847176_wp, -108.27737187_wp, -12.24746646_wp, -78.59036643_wp, & + & -108.55970648_wp, -12.34625554_wp, -79.63514705_wp, -108.68231777_wp, & + & -11.31783254_wp, -78.19866776_wp, -107.19469151_wp, -12.22354867_wp, & + & -78.51723042_wp, -107.22925165_wp, -13.51185431_wp, -76.00984970_wp, & + & -106.67054202_wp, -13.32335061_wp, -74.68824790_wp, -105.15141713_wp, & + & -13.25186319_wp, -74.86093570_wp, -104.61605358_wp, -13.62534766_wp, & + & -75.90057989_wp, -106.54619975_wp, -13.79672636_wp, -76.70504443_wp, & + & -107.05909578_wp, -12.38911605_wp, -74.26927910_wp, -107.03201738_wp, & + & -14.48789435_wp, -73.75937909_wp, -108.11386635_wp, -14.55409404_wp, & + & -73.68009529_wp, -106.64699721_wp, -15.42090956_wp, -74.16290619_wp, & + & -106.61410651_wp, -14.32767091_wp, -72.77053365_wp, -116.08098192_wp, & + & -14.19150534_wp, -81.99141051_wp, -114.63779908_wp, -14.13807257_wp, & + & -81.89956173_wp, -114.29859877_wp, -13.98689119_wp, -80.41472952_wp, & + & -115.15636132_wp, -13.65411041_wp, -79.60202194_wp, -116.55536243_wp, & + & -13.87962411_wp, -81.14957829_wp, -114.22244373_wp, -15.06833124_wp, & + & -82.30125429_wp, -114.07403721_wp, -12.94724835_wp, -82.68301046_wp, & + & -114.35638632_wp, -13.04586754_wp, -83.72780418_wp, -114.47864181_wp, & + & -12.01748435_wp, -82.29126929_wp, -112.99134998_wp, -12.92374829_wp, & + & -82.60984766_wp, -113.02656689_wp, -14.21233276_wp, -80.10243118_wp, & + & -112.46799431_wp, -14.02412769_wp, -78.78073193_wp, -110.94882362_wp, & + & -13.95318988_wp, -78.95314955_wp, -110.41339066_wp, -14.32697945_wp, & + & -79.99264818_wp, -112.34355608_wp, -14.49748906_wp, -80.79754560_wp, & + & -112.85630234_wp, -13.08979531_wp, -78.36175534_wp, -112.83002161_wp, & + & -15.18862208_wp, -77.85201162_wp, -113.91190536_wp, -15.25444965_wp, & + & -77.77289025_wp, -112.44526706_wp, -16.12174167_wp, -78.25555105_wp, & + & -112.41219834_wp, -15.02862025_wp, -76.86309319_wp, -121.87857384_wp, & + & -14.88980064_wp, -86.08374377_wp, -120.43539738_wp, -14.83623051_wp, & + & -85.99192083_wp, -120.09614811_wp, -14.68517335_wp, -84.50709511_wp, & + & -120.95384153_wp, -14.35234506_wp, -83.69433655_wp, -122.35297411_wp, & + & -14.57801938_wp, -85.24188774_wp, -120.01996113_wp, -15.76640862_wp, & + & -86.39370822_wp, -119.87176469_wp, -13.64527590_wp, -86.77527253_wp, & + & -120.15415060_wp, -13.74378405_wp, -87.82006665_wp, -120.27642451_wp, & + & -12.71559477_wp, -86.38339343_wp, -118.78907646_wp, -13.62169945_wp, & + & -86.70215081_wp, -118.82408839_wp, -14.91061878_wp, -84.19491848_wp, & + & -118.26536439_wp, -14.72254378_wp, -82.87326971_wp, -116.74618790_wp, & + & -14.65209708_wp, -83.04580415_wp, -116.21094161_wp, -15.02611233_wp, & + & -84.08531877_wp, -118.14116551_wp, -15.19586575_wp, -84.89008549_wp, & + & -118.65335219_wp, -13.78809554_wp, -82.45425314_wp, -118.62763425_wp, & + & -15.88693846_wp, -81.94451705_wp, -119.70952994_wp, -15.95249099_wp, & + & -81.86534014_wp, -118.24313432_wp, -16.82016351_wp, -82.34805853_wp, & + & -118.20971975_wp, -15.72702339_wp, -80.95562366_wp, -127.67580120_wp, & + & -15.58889444_wp, -90.17665254_wp, -126.23264330_wp, -15.53488460_wp, & + & -90.08471769_wp, -125.89356001_wp, -15.38370400_wp, -88.59985335_wp, & + & -126.75144960_wp, -15.05121047_wp, -87.78716462_wp, -128.15032184_wp, & + & -15.27729968_wp, -89.33479144_wp, -125.81686589_wp, -16.46492197_wp, & + & -90.48648430_wp, -125.66930296_wp, -14.34372774_wp, -90.86796396_wp, & + & -125.95160554_wp, -14.44227241_wp, -91.91277571_wp, -126.07423586_wp, & + & -13.41417231_wp, -90.47606698_wp, -124.58662440_wp, -14.31986039_wp, & + & -90.79478367_wp, -124.62147197_wp, -15.60881022_wp, -88.28755283_wp, & + & -124.06290242_wp, -15.42076196_wp, -86.96583056_wp, -122.54371097_wp, & + & -15.35028372_wp, -87.13822911_wp, -122.00838228_wp, -15.72415079_wp, & + & -88.17775551_wp, -123.93840569_wp, -15.89387306_wp, -88.98265934_wp, & + & -124.45092652_wp, -14.48632259_wp, -86.54682648_wp, -124.42522580_wp, & + & -16.58516670_wp, -86.03711237_wp, -125.50712743_wp, -16.65076180_wp, & + & -85.95806237_wp, -124.04063907_wp, -17.51837350_wp, -86.44061233_wp, & + & -124.00743266_wp, -16.42523735_wp, -85.04816869_wp, -133.47374970_wp, & + & -16.29027969_wp, -94.26831968_wp, -132.03056154_wp, -16.23587634_wp, & + & -94.17694026_wp, -131.69100928_wp, -16.08442719_wp, -92.69219772_wp, & + & -132.54880102_wp, -15.75232170_wp, -91.87924319_wp, -133.94799717_wp, & + & -15.97885870_wp, -93.42623528_wp, -131.61468605_wp, -17.16587667_wp, & + & -94.57869103_wp, -131.46782588_wp, -15.04471945_wp, -94.96061945_wp, & + & -131.75054120_wp, -15.14349438_wp, -96.00529935_wp, -131.87280937_wp, & + & -14.11519453_wp, -94.56870475_wp, -130.38512347_wp, -15.02058407_wp, & + & -94.88789856_wp, -130.41868308_wp, -16.30875024_wp, -92.38028791_wp, & + & -129.85996696_wp, -16.12056027_wp, -91.05863879_wp, -128.34081339_wp, & + & -16.04951376_wp, -91.23116308_wp, -127.80541794_wp, -16.42315504_wp, & + & -92.27073259_wp, -129.73566752_wp, -16.59355706_wp, -93.07554252_wp, & + & -130.24829243_wp, -15.18629849_wp, -90.63952178_wp, -130.22174318_wp, & + & -17.28517335_wp, -90.12996381_wp, -131.30361042_wp, -17.35119166_wp, & + & -90.05079215_wp, -129.83684276_wp, -18.21820392_wp, -90.53357410_wp, & + & -129.80389857_wp, -17.12515557_wp, -89.14105723_wp, -139.27333490_wp, & + & -16.99432917_wp, -98.35764169_wp, -137.83013609_wp, -16.93917190_wp, & + & -98.26673681_wp, -137.49006520_wp, -16.78740279_wp, -96.78213939_wp, & + & -138.34774225_wp, -16.45585556_wp, -95.96883745_wp, -139.74750973_wp, & + & -16.68322343_wp, -97.51540383_wp, -137.41390858_wp, -17.86898339_wp, & + & -98.66856660_wp, -137.26829012_wp, -15.74778442_wp, -99.05070629_wp, & + & -137.55135772_wp, -15.84678520_wp, -100.09526938_wp, -137.67358438_wp, & + & -14.81843069_wp, -98.65870573_wp, -136.18557226_wp, -15.72310405_wp, & + & -98.97840473_wp, -136.21743923_wp, -17.01083465_wp, -96.47078063_wp, & + & -135.65820312_wp, -16.82234589_wp, -95.14938992_wp, -134.13912282_wp, & + & -16.75096627_wp, -95.32257439_wp, -133.60411781_wp, -17.12442931_wp, & + & -96.36240935_wp, -135.53459321_wp, -17.29536761_wp, -97.16631872_wp, & + & -136.04653641_wp, -15.88810439_wp, -94.73023228_wp, -136.01932991_wp, & + & -17.98689453_wp, -94.22038325_wp, -137.10114988_wp, -18.05311930_wp, & + & -94.14073201_wp, -135.63442086_wp, -18.91990442_wp, -94.62403273_wp, & + & -135.60108720_wp, -17.82665412_wp, -93.23168077_wp, -145.07299860_wp, & + & -17.70058164_wp, -102.44698004_wp, -143.62982800_wp, -17.64470156_wp, & + & -102.35592588_wp, -143.28989798_wp, -17.49280777_wp, -100.87129532_wp, & + & -144.14778762_wp, -17.16181099_wp, -100.05799591_wp, -145.54741199_wp, & + & -17.38988660_wp, -101.60472681_wp, -143.21308544_wp, -18.57429311_wp, & + & -102.75772861_wp, -143.06849630_wp, -16.45301669_wp, -103.13982203_wp, & + & -143.35149112_wp, -16.55207429_wp, -104.18439928_wp, -143.47421345_wp, & + & -15.52386980_wp, -102.74776918_wp, -141.98579155_wp, -16.42785086_wp, & + & -103.06749101_wp, -142.01710200_wp, -17.71537427_wp, -100.55997417_wp, & + & -141.45782964_wp, -17.52671157_wp, -99.23861439_wp, -139.93877530_wp, & + & -17.45480489_wp, -99.41195395_wp, -139.40381803_wp, -17.82773045_wp, & + & -100.45201043_wp, -141.33413599_wp, -17.99949066_wp, -101.25557240_wp, & + & -141.84641478_wp, -16.59259964_wp, -98.81939686_wp, -141.81853319_wp, & + & -18.69139872_wp, -98.30961984_wp, -142.90032972_wp, -18.75796078_wp, & + & -98.22992077_wp, -141.43336001_wp, -19.62427872_wp, -98.71331693_wp, & + & -141.40029581_wp, -18.53106285_wp, -97.32093299_wp, -150.87250564_wp, & + & -18.40814705_wp, -106.53679293_wp, -149.42931850_wp, -18.35197961_wp, & + & -106.44575451_wp, -149.08933270_wp, -18.20004192_wp, -104.96111691_wp, & + & -149.94734997_wp, -17.86960782_wp, -104.14772448_wp, -151.34691058_wp, & + & -18.09778902_wp, -105.69440748_wp, -149.01237387_wp, -19.28146535_wp, & + & -106.84759550_wp, -148.86824475_wp, -17.16013314_wp, -107.22958666_wp, & + & -149.15120098_wp, -17.25920134_wp, -108.27417136_wp, -149.27417220_wp, & + & -16.23109484_wp, -106.83749262_wp, -147.78554587_wp, -17.13472427_wp, & + & -107.15723851_wp, -147.81639507_wp, -18.42198589_wp, -104.64985644_wp, & + & -147.25723318_wp, -18.23333371_wp, -103.32842437_wp, -145.73817276_wp, & + & -18.16084915_wp, -103.50157399_wp, -145.20297465_wp, -18.53318763_wp, & + & -104.54171422_wp, -147.13328181_wp, -18.70564164_wp, -105.34549465_wp, & + & -147.64616485_wp, -17.29942002_wp, -102.90908397_wp, -147.61759268_wp, & + & -19.39828585_wp, -102.39962750_wp, -148.69937228_wp, -19.46528486_wp, & + & -102.32007763_wp, -147.23199541_wp, -20.33095645_wp, -102.80340273_wp, & + & -147.19954834_wp, -19.23792473_wp, -101.41086313_wp, -156.67275188_wp, & + & -19.11588999_wp, -110.62594787_wp, -155.22950182_wp, -19.06021035_wp, & + & -110.53514737_wp, -154.88918431_wp, -18.90818115_wp, -109.05055918_wp, & + & -155.74709116_wp, -18.57783139_wp, -108.23701581_wp, -157.14686709_wp, & + & -18.80551903_wp, -109.78339912_wp, -154.81294497_wp, -19.98990796_wp, & + & -110.93690061_wp, -154.66815847_wp, -17.86869732_wp, -111.31929144_wp, & + & -154.95132489_wp, -17.96784586_wp, -112.36381343_wp, -155.07370154_wp, & + & -16.93944819_wp, -110.92729836_wp, -153.58543805_wp, -17.84363705_wp, & + & -111.24714264_wp, -153.61614195_wp, -19.12990850_wp, -108.73950731_wp, & + & -153.05676730_wp, -18.94110410_wp, -107.41815594_wp, -151.53770992_wp, & + & -18.86827941_wp, -107.59144955_wp, -151.00256101_wp, -19.24027650_wp, & + & -108.63173297_wp, -152.93306040_wp, -19.41336155_wp, -109.43525883_wp, & + & -153.44585231_wp, -18.00728110_wp, -106.99875793_wp, -153.41670505_wp, & + & -20.10614581_wp, -106.48930655_wp, -154.49845194_wp, -20.17338954_wp, & + & -106.40953065_wp, -153.03098316_wp, -21.03872802_wp, -106.89316818_wp, & + & -152.99849325_wp, -19.94570931_wp, -105.50062410_wp, -162.47366133_wp, & + & -19.82157877_wp, -114.71497456_wp, -161.03039702_wp, -19.76631999_wp, & + & -114.62405703_wp, -160.69007580_wp, -19.61454822_wp, -113.13942271_wp, & + & -161.54798441_wp, -19.28425840_wp, -112.32585551_wp, -162.94778602_wp, & + & -19.51132873_wp, -113.87238945_wp, -160.61409459_wp, -20.69608929_wp, & + & -115.02591270_wp, -160.46870535_wp, -18.57487841_wp, -115.40805740_wp, & + & -160.75181866_wp, -18.67389341_wp, -116.45260867_wp, -160.87407943_wp, & + & -17.64556451_wp, -115.01604113_wp, -159.38598621_wp, -18.55006572_wp, & + & -115.33582752_wp, -159.41705156_wp, -19.83644431_wp, -112.82839870_wp, & + & -158.85746948_wp, -19.64770410_wp, -111.50710566_wp, -157.33836602_wp, & + & -19.57546304_wp, -111.68059660_wp, -156.80358428_wp, -19.94740457_wp, & + & -112.72109177_wp, -158.73404241_wp, -20.11992848_wp, -113.52421742_wp, & + & -159.24613556_wp, -18.71366441_wp, -111.08779751_wp, -159.21780579_wp, & + & -20.81245908_wp, -110.57805972_wp, -160.29957559_wp, -20.87923361_wp, & + & -110.49816967_wp, -158.83252979_wp, -21.74526774_wp, -110.98182291_wp, & + & -158.79943780_wp, -20.65206281_wp, -109.58943693_wp, -168.27500689_wp, & + & -20.52423779_wp, -118.80385143_wp, -166.83168848_wp, -20.46986097_wp, & + & -118.71342450_wp, -166.49094457_wp, -20.31833359_wp, -117.22887611_wp, & + & -167.34859499_wp, -19.98792405_wp, -116.41507071_wp, -168.74862606_wp, & + & -20.21395904_wp, -117.96098512_wp, -166.41609184_wp, -21.39992170_wp, & + & -119.11535351_wp, -166.26951730_wp, -19.27884825_wp, -119.49772204_wp, & + & -166.55290029_wp, -19.37790440_wp, -120.54219797_wp, -166.67434404_wp, & + & -18.34925912_wp, -119.10579648_wp, -165.18677286_wp, -19.25458113_wp, & + & -119.42571945_wp, -165.21795343_wp, -20.54065524_wp, -116.91804425_wp, & + & -164.65844078_wp, -20.35223111_wp, -115.59667460_wp, -163.13929716_wp, & + & -20.28045873_wp, -115.76991764_wp, -162.60449963_wp, -20.65210368_wp, & + & -116.81051336_wp, -164.53504308_wp, -20.82416071_wp, -117.61394082_wp, & + & -165.04686020_wp, -19.41807734_wp, -115.17737725_wp, -165.01943582_wp, & + & -21.51690090_wp, -114.66778157_wp, -166.10125526_wp, -21.58323328_wp, & + & -114.58816587_wp, -164.63444858_wp, -22.44984442_wp, -115.07150544_wp, & + & -164.60125766_wp, -21.35673134_wp, -113.67904563_wp, -174.07817411_wp, & + & -21.22431068_wp, -122.89039673_wp, -172.63481260_wp, -21.17101833_wp, & + & -122.80016284_wp, -172.29358893_wp, -21.01951769_wp, -121.31576179_wp, & + & -173.15075321_wp, -20.68854333_wp, -120.50168366_wp, -174.55157448_wp, & + & -20.91357158_wp, -122.04758992_wp, -172.21995435_wp, -22.10143665_wp, & + & -123.20203127_wp, -172.07194773_wp, -19.98051700_wp, -123.58475834_wp, & + & -172.35571770_wp, -20.07947580_wp, -124.62913777_wp, -172.47595619_wp, & + & -19.05058160_wp, -123.19280547_wp, -170.98916447_wp, -19.95705871_wp, & + & -123.51309328_wp, -171.02058857_wp, -21.24251010_wp, -121.00543416_wp, & + & -170.46034346_wp, -21.05430848_wp, -119.68437641_wp, -168.94128895_wp, & + & -20.98300872_wp, -119.85842245_wp, -168.40711295_wp, -21.35487620_wp, & + & -120.89925839_wp, -170.33816336_wp, -21.52634154_wp, -121.70167388_wp, & + & -170.84826938_wp, -20.12007532_wp, -119.26480142_wp, -170.82113285_wp, & + & -22.21897044_wp, -118.75538676_wp, -171.90292035_wp, -22.28494966_wp, & + & -118.67507214_wp, -170.43672493_wp, -23.15198345_wp, -119.15950481_wp, & + & -170.40223671_wp, -22.05908708_wp, -117.76690868_wp, -179.87714168_wp, & + & -21.91761449_wp, -126.98459607_wp, -178.43396394_wp, -21.86485085_wp, & + & -126.89117772_wp, -178.09548448_wp, -21.71417991_wp, -125.40607772_wp, & + & -178.95375235_wp, -21.38255345_wp, -124.59345462_wp, -180.35247136_wp, & + & -21.60706942_wp, -126.14283008_wp, -178.01860917_wp, -22.79518914_wp, & + & -127.29271381_wp, -177.86905498_wp, -20.67409605_wp, -127.67393179_wp, & + & -178.15048710_wp, -20.77247700_wp, -128.71899480_wp, -178.27374127_wp, & + & -19.74426653_wp, -127.28242275_wp, -176.78643018_wp, -20.65092535_wp, & + & -127.59980221_wp, -176.82321145_wp, -21.93861338_wp, -125.09379502_wp, & + & -176.26398557_wp, -21.75085181_wp, -123.77225420_wp, -174.74469000_wp, & + & -21.68182788_wp, -123.94534634_wp, -174.21051015_wp, -22.05416421_wp, & + & -124.98602575_wp, -176.14015306_wp, -22.22292966_wp, -125.78925275_wp, & + & -176.65069093_wp, -20.81581616_wp, -123.35332143_wp, -176.62741995_wp, & + & -22.91456006_wp, -122.84312639_wp, -177.70939010_wp, -22.97898415_wp, & + & -122.76400640_wp, -176.24387291_wp, -23.84831191_wp, -123.24635028_wp, & + & -176.20942980_wp, -22.75478359_wp, -121.85424804_wp, -185.66641723_wp, & + & -22.61308922_wp, -131.09276206_wp, -184.22349317_wp, -22.55794404_wp, & + & -130.99702440_wp, -183.88819085_wp, -22.40658928_wp, -129.51119219_wp, & + & -184.74854766_wp, -22.07533998_wp, -128.70061089_wp, -186.14332307_wp, & + & -22.30192274_wp, -130.25208648_wp, -183.80597940_wp, -23.48768933_wp, & + & -131.39766505_wp, -183.65907721_wp, -21.36641565_wp, -131.77892213_wp, & + & -183.93888622_wp, -21.46507836_wp, -132.82439622_wp, -184.06548627_wp, & + & -20.43712000_wp, -131.38794476_wp, -182.57658632_wp, -21.34187110_wp, & + & -131.70325129_wp, -182.61651928_wp, -22.63004999_wp, -129.19588430_wp, & + & -182.06086250_wp, -22.44272794_wp, -127.87274140_wp, -180.54108671_wp, & + & -22.37413055_wp, -128.04162113_wp, -180.00421150_wp, -22.74602082_wp, & + & -129.08107440_wp, -181.93159095_wp, -22.91415951_wp, -129.88958621_wp, & + & -182.44845469_wp, -21.50770465_wp, -127.45460361_wp, -182.42718444_wp, & + & -23.60660852_wp, -126.94495233_wp, -183.50938226_wp, -23.67068736_wp, & + & -126.86871484_wp, -182.04289721_wp, -24.54036974_wp, -127.34745197_wp, & + & -182.01176777_wp, -23.44731001_wp, -125.95491464_wp, -191.45737678_wp, & + & -23.34547544_wp, -135.19331157_wp, -190.01462537_wp, -23.28108753_wp, & + & -135.10051446_wp, -189.67727267_wp, -23.12318241_wp, -133.61587968_wp, & + & -190.53781898_wp, -22.79363076_wp, -132.80480547_wp, -191.93494037_wp, & + & -23.03097539_wp, -134.35428332_wp, -189.59242862_wp, -24.20947718_wp, & + & -135.49934788_wp, -189.45917963_wp, -22.08847548_wp, -135.88716142_wp, & + & -189.74042752_wp, -22.19198046_wp, -136.93177939_wp, -189.87042872_wp, & + & -21.16050782_wp, -135.49810750_wp, -188.37671042_wp, -22.05708402_wp, & + & -135.81372302_wp, -188.40391250_wp, -23.33909149_wp, -133.30204519_wp, & + & -187.84815945_wp, -23.14692377_wp, -131.97964087_wp, -186.32860423_wp, & + & -23.07457365_wp, -132.14873809_wp, -185.79050717_wp, -23.44808196_wp, & + & -133.18695639_wp, -187.71871247_wp, -23.62278235_wp, -133.99561363_wp, & + & -188.23833739_wp, -22.21205634_wp, -131.56358387_wp, -188.21083492_wp, & + & -24.30972127_wp, -131.04903227_wp, -189.29282126_wp, -24.37660071_wp, & + & -130.97218898_wp, -187.82416897_wp, -25.24330477_wp, -131.44968543_wp, & + & -187.79542240_wp, -24.14708213_wp, -130.05953395_wp, -197.23759029_wp, & + & -24.12239856_wp, -139.29708353_wp, -195.79515827_wp, -24.06328405_wp, & + & -139.19729365_wp, -195.46322806_wp, -23.89121613_wp, -137.71313790_wp, & + & -196.32514215_wp, -23.54968672_wp, -136.90858329_wp, -197.71906165_wp, & + & -23.79073743_wp, -138.46707584_wp, -195.37535466_wp, -24.99747821_wp, & + & -139.58483728_wp, -195.23137735_wp, -22.88074100_wp, -139.99327710_wp, & + & -195.50919340_wp, -22.99290545_wp, -141.03791788_wp, -195.63995589_wp, & + & -21.94732183_wp, -139.61449658_wp, -194.14905248_wp, -22.85328354_wp, & + & -139.91610070_wp, -194.19169742_wp, -24.10905866_wp, -137.39313377_wp, & + & -193.63687846_wp, -23.90232765_wp, -136.07266080_wp, -192.11788303_wp, & + & -23.82167692_wp, -136.24375435_wp, -191.57844440_wp, -24.20157010_wp, & + & -137.27897550_wp, -193.50551095_wp, -24.39993222_wp, -138.08277683_wp, & + & -194.03299128_wp, -22.96661515_wp, -135.66426541_wp, -193.99158308_wp, & + & -25.05998039_wp, -135.13264565_wp, -195.07303407_wp, -25.13210362_wp, & + & -135.05305208_wp, -193.60080753_wp, -25.99443057_wp, -135.52725778_wp, & + & -193.57497242_wp, -24.88785595_wp, -134.14524115_wp, -202.98129980_wp, & + & -24.80159949_wp, -143.44731663_wp, -201.53926762_wp, -24.82901606_wp, & + & -143.33074181_wp, -201.21576323_wp, -24.63237312_wp, -141.84766678_wp, & + & -202.06897876_wp, -24.22769026_wp, -141.06332231_wp, -203.44908922_wp, & + & -24.41340069_wp, -142.63394408_wp, -201.17442448_wp, -25.79954285_wp, & + & -143.68327145_wp, -200.89338574_wp, -23.70993816_wp, -144.15543851_wp, & + & -201.16496157_wp, -23.83828991_wp, -145.19984536_wp, -201.24732696_wp, & + & -22.74119528_wp, -143.81213445_wp, -199.81237340_wp, -23.74657840_wp, & + & -144.06415376_wp, -199.96106388_wp, -24.90495159_wp, -141.50407200_wp, & + & -199.41408640_wp, -24.68027202_wp, -140.18333379_wp, -197.89322816_wp, & + & -24.61497076_wp, -140.34317460_wp, -197.34806126_wp, -25.01915716_wp, & + & -141.36608084_wp, -199.27829126_wp, -25.23593177_wp, -142.17856157_wp, & + & -199.80597551_wp, -23.73402805_wp, -139.79577439_wp, -199.78739361_wp, & + & -25.81821108_wp, -139.22668252_wp, -200.87000114_wp, -25.87782030_wp, & + & -139.15292309_wp, -199.40392461_wp, -26.76317540_wp, -139.60296095_wp, & + & -199.37536992_wp, -25.63407603_wp, -138.23949493_wp, -208.75673433_wp, & + & -25.37615656_wp, -147.57499872_wp, -207.31752584_wp, -25.47064728_wp, & + & -147.45942720_wp, -206.97689259_wp, -25.20758446_wp, -145.99045206_wp, & + & -207.80264208_wp, -24.71142374_wp, -145.22964339_wp, -209.19755640_wp, & + & -24.88942377_wp, -146.80087524_wp, -207.00647434_wp, -26.47765220_wp, & + & -147.75654884_wp, -206.62068676_wp, -24.43531488_wp, -148.34916827_wp, & + & -206.89872389_wp, -24.61311226_wp, -149.38457542_wp, -206.92852806_wp, & + & -23.43215508_wp, -148.06551964_wp, -205.54249806_wp, -24.51691500_wp, & + & -148.25360775_wp, -205.73847647_wp, -25.53148477_wp, -145.63212900_wp, & + & -205.18086980_wp, -25.27220279_wp, -144.32224864_wp, -203.65846835_wp, & + & -25.30217457_wp, -144.47582020_wp, -203.13282528_wp, -25.78199272_wp, & + & -145.47589217_wp, -205.07688087_wp, -25.93634806_wp, -146.28690791_wp, & + & -205.51847124_wp, -24.28673607_wp, -143.98449047_wp, -205.62093445_wp, & + & -26.33765916_wp, -143.31182091_wp, -206.70518917_wp, -26.32970449_wp, & + & -143.23869569_wp, -205.29372393_wp, -27.32094222_wp, -143.64004608_wp, & + & -205.19907046_wp, -26.13025855_wp, -142.33340344_wp, -214.54369018_wp, & + & -26.02207671_wp, -151.64675800_wp, -213.12525283_wp, -26.25700795_wp, & + & -151.48434282_wp, -212.76806067_wp, -25.83368957_wp, -150.05739150_wp, & + & -213.54144729_wp, -25.15780966_wp, -149.38532415_wp, -214.93344324_wp, & + & -25.38042203_wp, -150.96364494_wp, -212.92741367_wp, -27.32349876_wp, & + & -151.63480196_wp, -212.30848359_wp, -25.43724818_wp, -152.48957479_wp, & + & -212.59813442_wp, -25.72126704_wp, -153.49774980_wp, -212.50074667_wp, & + & -24.37651518_wp, -152.34994225_wp, -211.24713861_wp, -25.62591847_wp, & + & -152.36057297_wp, -211.57274876_wp, -26.23412368_wp, -149.63496520_wp, & + & -210.98705179_wp, -25.84305853_wp, -148.37113492_wp, -209.46964813_wp, & + & -25.96392824_wp, -148.53075924_wp, -208.97941772_wp, -26.58244196_wp, & + & -149.47078673_wp, -210.94780113_wp, -26.77150025_wp, -150.22727575_wp, & + & -211.27469651_wp, -24.80854694_wp, -148.15651366_wp, -211.46241635_wp, & + & -26.75425147_wp, -147.23385999_wp, -212.54367356_wp, -26.68421088_wp, & + & -147.15098326_wp, -211.18779697_wp, -27.78511657_wp, -147.44241676_wp, & + & -211.01528298_wp, -26.45091883_wp, -146.29225877_wp, -220.32829343_wp, & + & -26.63505039_wp, -155.72033484_wp, -218.95235269_wp, -27.01307789_wp, & + & -155.48172241_wp, -218.55660357_wp, -26.40959204_wp, -154.13166236_wp, & + & -219.24393473_wp, -25.54269595_wp, -153.60003128_wp, -220.63490539_wp, & + & -25.83907657_wp, -155.17031615_wp, -218.88967442_wp, -28.10589701_wp, & + & -155.45279137_wp, -218.03146833_wp, -26.47415859_wp, -156.58216626_wp, & + & -218.34138653_wp, -26.88657499_wp, -157.53860683_wp, -218.09672618_wp, & + & -25.38996308_wp, -156.62501495_wp, -217.00203547_wp, -26.76070187_wp, & + & -156.39053588_wp, -217.42550465_wp, -26.88027434_wp, -153.61516631_wp, & + & -216.80741492_wp, -26.36220677_wp, -152.41390757_wp, -215.31195627_wp, & + & -26.67187141_wp, -152.51586930_wp, -214.88718251_wp, -27.47974968_wp, & + & -153.33649821_wp, -216.86731930_wp, -27.57833342_wp, -154.09587273_wp, & + & -216.97917182_wp, -25.28165229_wp, -152.37071071_wp, -217.39073410_wp, & + & -27.02509695_wp, -151.16093687_wp, -218.45779570_wp, -26.82423443_wp, & + & -151.11700228_wp, -217.23253506_wp, -28.09984087_wp, -151.19952280_wp, & + & -216.91947657_wp, -26.62857218_wp, -150.26696497_wp, -226.09425100_wp, & + & -27.18494412_wp, -159.80787501_wp, -224.80389945_wp, -27.72269080_wp, & + & -159.43492140_wp, -224.32784601_wp, -26.92901984_wp, -158.21530948_wp, & + & -224.86311721_wp, -25.87049584_wp, -157.90014564_wp, -226.25550901_wp, & + & -26.23929896_wp, -159.47735865_wp, -224.92866177_wp, -28.78151560_wp, & + & -159.18554548_wp, -223.79287077_wp, -27.57699825_wp, -160.57760238_wp, & + & -224.15449712_wp, -28.12224125_wp, -161.44525406_wp, -223.67629352_wp, & + & -26.52876938_wp, -160.84071553_wp, -222.82757374_wp, -27.97861403_wp, & + & -160.28493617_wp, -223.30261519_wp, -27.46614418_wp, -157.56017082_wp, & + & -222.61739297_wp, -26.81947508_wp, -156.46225430_wp, -221.17484845_wp, & + & -27.33146615_wp, -156.47299549_wp, -220.85903256_wp, -28.32368195_wp, & + & -157.12260713_wp, -222.85849862_wp, -28.32213750_wp, -157.87554107_wp, & + & -222.64723102_wp, -25.73690293_wp, -156.62353602_wp, -223.27834094_wp, & + & -27.15895386_wp, -155.12156333_wp, -224.30998894_wp, -26.81799255_wp, & + & -155.13676619_wp, -223.26177927_wp, -28.23366868_wp, -154.95933722_wp, & + & -222.75626725_wp, -26.66866335_wp, -154.30569656_wp, -231.81668534_wp, & + & -27.74097069_wp, -163.90546390_wp, -230.68618717_wp, -28.39944979_wp, & + & -163.28896349_wp, -230.06718261_wp, -27.40613801_wp, -162.30300372_wp, & + & -230.34733627_wp, -26.21230550_wp, -162.34178381_wp, -231.75710338_wp, & + & -26.72917096_wp, -163.90877803_wp, -231.05187893_wp, -29.29034835_wp, & + & -162.76784378_wp, -229.64285738_wp, -28.80501102_wp, -164.33632247_wp, & + & -230.10009870_wp, -29.48652901_wp, -165.04890370_wp, -229.28794758_wp, & + & -27.92555863_wp, -164.86778231_wp, -228.79935253_wp, -29.29916866_wp, & + & -163.86365005_wp, -229.21094547_wp, -27.93940056_wp, -161.43465661_wp, & + & -228.39957645_wp, -27.16356711_wp, -160.52192133_wp, -227.06621836_wp, & + & -27.89977055_wp, -160.36817383_wp, -226.93900231_wp, -29.06590476_wp, & + & -160.72872906_wp, -228.96054222_wp, -28.92120684_wp, -161.47734749_wp, & + & -228.24823138_wp, -26.17033110_wp, -160.95679383_wp, -229.07840299_wp, & + & -27.03309038_wp, -159.15393607_wp, -230.03434079_wp, -26.53124039_wp, & + & -159.27591577_wp, -229.24660303_wp, -28.01827934_wp, -158.72651675_wp, & + & -228.45856186_wp, -26.45400372_wp, -158.47616246_wp, -236.16030545_wp, & + & -29.38385202_wp, -168.72269207_wp, -235.72845411_wp, -29.67470559_wp, & + & -167.36517932_wp, -234.86677309_wp, -28.52797067_wp, -166.85025184_wp, & + & -234.09722174_wp, -27.91663081_wp, -167.58528740_wp, -235.40634909_wp, & + & -28.89803748_wp, -169.20176542_wp, -236.62298535_wp, -29.77991208_wp, & + & -166.74067173_wp, -234.86196228_wp, -30.94180850_wp, -167.23421207_wp, & + & -235.44088524_wp, -31.82132738_wp, -167.50472080_wp, -234.00024495_wp, & + & -30.86380770_wp, -167.89581427_wp, -234.49724456_wp, -31.05295567_wp, & + & -166.21508214_wp, -235.00255269_wp, -28.25890950_wp, -165.54258946_wp, & + & -234.03414999_wp, -27.45497750_wp, -164.82635595_wp, -232.91450015_wp, & + & -28.37493174_wp, -164.31715907_wp, -233.04463302_wp, -29.59458668_wp, & + & -164.29085816_wp, -235.53963717_wp, -28.89963145_wp, -164.97564739_wp, & + & -233.61481887_wp, -26.74705665_wp, -165.54809412_wp, -234.69627674_wp, & + & -26.73018272_wp, -163.65785609_wp, -235.50304936_wp, -26.10267608_wp, & + & -164.02427256_wp, -235.10051725_wp, -27.45351727_wp, -162.95368836_wp, & + & -233.97144807_wp, -26.10889484_wp, -163.14056097_wp, -236.34061770_wp, & + & -30.24808064_wp, -169.22157163_wp, 3.74889427_wp, -0.29123164_wp, & + & 5.51006240_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_84 + +subroutine polyala_88(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 883 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.32670673_wp, -0.16875896_wp, -0.02466712_wp, 0.90235667_wp, & + & 0.55140234_wp, 0.22689536_wp, 1.76135255_wp, -0.31088641_wp, & + & 1.15152261_wp, 1.26642040_wp, -1.20194088_wp, 1.83206717_wp, & + & -0.61250815_wp, -0.78406222_wp, 0.72761418_wp, 1.39761590_wp, & + & 0.71989750_wp, -0.73436122_wp, 0.62093305_wp, 1.89050771_wp, & + & 0.91860547_wp, 0.01229880_wp, 2.51284817_wp, 0.26862117_wp, & + & 0.08932515_wp, 1.71929133_wp, 1.85145414_wp, 1.54788769_wp, & + & 2.40770819_wp, 1.14588875_wp, 3.06826174_wp, -0.02328274_wp, & + & 1.14274212_wp, 3.96296736_wp, -0.56087941_wp, 2.14523727_wp, & + & 3.77194542_wp, 0.20330926_wp, 3.45440948_wp, 3.06950163_wp, & + & 1.18346603_wp, 3.55928099_wp, 3.38743433_wp, 0.79160190_wp, & + & 0.63893547_wp, 3.66766163_wp, -1.59908228_wp, 2.33594939_wp, & + & 5.41437914_wp, -0.48837303_wp, 1.68339219_wp, 5.53383882_wp, & + & -1.04795475_wp, 0.76119556_wp, 5.70585547_wp, 0.54539578_wp, & + & 1.51540169_wp, 6.05847181_wp, -0.91648011_wp, 2.44499176_wp, & + & 4.45990853_wp, -0.32008008_wp, 4.44523354_wp, -6.12915792_wp, & + & -0.73833475_wp, -4.03556944_wp, -4.77464576_wp, -0.24910144_wp, & + & -3.89826982_wp, -4.20664430_wp, -0.85319904_wp, -2.61168159_wp, & + & -4.93888729_wp, -1.37587570_wp, -1.77718697_wp, -6.54854710_wp, & + & -1.04292290_wp, -3.16377261_wp, -4.19834343_wp, -0.57866268_wp, & + & -4.76910020_wp, -4.74674515_wp, 1.28096229_wp, -3.81027822_wp, & + & -5.17205491_wp, 1.69784511_wp, -4.71921163_wp, -5.33253908_wp, & + & 1.61602052_wp, -2.95805249_wp, -3.72700520_wp, 1.63760473_wp, & + & -3.70150294_wp, -2.88678096_wp, -0.74814124_wp, -2.48269012_wp, & + & -2.15416762_wp, -1.11628166_wp, -1.29075468_wp, -0.95355494_wp, & + & -0.17139301_wp, -1.19862771_wp, -0.60938581_wp, 0.51111762_wp, & + & -2.15842706_wp, -2.32678430_wp, -0.25800233_wp, -3.17223513_wp, & + & -2.81403732_wp, -0.99215438_wp, -0.42586930_wp, -1.66846063_wp, & + & -2.56806987_wp, -1.36780539_wp, -2.52764839_wp, -3.22756220_wp, & + & -1.45541530_wp, -1.02907666_wp, -2.70112307_wp, -2.23673648_wp, & + & -1.11054181_wp, -2.83132554_wp, -0.47429742_wp, -11.84114646_wp, & + & -1.46697814_wp, -8.19804626_wp, -10.43509387_wp, -1.14406838_wp, & + & -8.08831758_wp, -10.02306880_wp, -1.43653510_wp, -6.64327858_wp, & + & -10.86452648_wp, -1.60654735_wp, -5.76615500_wp, -12.32998637_wp, & + & -1.48318876_wp, -7.30906492_wp, -9.87748416_wp, -1.77694019_wp, & + & -8.78660106_wp, -10.17958904_wp, 0.33141000_wp, -8.41561016_wp, & + & -10.50118205_wp, 0.53062531_wp, -9.43434207_wp, -10.74069511_wp, & + & 0.96698807_wp, -7.73527197_wp, -9.12255281_wp, 0.56296338_wp, & + & -8.32749632_wp, -8.71076405_wp, -1.47124985_wp, -6.43065898_wp, & + & -8.10333679_wp, -1.60623689_wp, -5.12440438_wp, -6.72695499_wp, & + & -0.94191652_wp, -5.20615133_wp, -6.23075558_wp, -0.64347439_wp, & + & -6.28825039_wp, -8.04578224_wp, -1.28641317_wp, -7.17468626_wp, & + & -8.73656598_wp, -1.09686719_wp, -4.39035560_wp, -7.94988138_wp, & + & -3.08099831_wp, -4.73570872_wp, -8.93196362_wp, -3.54537989_wp, & + & -4.70878859_wp, -7.33278823_wp, -3.59728067_wp, -5.46663147_wp, & + & -7.48970983_wp, -3.17139346_wp, -3.75651746_wp, -17.49951157_wp, & + & -2.39005564_wp, -12.39268449_wp, -16.06419794_wp, -2.23688048_wp, & + & -12.29095486_wp, -15.72716194_wp, -2.24472852_wp, -10.79774984_wp, & + & -16.60602950_wp, -2.11729212_wp, -9.95027674_wp, -17.99297692_wp, & + & -2.19947009_wp, -11.52614644_wp, -15.58304242_wp, -3.07855574_wp, & + & -12.80048479_wp, -15.60037198_wp, -0.92204151_wp, -12.92750734_wp, & + & -15.87977571_wp, -0.91996809_wp, -13.97775446_wp, -16.07499320_wp, & + & -0.07906379_wp, -12.43181815_wp, -14.52242907_wp, -0.82030154_wp, & + & -12.84891335_wp, -14.43584466_wp, -2.38101731_wp, -10.51253892_wp, & + & -13.88785280_wp, -2.29486629_wp, -9.17625016_wp, -12.42709448_wp, & + & -1.86281621_wp, -9.32431955_wp, -11.86127762_wp, -1.90521846_wp, & + & -10.41267311_wp, -13.73257657_wp, -2.45407212_wp, -11.24063312_wp, & + & -14.45787294_wp, -1.54963322_wp, -8.61155489_wp, -13.96169807_wp, & + & -3.64775773_wp, -8.45940305_wp, -15.00188924_wp, -3.95325769_wp, & + & -8.38435358_wp, -13.41034528_wp, -4.39800523_wp, -9.02038298_wp, & + & -13.54273956_wp, -3.57271221_wp, -7.46063982_wp, -23.22816731_wp, & + & -3.10627907_wp, -16.54004809_wp, -21.78505792_wp, -3.07642884_wp, & + & -16.43874348_wp, -21.45408889_wp, -2.97554424_wp, -14.94779324_wp, & + & -22.31694375_wp, -2.67460332_wp, -14.12810141_wp, -23.70229752_wp, & + & -2.81350845_wp, -15.69113983_wp, -21.38030857_wp, -4.00056485_wp, & + & -16.86479828_wp, -21.20031484_wp, -1.87182349_wp, -17.18482984_wp, & + & -21.47201587_wp, -1.94058782_wp, -18.23484118_wp, -21.60017643_wp, & + & -0.94822357_wp, -16.77416856_wp, -20.11822241_wp, -1.86044460_wp, & + & -17.09949273_wp, -20.18439211_wp, -3.21328766_wp, -14.63430713_wp, & + & -19.63537614_wp, -3.04617673_wp, -13.30593499_wp, -18.12795066_wp, & + & -2.84122936_wp, -13.47365263_wp, -17.56788900_wp, -3.10295314_wp, & + & -14.53405807_wp, -19.49118824_wp, -3.44332759_wp, -15.33930902_wp, & + & -20.09839257_wp, -2.16817272_wp, -12.84324084_wp, -19.89808633_wp, & + & -4.27989799_wp, -12.43504093_wp, -20.97055904_wp, -4.43752470_wp, & + & -12.35797170_wp, -19.44040123_wp, -5.15826368_wp, -12.88270952_wp, & + & -19.48992409_wp, -4.13500550_wp, -11.43961754_wp, -29.02667544_wp, & + & -3.65441025_wp, -20.65195473_wp, -27.58280038_wp, -3.63010949_wp, & + & -20.55974012_wp, -27.24201222_wp, -3.50073656_wp, -19.07317773_wp, & + & -28.09436248_wp, -3.16100974_wp, -18.25761400_wp, -29.49460113_wp, & + & -3.34081800_wp, -19.80707092_wp, -27.18571967_wp, -4.56460006_wp, & + & -20.97007131_wp, -26.99552042_wp, -2.44346937_wp, -21.33206831_wp, & + & -27.27847139_wp, -2.52758797_wp, -22.37797330_wp, -27.38287356_wp, & + & -1.50957900_wp, -20.93283309_wp, -25.91266329_wp, -2.44113002_wp, & + & -21.25764675_wp, -25.97511016_wp, -3.75414060_wp, -18.76166192_wp, & + & -25.41624058_wp, -3.58913858_wp, -17.43704620_wp, -23.89586257_wp, & + & -3.53730800_wp, -17.60525080_wp, -23.36283513_wp, -3.89720880_wp, & + & -18.65081363_wp, -25.29549128_wp, -4.04028320_wp, -19.45965055_wp, & + & -25.79162307_wp, -2.65372159_wp, -17.00861142_wp, -25.79778151_wp, & + & -4.75779919_wp, -16.52143570_wp, -26.88076943_wp, -4.80942431_wp, & + & -16.44697008_wp, -25.42432454_wp, -5.69223911_wp, -16.93235633_wp, & + & -25.38185483_wp, -4.61352717_wp, -15.52926891_wp, -34.84664016_wp, & + & -4.29313275_wp, -24.72775495_wp, -33.40317392_wp, -4.23916591_wp, & + & -24.64141818_wp, -33.05804038_wp, -4.09321418_wp, -23.15743922_wp, & + & -33.91156633_wp, -3.75920613_wp, -22.34080779_wp, -35.31810227_wp, & + & -3.98187969_wp, -23.88408075_wp, -32.98894711_wp, -5.16770064_wp, & + & -25.04819643_wp, -32.84327338_wp, -3.04516003_wp, -25.42277899_wp, & + & -33.13013248_wp, -3.13989006_wp, -26.46670501_wp, -33.24646856_wp, & + & -2.11704249_wp, -25.02573075_wp, -31.76029417_wp, -3.02167310_wp, & + & -25.35421575_wp, -31.78565084_wp, -4.32420752_wp, -22.85094390_wp, & + & -31.22100714_wp, -4.14651986_wp, -21.53044133_wp, -29.70139664_wp, & + & -4.09975422_wp, -21.70674958_wp, -29.17465422_wp, -4.47805056_wp, & + & -22.74905319_wp, -31.10728235_wp, -4.61285748_wp, -23.54924598_wp, & + & -31.59302338_wp, -3.20675735_wp, -21.10879315_wp, -31.59837877_wp, & + & -5.30653740_wp, -20.60213233_wp, -32.68094668_wp, -5.35626181_wp, & + & -20.52070733_wp, -31.22850604_wp, -6.24488429_wp, -21.00750765_wp, & + & -31.17606116_wp, -5.15401377_wp, -19.61392724_wp, -40.65521153_wp, & + & -5.00240503_wp, -28.80410426_wp, -39.21202863_wp, -4.94339465_wp, & + & -28.71510351_wp, -38.86988516_wp, -4.79220095_wp, -27.23096097_wp, & + & -39.72670703_wp, -4.46281762_wp, -26.41589662_wp, -41.12913777_wp, & + & -4.69365562_wp, -27.96087731_wp, -38.79379123_wp, -5.87159693_wp, & + & -29.11856195_wp, -38.65456958_wp, -3.74961036_wp, -29.49858641_wp, & + & -38.93844322_wp, -3.84847055_wp, -30.54293950_wp, -39.06219290_wp, & + & -2.82183455_wp, -29.10526711_wp, -37.57185061_wp, -3.72179881_wp, & + & -29.42738853_wp, -37.59622452_wp, -5.01340856_wp, -26.92239247_wp, & + & -37.03385423_wp, -4.82512261_wp, -25.60233375_wp, -35.51526943_wp, & + & -4.75394838_wp, -25.77982729_wp, -34.98336455_wp, -5.12763355_wp, & + & -26.82119047_wp, -36.91444877_wp, -5.29682093_wp, -27.61950557_wp, & + & -37.42080359_wp, -3.89083688_wp, -25.18200199_wp, -37.39265991_wp, & + & -5.98970716_wp, -24.67249062_wp, -38.47428754_wp, -6.05602677_wp, & + & -24.59033751_wp, -37.00861908_wp, -6.92268709_wp, -25.07704060_wp, & + & -36.97213634_wp, -5.82943775_wp, -23.68475857_wp, -46.45370883_wp, & + & -5.71571676_wp, -32.89422492_wp, -45.01059920_wp, -5.65775611_wp, & + & -32.80276106_wp, -44.67117284_wp, -5.50639506_wp, -31.31790129_wp, & + & -45.52982415_wp, -5.17773101_wp, -30.50445810_wp, -46.92864035_wp, & + & -5.40697188_wp, -32.05153862_wp, -44.59224776_wp, -6.58642475_wp, & + & -33.20503486_wp, -44.45098375_wp, -4.46468589_wp, -33.58577572_wp, & + & -44.73373360_wp, -4.56349180_wp, -34.63044534_wp, -44.85817225_wp, & + & -3.53641759_wp, -33.19316732_wp, -43.36832309_wp, -4.43788264_wp, & + & -33.51334795_wp, -43.39801725_wp, -5.72685616_wp, -31.00657706_wp, & + & -42.83906831_wp, -5.53875863_wp, -29.68494898_wp, -41.32021492_wp, & + & -5.46313900_wp, -29.85857568_wp, -40.78478582_wp, -5.83355624_wp, & + & -30.89930026_wp, -42.71427839_wp, -6.00883740_wp, -31.70231409_wp, & + & -43.22964963_wp, -4.60611784_wp, -29.26432850_wp, -43.19701757_wp, & + & -6.70557757_wp, -28.75757248_wp, -44.27864979_wp, -6.77468200_wp, & + & -28.67779737_wp, -42.80982513_wp, -7.63701720_wp, -29.16265396_wp, & + & -42.77898609_wp, -6.54574468_wp, -27.76871651_wp, -52.25335608_wp, & + & -6.42254961_wp, -36.98482871_wp, -50.81006233_wp, -6.36666741_wp, & + & -36.89411327_wp, -50.46955643_wp, -6.21570463_wp, -35.40942328_wp, & + & -51.32758935_wp, -5.88675764_wp, -34.59544118_wp, -52.72747372_wp, & + & -6.11360447_wp, -36.14176150_wp, -50.39333935_wp, -7.29602271_wp, & + & -37.29650978_wp, -50.24917235_wp, -5.17456361_wp, -37.67767042_wp, & + & -50.53216930_wp, -5.27347196_wp, -38.72226500_wp, -50.65526874_wp, & + & -4.24567445_wp, -37.28539980_wp, -49.16647590_wp, -5.14894434_wp, & + & -37.60539529_wp, -49.19631257_wp, -6.43682574_wp, -35.09862871_wp, & + & -48.63727560_wp, -6.24917941_wp, -33.77692814_wp, -47.11818309_wp, & + & -6.17521762_wp, -33.94963336_wp, -46.58241328_wp, -6.54570763_wp, & + & -34.99012754_wp, -48.51303438_wp, -6.71903049_wp, -35.79467820_wp, & + & -49.02692951_wp, -5.31599679_wp, -33.35662129_wp, -48.99691964_wp, & + & -7.41534919_wp, -32.84938388_wp, -50.07866614_wp, -7.48334487_wp, & + & -32.77022312_wp, -48.61039437_wp, -8.34731291_wp, -33.25389603_wp, & + & -48.57933929_wp, -7.25557488_wp, -31.86032648_wp, -58.05544061_wp, & + & -7.12699074_wp, -41.07374865_wp, -56.61214481_wp, -7.07070244_wp, & + & -40.98312164_wp, -56.27132375_wp, -6.91971678_wp, -39.49848670_wp, & + & -57.12919917_wp, -6.59080470_wp, -38.68433258_wp, -58.52969237_wp, & + & -6.81800622_wp, -40.23078461_wp, -56.19523610_wp, -7.99988635_wp, & + & -41.38571348_wp, -56.05174268_wp, -5.87833157_wp, -41.76663532_wp, & + & -56.33520170_wp, -5.97700219_wp, -42.81112797_wp, -56.45776225_wp, & + & -4.94958857_wp, -41.37393830_wp, -54.96901793_wp, -5.85261942_wp, & + & -41.69485129_wp, -54.99794925_wp, -7.14075430_wp, -39.18808320_wp, & + & -54.43816149_wp, -6.95321318_wp, -37.86666022_wp, -52.91902595_wp, & + & -6.88078365_wp, -38.04007053_wp, -52.38424791_wp, -7.25136598_wp, & + & -39.08104674_wp, -54.31502945_wp, -7.42303616_wp, -39.88446679_wp, & + & -54.82674691_wp, -6.01954709_wp, -37.44643317_wp, -54.79850716_wp, & + & -8.11880635_wp, -36.93865928_wp, -55.88027566_wp, -8.18552199_wp, & + & -36.85869334_wp, -54.41339860_wp, -9.05128332_wp, -37.34334423_wp, & + & -54.38000184_wp, -7.95941601_wp, -35.94993224_wp, -63.85616115_wp, & + & -7.83343041_wp, -45.16443348_wp, -62.41290067_wp, -7.77706119_wp, & + & -45.07332364_wp, -62.07266955_wp, -7.62561114_wp, -43.58860361_wp, & + & -62.93096289_wp, -7.29672384_wp, -42.77487039_wp, -64.33065032_wp, & + & -7.52436936_wp, -44.32162345_wp, -61.99583554_wp, -8.70635870_wp, & + & -45.47549642_wp, -61.85225664_wp, -6.58492514_wp, -45.85701617_wp, & + & -62.13506091_wp, -6.68410597_wp, -46.90163843_wp, -62.25870513_wp, & + & -5.65609381_wp, -45.46497332_wp, -60.76958143_wp, -6.55896240_wp, & + & -45.78458071_wp, -60.79938242_wp, -7.84628076_wp, -43.27760978_wp, & + & -60.24009341_wp, -7.65782827_wp, -41.95609776_wp, -58.72089832_wp, & + & -7.58535333_wp, -42.12907929_wp, -58.18586563_wp, -7.95591740_wp, & + & -43.16993669_wp, -60.11606821_wp, -8.12848602_wp, -43.97364685_wp, & + & -60.62885307_wp, -6.72386069_wp, -41.53668372_wp, -60.60083045_wp, & + & -8.82274086_wp, -41.02741252_wp, -61.68263569_wp, -8.88935094_wp, & + & -40.94783758_wp, -60.21561044_wp, -9.75552688_wp, -41.43127504_wp, & + & -60.18272849_wp, -8.66265078_wp, -40.03863017_wp, -69.65581112_wp, & + & -8.54222006_wp, -49.25569344_wp, -68.21257438_wp, -8.48569855_wp, & + & -49.16460435_wp, -67.87254029_wp, -8.33371674_wp, -47.67990758_wp, & + & -68.73098982_wp, -8.00466294_wp, -46.86639912_wp, -70.13024622_wp, & + & -8.23284217_wp, -48.41295748_wp, -67.79540335_wp, -9.41511151_wp, & + & -49.56640064_wp, -67.65201570_wp, -7.29381287_wp, -49.94873042_wp, & + & -67.93500816_wp, -7.39329388_wp, -50.99327463_wp, -68.05835470_wp, & + & -6.36484767_wp, -49.55689298_wp, -66.56932735_wp, -7.26788017_wp, & + & -49.87650022_wp, -66.59931258_wp, -8.55422004_wp, -47.36865389_wp, & + & -66.04036739_wp, -8.36551052_wp, -46.04705162_wp, -64.52118747_wp, & + & -8.29245476_wp, -46.21973191_wp, -63.98577415_wp, -8.66319305_wp, & + & -47.26033395_wp, -65.91579733_wp, -8.83642621_wp, -48.06449369_wp, & + & -66.42965138_wp, -7.43174564_wp, -45.62768463_wp, -66.40072791_wp, & + & -9.53064891_wp, -45.11849352_wp, -67.48251279_wp, -9.59776306_wp, & + & -45.03907125_wp, -66.01502590_wp, -10.46322542_wp, -45.52238342_wp, & + & -65.98282468_wp, -9.37044160_wp, -44.12964613_wp, -75.45499010_wp, & + & -9.25157137_wp, -53.34683481_wp, -74.01179116_wp, -9.19493560_wp, & + & -53.25570452_wp, -73.67194060_wp, -9.04268707_wp, -51.77102359_wp, & + & -74.53039760_wp, -8.71319430_wp, -50.95769865_wp, -75.92949538_wp, & + & -8.94186226_wp, -52.50425990_wp, -73.59453225_wp, -10.12438802_wp, & + & -53.65731513_wp, -73.45128701_wp, -8.00314624_wp, -54.04001234_wp, & + & -73.73428791_wp, -8.10281226_wp, -55.08453733_wp, -73.85766356_wp, & + & -7.07413726_wp, -53.64831808_wp, -72.36859880_wp, -7.97716229_wp, & + & -53.96779809_wp, -72.39884944_wp, -9.26355242_wp, -51.45958447_wp, & + & -71.83997780_wp, -9.07464223_wp, -50.13800850_wp, -70.32082101_wp, & + & -9.00168308_wp, -50.31077143_wp, -69.78544679_wp, -9.37281571_wp, & + & -51.35125751_wp, -71.71527522_wp, -9.54597318_wp, -52.15528810_wp, & + & -72.22920310_wp, -8.14077644_wp, -49.71881104_wp, -72.20044290_wp, & + & -10.23958964_wp, -49.20925679_wp, -73.28223364_wp, -10.30655184_wp, & + & -49.12977922_wp, -71.81488130_wp, -11.17227720_wp, -49.61302334_wp, & + & -71.78247548_wp, -10.07927727_wp, -48.22045372_wp, -81.25401698_wp, & + & -9.96118058_wp, -57.43722462_wp, -79.81082411_wp, -9.90454772_wp, & + & -57.34645023_wp, -79.47077986_wp, -9.75227695_wp, -55.86185848_wp, & + & -80.32904365_wp, -9.42248109_wp, -55.04844730_wp, -81.72834309_wp, & + & -9.65131924_wp, -56.59460167_wp, -79.39365324_wp, -10.83402587_wp, & + & -57.74809614_wp, -79.25051065_wp, -8.71281187_wp, -58.13096783_wp, & + & -79.53366747_wp, -8.81262827_wp, -59.17543696_wp, -79.65689523_wp, & + & -7.78378544_wp, -57.73932528_wp, -78.16781409_wp, -8.68674982_wp, & + & -58.05892114_wp, -78.19776372_wp, -9.97356703_wp, -55.55051100_wp, & + & -77.63896162_wp, -9.78470650_wp, -54.22892823_wp, -76.11984861_wp, & + & -9.71173459_wp, -54.40167575_wp, -75.58436623_wp, -10.08338532_wp, & + & -55.44192145_wp, -77.51425076_wp, -10.25615226_wp, -56.24620151_wp, & + & -78.02821817_wp, -8.85085764_wp, -53.80972341_wp, -77.99947505_wp, & + & -10.94967703_wp, -53.30022485_wp, -79.08127463_wp, -11.01670573_wp, & + & -53.22092063_wp, -77.61378285_wp, -11.88234118_wp, -53.70391923_wp, & + & -77.58167554_wp, -10.78930903_wp, -52.31135998_wp, -87.05274613_wp, & + & -10.67084383_wp, -61.52722481_wp, -85.60960400_wp, -10.61409064_wp, & + & -61.43635018_wp, -85.26978723_wp, -10.46153984_wp, -59.95176035_wp, & + & -86.12800574_wp, -10.13109236_wp, -59.13857076_wp, -87.52721313_wp, & + & -10.36045744_wp, -60.68487713_wp, -85.19230892_wp, -11.54361243_wp, & + & -61.83775921_wp, -85.04930681_wp, -9.42245510_wp, -62.22103237_wp, & + & -85.33262133_wp, -9.52234150_wp, -63.26545272_wp, -85.45556201_wp, & + & -8.49336563_wp, -61.82940460_wp, -83.96659725_wp, -9.39647691_wp, & + & -62.14914472_wp, -83.99694190_wp, -10.68341365_wp, -59.64024445_wp, & + & -83.43807923_wp, -10.49472699_wp, -58.31870432_wp, -81.91902495_wp, & + & -10.42179052_wp, -58.49173858_wp, -81.38370801_wp, -10.79383089_wp, & + & -59.53193390_wp, -83.31352487_wp, -10.96640902_wp, -60.33587040_wp, & + & -83.82726697_wp, -9.56093878_wp, -57.89931202_wp, -83.79847863_wp, & + & -11.65985676_wp, -57.39015287_wp, -84.88026681_wp, -11.72687185_wp, & + & -57.31067595_wp, -83.41288213_wp, -12.59245446_wp, -57.79409305_wp, & + & -83.38049926_wp, -11.49969349_wp, -56.40133030_wp, -92.85167919_wp, & + & -11.37935736_wp, -65.61635903_wp, -91.40850965_wp, -11.32307291_wp, & + & -65.52583219_wp, -91.06836669_wp, -11.17044795_wp, -64.04136159_wp, & + & -91.92620871_wp, -10.83925931_wp, -63.22807679_wp, -93.32588418_wp, & + & -11.06848326_wp, -64.77404678_wp, -90.99163603_wp, -12.25280109_wp, & + & -65.92720104_wp, -90.84795949_wp, -10.13175194_wp, -66.31080630_wp, & + & -91.13135960_wp, -10.23179562_wp, -67.35518692_wp, -91.25395041_wp, & + & -9.20247461_wp, -65.91935100_wp, -89.76523858_wp, -10.10604299_wp, & + & -66.23897858_wp, -89.79563710_wp, -11.39313463_wp, -63.72998747_wp, & + & -89.23670780_wp, -11.20457464_wp, -62.40848092_wp, -87.71767589_wp, & + & -11.13200490_wp, -62.58153145_wp, -87.18233909_wp, -11.50474132_wp, & + & -63.62146237_wp, -89.11245931_wp, -11.67673198_wp, -64.42558971_wp, & + & -89.62566048_wp, -10.27067237_wp, -61.98912668_wp, -89.59740624_wp, & + & -12.36957761_wp, -61.47988853_wp, -90.67921586_wp, -12.43637967_wp, & + & -61.40053051_wp, -89.21192818_wp, -13.30227328_wp, -61.88371484_wp, & + & -89.17951041_wp, -12.20940677_wp, -60.49103189_wp, -98.65099557_wp, & + & -12.08693557_wp, -69.70458188_wp, -97.20782748_wp, -12.03083335_wp, & + & -69.61409712_wp, -96.86761100_wp, -11.87826909_wp, -68.12964799_wp, & + & -97.72520218_wp, -11.54634269_wp, -67.31640572_wp, -99.12516107_wp, & + & -11.77549500_wp, -68.86246189_wp, -96.79107676_wp, -12.96057534_wp, & + & -70.01554466_wp, -96.64714804_wp, -10.83949539_wp, -70.39896371_wp, & + & -96.93066120_wp, -10.93932359_wp, -71.44333331_wp, -97.05292917_wp, & + & -9.91020471_wp, -70.00731955_wp, -95.56441450_wp, -10.81399845_wp, & + & -70.32722658_wp, -95.59502981_wp, -12.10178621_wp, -67.81829172_wp, & + & -95.03586459_wp, -11.91336292_wp, -66.49687866_wp, -93.51687732_wp, & + & -11.84105132_wp, -66.67025143_wp, -92.98176694_wp, -12.21447542_wp, & + & -67.71005243_wp, -94.91207411_wp, -12.38597418_wp, -68.51387126_wp, & + & -95.42464194_wp, -10.97945561_wp, -66.07738989_wp, -95.39645439_wp, & + & -13.07841402_wp, -65.56829733_wp, -96.47824492_wp, -13.14505496_wp, & + & -65.48856180_wp, -95.01126269_wp, -14.01112181_wp, -65.97237124_wp, & + & -94.97816975_wp, -12.91842907_wp, -64.57957282_wp, -104.45034463_wp, & + & -12.79267508_wp, -73.79277944_wp, -103.00716151_wp, -12.73709587_wp, & + & -73.70219645_wp, -102.66695297_wp, -12.58467558_wp, -72.21773257_wp, & + & -103.52435317_wp, -12.25206142_wp, -71.40457471_wp, -104.92449191_wp, & + & -12.48074482_wp, -72.95083733_wp, -102.59076844_wp, -13.66698387_wp, & + & -74.10367077_wp, -102.44594028_wp, -11.54594044_wp, -74.48695301_wp, & + & -102.72929035_wp, -11.64565098_wp, -75.53137681_wp, -102.85146439_wp, & + & -10.61651396_wp, -74.09536500_wp, -101.36321002_wp, -11.52082876_wp, & + & -74.41500367_wp, -101.39454439_wp, -12.80906235_wp, -71.90627621_wp, & + & -100.83529751_wp, -12.62071858_wp, -70.58488856_wp, -99.31629367_wp, & + & -12.54889109_wp, -70.75829605_wp, -98.78127412_wp, -12.92292058_wp, & + & -71.79792244_wp, -100.71177635_wp, -13.09389298_wp, -72.60177092_wp, & + & -101.22379362_wp, -11.68665841_wp, -70.16548648_wp, -101.19619104_wp, & + & -13.78557432_wp, -69.65618059_wp, -102.27799854_wp, -13.85195874_wp, & + & -69.57646612_wp, -100.81119196_wp, -14.71842262_wp, -70.06011408_wp, & + & -100.77789870_wp, -13.62554720_wp, -68.66746462_wp, -110.25000184_wp, & + & -13.49809311_wp, -77.88039826_wp, -108.80680216_wp, -13.44274835_wp, & + & -77.78987936_wp, -108.46643279_wp, -13.29053689_wp, -76.30543174_wp, & + & -109.32363168_wp, -12.95757586_wp, -75.49220858_wp, -110.72409750_wp, & + & -13.18584198_wp, -77.03855296_wp, -108.39060585_wp, -14.37262968_wp, & + & -78.19156260_wp, -108.24541201_wp, -12.25152630_wp, -78.57442354_wp, & + & -108.52877828_wp, -12.35097355_wp, -79.61886643_wp, -108.65078027_wp, & + & -11.32211365_wp, -78.18263999_wp, -107.16267631_wp, -12.22660545_wp, & + & -78.50246512_wp, -107.19408103_wp, -13.51541977_wp, -75.99404842_wp, & + & -106.63466941_wp, -13.32694945_wp, -74.67274660_wp, -105.11568593_wp, & + & -13.25511239_wp, -74.84626884_wp, -104.58068734_wp, -13.62964922_wp, & + & -75.88571908_wp, -106.51148875_wp, -13.80059304_wp, -76.68956552_wp, & + & -107.02323256_wp, -12.39291142_wp, -74.25336976_wp, -106.99526720_wp, & + & -14.49179478_wp, -73.74390104_wp, -108.07704546_wp, -14.55826372_wp, & + & -73.66388956_wp, -106.61029505_wp, -15.42462700_wp, -74.14789982_wp, & + & -106.57670693_wp, -14.33169191_wp, -72.75530820_wp, -116.04956697_wp, & + & -14.20323559_wp, -81.96813233_wp, -114.60637194_wp, -14.14817970_wp, & + & -81.87731158_wp, -114.26618311_wp, -13.99616214_wp, -80.39279818_wp, & + & -115.12337718_wp, -13.66293705_wp, -79.57968419_wp, -116.52380509_wp, & + & -13.89092782_wp, -81.12639365_wp, -114.19030827_wp, -15.07809025_wp, & + & -82.27906043_wp, -114.04454409_wp, -12.95695422_wp, -82.66154451_wp, & + & -114.32760930_wp, -13.05619404_wp, -83.70608655_wp, -114.44985223_wp, & + & -12.02752168_wp, -82.26974590_wp, -112.96182389_wp, -12.93224688_wp, & + & -82.58924673_wp, -112.99392915_wp, -14.22146010_wp, -80.08126475_wp, & + & -112.43442019_wp, -14.03266463_wp, -78.76004888_wp, -110.91544245_wp, & + & -13.96084170_wp, -78.93369982_wp, -110.38051653_wp, -14.33568756_wp, & + & -79.97307443_wp, -112.31139609_wp, -14.50683615_wp, -80.77675476_wp, & + & -112.82300461_wp, -13.09854562_wp, -78.34087416_wp, -112.79485332_wp, & + & -15.19730024_wp, -77.83087568_wp, -113.87661666_wp, -15.26382204_wp, & + & -77.75071875_wp, -112.40986526_wp, -16.13020993_wp, -78.23468108_wp, & + & -112.37618412_wp, -15.03691514_wp, -76.84237293_wp, -121.84907041_wp, & + & -14.90841713_wp, -86.05588344_wp, -120.40584562_wp, -14.85368429_wp, & + & -85.96510840_wp, -120.06555729_wp, -14.70190746_wp, -84.48058953_wp, & + & -120.92268944_wp, -14.36871825_wp, -83.66739362_wp, -122.32318265_wp, & + & -14.59628940_wp, -85.21400518_wp, -119.99001331_wp, -15.78363753_wp, & + & -86.36700187_wp, -119.84376802_wp, -13.66248973_wp, -86.74920766_wp, & + & -120.12674297_wp, -13.76160745_wp, -87.79378474_wp, -120.24897099_wp, & + & -12.73302215_wp, -86.35738501_wp, -118.76104987_wp, -13.63795177_wp, & + & -86.67680050_wp, -118.79332602_wp, -14.92740845_wp, -84.16905992_wp, & + & -118.23383149_wp, -14.73835754_wp, -82.84786296_wp, -116.71485928_wp, & + & -14.66626441_wp, -83.02142447_wp, -116.17978069_wp, -15.04118180_wp, & + & -84.06069131_wp, -118.11075909_wp, -15.21262993_wp, -84.86457396_wp, & + & -118.62265996_wp, -13.80429317_wp, -82.42879354_wp, -118.59396359_wp, & + & -15.90298154_wp, -81.91855262_wp, -119.67570382_wp, -15.96974120_wp, & + & -81.83830805_wp, -118.20878859_wp, -16.83584488_wp, -82.32228653_wp, & + & -118.17525443_wp, -15.74239661_wp, -80.93009735_wp, -127.64882839_wp, & + & -15.61400334_wp, -90.14323609_wp, -126.20559256_wp, -15.55944577_wp, & + & -90.05235945_wp, -125.86531581_wp, -15.40793439_wp, -88.56780373_wp, & + & -126.72247159_wp, -15.07492646_wp, -87.75455828_wp, -128.12293043_wp, & + & -15.30219666_wp, -89.30123059_wp, -125.78983163_wp, -16.48936223_wp, & + & -90.45441113_wp, -125.64334506_wp, -14.36815548_wp, -90.83619808_wp, & + & -125.92618802_wp, -14.46707484_wp, -91.88082929_wp, -126.04854659_wp, & + & -13.43873036_wp, -90.44427267_wp, -124.56063376_wp, -14.34368695_wp, & + & -90.76364733_wp, -124.59307493_wp, -15.63345108_wp, -88.25630288_wp, & + & -124.03341508_wp, -15.44404505_wp, -86.93521754_wp, -122.51447353_wp, & + & -15.37166796_wp, -87.10901485_wp, -121.97949374_wp, -15.74654731_wp, & + & -88.14834709_wp, -123.91046131_wp, -15.91835865_wp, -88.95190645_wp, & + & -124.42239386_wp, -14.50999956_wp, -86.51624406_wp, -124.39310176_wp, & + & -16.60858881_wp, -86.00563409_wp, -125.47480573_wp, -16.67553189_wp, & + & -85.92507110_wp, -124.00787654_wp, -17.54144660_wp, -86.40933295_wp, & + & -123.97413869_wp, -16.44777941_wp, -85.01732069_wp, -133.44768008_wp, & + & -16.31865674_wp, -94.23219261_wp, -132.00446324_wp, -16.26442817_wp, & + & -94.14077703_wp, -131.66470311_wp, -16.11318016_wp, -92.65605940_wp, & + & -132.52216866_wp, -15.78037373_wp, -91.84305561_wp, -133.92198184_wp, & + & -16.00714865_wp, -93.39018379_wp, -131.58874717_wp, -17.19439137_wp, & + & -94.54277333_wp, -131.44165787_wp, -15.07317720_wp, -94.92427137_wp, & + & -131.72409569_wp, -15.17194481_wp, -95.96902706_wp, -131.84684283_wp, & + & -14.14370834_wp, -94.53243255_wp, -130.35897114_wp, -15.04891992_wp, & + & -94.85128169_wp, -130.39256806_wp, -16.33873590_wp, -92.34416791_wp, & + & -129.83316489_wp, -16.14927470_wp, -91.02297367_wp, -128.31417816_wp, & + & -16.07692770_wp, -91.19654377_wp, -127.77911455_wp, -16.45148924_wp, & + & -92.23595202_wp, -129.70970489_wp, -16.62336787_wp, -93.03965028_wp, & + & -130.22217323_wp, -15.21518334_wp, -90.60412188_wp, -130.19307341_wp, & + & -17.31373382_wp, -90.09337685_wp, -131.27479631_wp, -17.38063225_wp, & + & -90.01302344_wp, -129.80780827_wp, -18.24664128_wp, -90.49692117_wp, & + & -129.77430844_wp, -17.15286388_wp, -89.10498879_wp, -139.24604002_wp, & + & -17.02213644_wp, -98.32219712_wp, -137.80281097_wp, -16.96832013_wp, & + & -98.23073984_wp, -137.46314420_wp, -16.81723653_wp, -96.74596975_wp, & + & -138.32073168_wp, -16.48467470_wp, -95.93298842_wp, -139.72020802_wp, & + & -16.71071868_wp, -97.48007042_wp, -137.38731527_wp, -17.89839149_wp, & + & -98.63271907_wp, -137.23964043_wp, -15.77720913_wp, -99.01418033_wp, & + & -137.52205536_wp, -15.87588525_wp, -100.05895188_wp, -137.64460804_wp, & + & -14.84764046_wp, -98.62235295_wp, -136.15695209_wp, -15.75322800_wp, & + & -98.94114062_wp, -136.19100829_wp, -17.04263767_wp, -96.43397630_wp, & + & -135.63184355_wp, -16.85335873_wp, -95.11265295_wp, -134.11280677_wp, & + & -16.78110059_wp, -95.28585446_wp, -133.57753649_wp, -17.15531669_wp, & + & -96.32527987_wp, -135.50803256_wp, -17.32710603_wp, -97.12941320_wp, & + & -136.02086717_wp, -15.91927936_wp, -94.69378360_wp, -135.99203254_wp, & + & -18.01787966_wp, -94.18324032_wp, -137.07377546_wp, -18.08468111_wp, & + & -94.10308191_wp, -135.60678799_wp, -18.95078397_wp, -94.58681200_wp, & + & -135.57342590_wp, -17.85715635_wp, -93.19476125_wp, -145.04523595_wp, & + & -17.72362168_wp, -102.41170644_wp, -143.60198477_wp, -17.67027392_wp, & + & -102.32031680_wp, -143.26213758_wp, -17.51929095_wp, -100.83557038_wp, & + & -144.11962013_wp, -17.18681541_wp, -100.02244593_wp, -145.51928101_wp, & + & -17.41221435_wp, -101.56950883_wp, -143.18679617_wp, -18.60048833_wp, & + & -102.72228885_wp, -143.03847490_wp, -16.47935833_wp, -103.10381225_wp, & + & -143.32107116_wp, -16.57791896_wp, -104.14854564_wp, -143.44305162_wp, & + & -15.54964760_wp, -102.71191571_wp, -141.95576903_wp, -16.45577012_wp, & + & -103.03092422_wp, -141.98992383_wp, -17.74462060_wp, -100.52381845_wp, & + & -141.43048515_wp, -17.55566903_wp, -99.20257114_wp, -139.91143569_wp, & + & -17.48390602_wp, -99.37598128_wp, -139.37644926_wp, -17.85792565_wp, & + & -100.41562217_wp, -141.30714364_wp, -18.02917289_wp, -101.21941394_wp, & + & -141.81909666_wp, -16.62148931_wp, -98.78353922_wp, -141.79091893_wp, & + & -18.72015095_wp, -98.27320328_wp, -142.87267243_wp, -18.78662037_wp, & + & -98.19291380_wp, -141.40601624_wp, -19.65314319_wp, -98.67689882_wp, & + & -141.37213686_wp, -18.55964328_wp, -97.28476379_wp, -150.84467109_wp, & + & -18.42257514_wp, -106.50199537_wp, -149.40141338_wp, -18.36951917_wp, & + & -106.41034349_wp, -149.06169027_wp, -18.21868681_wp, -104.92554108_wp, & + & -149.91924129_wp, -17.88634705_wp, -104.11243719_wp, -151.31881521_wp, & + & -18.11138776_wp, -105.65977504_wp, -148.98632678_wp, -19.29979012_wp, & + & -106.81229432_wp, -148.83755535_wp, -17.17866511_wp, -107.19368619_wp, & + & -149.12005750_wp, -17.27708901_wp, -108.23845758_wp, -149.24198374_wp, & + & -16.24889991_wp, -106.80176363_wp, -147.75485362_wp, -17.15530594_wp, & + & -107.12067807_wp, -147.78945287_wp, -18.44392904_wp, -104.61377051_wp, & + & -147.22998990_wp, -18.25531329_wp, -103.29247851_wp, -145.71087861_wp, & + & -18.18436178_wp, -103.46579485_wp, -145.17607499_wp, -18.55813312_wp, & + & -104.50561902_wp, -147.10670471_wp, -18.72850351_wp, -105.30939187_wp, & + & -147.61806560_wp, -17.32090519_wp, -102.87345068_wp, -147.59114708_wp, & + & -19.41958864_wp, -102.36313496_wp, -148.67294530_wp, -19.48547817_wp, & + & -102.28297502_wp, -147.20669326_wp, -20.35279144_wp, -102.76677148_wp, & + & -147.17239981_wp, -19.25929738_wp, -101.37464706_wp, -156.64377467_wp, & + & -19.11912100_wp, -110.59383066_wp, -155.20049561_wp, -19.06632209_wp, & + & -110.50205277_wp, -154.86088869_wp, -18.91567908_wp, -109.01717303_wp, & + & -155.71858909_wp, -18.58363166_wp, -108.20410430_wp, -157.11785234_wp, & + & -18.80826673_wp, -109.75144192_wp, -154.78549671_wp, -19.99663162_wp, & + & -110.90401020_wp, -154.63639372_wp, -17.87550428_wp, -111.28526770_wp, & + & -154.91886797_wp, -17.97380295_wp, -112.33005907_wp, -155.04069281_wp, & + & -16.94570192_wp, -110.89329928_wp, -153.55369247_wp, -17.85232287_wp, & + & -111.21221426_wp, -153.58864233_wp, -19.14075796_wp, -108.70527978_wp, & + & -153.02944601_wp, -18.95268752_wp, -107.38377325_wp, -151.51023774_wp, & + & -18.88229393_wp, -107.55659707_wp, -150.97529797_wp, -19.25562205_wp, & + & -108.59650925_wp, -152.90578050_wp, -19.42517088_wp, -109.40085440_wp, & + & -153.41722961_wp, -18.01820938_wp, -106.96462498_wp, -153.39138332_wp, & + & -20.11702304_wp, -106.45480824_wp, -154.47323609_wp, -20.18250469_wp, & + & -106.37505015_wp, -153.00715018_wp, -21.05029003_wp, -106.85850557_wp, & + & -152.97293399_wp, -19.95711804_wp, -105.46613292_wp, -162.44459783_wp, & + & -19.81448276_wp, -114.68410770_wp, -161.00123395_wp, -19.76174836_wp, & + & -114.59320684_wp, -160.66075014_wp, -19.61100204_wp, -113.10852087_wp, & + & -161.51813844_wp, -19.27936772_wp, -112.29494579_wp, -162.91810107_wp, & + & -19.50390964_wp, -113.84128594_wp, -160.58651388_wp, -20.69214310_wp, & + & -114.99526712_wp, -160.43761865_wp, -18.57110443_wp, -115.37702262_wp, & + & -160.72086531_wp, -18.66959177_wp, -116.42159022_wp, -160.84158980_wp, & + & -17.64120626_wp, -114.98494526_wp, -159.35486528_wp, -18.54796357_wp, & + & -115.30477932_wp, -159.38824359_wp, -19.83557502_wp, -112.79729195_wp, & + & -158.82874373_wp, -19.64800670_wp, -111.47581535_wp, -157.30951136_wp, & + & -19.57799104_wp, -111.64871002_wp, -156.77475283_wp, -19.95088252_wp, & + & -112.68886835_wp, -158.70558308_wp, -20.11973538_wp, -113.49316023_wp, & + & -159.21619349_wp, -18.71352707_wp, -111.05635851_wp, -159.19094963_wp, & + & -20.81248916_wp, -110.54713568_wp, -160.27281905_wp, -20.87770234_wp, & + & -110.46736939_wp, -158.80697504_wp, -21.74575382_wp, -110.95108561_wp, & + & -158.77244296_wp, -20.65296116_wp, -109.55842574_wp, -168.24718287_wp, & + & -20.51228884_wp, -118.77230538_wp, -166.80382760_wp, -20.45841823_wp, & + & -118.68173367_wp, -166.46298407_wp, -20.30721588_wp, -117.19718329_wp, & + & -167.32040251_wp, -19.97633271_wp, -116.38333187_wp, -168.72078908_wp, & + & -20.20243826_wp, -117.92928127_wp, -166.38846813_wp, -21.38854380_wp, & + & -119.08376619_wp, -166.24144454_wp, -19.26746688_wp, -119.46596936_wp, & + & -166.52511629_wp, -19.36634246_wp, -120.51038764_wp, -166.64593897_wp, & + & -18.33781367_wp, -119.07385086_wp, -165.15867845_wp, -19.24350152_wp, & + & -119.39425211_wp, -165.19013357_wp, -20.53052584_wp, -116.88646208_wp, & + & -164.63016749_wp, -20.34271260_wp, -115.56520517_wp, -163.11096995_wp, & + & -20.27299504_wp, -115.73873410_wp, -162.57679509_wp, -20.64571802_wp, & + & -116.77926039_wp, -164.50751803_wp, -20.81422600_wp, -117.58257890_wp, & + & -165.01722353_wp, -19.40802691_wp, -115.14583329_wp, -164.99237431_wp, & + & -21.50686730_wp, -114.63612570_wp, -166.07424173_wp, -21.57176629_wp, & + & -114.55604097_wp, -164.60878323_wp, -22.44033556_wp, -115.03996978_wp, & + & -164.57355206_wp, -21.34721995_wp, -113.64757167_wp, -174.04861740_wp, & + & -21.21259028_wp, -122.86203554_wp, -172.60529573_wp, -21.15786981_wp, & + & -122.77159040_wp, -172.26470135_wp, -21.00610826_wp, -121.28702901_wp, & + & -173.12257010_wp, -20.67599473_wp, -120.47332106_wp, -174.52218103_wp, & + & -20.90319493_wp, -122.01879858_wp, -172.18935263_wp, -22.08789098_wp, & + & -123.17327335_wp, -172.04363047_wp, -19.96688188_wp, -123.55627023_wp, & + & -172.32740916_wp, -20.06625962_wp, -124.60061452_wp, -172.44855873_wp, & + & -19.03730920_wp, -123.16441182_wp, -170.96086821_wp, -19.94232287_wp, & + & -123.48473115_wp, -170.99171418_wp, -21.22814572_wp, -120.97606267_wp, & + & -170.43243223_wp, -21.04036524_wp, -119.65450075_wp, -168.91318873_wp, & + & -20.97024153_wp, -119.82739809_wp, -168.37859252_wp, -21.34206758_wp, & + & -120.86804012_wp, -170.30861651_wp, -21.51121570_wp, -121.67197085_wp, & + & -170.81979801_wp, -20.10575393_wp, -119.23522936_wp, -170.79511473_wp, & + & -22.20462927_wp, -118.72575955_wp, -171.87703868_wp, -22.26959830_wp, & + & -118.64643719_wp, -170.41120276_wp, -23.13803762_wp, -119.12943205_wp, & + & -170.37700977_wp, -22.04505165_wp, -117.73689757_wp, -179.85199317_wp, & + & -21.91639289_wp, -126.94871755_wp, -178.40865938_wp, -21.86042692_wp, & + & -126.85927149_wp, -178.06714852_wp, -21.70798151_wp, -125.37500211_wp, & + & -178.92475509_wp, -21.37860976_wp, -124.56071871_wp, -180.32529282_wp, & + & -21.60693168_wp, -126.10536156_wp, -177.99218162_wp, -22.79022681_wp, & + & -127.26091637_wp, -177.84859990_wp, -20.66922846_wp, -127.64477897_wp, & + & -178.13339805_wp, -20.76905274_wp, -128.68880439_wp, -178.25374704_wp, & + & -19.73983940_wp, -127.25271143_wp, -176.76578390_wp, -20.64391899_wp, & + & -127.57438135_wp, -176.79367320_wp, -21.92853654_wp, -125.06498977_wp, & + & -176.23385546_wp, -21.74121984_wp, -123.74360671_wp, -174.71471319_wp, & + & -21.67046427_wp, -123.91708576_wp, -174.18034490_wp, -22.04180848_wp, & + & -124.95801441_wp, -176.11087638_wp, -22.21129416_wp, -125.76131527_wp, & + & -176.62135516_wp, -20.80698598_wp, -123.32362810_wp, -176.59569488_wp, & + & -22.90615718_wp, -122.81536916_wp, -177.67756783_wp, -22.97171492_wp, & + & -122.73582083_wp, -176.21140600_wp, -23.83915185_wp, -123.21964284_wp, & + & -176.17742827_wp, -22.74690151_wp, -121.82652657_wp, -185.65577942_wp, & + & -22.62225658_wp, -131.03492449_wp, -184.21246259_wp, -22.56582888_wp, & + & -130.94528716_wp, -183.87105834_wp, -22.41273053_wp, -129.46105659_wp, & + & -184.72874139_wp, -22.08326859_wp, -128.64689713_wp, -186.12932183_wp, & + & -22.31258758_wp, -130.19178976_wp, -183.79565842_wp, -23.49564419_wp, & + & -131.34655364_wp, -183.65260665_wp, -21.37473386_wp, -131.73110802_wp, & + & -183.93718570_wp, -21.47498539_wp, -132.77515065_wp, -184.05807445_wp, & + & -20.44532711_wp, -131.33941029_wp, -182.56980886_wp, -21.34909821_wp, & + & -131.66051850_wp, -182.59748532_wp, -22.63274356_wp, -129.15102136_wp, & + & -182.03751262_wp, -22.44490401_wp, -127.82977197_wp, -180.51839472_wp, & + & -22.37419616_wp, -128.00359996_wp, -179.98429781_wp, -22.74545133_wp, & + & -129.04470468_wp, -181.91466386_wp, -22.91560556_wp, -129.84728983_wp, & + & -182.42481054_wp, -21.51041453_wp, -127.41015933_wp, -182.39943832_wp, & + & -23.60934837_wp, -126.90096752_wp, -183.48132075_wp, -23.67470350_wp, & + & -126.82135957_wp, -182.01530818_wp, -24.54259143_wp, -127.30481590_wp, & + & -181.98112796_wp, -23.44968614_wp, -125.91221107_wp, -191.45906878_wp, & + & -23.32733498_wp, -135.12235768_wp, -190.01572147_wp, -23.27133564_wp, & + & -135.03252289_wp, -189.67438598_wp, -23.11812513_wp, -133.54825281_wp, & + & -190.53206647_wp, -22.78835013_wp, -132.73422589_wp, -191.93264981_wp, & + & -23.01694512_wp, -134.27951342_wp, -189.59914380_wp, -24.20131530_wp, & + & -135.43362944_wp, -189.45541568_wp, -22.08047511_wp, -135.81839148_wp, & + & -189.73991994_wp, -22.18068635_wp, -136.86245892_wp, -189.86061276_wp, & + & -21.15091019_wp, -135.42678577_wp, -188.37261478_wp, -22.05517691_wp, & + & -135.74770432_wp, -188.40085312_wp, -23.33829227_wp, -133.23805351_wp, & + & -187.84106469_wp, -23.15085805_wp, -131.91664395_wp, -186.32190045_wp, & + & -23.07992376_wp, -132.09007651_wp, -185.78748710_wp, -23.45106189_wp, & + & -133.13105552_wp, -187.71805284_wp, -23.62141367_wp, -133.93422594_wp, & + & -188.22859555_wp, -22.21661001_wp, -131.49672531_wp, -188.20292010_wp, & + & -24.31577046_wp, -130.98838618_wp, -189.28480041_wp, -24.38142021_wp, & + & -130.90900521_wp, -187.81848344_wp, -25.24875130_wp, -131.39255144_wp, & + & -187.78482069_wp, -24.15642784_wp, -129.99948934_wp, -197.25979116_wp, & + & -24.02521079_wp, -139.21489834_wp, -195.81652681_wp, -23.97091009_wp, & + & -139.12239402_wp, -195.47705073_wp, -23.81887415_wp, -137.63756738_wp, & + & -196.33513494_wp, -23.48770335_wp, -136.82457186_wp, -197.73492175_wp, & + & -23.71395625_wp, -138.37329934_wp, -195.40049452_wp, -24.90113501_wp, & + & -139.52348227_wp, -195.25351732_wp, -22.78019897_wp, -139.90657793_wp, & + & -195.53631421_wp, -22.87943972_wp, -140.95119910_wp, -195.65833604_wp, & + & -21.85041695_wp, -139.51509261_wp, -194.17081056_wp, -22.75618449_wp, & + & -139.83398578_wp, -194.20424273_wp, -24.04156439_wp, -137.32598577_wp, & + & -193.64468756_wp, -23.85461760_wp, -136.00439542_wp, -192.12536438_wp, & + & -23.78475691_wp, -136.17752682_wp, -191.59106145_wp, -24.15655264_wp, & + & -137.21832465_wp, -193.52144044_wp, -24.32571710_wp, -138.02174248_wp, & + & -194.03167293_wp, -22.92013000_wp, -135.58452449_wp, -194.00743814_wp, & + & -25.01934476_wp, -135.07625569_wp, -195.08937060_wp, -25.08447380_wp, & + & -134.99716220_wp, -193.62334500_wp, -25.95252515_wp, -135.48028780_wp, & + & -193.58952182_wp, -24.86019450_wp, -134.08724493_wp, -203.05281456_wp, & + & -24.72711603_wp, -143.31866296_wp, -201.60976695_wp, -24.67058409_wp, & + & -143.22387677_wp, -201.27280240_wp, -24.51755557_wp, -141.73860544_wp, & + & -202.13239417_wp, -24.18615513_wp, -140.92729270_wp, -203.52995245_wp, & + & -24.41472836_wp, -142.47864021_wp, -201.19197885_wp, -25.60035990_wp, & + & -143.62416727_wp, -201.04728049_wp, -23.47935242_wp, -144.00762836_wp, & + & -201.32772354_wp, -23.57967969_wp, -145.05277782_wp, -201.45450788_wp, & + & -22.55004949_wp, -143.61752284_wp, -199.96476822_wp, -23.45342720_wp, & + & -143.93278818_wp, -200.00052160_wp, -24.73983269_wp, -141.42446558_wp, & + & -199.44387929_wp, -24.55140050_wp, -140.10180583_wp, -197.92412160_wp, & + & -24.48271840_wp, -140.27134283_wp, -197.38758803_wp, -24.85541637_wp, & + & -141.31066903_wp, -199.31621234_wp, -25.02416806_wp, -142.11864482_wp, & + & -199.83132224_wp, -23.61606991_wp, -139.68421296_wp, -199.80967726_wp, & + & -25.71455433_wp, -139.17289750_wp, -200.89184171_wp, -25.77867565_wp, & + & -139.09619867_wp, -199.42544805_wp, -26.64860626_wp, -139.57478133_wp, & + & -199.39390257_wp, -25.55437773_wp, -138.18315296_wp, -208.83507534_wp, & + & -25.47079546_wp, -147.43023353_wp, -207.39264620_wp, -25.40638513_wp, & + & -147.33223754_wp, -207.05975419_wp, -25.24503989_wp, -145.84696813_wp, & + & -207.92224550_wp, -24.91235558_wp, -145.03928962_wp, -209.31620207_wp, & + & -25.15235785_wp, -146.59480877_wp, -206.96934566_wp, -26.33565455_wp, & + & -147.72779234_wp, -206.83466693_wp, -24.21537942_wp, -148.11958361_wp, & + & -207.11292130_wp, -24.32083911_wp, -149.16480967_wp, -207.24690339_wp, & + & -23.28660804_wp, -147.73347800_wp, -205.75240984_wp, -24.18398169_wp, & + & -148.04309748_wp, -205.78747148_wp, -25.46172110_wp, -145.52903823_wp, & + & -205.23386572_wp, -25.26542144_wp, -144.20628946_wp, -203.71411238_wp, & + & -25.19204300_wp, -144.37376405_wp, -203.17467935_wp, -25.56768854_wp, & + & -145.41053882_wp, -205.10082898_wp, -25.74715337_wp, -146.22048584_wp, & + & -205.62558169_wp, -24.32984610_wp, -143.79329701_wp, -205.59670733_wp, & + & -26.42616260_wp, -143.27319087_wp, -206.67871213_wp, -26.49332280_wp, & + & -143.19684781_wp, -205.20945437_wp, -27.36051764_wp, -143.67147148_wp, & + & -205.18193603_wp, -26.26108578_wp, -142.28382207_wp, -214.59862018_wp, & + & -26.22493972_wp, -151.55578505_wp, -213.15578172_wp, -26.18853213_wp, & + & -151.45141280_wp, -212.82740670_wp, -26.00978090_wp, -149.96718067_wp, & + & -213.68835850_wp, -25.65186618_wp, -149.16869071_wp, -215.07679929_wp, & + & -25.87766174_wp, -150.73014464_wp, -212.74993063_wp, -27.13277955_wp, & + & -151.82939557_wp, -212.56987283_wp, -25.02215222_wp, -152.25517103_wp, & + & -212.84463569_wp, -25.13923391_wp, -153.30008215_wp, -212.96547868_wp, & + & -24.07908158_wp, -151.88668351_wp, -211.48760172_wp, -25.01076119_wp, & + & -152.17318771_wp, -211.56038391_wp, -26.24168727_wp, -149.63926097_wp, & + & -211.01088834_wp, -26.03004062_wp, -148.31730944_wp, -209.49103764_wp, & + & -25.95206468_wp, -148.48134415_wp, -208.94686106_wp, -26.33784447_wp, & + & -149.51187357_wp, -210.87357062_wp, -26.54256854_wp, -150.32383154_wp, & + & -211.40782840_wp, -25.09193583_wp, -147.91526762_wp, -211.37215008_wp, & + & -27.18299723_wp, -147.37404010_wp, -212.45407603_wp, -27.25236927_wp, & + & -147.29856455_wp, -210.98188885_wp, -28.11994947_wp, -147.76317932_wp, & + & -210.95922515_wp, -27.00775508_wp, -146.38563215_wp, -220.35106411_wp, & + & -26.82058121_wp, -155.69734396_wp, -218.91078323_wp, -26.89519107_wp, & + & -155.58046811_wp, -218.57931595_wp, -26.68295550_wp, -154.10128334_wp, & + & -219.41791221_wp, -26.23686996_wp, -153.32368102_wp, -220.80331778_wp, & + & -26.38519599_wp, -154.89946042_wp, -218.58097371_wp, -27.88443260_wp, & + & -155.91494199_wp, -218.22852308_wp, -25.81483569_wp, -156.42701102_wp, & + & -218.50408753_wp, -25.95485935_wp, -157.46886304_wp, -218.55042361_wp, & + & -24.82834817_wp, -156.10330150_wp, -217.14926487_wp, -25.88500471_wp, & + & -156.33438044_wp, -217.33437916_wp, -26.99204391_wp, -153.75277777_wp, & + & -216.78180772_wp, -26.76388626_wp, -152.43507288_wp, -215.26028862_wp, & + & -26.72234843_wp, -152.59582656_wp, -214.72064789_wp, -27.14829828_wp, & + & -153.61273124_wp, -216.66204096_wp, -27.35248574_wp, -154.42239601_wp, & + & -217.16032113_wp, -25.80906015_wp, -152.05558135_wp, -217.16972925_wp, & + & -27.88882514_wp, -151.46878461_wp, -218.25292065_wp, -27.93315988_wp, & + & -151.39312494_wp, -216.79960957_wp, -28.84194213_wp, -151.83787809_wp, & + & -216.75382982_wp, -27.70248575_wp, -150.48361060_wp, -226.14942302_wp, & + & -27.46919753_wp, -159.78392815_wp, -224.71281688_wp, -27.58820580_wp, & + & -159.66011554_wp, -224.36615599_wp, -27.25046731_wp, -158.20810690_wp, & + & -225.17667700_wp, -26.68574598_wp, -157.47949458_wp, -226.58058222_wp, & + & -26.92768337_wp, -159.04150540_wp, -224.42302375_wp, -28.61628258_wp, & + & -159.90103668_wp, -223.99417906_wp, -26.61773379_wp, -160.60419148_wp, & + & -224.27119526_wp, -26.84946035_wp, -161.62916984_wp, -224.28606527_wp, & + & -25.59495635_wp, -160.37973424_wp, -222.91795722_wp, -26.71201148_wp, & + & -160.49859853_wp, -223.13813041_wp, -27.59057759_wp, -157.82959381_wp, & + & -222.56834021_wp, -27.26902062_wp, -156.53895230_wp, -221.04830514_wp, & + & -27.35558834_wp, -156.69452343_wp, -220.54209043_wp, -27.90414248_wp, & + & -157.66899305_wp, -222.48936537_wp, -28.05155941_wp, -158.45991564_wp, & + & -222.87325442_wp, -26.25447471_wp, -156.26149371_wp, -223.03677292_wp, & + & -28.25554543_wp, -155.46329486_wp, -224.11963074_wp, -28.20678218_wp, & + & -155.38553502_wp, -222.74454170_wp, -29.26739776_wp, -155.73230629_wp, & + & -222.60149993_wp, -28.00343291_wp, -154.50130233_wp, -231.88468334_wp, & + & -28.04264352_wp, -163.91186721_wp, -230.48768359_wp, -28.35771590_wp, & + & -163.70654303_wp, -230.13110785_wp, -27.88477018_wp, -162.29500034_wp, & + & -230.86996028_wp, -27.12418844_wp, -161.67679582_wp, -232.23985277_wp, & + & -27.32932675_wp, -163.28329971_wp, -230.35664785_wp, -29.44085383_wp, & + & -163.79911533_wp, -229.60195849_wp, -27.64264353_wp, -164.73300208_wp, & + & -229.88558646_wp, -27.96318782_wp, -165.73185688_wp, -229.73419175_wp, & + & -26.56656201_wp, -164.65415517_wp, -228.55666800_wp, -27.88484402_wp, & + & -164.56758149_wp, -228.97526267_wp, -28.34270192_wp, -161.82325932_wp, & + & -228.38654317_wp, -27.91491548_wp, -160.57277464_wp, -226.87213167_wp, & + & -28.08664946_wp, -160.71335023_wp, -226.39295894_wp, -28.76766080_wp, & + & -161.61503053_wp, -228.37348090_wp, -28.94419904_wp, -162.37626914_wp, & + & -228.64581753_wp, -26.86405118_wp, -160.40725687_wp, -228.89642147_wp, & + & -28.76087327_wp, -159.40066394_wp, -229.97603148_wp, -28.65887680_wp, & + & -159.33110295_wp, -228.64758362_wp, -29.80701362_wp, -159.55949115_wp, & + & -228.44905534_wp, -28.42677304_wp, -158.46962761_wp, -237.69934536_wp, & + & -28.61588987_wp, -167.94998181_wp, -236.35332333_wp, -29.07049994_wp, & + & -167.67647153_wp, -235.90735889_wp, -28.37638519_wp, -166.38683479_wp, & + & -236.52864737_wp, -27.41824414_wp, -165.93684937_wp, -237.93535275_wp, & + & -27.73970679_wp, -167.49550101_wp, -236.37322320_wp, -30.15753579_wp, & + & -167.54656509_wp, -235.40187982_wp, -28.70513894_wp, -168.82109558_wp, & + & -235.74860784_wp, -29.17678650_wp, -169.73662906_wp, -235.38448417_wp, & + & -27.62741142_wp, -168.96174031_wp, -234.39599448_wp, -29.05121613_wp, & + & -168.60430665_wp, -234.81010267_wp, -28.87703738_wp, -165.82709260_wp, & + & -234.16063322_wp, -28.30021391_wp, -164.67004405_wp, -232.68835181_wp, & + & -28.71274675_wp, -164.73255465_wp, -232.31206045_wp, -29.61074570_wp, & + & -165.47971514_wp, -234.30274328_wp, -29.65188007_wp, -166.24139177_wp, & + & -234.26218360_wp, -27.21106337_wp, -164.71993638_wp, -234.78878679_wp, & + & -28.81566470_wp, -163.37018978_wp, -235.83977579_wp, -28.54014822_wp, & + & -163.35011731_wp, -234.70408283_wp, -29.89821600_wp, -163.31908796_wp, & + & -234.29258568_wp, -28.37947508_wp, -162.50874158_wp, -243.48112771_wp, & + & -29.15188365_wp, -171.97585374_wp, -242.26365738_wp, -29.76551874_wp, & + & -171.49326382_wp, -241.71464812_wp, -28.86874065_wp, -170.38124856_wp, & + & -242.11744137_wp, -27.71933334_wp, -170.23331899_wp, -243.52639457_wp, & + & -28.14973353_wp, -171.83154530_wp, -242.51113236_wp, -30.76012545_wp, & + & -171.10808110_wp, -241.22443688_wp, -29.88821193_wp, -172.61374579_wp, & + & -241.63538260_wp, -30.49539957_wp, -173.41609047_wp, -240.98208047_wp, & + & -28.90355758_wp, -173.00591951_wp, -240.31742942_wp, -30.35642879_wp, & + & -172.24332585_wp, -240.77443988_wp, -29.42892677_wp, -169.62411094_wp, & + & -240.01517497_wp, -28.71604340_wp, -168.62000327_wp, -238.61564369_wp, & + & -29.33595867_wp, -168.59084767_wp, -238.39204734_wp, -30.42437657_wp, & + & -169.11181320_wp, -240.42997021_wp, -30.36352682_wp, -169.81511831_wp, & + & -239.96851642_wp, -27.66105239_wp, -168.90863441_wp, -240.66602592_wp, & + & -28.84747563_wp, -167.23852725_wp, -241.66716306_wp, -28.42667471_wp, & + & -167.27385242_wp, -240.73109963_wp, -29.89523352_wp, -166.95634950_wp, & + & -240.08420711_wp, -28.31463937_wp, -166.49258806_wp, -247.78888452_wp, & + & -30.55289040_wp, -176.89845383_wp, -247.28332163_wp, -30.98486152_wp, & + & -175.60552989_wp, -246.52883751_wp, -29.83645309_wp, -174.94640406_wp, & + & -245.84933110_wp, -29.05005789_wp, -175.59934014_wp, -247.10416387_wp, & + & -29.92877716_wp, -177.31769625_wp, -248.14005787_wp, -31.27412167_wp, & + & -174.98634330_wp, -246.28405561_wp, -32.15561733_wp, -175.67388503_wp, & + & -246.77563113_wp, -33.04703440_wp, -176.05521979_wp, -245.45908032_wp, & + & -31.89204231_wp, -176.33434996_wp, -245.87408981_wp, -32.36687289_wp, & + & -174.68829649_wp, -246.64956413_wp, -29.76933032_wp, -173.61168524_wp, & + & -245.74575418_wp, -28.97540192_wp, -172.80545203_wp, -244.52142507_wp, & + & -29.83435296_wp, -172.45387113_wp, -244.52460560_wp, -31.05220876_wp, & + & -172.60278009_wp, -247.10229636_wp, -30.53428437_wp, -173.13186313_wp, & + & -245.42359803_wp, -28.13425494_wp, -173.42738648_wp, -246.44189938_wp, & + & -28.49203145_wp, -171.53641505_wp, -247.31948482_wp, -27.90884632_wp, & + & -171.79876159_wp, -246.74870995_wp, -29.34365605_wp, -170.93378305_wp, & + & -245.76921889_wp, -27.87408592_wp, -170.94940219_wp, -247.89901938_wp, & + & -31.35226662_wp, -177.51272334_wp, 4.35416020_wp, 0.16324905_wp, & + & 5.28892191_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_88 + +subroutine polyala_92(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 923 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.38509730_wp, -0.13546176_wp, 0.03333215_wp, 0.80797018_wp, & + & 0.59999749_wp, 0.39172157_wp, 1.74693461_wp, -0.37192141_wp, & + & 1.10799392_wp, 1.33119825_wp, -1.41970978_wp, 1.58935328_wp, & + & -0.62011292_wp, -0.88356730_wp, 0.67476975_wp, 1.25921806_wp, & + & 0.97870728_wp, -0.53072158_wp, 0.47342391_wp, 1.76032583_wp, & + & 1.33552378_wp, -0.20967534_wp, 2.44465452_wp, 0.84043612_wp, & + & 0.00518999_wp, 1.37842955_wp, 2.23942477_wp, 1.37361268_wp, & + & 2.29626263_wp, 1.61927978_wp, 3.03092997_wp, 0.00205672_wp, & + & 1.14752171_wp, 3.98548861_wp, -0.68546244_wp, 1.99038577_wp, & + & 3.75382701_wp, -0.28934032_wp, 3.44777202_wp, 2.98274713_wp, & + & 0.57791007_wp, 3.79137569_wp, 3.28480865_wp, 0.92668955_wp, & + & 0.83126462_wp, 3.78407557_wp, -1.76066291_wp, 1.91890546_wp, & + & 5.41619348_wp, -0.37510438_wp, 1.56457234_wp, 5.56568403_wp, & + & -0.68088839_wp, 0.53390753_wp, 5.61426848_wp, 0.69003918_wp, & + & 1.65484191_wp, 6.10926056_wp, -0.91718015_wp, 2.20024500_wp, & + & 4.49057462_wp, -0.99234928_wp, 4.27959651_wp, -6.15323646_wp, & + & -0.58730622_wp, -4.02537728_wp, -4.83544759_wp, -0.02024210_wp, & + & -3.83828666_wp, -4.20562002_wp, -0.73785772_wp, -2.64139304_wp, & + & -4.88882380_wp, -1.40559471_wp, -1.87112595_wp, -6.54825286_wp, & + & -0.99382785_wp, -3.18422010_wp, -4.25322528_wp, -0.19632116_wp, & + & -4.74851893_wp, -4.91597302_wp, 1.48385416_wp, -3.55549127_wp, & + & -5.38344654_wp, 1.98269102_wp, -4.39992360_wp, -5.51075517_wp, & + & 1.66364771_wp, -2.66360659_wp, -3.92260600_wp, 1.89625723_wp, & + & -3.40700668_wp, -2.89315807_wp, -0.56340212_wp, -2.50926812_wp, & + & -2.12692910_wp, -1.03313429_wp, -1.37564616_wp, -1.00154558_wp, & + & -0.02285627_wp, -1.14166545_wp, -0.70564803_wp, 0.80836191_wp, & + & -1.99392468_wp, -2.37520717_wp, 0.04132738_wp, -3.13717196_wp, & + & -2.79204875_wp, -1.08222671_wp, -0.50737278_wp, -1.52921550_wp, & + & -2.41804233_wp, -1.64929989_wp, -2.33423621_wp, -3.12626242_wp, & + & -1.82556536_wp, -0.89047230_wp, -2.38096074_wp, -2.52804280_wp, & + & -0.94213471_wp, -2.75469529_wp, -0.80002520_wp, -11.78786195_wp, & + & -1.54896855_wp, -8.22852589_wp, -10.40717075_wp, -1.13165967_wp, & + & -8.11344383_wp, -9.96118905_wp, -1.47279741_wp, -6.68947156_wp, & + & -10.77934147_wp, -1.76786473_wp, -5.82334474_wp, -12.24861683_wp, & + & -1.69194163_wp, -7.33546749_wp, -9.81152407_wp, -1.68385033_wp, & + & -8.84808398_wp, -10.26105809_wp, 0.37334710_wp, -8.36442004_wp, & + & -10.61785803_wp, 0.60098039_wp, -9.36539486_wp, -10.85015101_wp, & + & 0.93207320_wp, -7.64173884_wp, -9.22107880_wp, 0.67406291_wp, & + & -8.28393051_wp, -8.64971463_wp, -1.40740912_wp, -6.47957335_wp, & + & -8.02919402_wp, -1.56970895_wp, -5.18279845_wp, -6.71754484_wp, & + & -0.78183829_wp, -5.21448365_wp, -6.24228864_wp, -0.38294932_wp, & + & -6.27317026_wp, -8.00640638_wp, -1.12008196_wp, -7.20989171_wp, & + & -8.70460716_wp, -1.16860955_wp, -4.41990206_wp, -7.74038096_wp, & + & -3.04636528_wp, -4.88886997_wp, -8.67609680_wp, -3.59883231_wp, & + & -4.88849152_wp, -7.08549377_wp, -3.45743207_wp, -5.65288273_wp, & + & -7.26488894_wp, -3.15636622_wp, -3.91889157_wp, -17.52556315_wp, & + & -2.27530555_wp, -12.34826650_wp, -16.10387206_wp, -2.02202934_wp, & + & -12.25705945_wp, -15.71105211_wp, -2.22290577_wp, -10.79145929_wp, & + & -16.56224266_wp, -2.26895511_wp, -9.90832243_wp, -18.01192238_wp, & + & -2.20532115_wp, -11.46041105_wp, -15.58055013_wp, -2.73575592_wp, & + & -12.90181902_wp, -15.76690114_wp, -0.59181049_wp, -12.69337342_wp, & + & -16.08010247_wp, -0.45146697_wp, -13.72442533_wp, -16.28905743_wp, & + & 0.12323495_wp, -12.06272218_wp, -14.69821774_wp, -0.41453662_wp, & + & -12.62157755_wp, -14.40379441_wp, -2.31899217_wp, -10.56846636_wp, & + & -13.80960746_wp, -2.38348521_wp, -9.25093385_wp, -12.38596976_wp, & + & -1.83639718_wp, -9.38044817_wp, -11.85663990_wp, -1.70332991_wp, & + & -10.47985813_wp, -13.72621150_wp, -2.24718519_wp, -11.32066881_wp, & + & -14.40331473_wp, -1.76571971_wp, -8.56911205_wp, -13.76734989_wp, & + & -3.82524369_wp, -8.73226554_wp, -14.78108110_wp, -4.21303437_wp, & + & -8.67839177_wp, -13.18430060_wp, -4.44739723_wp, -9.40641951_wp, & + & -13.32270345_wp, -3.85988619_wp, -7.74252409_wp, -23.22617050_wp, & + & -3.12677089_wp, -16.49219775_wp, -21.78462727_wp, -3.05120345_wp, & + & -16.39280106_wp, -21.44994235_wp, -3.00089074_wp, -14.90009844_wp, & + & -22.32029688_wp, -2.77836538_wp, -14.06358330_wp, -23.70807208_wp, & + & -2.87601574_wp, -15.63445299_wp, -21.35059995_wp, -3.94290757_wp, & + & -16.85745878_wp, -21.24549905_wp, -1.79813284_wp, -17.09202203_wp, & + & -21.51932490_wp, -1.83438258_wp, -18.14309566_wp, -21.67514816_wp, & + & -0.90605943_wp, -16.64351380_wp, -20.16399659_wp, -1.75189905_wp, & + & -17.01001402_wp, -20.16847568_wp, -3.19452248_wp, -14.60411242_wp, & + & -19.61414576_wp, -3.05726662_wp, -13.27472607_wp, -18.13356250_wp, & + & -2.71027776_wp, -13.44779554_wp, -17.57282627_wp, -2.85105250_wp, & + & -14.53050030_wp, -19.47020784_wp, -3.34626392_wp, -15.32486409_wp, & + & -20.14463269_wp, -2.25190812_wp, -12.75596478_wp, -19.75293448_wp, & + & -4.35941263_wp, -12.47807713_wp, -20.80633607_wp, -4.61130471_wp, & + & -12.38994039_wp, -19.23569914_wp, -5.16695380_wp, -12.98980776_wp, & + & -19.33306010_wp, -4.24316497_wp, -11.48364324_wp, -28.99120839_wp, & + & -3.70213480_wp, -20.63733781_wp, -27.54774056_wp, -3.68882633_wp, & + & -20.53641475_wp, -27.21523418_wp, -3.56977993_wp, -19.04704327_wp, & + & -28.07280563_wp, -3.23917821_wp, -18.23318327_wp, -29.46153950_wp, & + & -3.39175273_wp, -19.79255516_wp, -27.15495561_wp, -4.62435186_wp, & + & -20.94861433_wp, -26.94730616_wp, -2.50312423_wp, -21.29999408_wp, & + & -27.22265957_wp, -2.58194954_wp, -22.34833633_wp, -27.33212186_wp, & + & -1.56823168_wp, -20.90070015_wp, -25.86501216_wp, -2.50721793_wp, & + & -21.21734514_wp, -25.94979909_wp, -3.82368161_wp, -18.72977153_wp, & + & -25.39833767_wp, -3.65726421_wp, -17.40214193_wp, -23.87991462_wp, & + & -3.55662202_wp, -17.56657313_wp, -23.33510585_wp, -3.87686102_wp, & + & -18.61896598_wp, -25.26279107_wp, -4.09149061_wp, -19.42775472_wp, & + & -25.80240368_wp, -2.73772498_wp, -16.96536613_wp, -25.74862543_wp, & + & -4.84567201_wp, -16.49975991_wp, -26.82985257_wp, -4.92830275_wp, & + & -16.42783853_wp, -25.34859578_wp, -5.76508960_wp, -16.91926459_wp, & + & -25.33862427_wp, -4.70042434_wp, -15.50523526_wp, -34.80204855_wp, & + & -4.29540390_wp, -24.73370021_wp, -33.35835873_wp, -4.25168807_wp, & + & -24.64483776_wp, -33.01528957_wp, -4.10925766_wp, -23.15995391_wp, & + & -33.86853497_wp, -3.77034598_wp, -22.34502204_wp, -35.27254671_wp, & + & -3.98066709_wp, -23.89075119_wp, -32.95007241_wp, -5.18295751_wp, & + & -25.05137061_wp, -32.78872218_wp, -3.06129008_wp, -25.42460100_wp, & + & -33.07410990_wp, -3.15367229_wp, -26.46914318_wp, -33.18639131_wp, & + & -2.13057545_wp, -25.02806896_wp, -31.70575000_wp, -3.04520460_wp, & + & -25.35386331_wp, -31.74537097_wp, -4.34946602_wp, -22.85009682_wp, & + & -31.18435194_wp, -4.17680954_wp, -21.52730594_wp, -29.66372871_wp, & + & -4.13937382_wp, -21.69698743_wp, -29.13465402_wp, -4.51679088_wp, & + & -22.73839733_wp, -31.06653332_wp, -4.64044306_wp, -23.54690651_wp, & + & -31.55199723_wp, -3.23507998_wp, -21.10614451_wp, -31.57301558_wp, & + & -5.33521476_wp, -20.60161734_wp, -32.65619892_wp, -5.37789846_wp, & + & -20.52451087_wp, -31.20769518_wp, -6.27560774_wp, -21.00636712_wp, & + & -31.15368211_wp, -5.18644672_wp, -19.61155751_wp, -40.61596168_wp, & + & -4.99931928_wp, -28.80464986_wp, -39.17263297_wp, -4.94157813_wp, & + & -28.71803744_wp, -38.82860159_wp, -4.78556180_wp, -27.23477833_wp, & + & -39.68405703_wp, -4.45146196_wp, -26.42019833_wp, -41.08831946_wp, & + & -4.68645359_wp, -27.96203954_wp, -38.75601332_wp, -5.87169934_wp, & + & -29.11873222_wp, -38.61492892_wp, -3.75122670_wp, -29.50651666_wp, & + & -38.90145572_wp, -3.85282993_wp, -30.54988869_wp, -39.01993037_wp, & + & -2.82149587_wp, -29.11510912_wp, -37.53199653_wp, -3.72518538_wp, & + & -29.43799771_wp, -37.55515449_wp, -5.00840331_wp, -26.92652450_wp, & + & -36.99165545_wp, -4.81850309_wp, -25.60719594_wp, -35.47268295_wp, & + & -4.75582715_wp, -25.78469520_wp, -34.94250387_wp, -5.13522163_wp, & + & -26.82485262_wp, -36.87486180_wp, -5.29583638_wp, -27.62342536_wp, & + & -37.37376428_wp, -3.88089530_wp, -25.18983085_wp, -37.35638888_wp, & + & -5.97828847_wp, -24.67362250_wp, -38.43833255_wp, -6.03852788_wp, & + & -24.59090213_wp, -36.97756345_wp, -6.91455479_wp, -25.07551485_wp, & + & -36.93466782_wp, -5.81735946_wp, -23.68650367_wp, -46.42524903_wp, & + & -5.72044614_wp, -32.87635818_wp, -44.98193699_wp, -5.66340275_wp, & + & -32.78858190_wp, -44.63866949_wp, -5.50865900_wp, -31.30505772_wp, & + & -45.49480889_wp, -5.17687038_wp, -30.49025173_wp, -46.89820126_wp, & + & -5.40872642_wp, -32.03367345_wp, -44.56541845_wp, -6.59339421_wp, & + & -33.18970042_wp, -44.42327920_wp, -4.47269611_wp, -33.57587401_wp, & + & -44.70872422_wp, -4.57378619_wp, -34.61959200_wp, -44.82867650_wp, & + & -3.54313919_wp, -33.18445610_wp, -43.34041847_wp, -4.44667420_wp, & + & -33.50622146_wp, -43.36495295_wp, -5.72984992_wp, -30.99662520_wp, & + & -42.80212673_wp, -5.53845985_wp, -29.67721987_wp, -41.28371482_wp, & + & -5.46463726_wp, -29.85533349_wp, -40.75132001_wp, -5.84021367_wp, & + & -30.89574442_wp, -42.68367259_wp, -6.01451359_wp, -31.69366652_wp, & + & -43.19080180_wp, -4.60432935_wp, -29.25815401_wp, -43.15832462_wp, & + & -6.70242217_wp, -28.74559503_wp, -44.23977588_wp, -6.77029502_wp, & + & -28.66236642_wp, -42.77324081_wp, -7.63529913_wp, -29.14939320_wp, & + & -42.73712706_wp, -6.54029765_wp, -27.75845597_wp, -52.22641504_wp, & + & -6.42821372_wp, -36.96283215_wp, -50.78324613_wp, -6.37334826_wp, & + & -36.87113452_wp, -50.44363496_wp, -6.22044624_wp, -35.38653532_wp, & + & -51.30140167_wp, -5.88814005_wp, -34.57365437_wp, -52.70104290_wp, & + & -6.11660659_wp, -36.12104987_wp, -50.36699079_wp, -7.30358227_wp, & + & -37.27195965_wp, -50.22075131_wp, -5.18273406_wp, -37.65583205_wp, & + & -50.50373876_wp, -5.28234715_wp, -38.70035965_wp, -50.62569413_wp, & + & -4.25293403_wp, -37.26451769_wp, -49.13802918_wp, -5.15846157_wp, & + & -37.58344307_wp, -49.17105023_wp, -6.44385710_wp, -35.07503610_wp, & + & -48.61084899_wp, -6.25436585_wp, -33.75420564_wp, -47.09198141_wp, & + & -6.18215868_wp, -33.92928024_wp, -46.55822303_wp, -6.55583519_wp, & + & -34.96969856_wp, -48.48833284_wp, -6.72851889_wp, -35.77069620_wp, & + & -48.99917627_wp, -5.32008883_wp, -33.33512562_wp, -48.97054267_wp, & + & -7.41865634_wp, -32.82434928_wp, -50.05226061_wp, -7.48534227_wp, & + & -32.74365957_wp, -48.58561386_wp, -8.35166283_wp, -33.22798507_wp, & + & -48.55144495_wp, -7.25782045_wp, -31.83610882_wp, -58.02407684_wp, & + & -7.12526030_wp, -41.05676955_wp, -56.58072983_wp, -7.07329068_wp, & + & -40.96522097_wp, -56.24105877_wp, -6.92138002_wp, -39.48049312_wp, & + & -57.09881246_wp, -6.58881838_wp, -38.66766955_wp, -58.49765801_wp, & + & -6.81355512_wp, -40.21439640_wp, -56.16630822_wp, -8.00430925_wp, & + & -41.36614053_wp, -56.01595016_wp, -5.88372119_wp, -41.74983048_wp, & + & -56.29865662_wp, -5.98299749_wp, -42.79446718_wp, -56.41956694_wp, & + & -4.95321527_wp, -41.35882863_wp, -54.93322449_wp, -5.86117769_wp, & + & -41.67698202_wp, -54.96880479_wp, -7.14588952_wp, -39.16829547_wp, & + & -54.41054676_wp, -6.95802204_wp, -37.84634107_wp, -52.89123304_wp, & + & -6.88770041_wp, -38.01800123_wp, -52.35551808_wp, -7.26092822_wp, & + & -39.05755530_wp, -54.28561319_wp, -7.43091390_wp, -39.86328070_wp, & + & -54.79849298_wp, -6.02350099_wp, -37.42743501_wp, -54.77361805_wp, & + & -8.12238080_wp, -36.91786435_wp, -55.85558250_wp, -8.18778939_wp, & + & -36.83951033_wp, -54.38892823_wp, -9.05564720_wp, -37.32112594_wp, & + & -54.35645214_wp, -7.96254219_wp, -35.92864704_wp, -63.82568990_wp, & + & -7.82036319_wp, -45.14704289_wp, -62.38231756_wp, -7.76729737_wp, & + & -45.05607713_wp, -62.04180326_wp, -7.61515258_wp, -43.57152586_wp, & + & -62.89917757_wp, -7.28280755_wp, -42.75822957_wp, -64.29931334_wp, & + & -7.50886027_wp, -44.30463707_wp, -61.96738814_wp, -8.69796863_wp, & + & -45.45726696_wp, -61.81887814_wp, -6.57724107_wp, -45.84092308_wp, & + & -62.10254204_wp, -6.67640011_wp, -46.88531381_wp, -62.22256704_wp, & + & -5.64702850_wp, -45.44929508_wp, -60.73609583_wp, -6.55419721_wp, & + & -45.76912445_wp, -60.76920371_wp, -7.83914338_wp, -43.26026225_wp, & + & -60.20967074_wp, -7.65183552_wp, -41.93874005_wp, -58.69032188_wp, & + & -7.58362945_wp, -42.11152573_wp, -58.15594150_wp, -7.95746961_wp, & + & -43.15154793_wp, -60.08663653_wp, -8.12434529_wp, -43.95580649_wp, & + & -60.59600804_wp, -6.71679240_wp, -41.51952315_wp, -60.57344567_wp, & + & -8.81570514_wp, -41.00990492_wp, -61.65542486_wp, -8.87975796_wp, & + & -40.93062270_wp, -60.19028465_wp, -9.74946884_wp, -41.41348091_wp, & + & -60.15523275_wp, -8.65639928_wp, -40.02104055_wp, -69.62657646_wp, & + & -8.51688572_wp, -49.23876327_wp, -68.18323569_wp, -8.46342588_wp, & + & -49.14742708_wp, -67.84316144_wp, -8.31125294_wp, -47.66274407_wp, & + & -68.70097043_wp, -7.97948231_wp, -46.84966648_wp, -70.10046788_wp, & + & -8.20590205_wp, -48.39630646_wp, -67.76794571_wp, -9.39396263_wp, & + & -49.54856105_wp, -67.61989908_wp, -7.27318250_wp, -49.93205995_wp, & + & -67.90275821_wp, -7.37263146_wp, -50.97664123_wp, -68.02438548_wp, & + & -6.34313958_wp, -49.54085477_wp, -66.53718017_wp, -7.24951954_wp, & + & -49.85948093_wp, -66.57052849_wp, -8.53457958_wp, -47.35111588_wp, & + & -66.01132450_wp, -8.34662761_wp, -46.02951320_wp, -64.49191036_wp, & + & -8.27825876_wp, -46.20204542_wp, -63.95745460_wp, -8.65147818_wp, & + & -47.24225681_wp, -65.88760307_wp, -8.81926716_wp, -48.04653114_wp, & + & -66.39776422_wp, -7.41134544_wp, -45.61089434_wp, -66.37546842_wp, & + & -9.50996055_wp, -45.10018068_wp, -67.45748463_wp, -9.57383445_wp, & + & -45.02121387_wp, -65.99231199_wp, -10.44399263_wp, -45.50313274_wp, & + & -65.95757263_wp, -9.35017413_wp, -44.11126372_wp, -75.42749282_wp, & + & -9.21959445_wp, -53.32969305_wp, -73.98422191_wp, -9.16412307_wp, & + & -53.23864116_wp, -73.64410591_wp, -9.01116324_wp, -51.75403014_wp, & + & -74.50222010_wp, -8.68027515_wp, -50.94091803_wp, -75.90168483_wp, & + & -8.90888826_wp, -52.48730248_wp, -73.56771036_wp, -10.09418624_wp, & + & -53.63960561_wp, -73.42269162_wp, -7.97330641_wp, -54.02369576_wp, & + & -73.70612148_wp, -8.07314361_wp, -55.06808770_wp, -73.82792314_wp, & + & -7.04367124_wp, -53.63229550_wp, -72.33995265_wp, -7.94846994_wp, & + & -53.95183611_wp, -72.37115262_wp, -9.23289999_wp, -51.44258939_wp, & + & -71.81190292_wp, -9.04479419_wp, -50.12103509_wp, -70.29254254_wp, & + & -8.97525908_wp, -50.29372214_wp, -69.75794522_wp, -9.34811580_wp, & + & -51.33398951_wp, -71.68809680_wp, -9.51694491_wp, -52.13814675_wp, & + & -72.19906381_wp, -8.10998601_wp, -49.70204303_wp, -72.17485020_wp, & + & -10.20877695_wp, -49.19202651_wp, -73.25679224_wp, -10.27367971_wp, & + & -49.11288210_wp, -71.79091288_wp, -11.14231149_wp, -49.59539408_wp, & + & -71.75691043_wp, -10.04897617_wp, -48.20312951_wp, -81.22844461_wp, & + & -9.92923609_wp, -57.41919652_wp, -79.78522757_wp, -9.87226411_wp, & + & -57.32832885_wp, -79.44501709_wp, -9.71883367_wp, -55.84381245_wp, & + & -80.30326993_wp, -9.38865439_wp, -55.03056258_wp, -81.70292636_wp, & + & -9.61888751_wp, -56.57684599_wp, -79.36785050_wp, -10.80192856_wp, & + & -57.72931834_wp, -79.22498358_wp, -8.68092359_wp, -58.11351092_wp, & + & -79.50813510_wp, -8.78125564_wp, -59.15792823_wp, -79.63135076_wp, & + & -7.75170134_wp, -57.72230980_wp, -78.14228440_wp, -8.65481385_wp, & + & -58.04147445_wp, -78.17178377_wp, -9.93932320_wp, -55.53260270_wp, & + & -77.61240755_wp, -9.75007054_wp, -54.21127811_wp, -76.09316019_wp, & + & -9.67903217_wp, -54.38437553_wp, -75.55842679_wp, -10.05160097_wp, & + & -55.42467272_wp, -77.48861262_wp, -10.22279201_wp, -56.22827903_wp, & + & -78.00035686_wp, -8.81540862_wp, -53.79267232_wp, -77.97409299_wp, & + & -10.91389555_wp, -53.28159552_wp, -79.05595802_wp, -10.97960751_wp, & + & -53.20206218_wp, -77.58955982_wp, -11.84731963_wp, -53.68464753_wp, & + & -77.55595320_wp, -10.75327863_wp, -52.29291574_wp, -87.02907911_wp, & + & -10.64568915_wp, -61.50751042_wp, -85.58589199_wp, -10.58745985_wp, & + & -61.41704940_wp, -85.24547661_wp, -10.43343639_wp, -59.93265384_wp, & + & -86.10378983_wp, -10.10369731_wp, -59.11928881_wp, -87.50359488_wp, & + & -10.33535480_wp, -60.66517373_wp, -85.16783586_wp, -11.51684905_wp, & + & -61.81796478_wp, -85.02684056_wp, -9.39580443_wp, -62.20260407_wp, & + & -85.31030154_wp, -9.49648501_wp, -63.24690361_wp, -85.43373495_wp, & + & -8.46682668_wp, -61.81137293_wp, -83.94413263_wp, -9.36889186_wp, & + & -62.13097167_wp, -83.97203147_wp, -10.65293713_wp, -59.62162429_wp, & + & -83.41271319_wp, -10.46305132_wp, -58.30037323_wp, -81.89361034_wp, & + & -10.38995488_wp, -58.47364512_wp, -81.35845116_wp, -10.76219647_wp, & + & -59.51383825_wp, -83.28872560_wp, -10.93601242_wp, -60.31731938_wp, & + & -83.80197948_wp, -9.52902550_wp, -57.88158890_wp, -83.77254507_wp, & + & -11.62756377_wp, -57.37081960_wp, -84.85429228_wp, -11.69482355_wp, & + & -57.29100341_wp, -83.38679597_wp, -12.56035839_wp, -57.77416834_wp, & + & -83.35434998_wp, -11.46655095_wp, -56.38222668_wp, -92.82981067_wp, & + & -11.36509901_wp, -65.59439567_wp, -91.38663165_wp, -11.30678503_wp, & + & -65.50392615_wp, -91.04612295_wp, -11.15292244_wp, -64.01956664_wp, & + & -91.90428506_wp, -10.82302960_wp, -63.20610950_wp, -93.30442718_wp, & + & -11.05470012_wp, -64.75215021_wp, -90.96855933_wp, -12.23606743_wp, & + & -65.90506423_wp, -90.82767432_wp, -10.11492846_wp, -66.28925320_wp, & + & -91.11092851_wp, -10.21552259_wp, -67.33361521_wp, -91.23480873_wp, & + & -9.18607797_wp, -65.89796840_wp, -89.74498253_wp, -10.08782445_wp, & + & -66.21741390_wp, -89.77269546_wp, -11.37270840_wp, -63.70865705_wp, & + & -89.21310725_wp, -11.18211103_wp, -62.38763370_wp, -87.69413770_wp, & + & -11.10770955_wp, -62.56145185_wp, -87.15896597_wp, -11.48006713_wp, & + & -63.60159513_wp, -89.08946900_wp, -11.65573083_wp, -64.40444577_wp, & + & -89.60308640_wp, -10.24834853_wp, -61.96892900_wp, -89.57159957_wp, & + & -12.34674543_wp, -61.45772277_wp, -90.65325587_wp, -12.41484789_wp, & + & -61.37739701_wp, -89.18529509_wp, -13.27930525_wp, -61.86108020_wp, & + & -89.15307339_wp, -12.18521325_wp, -60.46935265_wp, -98.62891154_wp, & + & -12.08253955_wp, -69.68297516_wp, -97.18573150_wp, -12.02542558_wp, & + & -69.59209257_wp, -96.84571802_wp, -11.87188241_wp, -68.10759406_wp, & + & -97.70394273_wp, -11.54121288_wp, -67.29451140_wp, -99.10343582_wp, & + & -11.77177550_wp, -68.84080130_wp, -96.76828720_wp, -12.95504376_wp, & + & -69.99310587_wp, -96.62552466_wp, -10.83401161_wp, -70.37719644_wp, & + & -96.90845601_wp, -10.93437211_wp, -71.42166916_wp, -97.03207811_wp, & + & -9.90483926_wp, -69.98607148_wp, -95.54283809_wp, -10.80776733_wp, & + & -70.30493921_wp, -95.57268235_wp, -12.09293649_wp, -67.79607020_wp, & + & -95.01354850_wp, -11.90235805_wp, -66.47485936_wp, -93.49457210_wp, & + & -11.82763547_wp, -66.64829187_wp, -92.95905788_wp, -12.20017006_wp, & + & -67.68819965_wp, -94.88927494_wp, -12.37626323_wp, -68.49155601_wp, & + & -95.40390091_wp, -10.96873559_wp, -66.05619847_wp, -95.37207058_wp, & + & -13.06717609_wp, -65.54519108_wp, -96.45373325_wp, -13.13546254_wp, & + & -65.46510078_wp, -94.98553517_wp, -13.99962039_wp, -65.94859119_wp, & + & -94.95377536_wp, -12.90571013_wp, -64.55671172_wp, -104.42863658_wp, & + & -12.79453236_wp, -73.77071086_wp, -102.98539618_wp, -12.73900171_wp, & + & -73.68018712_wp, -102.64498312_wp, -12.58607675_wp, -72.19574691_wp, & + & -103.50269939_wp, -12.25453976_wp, -71.38247624_wp, -104.90261522_wp, & + & -12.48337598_wp, -72.92837128_wp, -102.56904375_wp, -13.66901393_wp, & + & -74.08142652_wp, -102.42411170_wp, -11.54808221_wp, -74.46526633_wp, & + & -102.70739072_wp, -11.64803401_wp, -75.50968496_wp, -102.82961999_wp, & + & -10.61853386_wp, -74.07394931_wp, -101.34138291_wp, -11.52297512_wp, & + & -74.39325714_wp, -101.37219934_wp, -12.80873906_wp, -71.88441812_wp, & + & -100.81283839_wp, -12.61886111_wp, -70.56322874_wp, -99.29385438_wp, & + & -12.54504532_wp, -70.73674713_wp, -98.75855119_wp, -12.91818059_wp, & + & -71.77654600_wp, -100.68915088_wp, -13.09264040_wp, -72.58001443_wp, & + & -101.20261927_wp, -11.68512482_wp, -70.14429552_wp, -101.17197085_wp, & + & -13.78371823_wp, -69.63383962_wp, -102.25366781_wp, -13.85141948_wp, & + & -69.55371251_wp, -100.78597190_wp, -14.71627591_wp, -70.03749081_wp, & + & -100.75353390_wp, -13.62272957_wp, -68.64534160_wp, -110.22871052_wp, & + & -13.49902732_wp, -77.85865258_wp, -108.78546679_wp, -13.44509637_wp, & + & -77.76771194_wp, -108.44529131_wp, -13.29299300_wp, -76.28316659_wp, & + & -109.30272666_wp, -12.96043818_wp, -75.47002006_wp, -110.70264325_wp, & + & -13.18744653_wp, -77.01644898_wp, -108.37000448_wp, -14.37543162_wp, & + & -78.16912444_wp, -108.22269453_wp, -12.25452689_wp, -78.55226097_wp, & + & -108.50576270_wp, -12.35387275_wp, -79.59679400_wp, -108.62737040_wp, & + & -11.32468131_wp, -78.16078507_wp, -107.13996277_wp, -12.23056364_wp, & + & -78.47991337_wp, -107.17290014_wp, -13.51754945_wp, -75.97168201_wp, & + & -106.61328892_wp, -13.32844477_wp, -74.65052242_wp, -105.09427249_wp, & + & -13.25634381_wp, -74.82431423_wp, -104.55957156_wp, -13.63004484_wp, & + & -75.86422529_wp, -106.49015035_wp, -13.80216059_wp, -76.66729282_wp, & + & -107.00192335_wp, -12.39427676_wp, -74.23148174_wp, -106.97369293_wp, & + & -14.49294024_wp, -73.72118020_wp, -108.05546357_wp, -14.55941933_wp, & + & -73.64101980_wp, -106.58876502_wp, -15.42591773_wp, -74.12488252_wp, & + & -106.55504177_wp, -14.33246642_wp, -72.73268897_wp, -116.02731083_wp, & + & -14.19719634_wp, -81.94961911_wp, -114.58409328_wp, -14.14425111_wp, & + & -81.85803955_wp, -114.24463034_wp, -13.99242590_wp, -80.37330784_wp, & + & -115.10222868_wp, -13.65910226_wp, -79.56064596_wp, -116.50135119_wp, & + & -13.88525419_wp, -81.10760231_wp, -114.16904350_wp, -15.07487391_wp, & + & -82.25921416_wp, -114.02012974_wp, -12.95407358_wp, -82.64232004_wp, & + & -114.30285941_wp, -13.05319022_wp, -83.68696693_wp, -114.42428266_wp, & + & -12.02394167_wp, -82.25098369_wp, -112.93740989_wp, -12.93090993_wp, & + & -82.56954648_wp, -112.97263556_wp, -14.21814660_wp, -80.06114294_wp, & + & -112.41358222_wp, -14.02993561_wp, -78.73964145_wp, -110.89441436_wp, & + & -13.95973974_wp, -78.91267027_wp, -110.35966455_wp, -14.33386959_wp, & + & -79.95240582_wp, -112.28977983_wp, -14.50339340_wp, -80.75639681_wp, & + & -112.80121364_wp, -13.09531559_wp, -78.32067430_wp, -112.77599832_wp, & + & -15.19409161_wp, -77.81065827_wp, -113.85790298_wp, -15.25930331_wp, & + & -77.73127151_wp, -112.39187900_wp, -16.12748516_wp, -78.21416937_wp, & + & -112.35786430_wp, -15.03420204_wp, -76.82185462_wp, -121.82622495_wp, & + & -14.89259747_wp, -86.04067076_wp, -120.38297984_wp, -14.83984075_wp, & + & -85.94940284_wp, -120.04324817_wp, -14.68806322_wp, -84.46473196_wp, & + & -120.90066664_wp, -14.35458278_wp, -83.65194266_wp, -122.30001360_wp, & + & -14.58050133_wp, -85.19856622_wp, -119.96811503_wp, -15.77052921_wp, & + & -86.35061722_wp, -119.81903224_wp, -13.64975991_wp, -86.73383500_wp, & + & -120.10206970_wp, -13.74884114_wp, -87.77840222_wp, -120.22292318_wp, & + & -12.71955944_wp, -86.34239184_wp, -118.73628968_wp, -13.62677561_wp, & + & -86.66136507_wp, -118.77124705_wp, -14.91397468_wp, -84.15274518_wp, & + & -118.21223211_wp, -14.72649656_wp, -82.83113366_wp, -116.69299951_wp, & + & -14.65738466_wp, -83.00386404_wp, -116.15824782_wp, -15.03188933_wp, & + & -84.04345846_wp, -118.08856193_wp, -15.19955160_wp, -84.84802316_wp, & + & -118.59921791_wp, -13.79169826_wp, -82.41196950_wp, -118.57561502_wp, & + & -15.89062568_wp, -81.90248591_wp, -119.65758160_wp, -15.95518334_wp, & + & -81.82341530_wp, -118.19194962_wp, -16.82417224_wp, -82.30607754_wp, & + & -118.15766049_wp, -15.73119615_wp, -80.91353234_wp, -127.62591786_wp, & + & -15.58845592_wp, -90.13102058_wp, -126.18268585_wp, -15.53498749_wp, & + & -90.03975533_wp, -125.84287853_wp, -15.38307884_wp, -88.55510887_wp, & + & -126.70029610_wp, -15.04978074_wp, -87.74225068_wp, -128.09990010_wp, & + & -15.27642688_wp, -89.28900908_wp, -125.76738461_wp, -16.46545189_wp, & + & -90.44103122_wp, -125.61934397_wp, -14.34458905_wp, -90.82414624_wp, & + & -125.90245673_wp, -14.44369531_wp, -91.86869007_wp, -126.02358276_wp, & + & -13.41459847_wp, -90.43256290_wp, -124.53660304_wp, -14.32115058_wp, & + & -90.75179686_wp, -124.57075183_wp, -15.60858882_wp, -88.24330891_wp, & + & -124.01147859_wp, -15.42119314_wp, -86.92179047_wp, -122.49224715_wp, & + & -15.35253852_wp, -87.09480767_wp, -121.95780461_wp, -15.72718577_wp, & + & -88.13451020_wp, -123.88816454_wp, -15.89419308_wp, -88.93867840_wp, & + & -124.39807486_wp, -14.48624760_wp, -86.50259533_wp, -124.37503174_wp, & + & -16.58515725_wp, -85.99300319_wp, -125.45700462_wp, -16.64943975_wp, & + & -85.91379718_wp, -123.99164547_wp, -17.51883208_wp, -86.39656515_wp, & + & -123.95691874_wp, -16.42575410_wp, -85.00411204_wp, -133.42492345_wp, & + & -16.28843639_wp, -94.22223936_wp, -131.98173045_wp, -16.23362072_wp, & + & -94.13083859_wp, -131.64216464_wp, -16.08123545_wp, -92.64616131_wp, & + & -132.49994318_wp, -15.74852154_wp, -91.83344544_wp, -133.89924464_wp, & + & -15.97664828_wp, -93.38033004_wp, -131.56554810_wp, -17.16373576_wp, & + & -94.53200378_wp, -131.41937688_wp, -15.04276951_wp, -94.91525266_wp, & + & -131.70230839_wp, -15.14216684_wp, -95.95981726_wp, -131.82444773_wp, & + & -14.11311048_wp, -94.52374343_wp, -130.33666237_wp, -15.01838886_wp, & + & -94.84280366_wp, -130.36986068_wp, -16.30557730_wp, -92.33419012_wp, & + & -129.81089607_wp, -16.11775308_wp, -91.01257888_wp, -128.29164214_wp, & + & -16.04854987_wp, -91.18529654_wp, -127.75688388_wp, -16.42297933_wp, & + & -92.22491500_wp, -129.68699437_wp, -16.59091462_wp, -93.02939550_wp, & + & -130.19792033_wp, -15.18288774_wp, -90.59360033_wp, -130.17417863_wp, & + & -17.28170885_wp, -90.08367579_wp, -131.25614124_wp, -17.34638600_wp, & + & -90.00465444_wp, -129.79036807_wp, -18.21530254_wp, -90.48702339_wp, & + & -129.75630423_wp, -17.12199406_wp, -89.09473443_wp, -139.22423911_wp, & + & -16.99391694_wp, -98.31223328_wp, -137.78103290_wp, -16.93812683_wp, & + & -98.22129682_wp, -137.44104435_wp, -16.78542915_wp, -96.73673239_wp, & + & -138.29882503_wp, -16.45338640_wp, -95.92374368_wp, -139.69850196_wp, & + & -16.68234701_wp, -97.47021179_wp, -137.36438809_wp, -17.86797686_wp, & + & -98.62259297_wp, -137.21970400_wp, -15.74692656_wp, -99.00591848_wp, & + & -137.50287218_wp, -15.84652911_wp, -100.05039905_wp, -137.62525651_wp, & + & -14.81751902_wp, -98.61431248_wp, -136.13698377_wp, -15.72183875_wp, & + & -98.93378239_wp, -136.16844016_wp, -17.00866395_wp, -96.42510675_wp, & + & -135.60938817_wp, -16.82023102_wp, -95.10359762_wp, -134.09021050_wp, & + & -16.74939588_wp, -95.27643822_wp, -133.55511547_wp, -17.12347402_wp, & + & -96.31600379_wp, -135.48553169_wp, -17.29358065_wp, -97.12042938_wp, & + & -135.99742928_wp, -15.88581941_wp, -94.68455833_wp, -135.97117537_wp, & + & -17.98461361_wp, -94.17463753_wp, -137.05304402_wp, -18.05049339_wp, & + & -94.09533747_wp, -135.58642909_wp, -18.91776885_wp, -94.57810979_wp, & + & -135.55321731_wp, -17.82445831_wp, -93.18580139_wp, -145.02416608_wp, & + & -17.70395233_wp, -102.40073196_wp, -143.58098101_wp, -17.64727062_wp, & + & -102.30985639_wp, -143.24084976_wp, -17.49443167_wp, -100.82533426_wp, & + & -144.09867094_wp, -17.16288233_wp, -100.01219319_wp, -145.49866144_wp, & + & -17.39268938_wp, -101.55873746_wp, -143.16382025_wp, -18.57682339_wp, & + & -102.71130171_wp, -143.02043083_wp, -16.45564477_wp, -103.09439883_wp, & + & -143.30354755_wp, -16.55532832_wp, -104.13888452_wp, -143.42655824_wp, & + & -15.52652772_wp, -102.70269960_wp, -141.93772426_wp, -16.42987904_wp, & + & -103.02227081_wp, -141.96804279_wp, -17.71694460_wp, -100.51395025_wp, & + & -141.40864865_wp, -17.52774690_wp, -99.19268448_wp, -139.88957451_wp, & + & -17.45562015_wp, -99.36609304_wp, -139.35456943_wp, -17.82942353_wp, & + & -100.40580403_wp, -141.28513461_wp, -18.00142182_wp, -101.20945451_wp, & + & -141.79738685_wp, -16.59360315_wp, -98.77369669_wp, -141.76903425_wp, & + & -18.69226466_wp, -98.26334906_wp, -142.85080827_wp, -18.75899600_wp, & + & -98.18346850_wp, -141.38376285_wp, -19.62517846_wp, -98.66687799_wp, & + & -141.35067764_wp, -18.53161977_wp, -97.27475980_wp, -150.82322989_wp, & + & -18.41653587_wp, -106.48984621_wp, -149.38005937_wp, -18.35979432_wp, & + & -106.39873000_wp, -149.04018122_wp, -18.20697048_wp, -104.91414058_wp, & + & -149.89820265_wp, -17.87565772_wp, -104.10111345_wp, -151.29785740_wp, & + & -18.10558648_wp, -105.64780637_wp, -148.96278869_wp, -19.28931404_wp, & + & -106.80014127_wp, -148.81939605_wp, -17.16811688_wp, -107.18311602_wp, & + & -149.10221880_wp, -17.26780219_wp, -108.22768009_wp, -149.22569738_wp, & + & -16.23903452_wp, -106.79151586_wp, -147.73670912_wp, -17.14226758_wp, & + & -107.11069138_wp, -147.76738760_wp, -18.42927523_wp, -104.60252732_wp, & + & -147.20819504_wp, -18.23952693_wp, -103.28124569_wp, -145.68916021_wp, & + & -18.16624913_wp, -103.45456537_wp, -145.15383423_wp, -18.53971319_wp, & + & -104.49423342_wp, -147.08425453_wp, -18.71336455_wp, -105.29796763_wp, & + & -147.59770835_wp, -17.30565042_wp, -102.86238178_wp, -147.56773588_wp, & + & -19.40423669_wp, -102.35182503_wp, -148.64945891_wp, -19.47172619_wp, & + & -102.27189525_wp, -147.18182661_wp, -20.33690405_wp, -102.75531178_wp, & + & -147.14945006_wp, -19.24323541_wp, -101.36326328_wp, -156.62234610_wp, & + & -19.12846498_wp, -110.57870649_wp, -155.17914129_wp, -19.07241477_wp, & + & -110.48767202_wp, -154.83911693_wp, -18.91993816_wp, -109.00307998_wp, & + & -155.69701538_wp, -18.58861405_wp, -108.18992610_wp, -157.09675890_wp, & + & -18.81764652_wp, -109.73649452_wp, -154.76231918_wp, -20.00208424_wp, & + & -110.88920744_wp, -154.61798448_wp, -17.88091289_wp, -111.27197208_wp, & + & -154.90085410_wp, -17.98040106_wp, -112.31654258_wp, -155.02390834_wp, & + & -16.95169352_wp, -110.88030560_wp, -153.53528640_wp, -17.85550551_wp, & + & -111.19955504_wp, -153.56635823_wp, -19.14259231_wp, -108.69155396_wp, & + & -153.00709098_wp, -18.95285106_wp, -107.37030051_wp, -151.48808477_wp, & + & -18.87908165_wp, -107.54366788_wp, -150.95266285_wp, -19.25235299_wp, & + & -108.58335328_wp, -152.88325561_wp, -19.42645366_wp, -109.38711210_wp, & + & -153.39689818_wp, -18.01916953_wp, -106.95127509_wp, -153.36617546_wp, & + & -20.11782079_wp, -106.44102566_wp, -154.44786692_wp, -20.18563588_wp, & + & -106.36095246_wp, -152.98005435_wp, -21.05031091_wp, -106.84471856_wp, & + & -152.94779496_wp, -19.95686369_wp, -105.45249594_wp, -162.42180072_wp, & + & -19.83689390_wp, -114.66763388_wp, -160.97856256_wp, -19.78198377_wp, & + & -114.57646825_wp, -160.63855245_wp, -19.62987139_wp, -113.09183453_wp, & + & -161.49632911_wp, -19.29821577_wp, -112.27868608_wp, -162.89602185_wp, & + & -19.52604498_wp, -113.82532268_wp, -160.56241058_wp, -20.71194748_wp, & + & -114.97802377_wp, -160.41642493_wp, -18.59085698_wp, -115.36063461_wp, & + & -160.69919611_wp, -18.69011520_wp, -116.40525365_wp, -160.82176980_wp, & + & -17.66136570_wp, -114.96901075_wp, -159.33372146_wp, -18.56620685_wp, & + & -115.28804197_wp, -159.36593700_wp, -19.85327026_wp, -112.78026692_wp, & + & -158.80652717_wp, -19.66368761_wp, -111.45905256_wp, -157.28749842_wp, & + & -19.59055111_wp, -111.63253992_wp, -156.75233463_wp, -19.96382302_wp, & + & -112.67235931_wp, -158.68293379_wp, -20.13727392_wp, -113.47586904_wp, & + & -159.19589145_wp, -18.72979235_wp, -111.04008405_wp, -159.16609079_wp, & + & -20.82840559_wp, -110.52965279_wp, -160.24780956_wp, -20.89573250_wp, & + & -110.44953423_wp, -158.78040134_wp, -21.76110866_wp, -110.93326453_wp, & + & -158.74761017_wp, -20.66753766_wp, -109.54115008_wp, -168.22144882_wp, & + & -20.53990615_wp, -118.75732562_wp, -166.77817230_wp, -20.48633322_wp, & + & -118.66604864_wp, -166.43819599_wp, -20.33460455_wp, -117.18136687_wp, & + & -167.29585287_wp, -20.00256550_wp, -116.36824554_wp, -168.69542793_wp, & + & -20.22887852_wp, -117.91494019_wp, -166.36283802_wp, -21.41669070_wp, & + & -119.06754808_wp, -166.21487627_wp, -19.29574972_wp, -119.45020114_wp, & + & -166.49767926_wp, -19.39478873_wp, -120.49483400_wp, -166.61940254_wp, & + & -18.36587425_wp, -119.05864169_wp, -165.13215651_wp, -19.27208723_wp, & + & -119.37755256_wp, -165.16574491_wp, -20.55879893_wp, -116.86972785_wp, & + & -164.60634602_wp, -20.36986295_wp, -115.54842005_wp, -163.08723911_wp, & + & -20.29794594_wp, -115.72173433_wp, -162.55229204_wp, -20.67120910_wp, & + & -116.76166981_wp, -164.48285101_wp, -20.84308875_wp, -117.56532290_wp, & + & -164.99496060_wp, -19.43568694_wp, -115.12937499_wp, -164.96702147_wp, & + & -21.53439140_wp, -114.61921615_wp, -166.04881079_wp, -21.60087327_wp, & + & -114.53933973_wp, -164.58198064_wp, -22.46735895_wp, -115.02283539_wp, & + & -164.54863443_wp, -21.37395528_wp, -113.63060480_wp, -174.02116185_wp, & + & -21.23716520_wp, -122.84816587_wp, -172.57788314_wp, -21.18447652_wp, & + & -122.75660633_wp, -172.23810189_wp, -21.03331581_wp, -121.27182510_wp, & + & -173.09573855_wp, -20.70107743_wp, -120.45876320_wp, -174.49511758_wp, & + & -20.92593847_wp, -122.00584027_wp, -172.16301196_wp, -22.11497985_wp, & + & -123.15824465_wp, -172.01378371_wp, -19.99402223_wp, -123.54037791_wp, & + & -172.29648920_wp, -20.09264891_wp, -124.58507706_wp, -172.41786220_wp, & + & -19.06402007_wp, -123.14865439_wp, -170.93106437_wp, -19.97097599_wp, & + & -123.46756438_wp, -170.96580334_wp, -21.25817497_wp, -120.96008307_wp, & + & -170.40645241_wp, -21.07005481_wp, -119.63864556_wp, -168.88725122_wp, & + & -20.99964833_wp, -119.81175446_wp, -168.35258661_wp, -21.37288917_wp, & + & -120.85184716_wp, -170.28298238_wp, -21.54270505_wp, -121.65565981_wp, & + & -170.79413484_wp, -20.13553577_wp, -119.21949266_wp, -170.76850671_wp, & + & -22.23435723_wp, -118.70970022_wp, -171.85038264_wp, -22.29975424_wp, & + & -118.63009466_wp, -170.38431761_wp, -23.16765408_wp, -119.11336960_wp, & + & -170.35019617_wp, -22.07450087_wp, -117.72096484_wp, -179.82027715_wp, & + & -21.93031837_wp, -126.94085021_wp, -178.37699650_wp, -21.87829254_wp, & + & -126.84905064_wp, -178.03752253_wp, -21.72703580_wp, -125.36420125_wp, & + & -178.89528339_wp, -21.39449858_wp, -124.55138648_wp, -180.29415933_wp, & + & -21.61891653_wp, -126.09853793_wp, -177.96245652_wp, -22.80909278_wp, & + & -127.25035287_wp, -177.81219216_wp, -20.68830800_wp, -127.63301379_wp, & + & -178.09484624_wp, -20.78704411_wp, -128.67771776_wp, -178.21584367_wp, & + & -19.75800876_wp, -127.24155536_wp, -176.72947054_wp, -20.66579732_wp, & + & -127.56010211_wp, -176.76537472_wp, -21.95221112_wp, -125.05213429_wp, & + & -176.20637237_wp, -21.76472397_wp, -123.73046519_wp, -174.68704810_wp, & + & -21.69573172_wp, -123.90303926_wp, -174.15240212_wp, -22.06900630_wp, & + & -124.94313319_wp, -176.08247511_wp, -22.23709457_wp, -125.74749618_wp, & + & -176.59326366_wp, -20.82984110_wp, -123.31138492_wp, -176.56995722_wp, & + & -22.92872244_wp, -122.80173935_wp, -177.65193700_wp, -22.99316649_wp, & + & -122.72275663_wp, -176.18635914_wp, -23.86235207_wp, -123.20520101_wp, & + & -176.15208173_wp, -22.76925345_wp, -121.81275983_wp, -185.62081222_wp, & + & -22.62279674_wp, -131.03198261_wp, -184.17747420_wp, -22.57051062_wp, & + & -130.94111660_wp, -183.83722974_wp, -22.41884287_wp, -129.45647704_wp, & + & -184.69469361_wp, -22.08640158_wp, -128.64330038_wp, -186.09410055_wp, & + & -22.31141670_wp, -130.18931589_wp, -183.76296799_wp, -23.50134590_wp, & + & -131.34237578_wp, -183.61339744_wp, -21.38064781_wp, -131.72577968_wp, & + & -183.89682448_wp, -21.47968387_wp, -132.77024747_wp, -184.01688062_wp, & + & -20.45030458_wp, -131.33425290_wp, -182.53062598_wp, -21.35797679_wp, & + & -131.65369245_wp, -182.56487721_wp, -22.64356272_wp, -129.14494469_wp, & + & -182.00567175_wp, -22.45647546_wp, -127.82330166_wp, -180.48632270_wp, & + & -22.38830068_wp, -127.99587001_wp, -179.95184576_wp, -22.76170587_wp, & + & -129.03600153_wp, -181.88217163_wp, -22.92851230_wp, -129.84046606_wp, & + & -182.39200898_wp, -21.52141915_wp, -127.40409477_wp, -182.36985951_wp, & + & -23.62036810_wp, -126.89467174_wp, -183.45187260_wp, -23.68423111_wp, & + & -126.81567751_wp, -181.98677107_wp, -24.55416402_wp, -127.29823566_wp, & + & -181.95188202_wp, -23.46122742_wp, -125.90568394_wp, -191.42441543_wp, & + & -23.31716659_wp, -135.11895376_wp, -189.98103973_wp, -23.26374984_wp, & + & -135.02903620_wp, -189.63978134_wp, -23.11172714_wp, -133.54466484_wp, & + & -190.49680617_wp, -22.77965633_wp, -132.73087950_wp, -191.89744500_wp, & + & -23.00597849_wp, -134.27608141_wp, -189.56609866_wp, -24.19428832_wp, & + & -135.43053195_wp, -189.41843460_wp, -22.07351114_wp, -135.81418828_wp, & + & -189.70262825_wp, -22.17278863_wp, -136.85842491_wp, -189.82224644_wp, & + & -21.14343597_wp, -135.42236521_wp, -188.33562167_wp, -22.05008664_wp, & + & -135.74297237_wp, -188.36704235_wp, -23.33568669_wp, -133.23412785_wp, & + & -187.80686999_wp, -23.14870289_wp, -131.91287346_wp, -186.28761961_wp, & + & -23.08074978_wp, -132.08652474_wp, -185.75393331_wp, -23.45426177_wp, & + & -133.12702309_wp, -187.68479274_wp, -23.62051988_wp, -133.93014929_wp, & + & -188.19271320_wp, -22.21358739_wp, -131.49334525_wp, -188.17059263_wp, & + & -24.31256079_wp, -130.98401775_wp, -189.25256677_wp, -24.37635215_wp, & + & -130.90442252_wp, -187.78778832_wp, -25.24638708_wp, -131.38778330_wp, & + & -187.75206059_wp, -24.15343296_wp, -129.99526308_wp, -197.22858622_wp, & + & -24.01588378_wp, -139.20477909_wp, -195.78523344_wp, -23.96129391_wp, & + & -139.11482104_wp, -195.44390735_wp, -23.80891808_wp, -137.63050544_wp, & + & -196.30100280_wp, -23.47724705_wp, -136.81663887_wp, -197.70201430_wp, & + & -23.70491016_wp, -138.36206772_wp, -195.36959289_wp, -24.89150978_wp, & + & -139.51633881_wp, -195.22360700_wp, -22.77063713_wp, -139.90005082_wp, & + & -195.50774360_wp, -22.87019548_wp, -140.94427623_wp, -195.62814062_wp, & + & -21.84086129_wp, -139.50826261_wp, -194.14080976_wp, -22.74635025_wp, & + & -139.82886691_wp, -194.17097619_wp, -24.03211865_wp, -137.32013484_wp, & + & -193.61056407_wp, -23.84449970_wp, -135.99905279_wp, -192.09139365_wp, & + & -23.77564036_wp, -136.17317504_wp, -191.55783969_wp, -24.14892558_wp, & + & -137.21382564_wp, -193.48866484_wp, -24.31653740_wp, -138.01626969_wp, & + & -193.99684589_wp, -22.90951598_wp, -135.57963333_wp, -193.97337043_wp, & + & -25.00836076_wp, -135.06985133_wp, -195.05528477_wp, -25.07266892_wp, & + & -134.98985802_wp, -193.59025956_wp, -25.94207234_wp, -135.47359010_wp, & + & -193.55455898_wp, -24.84884699_wp, -134.08127731_wp, -203.02902585_wp, & + & -24.71633072_wp, -143.29545065_wp, -201.58579524_wp, -24.66184869_wp, & + & -143.20356272_wp, -201.24618779_wp, -24.50966846_wp, -141.71883078_wp, & + & -202.10408984_wp, -24.17779606_wp, -140.90591215_wp, -203.50371085_wp, & + & -24.40506844_wp, -142.45357293_wp, -201.16974015_wp, -25.59200823_wp, & + & -143.60476898_wp, -201.02309103_wp, -23.47104511_wp, -143.98781674_wp, & + & -201.30585978_wp, -23.57035470_wp, -145.03243595_wp, -201.42810152_wp, & + & -22.54134092_wp, -143.59634775_wp, -199.94038612_wp, -23.44681420_wp, & + & -143.91520099_wp, -199.97361959_wp, -24.73318399_wp, -141.40713754_wp, & + & -199.41411583_wp, -24.54513356_wp, -140.08572519_wp, -197.89489331_wp, & + & -24.47509012_wp, -140.25912223_wp, -197.36061520_wp, -24.84815125_wp, & + & -141.29948664_wp, -199.29073488_wp, -25.01767113_wp, -142.10268684_wp, & + & -199.80138800_wp, -23.61046009_wp, -139.66653875_wp, -199.77649347_wp, & + & -25.70929305_wp, -139.15673726_wp, -200.85839641_wp, -25.77442118_wp, & + & -139.07724173_wp, -199.39250353_wp, -26.64270517_wp, -139.56033144_wp, & + & -199.35824991_wp, -25.54950041_wp, -138.16796727_wp, -208.82358595_wp, & + & -25.41796789_wp, -147.39457036_wp, -207.38054821_wp, -25.36201448_wp, & + & -147.30074953_wp, -207.04303104_wp, -25.20963929_wp, -145.81557156_wp, & + & -207.90208814_wp, -24.87777210_wp, -145.00387864_wp, -209.29987435_wp, & + & -25.10618272_wp, -146.55381230_wp, -206.96322118_wp, -26.29178735_wp, & + & -147.70152712_wp, -206.81785619_wp, -24.17068375_wp, -148.08419256_wp, & + & -207.09916706_wp, -24.27016352_wp, -149.12918677_wp, -207.22412020_wp, & + & -23.24133482_wp, -147.69319143_wp, -205.73526677_wp, -24.14559858_wp, & + & -148.01014004_wp, -205.77087146_wp, -25.43303147_wp, -145.50206813_wp, & + & -205.21334393_wp, -25.24502157_wp, -144.17981125_wp, -203.69384569_wp, & + & -25.17531534_wp, -144.35085514_wp, -203.15802653_wp, -25.54847878_wp, & + & -145.39038678_wp, -205.08709556_wp, -25.71778418_wp, -146.19661564_wp, & + & -205.60109188_wp, -24.31023896_wp, -143.76130719_wp, -205.57741957_wp, & + & -26.40903343_wp, -143.25129884_wp, -206.65946329_wp, -26.47399286_wp, & + & -143.17358900_wp, -205.19290088_wp, -27.34254702_wp, -143.65415484_wp, & + & -205.16079466_wp, -26.24918822_wp, -142.26185576_wp, -214.61462406_wp, & + & -26.15327162_wp, -151.49389615_wp, -213.17197110_wp, -26.08768439_wp, & + & -151.40077925_wp, -212.83489673_wp, -25.92998691_wp, -149.91608831_wp, & + & -213.69537810_wp, -25.59992289_wp, -149.10516978_wp, -215.09280670_wp, & + & -25.83863421_wp, -150.65529739_wp, -212.74893800_wp, -27.01549033_wp, & + & -151.80005350_wp, -212.61742270_wp, -24.89414042_wp, -152.18667921_wp, & + & -212.89869254_wp, -24.99710263_wp, -153.23134268_wp, -213.02925602_wp, & + & -23.96672521_wp, -151.79692445_wp, -211.53496547_wp, -24.86208245_wp, & + & -152.11330940_wp, -211.56168695_wp, -26.14660932_wp, -149.60209615_wp, & + & -211.00566524_wp, -25.95398193_wp, -148.27987972_wp, -209.48625004_wp, & + & -25.88083586_wp, -148.44966146_wp, -208.94843078_wp, -26.25497111_wp, & + & -149.48780493_wp, -210.87662274_wp, -26.43043262_wp, -150.29574303_wp, & + & -211.39628717_wp, -25.01931591_wp, -147.86379977_wp, -211.36735262_wp, & + & -27.11692662_wp, -147.34907086_wp, -212.44926146_wp, -27.18407363_wp, & + & -147.27137425_wp, -210.98078978_wp, -28.05037996_wp, -147.75012364_wp, & + & -210.95116588_wp, -26.95426925_wp, -146.35990113_wp, -220.39478678_wp, & + & -26.93279347_wp, -155.59651248_wp, -218.95235136_wp, -26.87200285_wp, & + & -155.49766923_wp, -218.61978141_wp, -26.70093098_wp, -154.01355821_wp, & + & -219.48155622_wp, -26.36065558_wp, -153.20831921_wp, -220.87605605_wp, & + & -26.60275977_wp, -154.76573365_wp, -218.53168678_wp, -27.80534732_wp, & + & -155.88633481_wp, -218.39044552_wp, -25.68811920_wp, -156.29297176_wp, & + & -218.66860766_wp, -25.79981580_wp, -157.33757100_wp, -218.80000183_wp, & + & -24.75550364_wp, -155.91328032_wp, -217.30811774_wp, -25.65938802_wp, & + & -156.21627447_wp, -217.34799364_wp, -26.91824433_wp, -153.69420212_wp, & + & -216.79330694_wp, -26.71244784_wp, -152.37353521_wp, -215.27439773_wp, & + & -26.63056669_wp, -152.54432940_wp, -214.73432903_wp, -27.01052947_wp, & + & -153.57918219_wp, -216.66189688_wp, -27.20826219_wp, -154.38426065_wp, & + & -217.19020437_wp, -25.77748380_wp, -151.96420238_wp, -217.14711358_wp, & + & -27.87134988_wp, -151.43470368_wp, -218.22851536_wp, -27.94473179_wp, & + & -151.35561102_wp, -216.75512465_wp, -28.80500916_wp, -151.82998335_wp, & + & -216.73108180_wp, -27.69961450_wp, -150.44698813_wp, -226.13937484_wp, & + & -27.61052189_wp, -159.74443393_wp, -224.69728073_wp, -27.63545290_wp, & + & -159.62829705_wp, -224.37362095_wp, -27.44230654_wp, -158.14479425_wp, & + & -225.22668496_wp, -27.03920623_wp, -157.35948650_wp, -226.60762844_wp, & + & -27.22347470_wp, -158.93079138_wp, -224.33054833_wp, -28.60412677_wp, & + & -159.98387207_wp, -224.05397248_wp, -26.51249120_wp, -160.44977765_wp, & + & -224.32579961_wp, -26.63802679_wp, -161.49446037_wp, -224.40958405_wp, & + & -25.54551443_wp, -160.10324368_wp, -222.97284779_wp, -26.54732461_wp, & + & -160.35911744_wp, -223.11890328_wp, -27.71588696_wp, -157.80208753_wp, & + & -222.57108035_wp, -27.49399651_wp, -156.48125880_wp, -221.05048764_wp, & + & -27.42558141_wp, -156.64244207_wp, -220.50554706_wp, -27.82784672_wp, & + & -157.66622072_wp, -222.43645760_wp, -28.04520371_wp, -158.47773351_wp, & + & -222.96448144_wp, -26.54973467_wp, -156.09046768_wp, -222.94090451_wp, & + & -28.63560775_wp, -155.52760882_wp, -224.02328430_wp, -28.69776153_wp, & + & -155.45265421_wp, -222.55589269_wp, -29.57861137_wp, -155.90722628_wp, & + & -222.52798737_wp, -28.45357045_wp, -154.54039857_wp, -231.90945930_wp, & + & -28.17783872_wp, -163.87996247_wp, -230.47057593_wp, -28.27318502_wp, & + & -163.76086260_wp, -230.13229529_wp, -28.01137989_wp, -162.29117763_wp, & + & -230.95796074_wp, -27.51291060_wp, -161.53183492_wp, -232.35179659_wp, & + & -27.68647192_wp, -163.10974862_wp, -230.15988585_wp, -29.28020073_wp, & + & -164.05828206_wp, -229.77121295_wp, -27.23750534_wp, -164.64823643_wp, & + & -230.04753492_wp, -27.41371670_wp, -165.68436767_wp, -230.07849740_wp, & + & -26.23436330_wp, -164.36388716_wp, -228.69326795_wp, -27.32032971_wp, & + & -164.55084192_wp, -228.89547883_wp, -28.33928717_wp, -161.93077395_wp, & + & -228.33852362_wp, -28.08117676_wp, -160.62041121_wp, -226.81600014_wp, & + & -28.11046596_wp, -160.77359089_wp, -226.28989879_wp, -28.58906327_wp, & + & -161.77399701_wp, -228.23403020_wp, -28.74512919_wp, -162.58508487_wp, & + & -228.67641061_wp, -27.09601338_wp, -160.28203824_wp, -228.77900277_wp, & + & -29.14755264_wp, -159.61117488_wp, -229.86334794_wp, -29.14026701_wp, & + & -159.53921126_wp, -228.45089699_wp, -30.13045585_wp, -159.93964637_wp, & + & -228.35834406_wp, -28.94054705_wp, -158.63215465_wp, -237.68458221_wp, & + & -28.85109795_wp, -167.96066184_wp, -236.26842748_wp, -29.09514540_wp, & + & -167.79164445_wp, -235.91255077_wp, -28.65675971_wp, -166.36902670_wp, & + & -236.68438391_wp, -27.96916281_wp, -165.70705323_wp, -238.07284876_wp, & + & -28.20696051_wp, -167.27887761_wp, -236.07769354_wp, -30.16481959_wp, & + & -167.92803003_wp, -235.44273782_wp, -28.29449344_wp, -168.80492038_wp, & + & -235.73186302_wp, -28.58968681_wp, -169.81003816_wp, -235.62771110_wp, & + & -27.23070283_wp, -168.67965225_wp, -234.38318134_wp, -28.48910726_wp, & + & -168.67051742_wp, -234.72059329_wp, -29.05802997_wp, -165.93804802_wp, & + & -234.13796480_wp, -28.65378929_wp, -164.67687050_wp, -232.62016955_wp, & + & -28.77588051_wp, -164.83115174_wp, -232.12709627_wp, -29.40360635_wp, & + & -165.76356102_wp, -234.09595034_wp, -29.60514134_wp, -166.52160325_wp, & + & -234.42647225_wp, -27.61711693_wp, -164.47415534_wp, -234.61660836_wp, & + & -29.55300030_wp, -163.53149793_wp, -235.69825459_wp, -29.48321503_wp, & + & -163.45352538_wp, -234.34015468_wp, -30.58582467_wp, -163.72757011_wp, & + & -234.17350255_wp, -29.23887077_wp, -162.59153133_wp, -243.46105098_wp, & + & -29.41476293_wp, -172.06139399_wp, -242.08213790_wp, -29.78537511_wp, & + & -171.82812585_wp, -241.68945424_wp, -29.19554102_wp, -170.47124066_wp, & + & -242.37944342_wp, -28.33591423_wp, -169.93127073_wp, -243.77205590_wp, & + & -28.62439019_wp, -171.50587965_wp, -242.01182796_wp, -30.87798632_wp, & + & -171.81287060_wp, -241.16602050_wp, -29.22627818_wp, -172.92246533_wp, & + & -241.47450196_wp, -29.62791470_wp, -173.88394647_wp, -241.23795778_wp, & + & -28.14202414_wp, -172.95088249_wp, -240.13466847_wp, -29.50907210_wp, & + & -172.73564923_wp, -240.55751258_wp, -29.66852246_wp, -169.95870115_wp, & + & -239.94482169_wp, -29.16528413_wp, -168.74836429_wp, -238.45146837_wp, & + & -29.48780031_wp, -168.84049741_wp, -238.02745247_wp, -30.29418335_wp, & + & -169.66298017_wp, -239.99887886_wp, -30.36333471_wp, -170.44369610_wp, & + & -240.10699421_wp, -28.08353971_wp, -168.69790424_wp, -240.54472334_wp, & + & -29.83217743_wp, -167.50538189_wp, -241.61039628_wp, -29.62236678_wp, & + & -167.46957547_wp, -240.39541154_wp, -30.90794886_wp, -167.55037878_wp, & + & -240.07816428_wp, -29.44600167_wp, -166.60447325_wp, -249.21866951_wp, & + & -29.97612544_wp, -176.15351509_wp, -247.92846303_wp, -30.51216684_wp, & + & -175.77760053_wp, -247.45656549_wp, -29.72097870_wp, -174.55493469_wp, & + & -247.99219775_wp, -28.66275882_wp, -174.23957166_wp, -249.37975462_wp, & + & -29.02812949_wp, -175.83018222_wp, -248.05269722_wp, -31.57175186_wp, & + & -175.53136676_wp, -246.91460768_wp, -30.36169450_wp, -176.91714038_wp, & + & -247.27240097_wp, -30.90581971_wp, -177.78706520_wp, -246.79982714_wp, & + & -29.31257087_wp, -177.17748764_wp, -245.94914095_wp, -30.76157002_wp, & + & -176.62267721_wp, -246.43442047_wp, -30.26039369_wp, -173.89660586_wp, & + & -245.75122796_wp, -29.61423076_wp, -172.79704851_wp, -244.30481788_wp, & + & -30.11479469_wp, -172.81401807_wp, -243.98296572_wp, -31.10179216_wp, & + & -173.46864302_wp, -245.98784952_wp, -31.11427645_wp, -174.21404604_wp, & + & -245.79017612_wp, -28.53116202_wp, -172.95298065_wp, -246.40617049_wp, & + & -29.96591756_wp, -171.45656285_wp, -247.44020629_wp, -29.63206081_wp, & + & -171.46688392_wp, -246.38172935_wp, -31.04143647_wp, -171.30061368_wp, & + & -245.88521297_wp, -29.47679507_wp, -170.63925555_wp, -254.93933950_wp, & + & -30.57572225_wp, -180.24429815_wp, -253.81110569_wp, -31.22909091_wp, & + & -179.61829361_wp, -253.18968531_wp, -30.22383042_wp, -178.64579611_wp, & + & -253.46479647_wp, -29.02958140_wp, -178.70292605_wp, -254.87408946_wp, & + & -29.56448630_wp, -180.26537429_wp, -254.17978525_wp, -32.11150232_wp, & + & -179.08506339_wp, -252.76857660_wp, -31.65201946_wp, -180.65951307_wp, & + & -253.22722846_wp, -32.34192446_wp, -181.36307434_wp, -252.41065135_wp, & + & -30.78098805_wp, -181.20275505_wp, -251.92683663_wp, -32.14216830_wp, & + & -180.17952426_wp, -252.33801223_wp, -30.74783673_wp, -177.76746654_wp, & + & -251.52539804_wp, -29.96189551_wp, -176.86445644_wp, -250.19203885_wp, & + & -30.69659282_wp, -176.70420055_wp, -250.06561455_wp, -31.86655627_wp, & + & -177.05244250_wp, -252.08953990_wp, -31.73062022_wp, -177.79656246_wp, & + & -251.37460793_wp, -28.97362508_wp, -177.31057875_wp, -252.20259689_wp, & + & -29.81652642_wp, -175.49722520_wp, -253.15844252_wp, -29.31555199_wp, & + & -175.62322840_wp, -252.37069643_wp, -30.79706541_wp, -175.05926221_wp, & + & -251.58163012_wp, -29.23073648_wp, -174.82629226_wp, -259.30868457_wp, & + & -32.27542962_wp, -185.01206380_wp, -258.87698166_wp, -32.54510953_wp, & + & -183.65013816_wp, -258.00552253_wp, -31.39587300_wp, -183.15813893_wp, & + & -257.23260468_wp, -30.80437163_wp, -183.90574325_wp, -258.54971002_wp, & + & -31.80910259_wp, -185.50249026_wp, -259.77121380_wp, -32.63170320_wp, & + & -183.02245097_wp, -258.02024456_wp, -33.81640519_wp, -183.49768184_wp, & + & -258.60658118_wp, -34.69606448_wp, -183.75116822_wp, -257.15919101_wp, & + & -33.75724522_wp, -184.16208902_wp, -257.65442436_wp, -33.91195453_wp, & + & -182.47740144_wp, -258.13651055_wp, -31.10095132_wp, -181.85547569_wp, & + & -257.15965376_wp, -30.29076141_wp, -181.15795997_wp, -256.04461820_wp, & + & -31.20927436_wp, -180.63608618_wp, -256.18429890_wp, -32.42702611_wp, & + & -180.58447329_wp, -258.67557996_wp, -31.72725916_wp, -181.27447708_wp, & + & -256.73773646_wp, -29.60000118_wp, -181.89466442_wp, -257.81199948_wp, & + & -29.53842671_wp, -180.00151793_wp, -258.61509214_wp, -28.91180298_wp, & + & -180.37744099_wp, -258.21946622_wp, -30.24465938_wp, -179.28201632_wp, & + & -257.08054874_wp, -28.91282921_wp, -179.49890080_wp, -259.50202716_wp, & + & -33.14692803_wp, -185.49312818_wp, 4.35819220_wp, -0.74661359_wp, & + & 5.21678271_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_92 + +subroutine polyala_96(self) + type(structure_type), intent(out) :: self + integer, parameter :: nat = 963 + character(len=*), parameter :: sym(nat) = [ character(len=4) :: & + & "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", & + & "C", "H", "H", "H", "O", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", & + & "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", & + & "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", & + & "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", & + & "O", "H", "H", "C", "H", "H", "H", "N", "C", "C", "O", "H", "H", "C", "H", "H", & + & "H", "H", "H" ] + real(wp), parameter :: xyz(3, nat) = reshape([ & + & -0.27506284_wp, -0.11026830_wp, -0.05632772_wp, 0.92219842_wp, & + & 0.62048845_wp, 0.29790700_wp, 1.79759494_wp, -0.32195924_wp, & + & 1.12529574_wp, 1.34571080_wp, -1.35929488_wp, 1.59748528_wp, & + & -0.52371314_wp, -0.84048199_wp, 0.60098113_wp, 1.42561889_wp, & + & 0.91507693_wp, -0.62869479_wp, 0.58113372_wp, 1.86219772_wp, & + & 1.12953359_wp, -0.10357871_wp, 2.49250556_wp, 0.56891676_wp, & + & 0.11270298_wp, 1.56628733_wp, 2.06505394_wp, 1.47691513_wp, & + & 2.42969939_wp, 1.35962674_wp, 3.07187888_wp, 0.05937935_wp, & + & 1.27204856_wp, 3.93181686_wp, -0.60137938_wp, 2.23140419_wp, & + & 3.44403424_wp, -0.29040269_wp, 3.64621159_wp, 2.58171982_wp, & + & 0.52120636_wp, 3.89469262_wp, 3.35072653_wp, 0.97904768_wp, & + & 0.96299025_wp, 3.82968539_wp, -1.68405173_wp, 2.09298011_wp, & + & 5.38317000_wp, -0.17031707_wp, 2.05625653_wp, 5.71668578_wp, & + & -0.40622315_wp, 1.05068970_wp, 5.48311351_wp, 0.89872415_wp, & + & 2.22699202_wp, 6.00641018_wp, -0.70002756_wp, 2.76998019_wp, & + & 4.07207725_wp, -1.00144760_wp, 4.55679902_wp, -6.03259379_wp, & + & -0.59124911_wp, -4.13686840_wp, -4.71121138_wp, -0.02946694_wp, & + & -3.95796528_wp, -4.09141255_wp, -0.72654365_wp, -2.74403755_wp, & + & -4.78072638_wp, -1.38441178_wp, -1.97057727_wp, -6.42329721_wp, & + & -0.99831441_wp, -3.29384927_wp, -4.12640520_wp, -0.22964840_wp, & + & -4.86169271_wp, -4.78130193_wp, 1.48148700_wp, -3.71088704_wp, & + & -5.24096247_wp, 1.96289467_wp, -4.56970196_wp, -5.37918718_wp, & + & 1.68714437_wp, -2.82670399_wp, -3.78566574_wp, 1.89017327_wp, & + & -3.56769876_wp, -2.78058410_wp, -0.54847197_wp, -2.60066259_wp, & + & -2.02769535_wp, -1.00520150_wp, -1.45261261_wp, -0.88813743_wp, & + & -0.00774679_wp, -1.23352236_wp, -0.57832900_wp, 0.80462764_wp, & + & -2.09900991_wp, -2.25476463_wp, 0.04811660_wp, -3.23000906_wp, & + & -2.69777102_wp, -1.02505049_wp, -0.58685500_wp, -1.45145122_wp, & + & -2.40541304_wp, -1.69203752_wp, -2.26724745_wp, -3.10310210_wp, & + & -1.86075747_wp, -0.80448940_wp, -2.39773974_wp, -2.56549767_wp, & + & -0.87808999_wp, -2.73396321_wp, -0.83029671_wp, -11.75398799_wp, & + & -1.31388790_wp, -8.24562492_wp, -10.35444423_wp, -0.95899737_wp, & + & -8.15231565_wp, -9.89292464_wp, -1.33242505_wp, -6.74115531_wp, & + & -10.70388009_wp, -1.58157902_wp, -5.85438834_wp, -12.22563964_wp, & + & -1.36328660_wp, -7.34885541_wp, -9.80214255_wp, -1.52978269_wp, & + & -8.90594133_wp, -10.14815013_wp, 0.54154889_wp, -8.38650267_wp, & + & -10.49931208_wp, 0.79901826_wp, -9.38203093_wp, -10.70998717_wp, & + & 1.11407757_wp, -7.65292691_wp, -9.09618142_wp, 0.79789957_wp, & + & -8.30562191_wp, -8.57424989_wp, -1.34755332_wp, -6.56671061_wp, & + & -7.93225876_wp, -1.54003389_wp, -5.28442081_wp, -6.61418123_wp, & + & -0.76286617_wp, -5.32119848_wp, -6.14799422_wp, -0.35317107_wp, & + & -6.37979978_wp, -7.93713551_wp, -1.08578634_wp, -7.31127950_wp, & + & -8.59315218_wp, -1.14843741_wp, -4.50423311_wp, -7.65030847_wp, & + & -3.02435498_wp, -5.02525046_wp, -8.58961433_wp, -3.57065060_wp, & + & -5.02307886_wp, -7.00905835_wp, -3.42372017_wp, -5.80690305_wp, & + & -7.16204221_wp, -3.15749405_wp, -4.06457212_wp, -17.43058288_wp, & + & -2.42035227_wp, -12.36463160_wp, -15.99619581_wp, -2.24834444_wp, & + & -12.27993391_wp, -15.64319391_wp, -2.23048650_wp, -10.79044306_wp, & + & -16.51537087_wp, -2.11320790_wp, -9.93471095_wp, -17.91680114_wp, & + & -2.23299900_wp, -11.49332317_wp, -15.50941353_wp, -3.09168948_wp, & + & -12.78142649_wp, -15.55536381_wp, -0.93833708_wp, -12.94228153_wp, & + & -15.84869615_wp, -0.95575571_wp, -13.98856953_wp, -16.03272346_wp, & + & -0.09297582_wp, -12.45338038_wp, -14.47767602_wp, -0.82335274_wp, & + & -12.88025482_wp, -14.34607650_wp, -2.33565487_wp, -10.51837954_wp, & + & -13.78372308_wp, -2.21851631_wp, -9.19047495_wp, -12.34096854_wp, & + & -1.73676062_wp, -9.36174147_wp, -11.79062579_wp, -1.76228698_wp, & + & -10.45840029_wp, -13.64948267_wp, -2.39371860_wp, -11.25422671_wp, & + & -14.37200605_wp, -1.48863849_wp, -8.62445141_wp, -13.79959451_wp, & + & -3.56683153_wp, -8.46138656_wp, -14.82688656_wp, -3.90912863_wp, & + & -8.37001226_wp, -13.22866233_wp, -4.30169774_wp, -9.02310549_wp, & + & -13.37056551_wp, -3.46861114_wp, -7.46882985_wp, -23.17286315_wp, & + & -3.15174590_wp, -16.49265801_wp, -21.72973526_wp, -3.12122212_wp, & + & -16.39108280_wp, -21.39773203_wp, -3.01958234_wp, -14.90026510_wp, & + & -22.26054728_wp, -2.72197952_wp, -14.07935462_wp, -23.64738185_wp, & + & -2.85994100_wp, -15.64367859_wp, -21.32453126_wp, -4.04543388_wp, & + & -16.81659053_wp, -21.14552032_wp, -1.91688645_wp, -17.13806095_wp, & + & -21.41741901_wp, -1.98645722_wp, -18.18796868_wp, -21.54559733_wp, & + & -0.99313337_wp, -16.72794845_wp, -20.06340204_wp, -1.90498858_wp, & + & -17.05303888_wp, -20.12657682_wp, -3.25292097_wp, -14.58960752_wp, & + & -19.57146662_wp, -3.08309790_wp, -13.26408155_wp, -18.06621786_wp, & + & -2.86905255_wp, -13.44225876_wp, -17.51384622_wp, -3.12220078_wp, & + & -14.50884708_wp, -19.43438225_wp, -3.47897875_wp, -15.29708294_wp, & + & -20.03609337_wp, -2.20741371_wp, -12.79858841_wp, -19.82276312_wp, & + & -4.31814209_wp, -12.39191189_wp, -20.89395864_wp, -4.48136747_wp, & + & -12.30891365_wp, -19.36311231_wp, -5.19410994_wp, -12.84220377_wp, & + & -19.40984586_wp, -4.17122318_wp, -11.39877837_wp, -28.96415878_wp, & + & -3.69325487_wp, -20.61940207_wp, -27.52037893_wp, -3.67307032_wp, & + & -20.52282207_wp, -27.18297030_wp, -3.54168981_wp, -19.03557429_wp, & + & -28.03705103_wp, -3.20054884_wp, -18.22242125_wp, -29.43386533_wp, & + & -3.37740116_wp, -19.77638062_wp, -27.12504893_wp, -4.60967446_wp, & + & -20.93004652_wp, -26.92725358_wp, -2.48998011_wp, -21.29613442_wp, & + & -27.20766487_wp, -2.57551346_wp, -22.34260655_wp, -27.31265462_wp, & + & -1.55397481_wp, -20.89998831_wp, -25.84459924_wp, -2.49087825_wp, & + & -21.21885026_wp, -25.91675277_wp, -3.79490674_wp, -18.72078565_wp, & + & -25.36048310_wp, -3.62881649_wp, -17.39509569_wp, -23.83959453_wp, & + & -3.57870270_wp, -17.56017192_wp, -23.30518948_wp, -3.93653000_wp, & + & -18.60576233_wp, -25.23557058_wp, -4.08199809_wp, -19.41686667_wp, & + & -25.73546635_wp, -2.69224862_wp, -16.96879061_wp, -25.74570838_wp, & + & -4.79567584_wp, -16.47879563_wp, -26.82894979_wp, -4.84594358_wp, & + & -16.40713543_wp, -25.37225745_wp, -5.73113565_wp, -16.88739486_wp, & + & -25.33228586_wp, -4.65048014_wp, -15.48573035_wp, -34.77473744_wp, & + & -4.30611194_wp, -24.71339813_wp, -33.33097054_wp, -4.26470444_wp, & + & -24.62339949_wp, -32.98842783_wp, -4.11814962_wp, -23.13877333_wp, & + & -33.84208884_wp, -3.77791034_wp, -22.32483749_wp, -35.24546053_wp, & + & -3.99061172_wp, -23.87086248_wp, -32.92393398_wp, -5.19795395_wp, & + & -25.02668253_wp, -32.75853432_wp, -3.07777804_wp, -25.40643873_wp, & + & -33.04347921_wp, -3.17284100_wp, -26.45085974_wp, -33.15465578_wp, & + & -2.14509272_wp, -25.01299140_wp, -31.67557816_wp, -3.06349886_wp, & + & -25.33511769_wp, -31.71823763_wp, -4.35611626_wp, -22.82806142_wp, & + & -31.15714865_wp, -4.17842141_wp, -21.50589550_wp, -29.63670689_wp, & + & -4.13672276_wp, -21.67653791_wp, -29.10730411_wp, -4.51709976_wp, & + & -22.71672849_wp, -31.03905993_wp, -4.64855188_wp, -23.52391911_wp, & + & -31.52769153_wp, -3.23685678_wp, -21.08695922_wp, -31.54174351_wp, & + & -5.33588589_wp, -20.57736121_wp, -32.62473334_wp, -5.38140514_wp, & + & -20.49918575_wp, -31.17420645_wp, -6.27610192_wp, -20.98052049_wp, & + & -31.12187219_wp, -5.18382256_wp, -19.58804713_wp, -40.58582079_wp, & + & -4.99324199_wp, -28.79376511_wp, -39.14244842_wp, -4.93791069_wp, & + & -28.70484389_wp, -38.79984637_wp, -4.78442854_wp, -27.22093577_wp, & + & -39.65576409_wp, -4.45034394_wp, -26.40684992_wp, -41.05913751_wp, & + & -4.68080663_wp, -27.95157084_wp, -38.72679537_wp, -5.86811949_wp, & + & -29.10633359_wp, -38.58189266_wp, -3.74729859_wp, -29.49091977_wp, & + & -38.86683820_wp, -3.84722584_wp, -30.53488501_wp, -38.98639119_wp, & + & -2.81755515_wp, -29.09901641_wp, -37.49904930_wp, -3.72269458_wp, & + & -29.42058268_wp, -37.52691835_wp, -5.00912192_wp, -26.91148997_wp, & + & -36.96468072_wp, -4.82173964_wp, -25.59115467_wp, -35.44522886_wp, & + & -4.76269680_wp, -25.76625287_wp, -34.91451190_wp, -5.14167620_wp, & + & -26.80628832_wp, -36.84627105_wp, -5.29699304_wp, -27.60784475_wp, & + & -37.34501703_wp, -3.88349392_wp, -25.17358714_wp, -37.33362342_wp, & + & -5.98130538_wp, -24.65896572_wp, -38.41583553_wp, -6.03915218_wp, & + & -24.57811588_wp, -36.95620920_wp, -6.91817019_wp, -25.06078884_wp, & + & -36.91321796_wp, -5.82194315_wp, -23.67103739_wp, -46.39082612_wp, & + & -5.70911853_wp, -32.87543487_wp, -44.94751533_wp, -5.65185502_wp, & + & -32.78646797_wp, -44.60559099_wp, -5.49686790_wp, -31.30255288_wp, & + & -45.46280895_wp, -5.16554942_wp, -30.48867364_wp, -46.86430830_wp, & + & -5.39804604_wp, -32.03278980_wp, -44.53054366_wp, -6.58187056_wp, & + & -33.18706723_wp, -44.38837811_wp, -4.46124369_wp, -33.57353591_wp, & + & -44.67276584_wp, -4.56269225_wp, -34.61750948_wp, -44.79440063_wp, & + & -3.53167520_wp, -33.18279993_wp, -43.30559548_wp, -4.43492867_wp, & + & -33.50282058_wp, -43.33210732_wp, -5.71741334_wp, -30.99247804_wp, & + & -42.77147187_wp, -5.52645656_wp, -29.67194931_wp, -41.25249892_wp, & + & -5.45519716_wp, -29.84672407_wp, -40.71864549_wp, -5.82981755_wp, & + & -30.88673121_wp, -42.64971052_wp, -6.00186252_wp, -31.68850065_wp, & + & -43.15940788_wp, -4.59148378_wp, -29.25404324_wp, -43.13170108_wp, & + & -6.68939665_wp, -28.74059374_wp, -44.21344597_wp, -6.75531948_wp, & + & -28.65964963_wp, -42.74740935_wp, -7.62313275_wp, -29.14315655_wp, & + & -42.71236157_wp, -6.52761383_wp, -27.75261065_wp, -52.19478373_wp, & + & -6.42299617_wp, -36.95742840_wp, -50.75145810_wp, -6.36767889_wp, & + & -36.86791684_wp, -50.40986755_wp, -6.21399952_wp, -35.38379493_wp, & + & -51.26701901_wp, -5.88242022_wp, -34.56995053_wp, -52.66810830_wp, & + & -6.11149836_wp, -36.11484606_wp, -50.33547307_wp, -7.29794667_wp, & + & -37.26893942_wp, -50.19063190_wp, -5.17720934_wp, -37.65401961_wp, & + & -50.47504030_wp, -5.27747213_wp, -38.69810441_wp, -50.59550015_wp, & + & -4.24741273_wp, -37.26261980_wp, -49.10782434_wp, -5.15234354_wp, & + & -37.58317211_wp, -49.13667426_wp, -6.43587624_wp, -35.07356762_wp, & + & -48.57589764_wp, -6.24549985_wp, -33.75304087_wp, -47.05707946_wp, & + & -6.17179190_wp, -33.92830528_wp, -46.52304121_wp, -6.54519932_wp, & + & -34.96865889_wp, -48.45425576_wp, -6.72002310_wp, -35.76969887_wp, & + & -48.96518629_wp, -5.31161331_wp, -33.33399168_wp, -48.93393385_wp, & + & -7.41005769_wp, -32.82285893_wp, -50.01553108_wp, -7.47768967_wp, & + & -32.74135527_wp, -48.54849071_wp, -8.34275024_wp, -33.22673631_wp, & + & -48.51424425_wp, -7.24881480_wp, -31.83493352_wp, -57.99674990_wp, & + & -7.12488057_wp, -41.04452148_wp, -56.55346547_wp, -7.07121592_wp, & + & -40.95376149_wp, -56.21307391_wp, -6.91838349_wp, -39.46927745_wp, & + & -57.07047968_wp, -6.58563467_wp, -38.65617867_wp, -58.47042272_wp, & + & -6.81295752_wp, -40.20229168_wp, -56.13822623_wp, -8.00187591_wp, & + & -41.35465638_wp, -55.99047477_wp, -5.88122228_wp, -41.73901673_wp, & + & -56.27373156_wp, -5.98105060_wp, -42.78345362_wp, -56.39484332_wp, & + & -4.95105805_wp, -41.34797687_wp, -54.90772705_wp, -5.85751327_wp, & + & -41.66684595_wp, -54.94055497_wp, -7.14245207_wp, -39.15794658_wp, & + & -54.38049177_wp, -6.95338019_wp, -37.83694779_wp, -52.86137472_wp, & + & -6.88316910_wp, -38.01114373_wp, -52.32753829_wp, -7.25684670_wp, & + & -39.05150967_wp, -54.25802676_wp, -7.42765606_wp, -39.85355352_wp, & + & -54.76774925_wp, -6.01844560_wp, -37.41832391_wp, -54.74227202_wp, & + & -8.11685899_wp, -36.90688764_wp, -55.82412340_wp, -8.18197822_wp, & + & -36.82668589_wp, -54.35848157_wp, -9.05055743_wp, -37.31000603_wp, & + & -54.32344579_wp, -7.95628426_wp, -35.91848964_wp, -63.79967302_wp, & + & -7.82762801_wp, -45.13016479_wp, -62.35636625_wp, -7.77280362_wp, & + & -45.04042698_wp, -62.01503948_wp, -7.61994926_wp, -43.55620702_wp, & + & -62.87202915_wp, -7.28763509_wp, -42.74249289_wp, -64.27312442_wp, & + & -7.51570086_wp, -44.28782585_wp, -61.94071750_wp, -8.70306824_wp, & + & -45.44181198_wp, -61.79494120_wp, -6.58223810_wp, -45.82593520_wp, & + & -62.07902636_wp, -6.68208595_wp, -46.87014462_wp, -62.19964899_wp, & + & -5.65244754_wp, -45.43436324_wp, -60.71215175_wp, -6.55775716_wp, & + & -45.75469428_wp, -60.74222310_wp, -7.84347885_wp, -43.24564603_wp, & + & -60.18210509_wp, -7.65504770_wp, -41.92459375_wp, -58.66299867_wp, & + & -7.58510090_wp, -42.09844743_wp, -58.12883843_wp, -7.95922270_wp, & + & -43.13847543_wp, -60.05998070_wp, -8.12870137_wp, -43.94149245_wp, & + & -60.56936212_wp, -6.72032138_wp, -41.50552551_wp, -60.54387917_wp, & + & -8.81901140_wp, -40.99510352_wp, -61.62572102_wp, -8.88414324_wp, & + & -40.91483890_wp, -60.16012872_wp, -9.75249274_wp, -41.39877186_wp, & + & -60.12493110_wp, -8.65897907_wp, -40.00666816_wp, -69.60103803_wp, & + & -8.53413864_wp, -49.21684890_wp, -68.15785010_wp, -8.47867857_wp, & + & -49.12589161_wp, -67.81763240_wp, -8.32579354_wp, -47.64144161_wp, & + & -68.67508685_wp, -7.99324945_wp, -46.82832607_wp, -70.07546353_wp, & + & -8.22233349_wp, -48.37502914_wp, -67.74147938_wp, -9.40867405_wp, & + & -49.52713977_wp, -67.59629982_wp, -7.28768389_wp, -49.91067885_wp, & + & -67.87938564_wp, -7.38744689_wp, -50.95516477_wp, -68.00180531_wp, & + & -6.35817126_wp, -49.51926959_wp, -66.51358383_wp, -7.26269599_wp, & + & -49.83843836_wp, -66.54503625_wp, -8.54954083_wp, -47.33014156_wp, & + & -65.98503006_wp, -8.35992298_wp, -46.00922877_wp, -64.46600858_wp, & + & -8.28906429_wp, -46.18348961_wp, -63.93189170_wp, -8.66340616_wp, & + & -47.22346910_wp, -65.86249502_wp, -8.83466174_wp, -48.02575498_wp, & + & -66.37281236_wp, -7.42514525_wp, -45.59075191_wp, -66.34601142_wp, & + & -9.52346064_wp, -45.07891719_wp, -67.42780069_wp, -9.58900367_wp, & + & -44.99827722_wp, -65.96199846_wp, -10.45703300_wp, -45.48211973_wp, & + & -65.92682475_wp, -9.36262739_wp, -44.09071021_wp, -75.39951952_wp, & + & -9.24367326_wp, -53.30656983_wp, -73.95634218_wp, -9.18800782_wp, & + & -53.21567115_wp, -73.61652519_wp, -9.03439604_wp, -51.73118981_wp, & + & -74.47436169_wp, -8.70178058_wp, -50.91849070_wp, -75.87379139_wp, & + & -8.93178312_wp, -52.46466935_wp, -73.53982777_wp, -10.11819996_wp, & + & -53.61632391_wp, -73.39482497_wp, -7.99744205_wp, -54.00110734_wp, & + & -73.67794017_wp, -8.09778786_wp, -55.04553178_wp, -73.80031153_wp, & + & -7.06770679_wp, -53.61021435_wp, -72.31210581_wp, -7.97241915_wp, & + & -53.92892119_wp, -72.34404886_wp, -9.25777666_wp, -51.41920147_wp, & + & -71.78520787_wp, -9.06803135_wp, -50.09781093_wp, -70.26610665_wp, & + & -8.99628546_wp, -50.27068085_wp, -69.73076190_wp, -9.37059458_wp, & + & -51.31003493_wp, -71.66100102_wp, -9.54281652_wp, -52.11433016_wp, & + & -72.17395664_wp, -8.13358591_wp, -49.67949691_wp, -72.14628895_wp, & + & -10.23199593_wp, -49.16805971_wp, -73.22810959_wp, -10.29827366_wp, & + & -49.08844663_wp, -71.76127031_wp, -11.16523041_wp, -49.57108682_wp, & + & -71.72814050_wp, -10.07107586_wp, -48.17942786_wp, -81.20090856_wp, & + & -9.95593488_wp, -57.39105189_wp, -79.75767895_wp, -9.89963869_wp, & + & -57.30135563_wp, -79.41655671_wp, -9.74633235_wp, -55.81717691_wp, & + & -80.27368112_wp, -9.41399269_wp, -55.00361832_wp, -81.67470659_wp, & + & -9.64427686_wp, -56.54880851_wp, -79.34109108_wp, -10.82947506_wp, & + & -57.70274796_wp, -79.19744738_wp, -8.70849430_wp, -58.08684703_wp, & + & -79.48142863_wp, -8.80858486_wp, -59.13106026_wp, -79.60305180_wp, & + & -7.77911035_wp, -57.69524034_wp, -78.11467808_wp, -8.68296022_wp, & + & -58.01559934_wp, -78.14375229_wp, -9.96957784_wp, -55.50641377_wp, & + & -77.58380655_wp, -9.77968970_wp, -54.18553051_wp, -76.06489700_wp, & + & -9.70707192_wp, -54.35964083_wp, -75.53005844_wp, -10.08182081_wp, & + & -55.39908889_wp, -77.46129800_wp, -10.25441253_wp, -56.20219870_wp, & + & -77.97278699_wp, -8.84556811_wp, -53.76672241_wp, -77.94325855_wp, & + & -10.94403789_wp, -53.25561745_wp, -79.02495530_wp, -11.01097637_wp, & + & -53.17489833_wp, -77.55809114_wp, -11.87696775_wp, -53.65920987_wp, & + & -77.52417408_wp, -10.78303687_wp, -52.26739207_wp, -87.00114489_wp, & + & -10.66721658_wp, -61.47708755_wp, -85.55799664_wp, -10.61110699_wp, & + & -61.38623282_wp, -85.21792624_wp, -10.45823373_wp, -59.90176374_wp, & + & -86.07547056_wp, -10.12570271_wp, -59.08873342_wp, -87.47558382_wp, & + & -10.35554185_wp, -60.63521476_wp, -85.14119195_wp, -11.54086288_wp, & + & -61.78757906_wp, -84.99698909_wp, -9.41977207_wp, -62.17089177_wp, & + & -85.28014963_wp, -9.51947049_wp, -63.21536411_wp, -85.40278433_wp, & + & -8.49046732_wp, -61.77929253_wp, -83.91427095_wp, -9.39439906_wp, & + & -62.09877143_wp, -83.94540993_wp, -10.68207379_wp, -59.59032362_wp, & + & -83.38555540_wp, -10.49210907_wp, -58.26942293_wp, -81.86667570_wp, & + & -10.41929289_wp, -58.44386957_wp, -81.33213548_wp, -10.79378635_wp, & + & -59.48357668_wp, -83.26270208_wp, -10.96683141_wp, -60.28592187_wp, & + & -83.77455194_wp, -9.55798754_wp, -57.85062621_wp, -83.74490462_wp, & + & -11.65643354_wp, -57.33945843_wp, -84.82659839_wp, -11.72345461_wp, & + & -57.25873851_wp, -83.35967656_wp, -12.58935950_wp, -57.74299633_wp, & + & -83.32584087_wp, -11.49535226_wp, -56.35123754_wp, -92.79914124_wp, & + & -11.37716541_wp, -65.56648968_wp, -91.35599308_wp, -11.32157592_wp, & + & -65.47525733_wp, -91.01645193_wp, -11.16862398_wp, -63.99065584_wp, & + & -91.87433068_wp, -10.83603863_wp, -63.17799265_wp, -93.27355390_wp, & + & -11.06541341_wp, -64.72461576_wp, -90.93937375_wp, -12.25155620_wp, & + & -65.87628365_wp, -90.79427302_wp, -10.13058398_wp, -66.25991271_wp, & + & -91.07717357_wp, -10.23032455_wp, -67.30445139_wp, -91.19980267_wp, & + & -9.20105358_wp, -65.86857369_wp, -89.71156589_wp, -10.10564030_wp, & + & -66.18748439_wp, -89.74410150_wp, -11.39251804_wp, -63.67859552_wp, & + & -89.18512952_wp, -11.20293844_wp, -62.35726130_wp, -87.66612160_wp, & + & -11.13029374_wp, -62.53053316_wp, -87.13080527_wp, -11.50470943_wp, & + & -63.56986569_wp, -89.06104199_wp, -11.67742850_wp, -64.37377617_wp, & + & -89.57431555_wp, -10.26887480_wp, -61.93851491_wp, -89.54525538_wp, & + & -12.36744782_wp, -61.42782192_wp, -90.62701532_wp, -12.43448962_wp, & + & -61.34802459_wp, -89.15967123_wp, -13.30029184_wp, -61.83120985_wp, & + & -89.12702582_wp, -12.20655249_wp, -60.43921720_wp, -98.59876790_wp, & + & -12.08471506_wp, -69.65421117_wp, -97.15553976_wp, -12.02980538_wp, & + & -69.56353322_wp, -96.81525727_wp, -11.87728839_wp, -68.07905237_wp, & + & -97.67268987_wp, -11.54475869_wp, -67.26589803_wp, -99.07271963_wp, & + & -11.77299999_wp, -68.81206822_wp, -96.73950759_wp, -12.95989710_wp, & + & -69.96490881_wp, -96.59361425_wp, -10.83891137_wp, -70.34819668_wp, & + & -96.87696329_wp, -10.93832850_wp, -71.39264439_wp, -96.99859718_wp, & + & -9.90928359_wp, -69.95652113_wp, -95.51087012_wp, -10.81443743_wp, & + & -70.27618387_wp, -95.54275249_wp, -12.10131546_wp, -67.76763893_wp, & + & -94.98328750_wp, -11.91218355_wp, -66.44644237_wp, -93.46429164_wp, & + & -11.83985572_wp, -66.62000163_wp, -92.92920581_wp, -12.21426726_wp, & + & -67.65944682_wp, -94.86006525_wp, -12.38632272_wp, -68.46313317_wp, & + & -95.37216236_wp, -10.97814929_wp, -66.02734603_wp, -95.34333685_wp, & + & -13.07685566_wp, -65.51716766_wp, -96.42508195_wp, -13.14377083_wp, & + & -65.43708508_wp, -94.95797746_wp, -14.00966127_wp, -65.92086165_wp, & + & -94.92480957_wp, -12.91623289_wp, -64.52864404_wp, -104.39897705_wp, & + & -12.78836374_wp, -73.74255797_wp, -102.95574303_wp, -12.73401670_wp, & + & -73.65137277_wp, -102.61570392_wp, -12.58199296_wp, -72.16676227_wp, & + & -103.47317416_wp, -12.24941770_wp, -71.35367405_wp, -104.87315015_wp, & + & -12.47672227_wp, -72.90052149_wp, -102.53995538_wp, -13.66416230_wp, & + & -74.05287540_wp, -102.39312083_wp, -11.54313332_wp, -74.43556185_wp, & + & -102.67616738_wp, -11.64217087_wp, -75.48012731_wp, -102.79788213_wp, & + & -10.61345424_wp, -74.04377754_wp, -101.31039053_wp, -11.51907947_wp, & + & -74.36319412_wp, -101.34326783_wp, -12.80639626_wp, -71.85526744_wp, & + & -100.78357289_wp, -12.61759529_wp, -70.53410255_wp, -99.26452099_wp, & + & -12.54623645_wp, -70.70786644_wp, -98.72991263_wp, -12.92038574_wp, & + & -71.74765537_wp, -100.66065892_wp, -13.09145827_wp, -72.55082895_wp, & + & -101.17174766_wp, -11.68327018_wp, -70.11499661_wp, -101.14432160_wp, & + & -13.78197082_wp, -69.60473426_wp, -102.22610534_wp, -13.84819217_wp, & + & -69.52459318_wp, -100.75958103_wp, -14.71505595_wp, -70.00837130_wp, & + & -100.72564933_wp, -13.62154752_wp, -68.61624019_wp, -110.19824775_wp, & + & -13.48980789_wp, -77.83326162_wp, -108.75499414_wp, -13.43606160_wp, & + & -77.74171366_wp, -108.41526487_wp, -13.28410683_wp, -76.25699729_wp, & + & -109.27296944_wp, -12.95166069_wp, -75.44409890_wp, -110.67245058_wp, & + & -13.17834735_wp, -76.99116905_wp, -108.33947926_wp, -14.36640084_wp, & + & -78.14306189_wp, -108.19168827_wp, -12.24545175_wp, -78.52582005_wp, & + & -108.47450555_wp, -12.34445021_wp, -79.57045131_wp, -108.59618807_wp, & + & -11.31558510_wp, -78.13420972_wp, -107.10896816_wp, -12.22181861_wp, & + & -78.45317831_wp, -107.14290524_wp, -13.50850840_wp, -75.94512756_wp, & + & -106.58368199_wp, -13.31989429_wp, -74.62370719_wp, -105.06450648_wp, & + & -13.24907487_wp, -74.79673921_wp, -104.52958863_wp, -13.62295197_wp, & + & -75.83646699_wp, -106.46007683_wp, -13.79351397_wp, -76.64049231_wp, & + & -106.97169657_wp, -12.38541057_wp, -74.20479970_wp, -106.94530641_wp, & + & -14.48410246_wp, -73.69446990_wp, -108.02715371_wp, -14.54990671_wp, & + & -73.61484218_wp, -106.56073286_wp, -15.41734545_wp, -74.09790046_wp, & + & -106.52704724_wp, -14.32382074_wp, -72.70577873_wp, -115.99822825_wp, & + & -14.19042019_wp, -81.92368495_wp, -114.55493997_wp, -14.13669474_wp, & + & -81.83239811_wp, -114.21490262_wp, -13.98487730_wp, -80.34772294_wp, & + & -115.07253740_wp, -13.65280138_wp, -79.53459749_wp, -116.47226814_wp, & + & -13.87936230_wp, -81.08135089_wp, -114.13950570_wp, -15.06701863_wp, & + & -82.23387009_wp, -113.99180995_wp, -12.94606499_wp, -82.61660028_wp, & + & -114.27485913_wp, -13.04503910_wp, -83.66117277_wp, -114.39623724_wp, & + & -12.01621256_wp, -82.22488316_wp, -112.90907556_wp, -12.92241696_wp, & + & -82.54420469_wp, -112.94239379_wp, -14.20889580_wp, -80.03612509_wp, & + & -112.38305595_wp, -14.02043343_wp, -78.71471283_wp, -110.86383992_wp, & + & -13.94995220_wp, -78.88766919_wp, -110.32897589_wp, -14.32362415_wp, & + & -79.92749594_wp, -112.25960748_wp, -14.49361296_wp, -80.73164610_wp, & + & -112.77085276_wp, -13.08587836_wp, -78.29575631_wp, -112.74493881_wp, & + & -15.18459538_wp, -77.78551234_wp, -113.82680071_wp, -15.25018368_wp, & + & -77.70590509_wp, -112.36054729_wp, -16.11790840_wp, -78.18895568_wp, & + & -112.32666956_wp, -15.02442555_wp, -76.79680819_wp, -121.79852404_wp, & + & -14.89104269_wp, -86.01420060_wp, -120.35524455_wp, -14.83705976_wp, & + & -85.92281735_wp, -120.01527210_wp, -14.68530516_wp, -84.43810927_wp, & + & -120.87305085_wp, -14.35369097_wp, -83.62494661_wp, -122.27267434_wp, & + & -14.58037751_wp, -85.17178337_wp, -119.93960899_wp, -15.76727787_wp, & + & -86.32433015_wp, -119.79231545_wp, -13.64627974_wp, -86.70693631_wp, & + & -120.07529480_wp, -13.74526174_wp, -87.75152788_wp, -120.19695612_wp, & + & -12.71652949_wp, -86.31519796_wp, -118.70958998_wp, -13.62240706_wp, & + & -86.63449204_wp, -118.74265819_wp, -14.90882240_wp, -84.12656795_wp, & + & -118.18325739_wp, -14.72036724_wp, -82.80516870_wp, -116.66402462_wp, & + & -14.64999673_wp, -82.97821701_wp, -116.12933134_wp, -15.02321182_wp, & + & -84.01829931_wp, -118.05979232_wp, -15.19318241_wp, -84.82216610_wp, & + & -118.57091933_wp, -13.78574801_wp, -82.38622020_wp, -118.54527091_wp, & + & -15.88444975_wp, -81.87592617_wp, -119.62714256_wp, -15.94989317_wp, & + & -81.79631719_wp, -118.16101087_wp, -16.81783020_wp, -82.27933810_wp, & + & -118.12698826_wp, -15.72430730_wp, -80.88722488_wp, -127.59816146_wp, & + & -15.59264884_wp, -90.10583759_wp, -126.15491009_wp, -15.53823165_wp, & + & -90.01427100_wp, -125.81520975_wp, -15.38627350_wp, -88.52951229_wp, & + & -126.67329434_wp, -15.05512870_wp, -87.71647688_wp, -128.07248048_wp, & + & -15.28225685_wp, -89.26340955_wp, -125.73892684_wp, -16.46836560_wp, & + & -90.41562517_wp, -125.59225120_wp, -14.34736681_wp, -90.79844888_wp, & + & -125.87512036_wp, -14.44654476_wp, -91.84305272_wp, -125.99719720_wp, & + & -13.41769297_wp, -90.40684503_wp, -124.50953978_wp, -14.32316986_wp, & + & -90.72592573_wp, -124.54253446_wp, -15.60914937_wp, -88.21778639_wp, & + & -123.98343107_wp, -15.42070085_wp, -86.89625287_wp, -122.46415908_wp, & + & -15.35022676_wp, -87.06900537_wp, -121.92930022_wp, -15.72298244_wp, & + & -88.10917080_wp, -123.85941249_wp, -15.89313631_wp, -88.91329232_wp, & + & -124.37118947_wp, -14.48609393_wp, -86.47735825_wp, -124.34566112_wp, & + & -16.58480546_wp, -85.96712751_wp, -125.42755585_wp, -16.65026626_wp, & + & -85.88782889_wp, -123.96127993_wp, -17.51817216_wp, -86.37045476_wp, & + & -123.92766842_wp, -16.42468444_wp, -84.97830179_wp, -133.39752081_wp, & + & -16.29595125_wp, -94.19770933_wp, -131.95428396_wp, -16.24102803_wp, & + & -94.10624476_wp, -131.61459305_wp, -16.08876497_wp, -92.62151417_wp, & + & -132.47281504_wp, -15.75796541_wp, -91.80848024_wp, -133.87187432_wp, & + & -15.98566969_wp, -93.35525649_wp, -131.53799362_wp, -17.17108613_wp, & + & -94.50745881_wp, -131.39209606_wp, -15.05010681_wp, -94.89066993_wp, & + & -131.67508443_wp, -15.14953877_wp, -95.93521864_wp, -131.79727962_wp, & + & -14.12049946_wp, -94.49915469_wp, -130.30938316_wp, -15.02555823_wp, & + & -94.81830883_wp, -130.34180895_wp, -16.31100974_wp, -92.30980265_wp, & + & -129.78285773_wp, -16.12253270_wp, -90.98821056_wp, -128.26358239_wp, & + & -16.05173921_wp, -91.16081284_wp, -127.72855581_wp, -16.42418043_wp, & + & -92.20100498_wp, -129.65855488_wp, -16.59474270_wp, -93.00528394_wp, & + & -130.17081826_wp, -15.18802289_wp, -90.56928363_wp, -130.14497750_wp, & + & -17.28676503_wp, -90.05920207_wp, -131.22687043_wp, -17.35243488_wp, & + & -89.98004596_wp, -129.76037033_wp, -18.22003278_wp, -90.46254259_wp, & + & -129.72714366_wp, -17.12663121_wp, -89.07031250_wp, -139.19680221_wp, & + & -17.00046015_wp, -98.28951388_wp, -137.75358559_wp, -16.94513152_wp, & + & -98.19803710_wp, -137.41393429_wp, -16.79265670_wp, -96.71332650_wp, & + & -138.27222678_wp, -16.46199939_wp, -95.90031028_wp, -139.67127881_wp, & + & -16.69016079_wp, -97.44713937_wp, -137.33703327_wp, -17.87510305_wp, & + & -98.59917888_wp, -137.19174307_wp, -15.75410956_wp, -98.98255766_wp, & + & -137.47474774_wp, -15.85368854_wp, -100.02708801_wp, -137.59715857_wp, & + & -14.82458512_wp, -98.59108502_wp, -136.10903460_wp, -15.72926868_wp, & + & -98.91024141_wp, -136.14108938_wp, -17.01456506_wp, -96.40163941_wp, & + & -135.58215408_wp, -16.82607760_wp, -95.08004849_wp, -134.06289319_wp, & + & -16.75506021_wp, -95.25269871_wp, -133.52785351_wp, -17.12733615_wp, & + & -96.29294402_wp, -135.45781137_wp, -17.29826134_wp, -97.09711398_wp, & + & -135.97022073_wp, -15.89163459_wp, -94.66107105_wp, -135.94411815_wp, & + & -17.99039973_wp, -94.15109517_wp, -137.02600394_wp, -18.05621707_wp, & + & -94.07195838_wp, -135.55938148_wp, -18.92359624_wp, -94.55447691_wp, & + & -135.52632001_wp, -17.83025625_wp, -93.16219287_wp, -144.99527681_wp, & + & -17.70547759_wp, -102.38224523_wp, -143.55208744_wp, -17.65000488_wp, & + & -102.29052239_wp, -143.21272528_wp, -17.49737219_wp, -100.80577021_wp, & + & -144.07115175_wp, -17.16657289_wp, -99.99295360_wp, -145.46994847_wp, & + & -17.39504347_wp, -101.54003232_wp, -143.13538494_wp, -18.57997727_wp, & + & -102.69150407_wp, -142.99022211_wp, -16.45900829_wp, -103.07506517_wp, & + & -143.27305322_wp, -16.55871268_wp, -104.11963085_wp, -143.39577903_wp, & + & -15.52948166_wp, -102.68374450_wp, -141.90752714_wp, -16.43406917_wp, & + & -103.00257984_wp, -141.93995522_wp, -17.71932410_wp, -100.49382452_wp, & + & -141.38126700_wp, -17.53079900_wp, -99.17213987_wp, -139.86199108_wp, & + & -17.45966974_wp, -99.34457054_wp, -139.32677132_wp, -17.83194803_wp, & + & -100.38472346_wp, -141.25655791_wp, -18.00308823_wp, -101.18915434_wp, & + & -141.76945454_wp, -16.59637342_wp, -98.75323559_wp, -141.74334937_wp, & + & -18.69513710_wp, -98.24325516_wp, -142.82524845_wp, -18.76101378_wp, & + & -98.16434034_wp, -141.35847983_wp, -19.62831376_wp, -98.64655493_wp, & + & -141.32576420_wp, -18.53496489_wp, -97.25426849_wp, -150.79310300_wp, & + & -18.41004770_wp, -106.47559075_wp, -149.34991105_wp, -18.35486793_wp, & + & -106.38383494_wp, -149.01060935_wp, -18.20219450_wp, -104.89908675_wp, & + & -149.86898542_wp, -17.87103274_wp, -104.08636290_wp, -151.26774235_wp, & + & -18.09927027_wp, -105.63348760_wp, -148.93339655_wp, -19.28495630_wp, & + & -106.78474286_wp, -148.78778817_wp, -17.16403879_wp, -107.16844279_wp, & + & -149.07058736_wp, -17.26378705_wp, -108.21301289_wp, -149.19319726_wp, & + & -16.23440432_wp, -106.77722418_wp, -147.70509241_wp, -17.13929238_wp, & + & -107.09590528_wp, -147.73796242_wp, -18.42460588_wp, -104.58697609_wp, & + & -147.17949646_wp, -18.23616436_wp, -103.26519200_wp, -145.66020778_wp, & + & -18.16497196_wp, -103.43734061_wp, -145.12474107_wp, -18.53743816_wp, & + & -104.47729792_wp, -147.05455357_wp, -18.70860432_wp, -105.28218974_wp, & + & -147.56781260_wp, -17.30178824_wp, -102.84630074_wp, -147.54170910_wp, & + & -19.40058520_wp, -102.33645992_wp, -148.62362067_wp, -19.46648939_wp, & + & -102.25773707_wp, -147.15674852_wp, -20.33371871_wp, -102.73977171_wp, & + & -147.12429584_wp, -19.24048184_wp, -101.34738940_wp, -156.59102771_wp, & + & -19.11302484_wp, -110.56862757_wp, -155.14781757_wp, -19.05838377_wp, & + & -110.47696237_wp, -154.80839724_wp, -18.90588129_wp, -108.99224403_wp, & + & -155.66653896_wp, -18.57414508_wp, -108.17950659_wp, -157.06552234_wp, & + & -18.80190438_wp, -109.72657173_wp, -154.73169129_wp, -19.98861669_wp, & + & -110.87793128_wp, -154.58530329_wp, -17.86774376_wp, -111.26158123_wp, & + & -154.86814351_wp, -17.96738546_wp, -112.30615082_wp, -154.99039858_wp, & + & -16.93797798_wp, -110.87035021_wp, -153.50259894_wp, -17.84336355_wp, & + & -111.18904810_wp, -153.53587647_wp, -19.12901995_wp, -108.68015401_wp, & + & -152.97735418_wp, -18.94068954_wp, -107.35838838_wp, -151.45806970_wp, & + & -18.86979727_wp, -107.53054767_wp, -150.92262853_wp, -19.24270802_wp, & + & -108.57035756_wp, -152.85262756_wp, -19.41343651_wp, -109.37534648_wp, & + & -153.36551552_wp, -18.00624977_wp, -106.93950011_wp, -153.33977008_wp, & + & -20.10505662_wp, -106.42966593_wp, -154.42169128_wp, -20.17074715_wp, & + & -106.35089903_wp, -152.95500754_wp, -21.03826131_wp, -106.83300273_wp, & + & -152.92228178_wp, -19.94504211_wp, -105.44061290_wp, -162.38846510_wp, & + & -19.81331850_wp, -114.66237612_wp, -160.94526499_wp, -19.75934573_wp, & + & -114.57037168_wp, -160.60614601_wp, -19.60711637_wp, -113.08556520_wp, & + & -161.46425602_wp, -19.27476074_wp, -112.27304873_wp, -162.86301293_wp, & + & -19.50186346_wp, -113.82047323_wp, -160.52946271_wp, -20.68972093_wp, & + & -114.97134393_wp, -160.38201186_wp, -18.56886277_wp, -115.35469982_wp, & + & -160.66462491_wp, -18.66825130_wp, -116.39935413_wp, -160.78679373_wp, & + & -17.63896286_wp, -114.96346138_wp, -159.29931415_wp, -18.54497968_wp, & + & -115.28188054_wp, -159.33389176_wp, -19.83127043_wp, -112.77316679_wp, & + & -158.77544073_wp, -19.64315264_wp, -111.45135324_wp, -157.25613548_wp, & + & -19.57280313_wp, -111.62347004_wp, -156.72078921_wp, -19.94612934_wp, & + & -112.66318259_wp, -158.65067950_wp, -20.11609762_wp, -113.46823175_wp, & + & -159.16330884_wp, -18.70858019_wp, -111.03249398_wp, -159.13831679_wp, & + & -20.80739470_wp, -110.52265457_wp, -160.22026421_wp, -20.87269734_wp, & + & -110.44392438_wp, -158.75387723_wp, -21.74073353_wp, -110.92598752_wp, & + & -158.72080110_wp, -20.64754018_wp, -109.53358603_wp, -168.18528798_wp, & + & -20.51042625_wp, -118.75706534_wp, -166.74208214_wp, -20.45723463_wp, & + & -118.66486205_wp, -166.40315925_wp, -20.30531145_wp, -117.17998322_wp, & + & -167.26116416_wp, -19.97223109_wp, -116.36765284_wp, -168.65975793_wp, & + & -20.19848203_wp, -117.91529753_wp, -166.32672715_wp, -21.38780283_wp, & + & -119.06584343_wp, -166.17804163_wp, -19.26698872_wp, -119.44898341_wp, & + & -166.46047829_wp, -19.36614350_wp, -120.49370727_wp, -166.58241965_wp, & + & -18.33690735_wp, -119.05775891_wp, -165.09534642_wp, -19.24368210_wp, & + & -119.37592270_wp, -165.13117528_wp, -20.53055654_wp, -116.86730233_wp, & + & -164.57288082_wp, -20.34281378_wp, -115.54537928_wp, -163.05352575_wp, & + & -20.27313004_wp, -115.71722346_wp, -162.51812222_wp, -20.64692556_wp, & + & -116.75673676_wp, -164.44802866_wp, -20.81588442_wp, -117.56222386_wp, & + & -164.96043178_wp, -19.40812527_wp, -115.12648868_wp, -164.93638653_wp, & + & -21.50700766_wp, -114.61686392_wp, -166.01837399_wp, -21.57191406_wp, & + & -114.53836349_wp, -164.55220543_wp, -22.44045642_wp, -115.02019019_wp, & + & -164.51901813_wp, -21.34738851_wp, -113.62769410_wp, -173.98263586_wp, & + & -21.20567606_wp, -122.85109411_wp, -172.53940285_wp, -21.15292651_wp, & + & -122.75905127_wp, -172.20025336_wp, -21.00115390_wp, -121.27421123_wp, & + & -173.05798742_wp, -20.66756085_wp, -120.46180817_wp, -174.45691362_wp, & + & -20.89336483_wp, -122.00935612_wp, -172.12438348_wp, -22.08359109_wp, & + & -123.16015138_wp, -171.97505858_wp, -19.96278318_wp, -123.54311218_wp, & + & -172.25758652_wp, -20.06175240_wp, -124.58782729_wp, -172.37911974_wp, & + & -19.03261159_wp, -123.15177341_wp, -170.89235065_wp, -19.93982318_wp, & + & -123.47010856_wp, -170.92836419_wp, -21.22709772_wp, -120.96163876_wp, & + & -170.36986437_wp, -21.03950370_wp, -119.63978704_wp, -168.85050467_wp, & + & -20.97039439_wp, -119.81174275_wp, -168.31525510_wp, -21.34477902_wp, & + & -120.85111966_wp, -170.24544872_wp, -21.51289620_wp, -121.65658869_wp, & + & -170.75706771_wp, -20.10467775_wp, -119.22088838_wp, -170.73360950_wp, & + & -22.20355045_wp, -118.71117428_wp, -171.81560333_wp, -22.26811091_wp, & + & -118.63249426_wp, -170.34978322_wp, -23.13713416_wp, -119.11452808_wp, & + & -170.31602277_wp, -22.04402628_wp, -117.72207903_wp, -179.78064158_wp, & + & -21.90088629_wp, -126.94426950_wp, -178.33740407_wp, -21.84802724_wp, & + & -126.85222536_wp, -177.99814222_wp, -21.69636494_wp, -125.36739717_wp, & + & -178.85573874_wp, -21.36258525_wp, -124.55493286_wp, -180.25498197_wp, & + & -21.58849109_wp, -126.10260585_wp, -177.92234677_wp, -22.77859844_wp, & + & -127.25349439_wp, -177.77312112_wp, -20.65771317_wp, -127.63608026_wp, & + & -178.05558407_wp, -20.75651313_wp, -128.68082697_wp, -178.17725308_wp, & + & -19.72763496_wp, -127.24459233_wp, -176.69041689_wp, -20.63470244_wp, & + & -127.56300715_wp, -176.72624821_wp, -21.92252097_wp, -125.05494820_wp, & + & -176.16745321_wp, -21.73476014_wp, -123.73324220_wp, -174.64811412_wp, & + & -21.66587662_wp, -123.90551109_wp, -174.11309927_wp, -22.04068772_wp, & + & -124.94485252_wp, -176.04350594_wp, -22.20858141_wp, -125.74995973_wp, & + & -176.55447817_wp, -20.79982667_wp, -123.31442497_wp, -176.53106054_wp, & + & -22.89861302_wp, -122.80432890_wp, -177.61303565_wp, -22.96306061_wp, & + & -122.72531551_wp, -176.14743676_wp, -23.83230183_wp, -123.20763412_wp, & + & -176.11315907_wp, -22.73895613_wp, -121.81538596_wp, -185.57820958_wp, & + & -22.59843677_wp, -131.03790049_wp, -184.13501075_wp, -22.54483962_wp, & + & -130.94557320_wp, -183.79602215_wp, -22.39318894_wp, -129.46066705_wp, & + & -184.65383969_wp, -22.05971755_wp, -128.64831536_wp, -186.05289187_wp, & + & -22.28629088_wp, -130.19634173_wp, -183.71942495_wp, -23.47512658_wp, & + & -131.34694539_wp, -183.57115709_wp, -21.35408816_wp, -131.72908063_wp, & + & -183.85330498_wp, -21.45281334_wp, -132.77391795_wp, -183.97585117_wp, & + & -20.42429304_wp, -131.33750184_wp, -182.48848140_wp, -21.33054383_wp, & + & -131.65572299_wp, -182.52408121_wp, -22.61893845_wp, -129.14805653_wp, & + & -181.96535462_wp, -22.43075452_wp, -127.82636970_wp, -180.44602365_wp, & + & -22.36140715_wp, -127.99862417_wp, -179.91089085_wp, -22.73621719_wp, & + & -129.03790401_wp, -181.84119568_wp, -22.90477870_wp, -129.84301980_wp, & + & -182.35272805_wp, -21.49589941_wp, -127.40770331_wp, -182.32848881_wp, & + & -23.59459597_wp, -126.89725335_wp, -183.41043160_wp, -23.65941302_wp, & + & -126.81811584_wp, -181.94458018_wp, -24.52821131_wp, -127.30045915_wp, & + & -181.91053350_wp, -23.43464640_wp, -125.90837882_wp, -191.37573361_wp, & + & -23.30001948_wp, -135.13090066_wp, -189.93252408_wp, -23.24585873_wp, & + & -135.03894829_wp, -189.59327127_wp, -23.09389767_wp, -133.55412491_wp, & + & -190.45114887_wp, -22.76098770_wp, -132.74160291_wp, -191.85031098_wp, & + & -22.98820133_wp, -134.28915815_wp, -189.51670473_wp, -24.17604605_wp, & + & -135.44031965_wp, -189.36926380_wp, -22.05500719_wp, -135.82271811_wp, & + & -189.65156726_wp, -22.15399602_wp, -136.86748771_wp, -189.77422756_wp, & + & -21.12530219_wp, -135.43120670_wp, -188.28658221_wp, -22.03105340_wp, & + & -135.74956286_wp, -188.32114268_wp, -23.31887283_wp, -133.24167593_wp, & + & -187.76247515_wp, -23.13009149_wp, -131.92003717_wp, -186.24318895_wp, & + & -23.05961909_wp, -132.09224382_wp, -185.70772228_wp, -23.43417708_wp, & + & -133.13143752_wp, -187.63815693_wp, -23.60428079_wp, -133.93670651_wp, & + & -188.15060336_wp, -22.19549080_wp, -131.50150268_wp, -188.12465654_wp, & + & -24.29408955_wp, -130.99074245_wp, -189.20654209_wp, -24.35971145_wp, & + & -130.91149867_wp, -187.74007974_wp, -25.22746025_wp, -131.39387789_wp, & + & -187.70672932_wp, -24.13370534_wp, -130.00192497_wp, -197.17504759_wp, & + & -24.00672921_wp, -139.22044843_wp, -195.73182276_wp, -23.95164475_wp, & + & -139.12935849_wp, -195.39178599_wp, -23.79949282_wp, -137.64475051_wp, & + & -196.24945637_wp, -23.46741225_wp, -136.83166731_wp, -197.64936495_wp, & + & -23.69552576_wp, -138.37833200_wp, -195.31565148_wp, -24.88156317_wp, & + & -139.53099069_wp, -195.16983638_wp, -22.76043876_wp, -139.91350899_wp, & + & -195.45266593_wp, -22.85966774_wp, -140.95811503_wp, -195.57523640_wp, & + & -21.83100446_wp, -139.52180897_wp, -194.08713220_wp, -22.73571385_wp, & + & -139.84097215_wp, -194.11924350_wp, -24.02324152_wp, -137.33309968_wp, & + & -193.55998744_wp, -23.83364680_wp, -136.01182892_wp, -192.04085340_wp, & + & -23.76194273_wp, -136.18483693_wp, -191.50560705_wp, -24.13619259_wp, & + & -137.22425320_wp, -193.43639341_wp, -24.30795554_wp, -138.02854585_wp, & + & -193.94871921_wp, -22.89928784_wp, -135.59330899_wp, -193.92064708_wp, & + & -24.99773704_wp, -135.08205874_wp, -195.00242730_wp, -25.06415546_wp, & + & -135.00205300_wp, -193.53565379_wp, -25.93089845_wp, -135.48528276_wp, & + & -193.50215145_wp, -24.83683836_wp, -134.09356520_wp, -202.97461067_wp, & + & -24.71622735_wp, -143.30902421_wp, -201.53143148_wp, -24.66044983_wp, & + & -143.21798481_wp, -201.19150158_wp, -24.50810920_wp, -141.73337659_wp, & + & -202.04938956_wp, -24.17665213_wp, -140.92026400_wp, -203.44901944_wp, & + & -24.40561178_wp, -142.46673421_wp, -201.11478121_wp, -25.59018193_wp, & + & -143.61956342_wp, -200.97003998_wp, -23.46901396_wp, -144.00220587_wp, & + & -201.25300032_wp, -23.56837311_wp, -145.04676515_wp, -201.37575463_wp, & + & -22.53973799_wp, -143.61045644_wp, -199.88733447_wp, -23.44385435_wp, & + & -143.92984914_wp, -199.91883049_wp, -24.73111013_wp, -141.42181498_wp, & + & -199.35942194_wp, -24.54123184_wp, -140.10066732_wp, -197.84038544_wp, & + & -24.46870538_wp, -140.27420399_wp, -197.30537782_wp, -24.84232421_wp, & + & -141.31397820_wp, -199.23585702_wp, -25.01526588_wp, -142.11738694_wp, & + & -199.74849919_wp, -23.60705656_wp, -139.68205273_wp, -199.71930657_wp, & + & -25.70548482_wp, -139.17081031_wp, -200.80103876_wp, -25.77240186_wp, & + & -139.09054869_wp, -199.33399129_wp, -26.63846857_wp, -139.57413400_wp, & + & -199.30065504_wp, -25.54440168_wp, -138.18241424_wp, -208.77491118_wp, & + & -25.42602288_wp, -147.39612569_wp, -207.33168443_wp, -25.37050447_wp, & + & -147.30577244_wp, -206.99116455_wp, -25.21815827_wp, -145.82132674_wp, & + & -207.84881836_wp, -24.88707145_wp, -145.00780610_wp, -209.24883025_wp, & + & -25.11560953_wp, -146.55347676_wp, -206.91534895_wp, -26.30037066_wp, & + & -147.70738321_wp, -206.77048233_wp, -24.17931176_wp, -148.09049005_wp, & + & -207.05401966_wp, -24.27883760_wp, -149.13487948_wp, -207.17584013_wp, & + & -23.24989087_wp, -147.69871759_wp, -205.68773537_wp, -24.15431203_wp, & + & -148.01873348_wp, -205.71832754_wp, -25.44082050_wp, -145.51028008_wp, & + & -205.15877587_wp, -25.25125525_wp, -144.18916696_wp, -203.63981916_wp, & + & -25.17807300_wp, -144.36289974_wp, -203.10478050_wp, -25.55107438_wp, & + & -145.40287980_wp, -205.03542067_wp, -25.72451241_wp, -146.20610377_wp, & + & -205.54811135_wp, -24.31737212_wp, -143.77013675_wp, -205.51818259_wp, & + & -26.41599022_wp, -143.25973130_wp, -206.59988767_wp, -26.48328746_wp, & + & -143.17941228_wp, -205.13259841_wp, -27.34868730_wp, -143.66345797_wp, & + & -205.09950680_wp, -26.25516409_wp, -142.27130643_wp, -214.57382362_wp, & + & -26.13157694_wp, -151.48600376_wp, -213.13068663_wp, -26.07685017_wp, & + & -151.39387224_wp, -212.79154119_wp, -25.92514262_wp, -149.90906737_wp, & + & -213.64967527_wp, -25.59375192_wp, -149.09619324_wp, -215.04873751_wp, & + & -25.82114445_wp, -150.64393913_wp, -212.71433726_wp, -27.00677429_wp, & + & -151.79533085_wp, -212.56806745_wp, -24.88563614_wp, -152.17756467_wp, & + & -212.85060080_wp, -24.98463451_wp, -153.22227615_wp, -212.97338264_wp, & + & -23.95617051_wp, -151.78584612_wp, -211.48538316_wp, -24.86118191_wp, & + & -152.10471321_wp, -211.51904937_wp, -26.14862302_wp, -149.59724680_wp, & + & -210.95960413_wp, -25.95956051_wp, -148.27604123_wp, -209.44060850_wp, & + & -25.88717573_wp, -148.44995096_wp, -208.90598147_wp, -26.26007018_wp, & + & -149.49019488_wp, -210.83593905_wp, -26.43245506_wp, -150.29284898_wp, & + & -211.34832723_wp, -25.02548002_wp, -147.85687882_wp, -211.31972666_wp, & + & -27.12419267_wp, -147.34677044_wp, -212.40147944_wp, -27.19096074_wp, & + & -147.26664148_wp, -210.93454748_wp, -28.05704982_wp, -147.75051175_wp, & + & -210.90113916_wp, -26.96366692_wp, -146.35825921_wp, -220.36468425_wp, & + & -26.83265856_wp, -155.58911394_wp, -218.92178146_wp, -26.77709268_wp, & + & -155.49399145_wp, -218.58597218_wp, -26.62511178_wp, -154.00839455_wp, & + & -219.44594803_wp, -26.29343926_wp, -153.19758343_wp, -220.84137153_wp, & + & -26.52146622_wp, -154.74832501_wp, -218.50408738_wp, -27.70684651_wp, & + & -155.89443301_wp, -218.35810521_wp, -25.58566524_wp, -156.27657704_wp, & + & -218.63863592_wp, -25.68471577_wp, -157.32182237_wp, -218.76443697_wp, & + & -24.65633800_wp, -155.88559083_wp, -217.27556611_wp, -25.56087998_wp, & + & -156.20168663_wp, -217.31424739_wp, -26.84875931_wp, -153.69364506_wp, & + & -216.75764803_wp, -26.66071575_wp, -152.37107264_wp, -215.23816130_wp, & + & -26.59047148_wp, -152.54166228_wp, -214.70194795_wp, -26.96299767_wp, & + & -153.58123358_wp, -216.62966097_wp, -27.13291260_wp, -154.38768631_wp, & + & -217.14581133_wp, -25.72607116_wp, -151.95263246_wp, -217.12177597_wp, & + & -27.82490132_wp, -151.44281237_wp, -218.20382835_wp, -27.89014046_wp, & + & -151.36548199_wp, -216.73688836_wp, -28.75828378_wp, -151.84561371_wp, & + & -216.70553711_wp, -27.66505170_wp, -150.45320453_wp, -226.15541893_wp, & + & -27.56147604_wp, -159.68971487_wp, -224.71264300_wp, -27.49788057_wp, & + & -159.59669600_wp, -224.37539271_wp, -27.34040478_wp, -158.11203674_wp, & + & -225.23569856_wp, -27.01017979_wp, -157.30098168_wp, -226.63293948_wp, & + & -27.24759080_wp, -158.85043929_wp, -224.29084673_wp, -28.42647177_wp, & + & -159.99550665_wp, -224.15648921_wp, -26.30555292_wp, -160.38326453_wp, & + & -224.43823031_wp, -26.40867453_wp, -161.42778841_wp, -224.56683686_wp, & + & -25.37731807_wp, -159.99389853_wp, -223.07396602_wp, -26.27506962_wp, & + & -160.31025951_wp, -223.10230642_wp, -27.55769381_wp, -157.79810190_wp, & + & -222.54651788_wp, -27.36629214_wp, -156.47563261_wp, -221.02700282_wp, & + & -27.29434880_wp, -156.64487220_wp, -220.48904592_wp, -27.66821575_wp, & + & -157.68303567_wp, -222.41719478_wp, -27.84150413_wp, -158.49171068_wp, & + & -222.93630702_wp, -26.43146034_wp, -156.05913258_wp, -222.90956555_wp, & + & -28.52936146_wp, -155.54551203_wp, -223.99157698_wp, -28.59605813_wp, & + & -155.46888111_wp, -222.52299207_wp, -29.46287258_wp, -155.94641901_wp, & + & -222.49430011_wp, -28.36714100_wp, -154.55588246_wp, -231.93689116_wp, & + & -28.33845155_wp, -163.79244801_wp, -230.49439078_wp, -28.27752512_wp, & + & -163.69411459_wp, -230.16141432_wp, -28.10615938_wp, -162.21007660_wp, & + & -231.02318135_wp, -27.76625954_wp, -161.40465883_wp, -232.41766686_wp, & + & -28.00851371_wp, -162.96132515_wp, -230.07356984_wp, -29.21079207_wp, & + & -164.08277880_wp, -229.93301171_wp, -27.09351974_wp, -164.48962903_wp, & + & -230.21178639_wp, -27.20508891_wp, -165.53407861_wp, -230.34241679_wp, & + & -26.16098343_wp, -164.10957100_wp, -228.85064201_wp, -27.06469366_wp, & + & -164.41358316_wp, -228.88942720_wp, -28.32261327_wp, -161.89092985_wp, & + & -228.33479843_wp, -28.11687146_wp, -160.57017877_wp, -226.81575314_wp, & + & -28.03680727_wp, -160.74067464_wp, -226.27602296_wp, -28.41628570_wp, & + & -161.77589307_wp, -228.20307759_wp, -28.61230767_wp, -162.58089657_wp, & + & -228.73050794_wp, -27.18117546_wp, -160.16133705_wp, -228.69039352_wp, & + & -29.27482292_wp, -159.63086511_wp, -229.77190618_wp, -29.34634399_wp, & + & -159.55160806_wp, -228.30004536_wp, -30.20928916_wp, -160.02585899_wp, & + & -228.27396168_wp, -29.10345838_wp, -158.64325439_wp, -237.68336238_wp, & + & -29.01611348_wp, -167.94054481_wp, -236.24131117_wp, -29.04139671_wp, & + & -167.82301098_wp, -235.91801172_wp, -28.84710553_wp, -166.33956826_wp, & + & -236.77141586_wp, -28.44474249_wp, -165.55430312_wp, -238.15308294_wp, & + & -28.63058096_wp, -167.12709760_wp, -235.87482664_wp, -30.01066413_wp, & + & -168.17730883_wp, -235.59679996_wp, -27.91979905_wp, -168.64539682_wp, & + & -235.86823060_wp, -28.04636963_wp, -169.69005837_wp, -235.95184764_wp, & + & -26.95216481_wp, -168.30011758_wp, -234.51574489_wp, -27.95535435_wp, & + & -168.55422041_wp, -234.66270766_wp, -29.11881869_wp, -165.99720547_wp, & + & -234.11419104_wp, -28.89682265_wp, -164.67664818_wp, -232.59349031_wp, & + & -28.82997668_wp, -164.83843054_wp, -232.04941799_wp, -29.23228537_wp, & + & -165.86264914_wp, -233.98054002_wp, -29.44843703_wp, -166.67298570_wp, & + & -234.50628980_wp, -27.95189094_wp, -164.28616090_wp, -234.48492922_wp, & + & -30.03751403_wp, -163.72226196_wp, -235.56738145_wp, -30.09917164_wp, & + & -163.64788539_wp, -234.10007013_wp, -30.98098742_wp, -164.10087121_wp, & + & -234.07254374_wp, -29.85483725_wp, -162.73495028_wp, -243.44494864_wp, & + & -29.57775990_wp, -172.09070356_wp, -242.00597084_wp, -29.66909100_wp, & + & -171.96948047_wp, -241.67141926_wp, -29.41294844_wp, -170.49781820_wp, & + & -242.50000533_wp, -28.91964450_wp, -169.73829190_wp, -243.89001963_wp, & + & -29.09112006_wp, -171.31905970_wp, -241.69156283_wp, -30.67362926_wp, & + & -172.27125802_wp, -241.30782178_wp, -28.62681860_wp, -172.85008586_wp, & + & -241.58110719_wp, -28.79864665_wp, -173.88774578_wp, -241.61885313_wp, & + & -27.62607286_wp, -172.56141010_wp, -240.22986053_wp, -28.70682318_wp, & + & -172.75047198_wp, -240.43454243_wp, -29.73904626_wp, -170.13585789_wp, & + & -239.88094557_wp, -29.48387115_wp, -168.82340088_wp, -238.35800808_wp, & + & -29.51247214_wp, -168.97285049_wp, -237.82956318_wp, -29.98774848_wp, & + & -169.97361355_wp, -239.77079093_wp, -30.14126665_wp, -170.79006535_wp, & + & -240.21992470_wp, -28.49956401_wp, -168.48360952_wp, -240.32381002_wp, & + & -30.55255277_wp, -167.81767035_wp, -241.40825564_wp, -30.54459445_wp, & + & -167.74735214_wp, -239.99599304_wp, -31.53483642_wp, -168.14824053_wp, & + & -239.90446934_wp, -30.34845355_wp, -166.83748130_wp, -249.23381270_wp, & + & -30.28239051_wp, -176.15401618_wp, -247.81383671_wp, -30.51077758_wp, & + & -175.99523732_wp, -247.45459187_wp, -30.07488346_wp, -174.57254327_wp, & + & -248.23213460_wp, -29.40278429_wp, -173.90137612_wp, -249.62587035_wp, & + & -29.64846516_wp, -175.46484771_wp, -247.61184679_wp, -31.57771638_wp, & + & -176.13720974_wp, -247.00324610_wp, -29.69708269_wp, -177.01025761_wp, & + & -247.29565855_wp, -29.99117262_wp, -178.01475185_wp, -247.19851146_wp, & + & -28.63580724_wp, -176.87943144_wp, -245.94088124_wp, -29.88123513_wp, & + & -176.88344144_wp, -246.25366513_wp, -30.46015285_wp, -174.15192034_wp, & + & -245.67129676_wp, -30.05862888_wp, -172.88974146_wp, -244.15309861_wp, & + & -30.17276544_wp, -173.04575764_wp, -243.65771564_wp, -30.79270727_wp, & + & -173.98210640_wp, -245.62547736_wp, -30.99649171_wp, -174.74162416_wp, & + & -245.96467968_wp, -29.02441622_wp, -172.68148977_wp, -246.14393690_wp, & + & -30.96570079_wp, -171.74797917_wp, -247.22583385_wp, -30.90174608_wp, & + & -171.66850848_wp, -245.86247799_wp, -31.99614135_wp, -171.94942380_wp, & + & -245.70130831_wp, -30.65387030_wp, -170.80703438_wp, -255.02283275_wp, & + & -30.83750550_wp, -180.22985059_wp, -253.64353954_wp, -31.21154179_wp, & + & -180.00447495_wp, -253.24716870_wp, -30.63759665_wp, -178.64185233_wp, & + & -253.93711741_wp, -29.78628447_wp, -178.08889298_wp, -255.33148014_wp, & + & -30.05230150_wp, -179.66587747_wp, -253.57384686_wp, -32.30427168_wp, & + & -180.00212121_wp, -252.72996643_wp, -30.64017075_wp, -181.09459691_wp, & + & -253.04048169_wp, -31.03134043_wp, -182.05972670_wp, -252.80231468_wp, & + & -29.55570697_wp, -181.11101369_wp, -251.69806244_wp, -30.92453380_wp, & + & -180.91331542_wp, -252.11254005_wp, -31.11418372_wp, -178.13832491_wp, & + & -251.49571551_wp, -30.61859316_wp, -176.92691122_wp, -249.99902302_wp, & + & -30.92012097_wp, -177.03467154_wp, -249.57108760_wp, -31.71239507_wp, & + & -177.86871843_wp, -251.55167784_wp, -31.79864889_wp, -178.63507118_wp, & + & -251.67203415_wp, -29.53987850_wp, -176.86155730_wp, -252.07573617_wp, & + & -31.30909970_wp, -175.68738436_wp, -253.14381205_wp, -31.11455390_wp, & + & -175.63968150_wp, -251.91202669_wp, -32.38204265_wp, -175.74709115_wp, & + & -251.60648337_wp, -30.92767196_wp, -174.78583707_wp, -260.81035718_wp, & + & -31.37401250_wp, -184.29300460_wp, -259.51102340_wp, -31.90066156_wp, & + & -183.93570253_wp, -259.03598407_wp, -31.12191846_wp, -182.70635515_wp, & + & -259.57812734_wp, -30.07304155_wp, -182.37174624_wp, -260.97930393_wp, & + & -30.43196413_wp, -183.95688235_wp, -259.62185227_wp, -32.96491558_wp, & + & -183.70366183_wp, -258.50858838_wp, -31.72311466_wp, -185.08145816_wp, & + & -258.86713855_wp, -32.25960254_wp, -185.95576217_wp, -258.40799509_wp, & + & -30.66933905_wp, -185.32849287_wp, -257.53624526_wp, -32.11567097_wp, & + & -184.80004060_wp, -258.00227969_wp, -31.66057744_wp, -182.06567150_wp, & + & -257.31484141_wp, -31.02506059_wp, -180.96265863_wp, -255.86904577_wp, & + & -31.52707294_wp, -180.98930179_wp, -255.54998449_wp, -32.50647338_wp, & + & -181.65652078_wp, -257.55445293_wp, -32.50889047_wp, -182.39595697_wp, & + & -257.35313121_wp, -29.94055598_wp, -181.10838282_wp, -257.96518288_wp, & + & -31.38802612_wp, -179.62294551_wp, -258.99942865_wp, -31.05477651_wp, & + & -179.62750693_wp, -257.93954579_wp, -32.46470958_wp, -179.47568793_wp, & + & -257.44198014_wp, -30.90506958_wp, -178.80343415_wp, -266.50449714_wp, & + & -31.98547714_wp, -188.39937551_wp, -265.38747797_wp, -32.64240664_wp, & + & -187.75713914_wp, -264.77546518_wp, -31.63866760_wp, -186.77726473_wp, & + & -265.04850057_wp, -30.44407352_wp, -186.83643915_wp, -266.43630168_wp, & + & -30.97438340_wp, -188.41769363_wp, -265.76653041_wp, -33.52290325_wp, & + & -187.22791481_wp, -264.33255783_wp, -33.07005521_wp, -188.78392840_wp, & + & -264.78249442_wp, -33.76374666_wp, -189.48933847_wp, -263.96910742_wp, & + & -32.20132263_wp, -189.32724300_wp, -263.49578067_wp, -33.55702958_wp, & + & -188.29206215_wp, -263.93507144_wp, -32.16460970_wp, -185.88898613_wp, & + & -263.12395629_wp, -31.37939276_wp, -184.98390496_wp, -261.78025030_wp, & + & -32.09940982_wp, -184.84372028_wp, -261.64255741_wp, -33.26348622_wp, & + & -185.20700190_wp, -263.68426152_wp, -33.14656614_wp, -185.92157926_wp, & + & -262.98910108_wp, -30.38486454_wp, -185.42116949_wp, -263.79105607_wp, & + & -31.25731082_wp, -183.60955613_wp, -264.75333581_wp, -30.76537640_wp, & + & -183.72129489_wp, -263.94477247_wp, -32.24461806_wp, -183.18160361_wp, & + & -263.17067743_wp, -30.67269409_wp, -182.93703354_wp, -270.90664568_wp, & + & -33.63453866_wp, -193.19042341_wp, -270.45704117_wp, -33.91748344_wp, & + & -191.83720699_wp, -269.58331255_wp, -32.77078112_wp, -191.34277388_wp, & + & -268.82792306_wp, -32.16233595_wp, -192.09466239_wp, -270.15945866_wp, & + & -33.15080831_wp, -193.68220221_wp, -271.34298157_wp, -34.01354129_wp, & + & -191.19908800_wp, -269.59551788_wp, -35.18817405_wp, -191.70871308_wp, & + & -270.18149232_wp, -36.06572423_wp, -191.97013221_wp, -268.73957138_wp, & + & -35.11768851_wp, -192.37845219_wp, -269.22262615_wp, -35.29705479_wp, & + & -190.69234890_wp, -269.69292643_wp, -32.49898926_wp, -190.03336933_wp, & + & -268.71428643_wp, -31.69179241_wp, -189.33525742_wp, -267.60885032_wp, & + & -32.61452002_wp, -188.80123246_wp, -267.75466504_wp, -33.83158845_wp, & + & -188.74916405_wp, -270.21868294_wp, -33.13872275_wp, -189.45474400_wp, & + & -268.28479344_wp, -31.00711942_wp, -190.07318962_wp, -269.36819401_wp, & + & -30.92955666_wp, -188.18566890_wp, -270.16458983_wp, -30.29894394_wp, & + & -188.56907148_wp, -269.78525613_wp, -31.63010539_wp, -187.46610811_wp, & + & -268.63556105_wp, -30.30703459_wp, -187.68092112_wp, -271.09400099_wp, & + & -34.50127904_wp, -193.68227287_wp, 3.77463572_wp, -0.81366580_wp, & + & 5.46923241_wp & + & ], & + & shape(xyz)) + call new(self, sym, xyz) +end subroutine polyala_96 + +end module mstore_polyalanine From 203124780d1869036e646aab9fdc7784531aabc3 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 11:31:29 +0100 Subject: [PATCH 19/26] Fix trailing whitespace Signed-off-by: lukaswittmann --- src/mstore/f_block.f90 | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/src/mstore/f_block.f90 b/src/mstore/f_block.f90 index 55b6606..6d95e34 100644 --- a/src/mstore/f_block.f90 +++ b/src/mstore/f_block.f90 @@ -64,7 +64,7 @@ subroutine get_f_block_records(records) new_record('MdCl3', MdCl3), & new_record('NoCl3', NoCl3), & new_record('LrCl3', LrCl3), & - new_record('LrF6', LrF6), & + new_record('LrF6', LrF6), & new_record('LrH6', LrH6), & new_record('La2', La2), & new_record('Ce2', Ce2), & @@ -284,9 +284,9 @@ subroutine TmCl3(self) character(len=*), parameter :: sym(nat) = [character(len=4)::& & "Tm", "Cl", "Cl", "Cl"] real(wp), parameter :: xyz(3, nat) = reshape([& - & 0.30238207087297_wp, 0.40915658962222_wp, -0.74135961337020_wp, & - & -1.88316193081721_wp, -2.68542935396554_wp, -3.27476690321514_wp, & - & -1.87199842360969_wp, 4.16773917183794_wp, 0.64664211658554_wp, & + & 0.30238207087297_wp, 0.40915658962222_wp, -0.74135961337020_wp, & + & -1.88316193081721_wp, -2.68542935396554_wp, -3.27476690321514_wp, & + & -1.87199842360969_wp, 4.16773917183794_wp, 0.64664211658554_wp, & & 4.57998101963198_wp, -0.33831940292595_wp, 0.65470384936243_wp], & & shape(xyz)) integer, parameter :: uhf = 2 @@ -499,9 +499,9 @@ subroutine AmCl3(self) character(len=*), parameter :: sym(nat) = [character(len=4)::& & "Am", "Cl", "Cl", "Cl"] real(wp), parameter :: xyz(3, nat) = reshape([& - & -0.01193364698947_wp, -0.03541789303411_wp, 0.07038809832668_wp, & - & -1.76279500408354_wp, -2.52042220577224_wp, -3.52343055390955_wp, & - & -1.78089448153841_wp, 4.31798053098351_wp, 0.35803967157097_wp, & + & -0.01193364698947_wp, -0.03541789303411_wp, 0.07038809832668_wp, & + & -1.76279500408354_wp, -2.52042220577224_wp, -3.52343055390955_wp, & + & -1.78089448153841_wp, 4.31798053098351_wp, 0.35803967157097_wp, & & 4.68282586868943_wp, -0.20899342760849_wp, 0.38022223337450_wp], & & shape(xyz)) integer, parameter :: uhf = 6 From 28616b8213d14280bfba1e70b7bc35fe64001c43 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 11:36:11 +0100 Subject: [PATCH 20/26] Fix typo Signed-off-by: lukaswittmann --- src/mstore.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/mstore.f90 b/src/mstore.f90 index 1c5b92e..96b178d 100644 --- a/src/mstore.f90 +++ b/src/mstore.f90 @@ -138,7 +138,7 @@ subroutine get_mstore_collections(collections) new_collection("IL16", get_il16_records), & new_collection("MB16-43", get_mb16_43_records), & new_collection("UPU23", get_upu23_records), & - new_collection("ALYLOSE", get_amylose_records), & + new_collection("AMYLOSE", get_amylose_records), & new_collection("POLYALANINE", get_polyalanine_records), & new_collection("X23", get_x23_records) & ] From 2bb53b3d250a940f9d3e405a7e0d6fa7cf1bb061 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 11:36:19 +0100 Subject: [PATCH 21/26] Fix cmake build Signed-off-by: lukaswittmann --- src/mstore/CMakeLists.txt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/mstore/CMakeLists.txt b/src/mstore/CMakeLists.txt index b3e25b0..4ba643c 100644 --- a/src/mstore/CMakeLists.txt +++ b/src/mstore/CMakeLists.txt @@ -28,7 +28,8 @@ list( "${dir}/mb16_43.f90" "${dir}/upu23.f90" "${dir}/x23.f90" - "${dir}/large.f90" + "${dir}/amylose.f90" + "${dir}/polyalanine.f90" ) set(srcs "${srcs}" PARENT_SCOPE) From af29241e17ecd28959484e55ac2a6b555fa1ba38 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 12:35:54 +0100 Subject: [PATCH 22/26] Switch macos runner Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index 9eaa7a2..a60d06d 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -27,7 +27,7 @@ jobs: strategy: fail-fast: false matrix: - os: [ubuntu-latest, macos-13] + os: [ubuntu-latest, macos-15-intel] env: FC: gfortran From 7a7fe5b5ea21607b8a312cf50af694108feab42c Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 12:43:32 +0100 Subject: [PATCH 23/26] gcc bin to path, set env variables, removed symlinks, export gh env Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index a60d06d..331854f 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -47,10 +47,10 @@ jobs: if: contains(matrix.os, 'macos') run: | brew install gcc@${{ env.GCC_V }} - ln -s /usr/local/bin/gfortran-${{ env.GCC_V }} /usr/local/bin/gfortran - ln -s /usr/local/bin/gcc-${{ env.GCC_V }} /usr/local/bin/gcc - ln -s /usr/local/bin/g++-${{ env.GCC_V }} /usr/local/bin/g++ - which gfortran + echo "$(brew --prefix gcc@${{ env.GCC_V }})/bin" >> $GITHUB_PATH + echo "FC=$(brew --prefix gcc@${{ env.GCC_V }})/bin/gfortran-${{ env.GCC_V }}" >> $GITHUB_ENV + echo "CC=$(brew --prefix gcc@${{ env.GCC_V }})/bin/gcc-${{ env.GCC_V }}" >> $GITHUB_ENV + echo "CXX=$(brew --prefix gcc@${{ env.GCC_V }})/bin/g++-${{ env.GCC_V }}" >> $GITHUB_ENV - name: Install GCC (Linux) if: contains(matrix.os, 'ubuntu') From 7355ee8f5ca98e1d2aa18eb43619617327ee2665 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 13:26:16 +0100 Subject: [PATCH 24/26] set env vars Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index 331854f..f988428 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -71,7 +71,11 @@ jobs: run: pip3 install meson==0.57.2 ninja cmake - name: Configure meson build - run: meson setup ${{ env.M_BUILD_DIR }} + run: | + export FC="${FC:-gfortran}" + export CC="${CC:-gcc}" + export CXX="${CXX:-g++}" + meson setup ${{ env.M_BUILD_DIR }} - name: Build library (meson) run: meson compile -C ${{ env.M_BUILD_DIR }} From 3715d12832083f8f34b2c121cc3c0c4689783865 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 13:42:31 +0100 Subject: [PATCH 25/26] use gcc13 Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index f988428..710555d 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -28,10 +28,15 @@ jobs: fail-fast: false matrix: os: [ubuntu-latest, macos-15-intel] + include: + - os: ubuntu-latest + gcc_v: 10 + - os: macos-15-intel + gcc_v: 13 env: FC: gfortran - GCC_V: 10 + GCC_V: ${{ matrix.gcc_v }} PYTHON_V: 3.8 steps: From e810455fbcc5c9e03433411c1e2bc6427d18a132 Mon Sep 17 00:00:00 2001 From: lukaswittmann Date: Tue, 23 Dec 2025 13:47:07 +0100 Subject: [PATCH 26/26] update meson version Signed-off-by: lukaswittmann --- .github/workflows/build.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/.github/workflows/build.yml b/.github/workflows/build.yml index 710555d..d8e1f4c 100644 --- a/.github/workflows/build.yml +++ b/.github/workflows/build.yml @@ -73,7 +73,7 @@ jobs: fi - name: Install meson/cmake - run: pip3 install meson==0.57.2 ninja cmake + run: pip3 install meson==1.4.1 ninja cmake - name: Configure meson build run: |