Ciaaw naw - Autogenerated See specs
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(naw_type), | public, | parameter | :: | Ac_naw | = | naw_type(33, transpose(reshape([205.0_dp, 205.015144152_dp, 0.000063682_dp, 206.0_dp, 206.014476477_dp, 0.000069874_dp, 207.0_dp, 207.011965967_dp, 0.000060384_dp, 208.0_dp, 208.011552251_dp, 0.000069225_dp, 209.0_dp, 209.009495375_dp, 0.000059953_dp, 210.0_dp, 210.009408625_dp, 0.000066782_dp, 211.0_dp, 211.007668846_dp, 0.000057706_dp, 212.0_dp, 212.007836442_dp, 0.000023492_dp, 213.0_dp, 213.006592665_dp, 0.000012522_dp, 214.0_dp, 214.006906400_dp, 0.000014547_dp, 215.0_dp, 215.006474061_dp, 0.000013318_dp, 216.0_dp, 216.008749101_dp, 0.000009908_dp, 217.0_dp, 217.009342325_dp, 0.000012048_dp, 218.0_dp, 218.011648860_dp, 0.000061853_dp, 219.0_dp, 219.012420425_dp, 0.000055263_dp, 220.0_dp, 220.014754527_dp, 0.000006579_dp, 221.0_dp, 221.015599721_dp, 0.000061086_dp, 222.0_dp, 222.017844232_dp, 0.000005044_dp, 223.0_dp, 223.019135982_dp, 0.000007457_dp, 224.0_dp, 224.021722249_dp, 0.000004389_dp, 225.0_dp, 225.023228601_dp, 0.000005107_dp, 226.0_dp, 226.026096999_dp, 0.000003327_dp, 227.0_dp, 227.027750594_dp, 0.000002068_dp, 228.0_dp, 228.031019685_dp, 0.000002247_dp, 229.0_dp, 229.032947000_dp, 0.000013000_dp, 230.0_dp, 230.036327000_dp, 0.000017000_dp, 231.0_dp, 231.038393000_dp, 0.000014000_dp, 232.0_dp, 232.042034000_dp, 0.000014000_dp, 233.0_dp, 233.044346000_dp, 0.000014000_dp, 234.0_dp, 234.048139000_dp, 0.000015000_dp, 235.0_dp, 235.050840000_dp, 0.000015000_dp, 236.0_dp, 236.054988000_dp, 0.000041000_dp, 237.0_dp, 237.057993_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ag_naw | = | naw_type(42, transpose(reshape([92.0_dp, 91.959710_dp, 0.000429_dp, 93.0_dp, 92.950188_dp, 0.000430_dp, 94.0_dp, 93.943744_dp, 0.000429_dp, 95.0_dp, 94.935688_dp, 0.000429_dp, 96.0_dp, 95.930743903_dp, 0.000096708_dp, 97.0_dp, 96.923881400_dp, 0.000012900_dp, 98.0_dp, 97.921559970_dp, 0.000035327_dp, 99.0_dp, 98.917645766_dp, 0.000006725_dp, 100.0_dp, 99.916115443_dp, 0.000005367_dp, 101.0_dp, 100.912683951_dp, 0.000005193_dp, 102.0_dp, 101.911704538_dp, 0.000008771_dp, 103.0_dp, 102.908960558_dp, 0.000004400_dp, 104.0_dp, 103.908623715_dp, 0.000004527_dp, 105.0_dp, 104.906525604_dp, 0.000004877_dp, 106.0_dp, 105.906663499_dp, 0.000003237_dp, 107.0_dp, 106.905091509_dp, 0.000002556_dp, 108.0_dp, 107.905950245_dp, 0.000002563_dp, 109.0_dp, 108.904755778_dp, 0.000001381_dp, 110.0_dp, 109.906110724_dp, 0.000001380_dp, 111.0_dp, 110.905296827_dp, 0.000001565_dp, 112.0_dp, 111.907048548_dp, 0.000002600_dp, 113.0_dp, 112.906572865_dp, 0.000017866_dp, 114.0_dp, 113.908823029_dp, 0.000004900_dp, 115.0_dp, 114.908767445_dp, 0.000019611_dp, 116.0_dp, 115.911386809_dp, 0.000003500_dp, 117.0_dp, 116.911774086_dp, 0.000014570_dp, 118.0_dp, 117.914595484_dp, 0.000002700_dp, 119.0_dp, 118.915570309_dp, 0.000015783_dp, 120.0_dp, 119.918784765_dp, 0.000004800_dp, 121.0_dp, 120.920125279_dp, 0.000013000_dp, 122.0_dp, 121.923664446_dp, 0.000041000_dp, 123.0_dp, 122.925315060_dp, 0.000035000_dp, 124.0_dp, 123.928899227_dp, 0.000270000_dp, 125.0_dp, 124.930735000_dp, 0.000465000_dp, 126.0_dp, 125.934814_dp, 0.000215_dp, 127.0_dp, 126.937037_dp, 0.000215_dp, 128.0_dp, 127.941266_dp, 0.000322_dp, 129.0_dp, 128.944315_dp, 0.000429_dp, 130.0_dp, 129.950727_dp, 0.000455_dp, 131.0_dp, 130.956253_dp, 0.000537_dp, 132.0_dp, 131.963070_dp, 0.000537_dp, 133.0_dp, 132.968781_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Al_naw | = | naw_type(23, transpose(reshape([21.0_dp, 21.029082_dp, 0.000644_dp, 22.0_dp, 22.019540_dp, 0.000430_dp, 23.0_dp, 23.007244351_dp, 0.000000370_dp, 24.0_dp, 23.999947598_dp, 0.000000244_dp, 25.0_dp, 24.990428308_dp, 0.000000069_dp, 26.0_dp, 25.986891876_dp, 0.000000071_dp, 27.0_dp, 26.981538408_dp, 0.000000050_dp, 28.0_dp, 27.981910009_dp, 0.000000052_dp, 29.0_dp, 28.980453164_dp, 0.000000370_dp, 30.0_dp, 29.982969171_dp, 0.000002077_dp, 31.0_dp, 30.983949754_dp, 0.000002400_dp, 32.0_dp, 31.988084338_dp, 0.000007700_dp, 33.0_dp, 32.990877685_dp, 0.000007500_dp, 34.0_dp, 33.996781924_dp, 0.000002259_dp, 35.0_dp, 34.999759816_dp, 0.000007900_dp, 36.0_dp, 36.006388000_dp, 0.000160500_dp, 37.0_dp, 37.010531000_dp, 0.000193500_dp, 38.0_dp, 38.017681_dp, 0.000161_dp, 39.0_dp, 39.023070_dp, 0.000322_dp, 40.0_dp, 40.030940_dp, 0.000322_dp, 41.0_dp, 41.037134_dp, 0.000429_dp, 42.0_dp, 42.045078_dp, 0.000537_dp, 43.0_dp, 43.051820_dp, 0.000644_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Am_naw | = | naw_type(27, transpose(reshape([223.0_dp, 223.045840_dp, 0.000322_dp, 224.0_dp, 224.046442_dp, 0.000429_dp, 225.0_dp, 225.045508_dp, 0.000429_dp, 226.0_dp, 226.046130_dp, 0.000322_dp, 227.0_dp, 227.045282_dp, 0.000215_dp, 228.0_dp, 228.046001_dp, 0.000215_dp, 229.0_dp, 229.045282534_dp, 0.000114169_dp, 230.0_dp, 230.046025_dp, 0.000153_dp, 231.0_dp, 231.045529_dp, 0.000322_dp, 232.0_dp, 232.046613_dp, 0.000322_dp, 233.0_dp, 233.046468_dp, 0.000123_dp, 234.0_dp, 234.047731_dp, 0.000172_dp, 235.0_dp, 235.047906478_dp, 0.000056661_dp, 236.0_dp, 236.049427_dp, 0.000127_dp, 237.0_dp, 237.049995_dp, 0.000064_dp, 238.0_dp, 238.051982531_dp, 0.000063243_dp, 239.0_dp, 239.053022729_dp, 0.000002127_dp, 240.0_dp, 240.055298374_dp, 0.000014849_dp, 241.0_dp, 241.056827343_dp, 0.000001195_dp, 242.0_dp, 242.059547358_dp, 0.000001199_dp, 243.0_dp, 243.061379889_dp, 0.000001490_dp, 244.0_dp, 244.064282892_dp, 0.000001600_dp, 245.0_dp, 245.066452827_dp, 0.000002024_dp, 246.0_dp, 246.069774_dp, 0.000019_dp, 247.0_dp, 247.072092_dp, 0.000107_dp, 248.0_dp, 248.075752_dp, 0.000215_dp, 249.0_dp, 249.078480_dp, 0.000320_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ar_naw | = | naw_type(26, transpose(reshape([29.0_dp, 29.040761_dp, 0.000471_dp, 30.0_dp, 30.023694_dp, 0.000192_dp, 31.0_dp, 31.012158_dp, 0.000215_dp, 32.0_dp, 31.997637824_dp, 0.000001900_dp, 33.0_dp, 32.989925545_dp, 0.000000430_dp, 34.0_dp, 33.980270092_dp, 0.000000083_dp, 35.0_dp, 34.975257719_dp, 0.000000730_dp, 36.0_dp, 35.967545106_dp, 0.000000028_dp, 37.0_dp, 36.966776301_dp, 0.000000221_dp, 38.0_dp, 37.962732102_dp, 0.000000209_dp, 39.0_dp, 38.964313037_dp, 0.000005367_dp, 40.0_dp, 39.96238312204_dp, 0.00000000234_dp, 41.0_dp, 40.964500570_dp, 0.000000372_dp, 42.0_dp, 41.963045737_dp, 0.000006200_dp, 43.0_dp, 42.965636056_dp, 0.000005700_dp, 44.0_dp, 43.964923814_dp, 0.000001700_dp, 45.0_dp, 44.968039731_dp, 0.000000550_dp, 46.0_dp, 45.968039244_dp, 0.000002500_dp, 47.0_dp, 46.972767112_dp, 0.000001300_dp, 48.0_dp, 47.976001000_dp, 0.000018000_dp, 49.0_dp, 48.981685_dp, 0.000429_dp, 50.0_dp, 49.985797_dp, 0.000537_dp, 51.0_dp, 50.993033_dp, 0.000429_dp, 52.0_dp, 51.998519_dp, 0.000644_dp, 53.0_dp, 53.007290_dp, 0.000750_dp, 54.0_dp, 54.013484_dp, 0.000859_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | As_naw | = | naw_type(33, transpose(reshape([60.0_dp, 59.993945_dp, 0.000429_dp, 61.0_dp, 60.981535_dp, 0.000322_dp, 62.0_dp, 61.973784_dp, 0.000322_dp, 63.0_dp, 62.964036_dp, 0.000215_dp, 64.0_dp, 63.957560_dp, 0.000218_dp, 65.0_dp, 64.949611000_dp, 0.000091000_dp, 66.0_dp, 65.944148778_dp, 0.000006100_dp, 67.0_dp, 66.939251110_dp, 0.000000475_dp, 68.0_dp, 67.936774127_dp, 0.000001981_dp, 69.0_dp, 68.932246289_dp, 0.000034352_dp, 70.0_dp, 69.930934642_dp, 0.000001500_dp, 71.0_dp, 70.927113594_dp, 0.000004469_dp, 72.0_dp, 71.926752291_dp, 0.000004383_dp, 73.0_dp, 72.923829086_dp, 0.000004136_dp, 74.0_dp, 73.923928596_dp, 0.000001817_dp, 75.0_dp, 74.921594562_dp, 0.000000948_dp, 76.0_dp, 75.922392011_dp, 0.000000951_dp, 77.0_dp, 76.920647555_dp, 0.000001816_dp, 78.0_dp, 77.921827771_dp, 0.000010498_dp, 79.0_dp, 78.920948419_dp, 0.000005716_dp, 80.0_dp, 79.922474440_dp, 0.000003578_dp, 81.0_dp, 80.922132288_dp, 0.000002838_dp, 82.0_dp, 81.924738731_dp, 0.000004003_dp, 83.0_dp, 82.925206900_dp, 0.000003004_dp, 84.0_dp, 83.929303290_dp, 0.000003403_dp, 85.0_dp, 84.932163658_dp, 0.000003304_dp, 86.0_dp, 85.936701532_dp, 0.000003703_dp, 87.0_dp, 86.940291716_dp, 0.000003204_dp, 88.0_dp, 87.945840_dp, 0.000215_dp, 89.0_dp, 88.950048_dp, 0.000322_dp, 90.0_dp, 89.955995_dp, 0.000429_dp, 91.0_dp, 90.960816_dp, 0.000429_dp, 92.0_dp, 91.967386_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | At_naw | = | naw_type(39, transpose(reshape([191.0_dp, 191.004148081_dp, 0.000017287_dp, 192.0_dp, 192.003140912_dp, 0.000029922_dp, 193.0_dp, 192.999927725_dp, 0.000023222_dp, 194.0_dp, 193.999230816_dp, 0.000025230_dp, 195.0_dp, 194.996274480_dp, 0.000010276_dp, 196.0_dp, 195.995799034_dp, 0.000032458_dp, 197.0_dp, 196.993177353_dp, 0.000008570_dp, 198.0_dp, 197.992797864_dp, 0.000005265_dp, 199.0_dp, 198.990527715_dp, 0.000005780_dp, 200.0_dp, 199.990351099_dp, 0.000026264_dp, 201.0_dp, 200.988417058_dp, 0.000008786_dp, 202.0_dp, 201.988625686_dp, 0.000029631_dp, 203.0_dp, 202.986942904_dp, 0.000011404_dp, 204.0_dp, 203.987251393_dp, 0.000024335_dp, 205.0_dp, 204.986060546_dp, 0.000012941_dp, 206.0_dp, 205.986645768_dp, 0.000014523_dp, 207.0_dp, 206.985799715_dp, 0.000013318_dp, 208.0_dp, 207.986613011_dp, 0.000009577_dp, 209.0_dp, 208.986168701_dp, 0.000005094_dp, 210.0_dp, 209.987147423_dp, 0.000008261_dp, 211.0_dp, 210.987496226_dp, 0.000002929_dp, 212.0_dp, 211.990737301_dp, 0.000002559_dp, 213.0_dp, 212.992936593_dp, 0.000005258_dp, 214.0_dp, 213.996372331_dp, 0.000004274_dp, 215.0_dp, 214.998651002_dp, 0.000007116_dp, 216.0_dp, 216.002422643_dp, 0.000003837_dp, 217.0_dp, 217.004717794_dp, 0.000005368_dp, 218.0_dp, 218.008695941_dp, 0.000012349_dp, 219.0_dp, 219.011160587_dp, 0.000003474_dp, 220.0_dp, 220.015433000_dp, 0.000015000_dp, 221.0_dp, 221.018017000_dp, 0.000015000_dp, 222.0_dp, 222.022494000_dp, 0.000017000_dp, 223.0_dp, 223.025151000_dp, 0.000015000_dp, 224.0_dp, 224.029749000_dp, 0.000024000_dp, 225.0_dp, 225.032528_dp, 0.000322_dp, 226.0_dp, 226.037209_dp, 0.000322_dp, 227.0_dp, 227.040183_dp, 0.000322_dp, 228.0_dp, 228.044960_dp, 0.000429_dp, 229.0_dp, 229.048191_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Au_naw | = | naw_type(43, transpose(reshape([168.0_dp, 168.002716_dp, 0.000429_dp, 169.0_dp, 168.998080_dp, 0.000320_dp, 170.0_dp, 169.996024_dp, 0.000216_dp, 171.0_dp, 170.991881533_dp, 0.000022236_dp, 172.0_dp, 171.989996704_dp, 0.000060287_dp, 173.0_dp, 172.986224263_dp, 0.000024458_dp, 174.0_dp, 173.984908_dp, 0.000109_dp, 175.0_dp, 174.981316375_dp, 0.000041399_dp, 176.0_dp, 175.980116925_dp, 0.000035625_dp, 177.0_dp, 176.976869701_dp, 0.000010700_dp, 178.0_dp, 177.976056714_dp, 0.000011000_dp, 179.0_dp, 178.973173666_dp, 0.000012555_dp, 180.0_dp, 179.972489738_dp, 0.000005108_dp, 181.0_dp, 180.970079102_dp, 0.000021445_dp, 182.0_dp, 181.969614433_dp, 0.000020143_dp, 183.0_dp, 182.967588106_dp, 0.000010116_dp, 184.0_dp, 183.967451523_dp, 0.000023912_dp, 185.0_dp, 184.965798871_dp, 0.000002800_dp, 186.0_dp, 185.965952703_dp, 0.000022509_dp, 187.0_dp, 186.964542147_dp, 0.000024153_dp, 188.0_dp, 187.965247966_dp, 0.000002900_dp, 189.0_dp, 188.963948286_dp, 0.000021558_dp, 190.0_dp, 189.964751746_dp, 0.000003700_dp, 191.0_dp, 190.963716452_dp, 0.000005288_dp, 192.0_dp, 191.964817615_dp, 0.000016991_dp, 193.0_dp, 192.964138442_dp, 0.000009311_dp, 194.0_dp, 193.965419051_dp, 0.000002273_dp, 195.0_dp, 194.965037823_dp, 0.000001201_dp, 196.0_dp, 195.966571213_dp, 0.000003179_dp, 197.0_dp, 196.966570103_dp, 0.000000581_dp, 198.0_dp, 197.968243714_dp, 0.000000579_dp, 199.0_dp, 198.968766573_dp, 0.000000581_dp, 200.0_dp, 199.970756558_dp, 0.000028681_dp, 201.0_dp, 200.971657678_dp, 0.000003455_dp, 202.0_dp, 201.973856000_dp, 0.000025000_dp, 203.0_dp, 202.975154492_dp, 0.000003309_dp, 204.0_dp, 203.978110_dp, 0.000215_dp, 205.0_dp, 204.980064_dp, 0.000215_dp, 206.0_dp, 205.984766_dp, 0.000322_dp, 207.0_dp, 206.988577_dp, 0.000322_dp, 208.0_dp, 207.993655_dp, 0.000322_dp, 209.0_dp, 208.997606_dp, 0.000429_dp, 210.0_dp, 210.002877_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | B_naw | = | naw_type(16, transpose(reshape([6.0_dp, 6.050800_dp, 0.002150_dp, 7.0_dp, 7.029712000_dp, 0.000027000_dp, 8.0_dp, 8.024607315_dp, 0.000001073_dp, 9.0_dp, 9.013329645_dp, 0.000000969_dp, 10.0_dp, 10.012936862_dp, 0.000000016_dp, 11.0_dp, 11.009305166_dp, 0.000000013_dp, 12.0_dp, 12.014352638_dp, 0.000001418_dp, 13.0_dp, 13.017779981_dp, 0.000001073_dp, 14.0_dp, 14.025404010_dp, 0.000022773_dp, 15.0_dp, 15.031087023_dp, 0.000022575_dp, 16.0_dp, 16.039841045_dp, 0.000026373_dp, 17.0_dp, 17.046931399_dp, 0.000219114_dp, 18.0_dp, 18.055601683_dp, 0.000219180_dp, 19.0_dp, 19.064166000_dp, 0.000564000_dp, 20.0_dp, 20.074505644_dp, 0.000586538_dp, 21.0_dp, 21.084147485_dp, 0.000599750_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ba_naw | = | naw_type(42, transpose(reshape([113.0_dp, 112.957370_dp, 0.000322_dp, 114.0_dp, 113.950718489_dp, 0.000110227_dp, 115.0_dp, 114.947482_dp, 0.000215_dp, 116.0_dp, 115.941621_dp, 0.000215_dp, 117.0_dp, 116.938316403_dp, 0.000268749_dp, 118.0_dp, 117.933226_dp, 0.000215_dp, 119.0_dp, 118.930659683_dp, 0.000214997_dp, 120.0_dp, 119.926044997_dp, 0.000322241_dp, 121.0_dp, 120.924052286_dp, 0.000152333_dp, 122.0_dp, 121.919904000_dp, 0.000030000_dp, 123.0_dp, 122.918781060_dp, 0.000013000_dp, 124.0_dp, 123.915093627_dp, 0.000013416_dp, 125.0_dp, 124.914471840_dp, 0.000011800_dp, 126.0_dp, 125.911250202_dp, 0.000013416_dp, 127.0_dp, 126.911091272_dp, 0.000012192_dp, 128.0_dp, 127.908352446_dp, 0.000001728_dp, 129.0_dp, 128.908683409_dp, 0.000011276_dp, 130.0_dp, 129.906326002_dp, 0.000000308_dp, 131.0_dp, 130.906946315_dp, 0.000000445_dp, 132.0_dp, 131.905061231_dp, 0.000001130_dp, 133.0_dp, 132.906007443_dp, 0.000001065_dp, 134.0_dp, 133.904508249_dp, 0.000000269_dp, 135.0_dp, 134.905688447_dp, 0.000000263_dp, 136.0_dp, 135.904575800_dp, 0.000000262_dp, 137.0_dp, 136.905827207_dp, 0.000000266_dp, 138.0_dp, 137.905247059_dp, 0.000000267_dp, 139.0_dp, 138.908841164_dp, 0.000000271_dp, 140.0_dp, 139.910608231_dp, 0.000008480_dp, 141.0_dp, 140.914403653_dp, 0.000005709_dp, 142.0_dp, 141.916432904_dp, 0.000006355_dp, 143.0_dp, 142.920625149_dp, 0.000007253_dp, 144.0_dp, 143.922954821_dp, 0.000007661_dp, 145.0_dp, 144.927518400_dp, 0.000009100_dp, 146.0_dp, 145.930363200_dp, 0.000001900_dp, 147.0_dp, 146.935303900_dp, 0.000021200_dp, 148.0_dp, 147.938223000_dp, 0.000001600_dp, 149.0_dp, 148.943284000_dp, 0.000002700_dp, 150.0_dp, 149.946441100_dp, 0.000006100_dp, 151.0_dp, 150.951755_dp, 0.000429_dp, 152.0_dp, 151.955330_dp, 0.000429_dp, 153.0_dp, 152.960848_dp, 0.000429_dp, 154.0_dp, 153.964659_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Be_naw | = | naw_type(12, transpose(reshape([5.0_dp, 5.039870_dp, 0.002150_dp, 6.0_dp, 6.019726409_dp, 0.000005848_dp, 7.0_dp, 7.016928714_dp, 0.000000076_dp, 8.0_dp, 8.005305102_dp, 0.000000037_dp, 9.0_dp, 9.012183062_dp, 0.000000082_dp, 10.0_dp, 10.013534692_dp, 0.000000086_dp, 11.0_dp, 11.021661080_dp, 0.000000255_dp, 12.0_dp, 12.026922082_dp, 0.000002048_dp, 13.0_dp, 13.036134506_dp, 0.000010929_dp, 14.0_dp, 14.042892920_dp, 0.000141970_dp, 15.0_dp, 15.053490215_dp, 0.000177990_dp, 16.0_dp, 16.061672036_dp, 0.000177990_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Bh_naw | = | naw_type(19, transpose(reshape([260.0_dp, 260.121443_dp, 0.000211_dp, 261.0_dp, 261.121395733_dp, 0.000193026_dp, 262.0_dp, 262.122654688_dp, 0.000099919_dp, 263.0_dp, 263.122916_dp, 0.000328_dp, 264.0_dp, 264.124486_dp, 0.000190_dp, 265.0_dp, 265.124955_dp, 0.000257_dp, 266.0_dp, 266.126790_dp, 0.000175_dp, 267.0_dp, 267.127499_dp, 0.000282_dp, 268.0_dp, 268.129584_dp, 0.000410_dp, 269.0_dp, 269.130411_dp, 0.000402_dp, 270.0_dp, 270.133366_dp, 0.000320_dp, 271.0_dp, 271.135115_dp, 0.000412_dp, 272.0_dp, 272.138259_dp, 0.000571_dp, 273.0_dp, 273.140294_dp, 0.000703_dp, 274.0_dp, 274.143599_dp, 0.000620_dp, 275.0_dp, 275.145766_dp, 0.000644_dp, 276.0_dp, 276.149169_dp, 0.000644_dp, 277.0_dp, 277.151477_dp, 0.000644_dp, 278.0_dp, 278.154988_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Bi_naw | = | naw_type(41, transpose(reshape([184.0_dp, 184.001347_dp, 0.000131_dp, 185.0_dp, 184.997600_dp, 0.000087_dp, 186.0_dp, 185.996623169_dp, 0.000018200_dp, 187.0_dp, 186.993147272_dp, 0.000010740_dp, 188.0_dp, 187.992276064_dp, 0.000012001_dp, 189.0_dp, 188.989195139_dp, 0.000022384_dp, 190.0_dp, 189.988624828_dp, 0.000022515_dp, 191.0_dp, 190.985786972_dp, 0.000008037_dp, 192.0_dp, 191.985470077_dp, 0.000032326_dp, 193.0_dp, 192.982947220_dp, 0.000008132_dp, 194.0_dp, 193.982798581_dp, 0.000005638_dp, 195.0_dp, 194.980648759_dp, 0.000005675_dp, 196.0_dp, 195.980666509_dp, 0.000026224_dp, 197.0_dp, 196.978864927_dp, 0.000008946_dp, 198.0_dp, 197.979201316_dp, 0.000029598_dp, 199.0_dp, 198.977672841_dp, 0.000011395_dp, 200.0_dp, 199.978131290_dp, 0.000024370_dp, 201.0_dp, 200.976995017_dp, 0.000013072_dp, 202.0_dp, 201.977723042_dp, 0.000015032_dp, 203.0_dp, 202.976892077_dp, 0.000013717_dp, 204.0_dp, 203.977835687_dp, 0.000009854_dp, 205.0_dp, 204.977385182_dp, 0.000005161_dp, 206.0_dp, 205.978498843_dp, 0.000008193_dp, 207.0_dp, 206.978470551_dp, 0.000002573_dp, 208.0_dp, 207.979742060_dp, 0.000002474_dp, 209.0_dp, 208.980398599_dp, 0.000001465_dp, 210.0_dp, 209.984120237_dp, 0.000001463_dp, 211.0_dp, 210.987268715_dp, 0.000005842_dp, 212.0_dp, 211.991285030_dp, 0.000001989_dp, 213.0_dp, 212.994383570_dp, 0.000005455_dp, 214.0_dp, 213.998710909_dp, 0.000012033_dp, 215.0_dp, 215.001749095_dp, 0.000006037_dp, 216.0_dp, 216.006305985_dp, 0.000012000_dp, 217.0_dp, 217.009372000_dp, 0.000019000_dp, 218.0_dp, 218.014188000_dp, 0.000029000_dp, 219.0_dp, 219.017520_dp, 0.000215_dp, 220.0_dp, 220.022501_dp, 0.000322_dp, 221.0_dp, 221.025980_dp, 0.000322_dp, 222.0_dp, 222.031079_dp, 0.000322_dp, 223.0_dp, 223.034611_dp, 0.000429_dp, 224.0_dp, 224.039796_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Bk_naw | = | naw_type(22, transpose(reshape([233.0_dp, 233.056652_dp, 0.000250_dp, 234.0_dp, 234.057322_dp, 0.000164_dp, 235.0_dp, 235.056651_dp, 0.000430_dp, 236.0_dp, 236.057479_dp, 0.000387_dp, 237.0_dp, 237.057123_dp, 0.000247_dp, 238.0_dp, 238.058204_dp, 0.000275_dp, 239.0_dp, 239.058239_dp, 0.000222_dp, 240.0_dp, 240.059758_dp, 0.000161_dp, 241.0_dp, 241.060098_dp, 0.000178_dp, 242.0_dp, 242.061999_dp, 0.000144_dp, 243.0_dp, 243.063005905_dp, 0.000004856_dp, 244.0_dp, 244.065178969_dp, 0.000015457_dp, 245.0_dp, 245.066359814_dp, 0.000001923_dp, 246.0_dp, 246.068671300_dp, 0.000064433_dp, 247.0_dp, 247.070305889_dp, 0.000005570_dp, 248.0_dp, 248.073141689_dp, 0.000053739_dp, 249.0_dp, 249.074983118_dp, 0.000001339_dp, 250.0_dp, 250.078317195_dp, 0.000003110_dp, 251.0_dp, 251.080760555_dp, 0.000011523_dp, 252.0_dp, 252.084310_dp, 0.000215_dp, 253.0_dp, 253.086880_dp, 0.000385_dp, 254.0_dp, 254.090600_dp, 0.000320_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Br_naw | = | naw_type(34, transpose(reshape([65.0_dp, 64.982297_dp, 0.000537_dp, 66.0_dp, 65.974697_dp, 0.000429_dp, 67.0_dp, 66.965078_dp, 0.000322_dp, 68.0_dp, 67.958356_dp, 0.000278_dp, 69.0_dp, 68.950338410_dp, 0.000045091_dp, 70.0_dp, 69.944792321_dp, 0.000016000_dp, 71.0_dp, 70.939342153_dp, 0.000005799_dp, 72.0_dp, 71.936594606_dp, 0.000001100_dp, 73.0_dp, 72.931673441_dp, 0.000007237_dp, 74.0_dp, 73.929910279_dp, 0.000006264_dp, 75.0_dp, 74.925810566_dp, 0.000004600_dp, 76.0_dp, 75.924541574_dp, 0.000010007_dp, 77.0_dp, 76.921379193_dp, 0.000003017_dp, 78.0_dp, 77.921145858_dp, 0.000003842_dp, 79.0_dp, 78.918337574_dp, 0.000001074_dp, 80.0_dp, 79.918529784_dp, 0.000001065_dp, 81.0_dp, 80.916288197_dp, 0.000001049_dp, 82.0_dp, 81.916801752_dp, 0.000001042_dp, 83.0_dp, 82.915175285_dp, 0.000004073_dp, 84.0_dp, 83.916496417_dp, 0.000027622_dp, 85.0_dp, 84.915645758_dp, 0.000003304_dp, 86.0_dp, 85.918805432_dp, 0.000003304_dp, 87.0_dp, 86.920674016_dp, 0.000003404_dp, 88.0_dp, 87.924083290_dp, 0.000003404_dp, 89.0_dp, 88.926704558_dp, 0.000003504_dp, 90.0_dp, 89.931292848_dp, 0.000003604_dp, 91.0_dp, 90.934398617_dp, 0.000003804_dp, 92.0_dp, 91.939631595_dp, 0.000007202_dp, 93.0_dp, 92.943220000_dp, 0.000462500_dp, 94.0_dp, 93.948846_dp, 0.000215_dp, 95.0_dp, 94.952925_dp, 0.000322_dp, 96.0_dp, 95.958980_dp, 0.000322_dp, 97.0_dp, 96.963499_dp, 0.000429_dp, 98.0_dp, 97.969887_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | C_naw | = | naw_type(16, transpose(reshape([8.0_dp, 8.037643039_dp, 0.000019584_dp, 9.0_dp, 9.031037202_dp, 0.000002293_dp, 10.0_dp, 10.016853217_dp, 0.000000075_dp, 11.0_dp, 11.011432597_dp, 0.000000064_dp, 12.0_dp, 12.0000000_dp, 0.0000000_dp, 13.0_dp, 13.00335483534_dp, 0.00000000025_dp, 14.0_dp, 14.00324198862_dp, 0.00000000403_dp, 15.0_dp, 15.010599256_dp, 0.000000858_dp, 16.0_dp, 16.014701255_dp, 0.000003840_dp, 17.0_dp, 17.022578650_dp, 0.000018641_dp, 18.0_dp, 18.026751930_dp, 0.000032206_dp, 19.0_dp, 19.034797594_dp, 0.000105625_dp, 20.0_dp, 20.040261732_dp, 0.000247585_dp, 21.0_dp, 21.049000_dp, 0.000640_dp, 22.0_dp, 22.057553990_dp, 0.000248515_dp, 23.0_dp, 23.068890_dp, 0.001070_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ca_naw | = | naw_type(29, transpose(reshape([33.0_dp, 33.033312_dp, 0.000429_dp, 34.0_dp, 34.015985_dp, 0.000322_dp, 35.0_dp, 35.005572_dp, 0.000215_dp, 36.0_dp, 35.993074388_dp, 0.000042941_dp, 37.0_dp, 36.985897849_dp, 0.000000680_dp, 38.0_dp, 37.976319223_dp, 0.000000208_dp, 39.0_dp, 38.970710811_dp, 0.000000640_dp, 40.0_dp, 39.962590850_dp, 0.000000022_dp, 41.0_dp, 40.962277905_dp, 0.000000147_dp, 42.0_dp, 41.958617780_dp, 0.000000159_dp, 43.0_dp, 42.958766381_dp, 0.000000244_dp, 44.0_dp, 43.955481489_dp, 0.000000348_dp, 45.0_dp, 44.956186270_dp, 0.000000392_dp, 46.0_dp, 45.953687726_dp, 0.000002398_dp, 47.0_dp, 46.954541134_dp, 0.000002384_dp, 48.0_dp, 47.952522654_dp, 0.000000018_dp, 49.0_dp, 48.955662625_dp, 0.000000190_dp, 50.0_dp, 49.957499215_dp, 0.000001700_dp, 51.0_dp, 50.960995663_dp, 0.000000560_dp, 52.0_dp, 51.963213646_dp, 0.000000720_dp, 53.0_dp, 52.968451000_dp, 0.000047000_dp, 54.0_dp, 53.972989000_dp, 0.000052000_dp, 55.0_dp, 54.979978000_dp, 0.000172000_dp, 56.0_dp, 55.985496000_dp, 0.000268000_dp, 57.0_dp, 56.992958_dp, 0.000429_dp, 58.0_dp, 57.998357_dp, 0.000537_dp, 59.0_dp, 59.006237_dp, 0.000644_dp, 60.0_dp, 60.011809_dp, 0.000751_dp, 61.0_dp, 61.020408_dp, 0.000859_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Cd_naw | = | naw_type(42, transpose(reshape([94.0_dp, 93.956586_dp, 0.000537_dp, 95.0_dp, 94.949483_dp, 0.000607_dp, 96.0_dp, 95.940341_dp, 0.000440_dp, 97.0_dp, 96.934799343_dp, 0.000451073_dp, 98.0_dp, 97.927389315_dp, 0.000055605_dp, 99.0_dp, 98.924925845_dp, 0.000001700_dp, 100.0_dp, 99.920348829_dp, 0.000001800_dp, 101.0_dp, 100.918586209_dp, 0.000001600_dp, 102.0_dp, 101.914481797_dp, 0.000001784_dp, 103.0_dp, 102.913416922_dp, 0.000001943_dp, 104.0_dp, 103.909856228_dp, 0.000001795_dp, 105.0_dp, 104.909463893_dp, 0.000001494_dp, 106.0_dp, 105.906459791_dp, 0.000001184_dp, 107.0_dp, 106.906612049_dp, 0.000001782_dp, 108.0_dp, 107.904183588_dp, 0.000001205_dp, 109.0_dp, 108.904986697_dp, 0.000001649_dp, 110.0_dp, 109.903007470_dp, 0.000000407_dp, 111.0_dp, 110.904183776_dp, 0.000000383_dp, 112.0_dp, 111.902763896_dp, 0.000000268_dp, 113.0_dp, 112.904408105_dp, 0.000000262_dp, 114.0_dp, 113.903364998_dp, 0.000000296_dp, 115.0_dp, 114.905437426_dp, 0.000000699_dp, 116.0_dp, 115.904763230_dp, 0.000000172_dp, 117.0_dp, 116.907226039_dp, 0.000001087_dp, 118.0_dp, 117.906921956_dp, 0.000021471_dp, 119.0_dp, 118.909847052_dp, 0.000040467_dp, 120.0_dp, 119.909868065_dp, 0.000004000_dp, 121.0_dp, 120.912963660_dp, 0.000002085_dp, 122.0_dp, 121.913459050_dp, 0.000002468_dp, 123.0_dp, 122.916892460_dp, 0.000002894_dp, 124.0_dp, 123.917659772_dp, 0.000002800_dp, 125.0_dp, 124.921257590_dp, 0.000003100_dp, 126.0_dp, 125.922430290_dp, 0.000002473_dp, 127.0_dp, 126.926203291_dp, 0.000006656_dp, 128.0_dp, 127.927816778_dp, 0.000006905_dp, 129.0_dp, 128.932235597_dp, 0.000005700_dp, 130.0_dp, 129.934387563_dp, 0.000024000_dp, 131.0_dp, 130.940727740_dp, 0.000020653_dp, 132.0_dp, 131.945823136_dp, 0.000064485_dp, 133.0_dp, 132.952614_dp, 0.000215_dp, 134.0_dp, 133.957638_dp, 0.000322_dp, 135.0_dp, 134.964766_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ce_naw | = | naw_type(41, transpose(reshape([119.0_dp, 118.952957_dp, 0.000537_dp, 120.0_dp, 119.946613_dp, 0.000537_dp, 121.0_dp, 120.943435_dp, 0.000430_dp, 122.0_dp, 121.937870_dp, 0.000430_dp, 123.0_dp, 122.935280_dp, 0.000320_dp, 124.0_dp, 123.930310_dp, 0.000320_dp, 125.0_dp, 124.928440_dp, 0.000210_dp, 126.0_dp, 125.923971000_dp, 0.000030000_dp, 127.0_dp, 126.922727000_dp, 0.000031000_dp, 128.0_dp, 127.918911000_dp, 0.000030000_dp, 129.0_dp, 128.918102000_dp, 0.000030000_dp, 130.0_dp, 129.914736000_dp, 0.000030000_dp, 131.0_dp, 130.914429465_dp, 0.000035214_dp, 132.0_dp, 131.911466226_dp, 0.000021907_dp, 133.0_dp, 132.911520402_dp, 0.000017557_dp, 134.0_dp, 133.908928142_dp, 0.000021886_dp, 135.0_dp, 134.909160662_dp, 0.000011021_dp, 136.0_dp, 135.907129256_dp, 0.000000348_dp, 137.0_dp, 136.907762416_dp, 0.000000386_dp, 138.0_dp, 137.905994180_dp, 0.000000536_dp, 139.0_dp, 138.906647029_dp, 0.000002242_dp, 140.0_dp, 139.905448433_dp, 0.000001409_dp, 141.0_dp, 140.908285991_dp, 0.000001411_dp, 142.0_dp, 141.909250208_dp, 0.000002623_dp, 143.0_dp, 142.912391953_dp, 0.000002621_dp, 144.0_dp, 143.913652763_dp, 0.000003041_dp, 145.0_dp, 144.917265113_dp, 0.000036393_dp, 146.0_dp, 145.918812294_dp, 0.000015743_dp, 147.0_dp, 146.922689900_dp, 0.000009211_dp, 148.0_dp, 147.924424186_dp, 0.000012017_dp, 149.0_dp, 148.928426900_dp, 0.000011000_dp, 150.0_dp, 149.930384032_dp, 0.000012556_dp, 151.0_dp, 150.934272200_dp, 0.000019000_dp, 152.0_dp, 151.936682_dp, 0.000215_dp, 153.0_dp, 152.941052_dp, 0.000215_dp, 154.0_dp, 153.943940_dp, 0.000215_dp, 155.0_dp, 154.948706_dp, 0.000322_dp, 156.0_dp, 155.951884_dp, 0.000322_dp, 157.0_dp, 156.957133_dp, 0.000429_dp, 158.0_dp, 157.960773_dp, 0.000429_dp, 159.0_dp, 158.966355_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Cf_naw | = | naw_type(20, transpose(reshape([237.0_dp, 237.062199272_dp, 0.000104506_dp, 238.0_dp, 238.061490_dp, 0.000320_dp, 239.0_dp, 239.062482_dp, 0.000129_dp, 240.0_dp, 240.062253447_dp, 0.000019360_dp, 241.0_dp, 241.063690_dp, 0.000180_dp, 242.0_dp, 242.063754544_dp, 0.000013840_dp, 243.0_dp, 243.065475_dp, 0.000194_dp, 244.0_dp, 244.065999447_dp, 0.000002809_dp, 245.0_dp, 245.068046755_dp, 0.000002606_dp, 246.0_dp, 246.068803685_dp, 0.000001625_dp, 247.0_dp, 247.070971348_dp, 0.000015380_dp, 248.0_dp, 248.072182905_dp, 0.000005497_dp, 249.0_dp, 249.074850428_dp, 0.000001269_dp, 250.0_dp, 250.076404494_dp, 0.000001650_dp, 251.0_dp, 251.079587171_dp, 0.000004187_dp, 252.0_dp, 252.081626507_dp, 0.000002531_dp, 253.0_dp, 253.085133723_dp, 0.000004570_dp, 254.0_dp, 254.087323575_dp, 0.000012304_dp, 255.0_dp, 255.091046_dp, 0.000215_dp, 256.0_dp, 256.093442_dp, 0.000338_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Cl_naw | = | naw_type(25, transpose(reshape([28.0_dp, 28.030349_dp, 0.000537_dp, 29.0_dp, 29.015053_dp, 0.000203_dp, 30.0_dp, 30.005018333_dp, 0.000025631_dp, 31.0_dp, 30.992448097_dp, 0.000003700_dp, 32.0_dp, 31.985684605_dp, 0.000000603_dp, 33.0_dp, 32.977451988_dp, 0.000000419_dp, 34.0_dp, 33.973762490_dp, 0.000000052_dp, 35.0_dp, 34.968852694_dp, 0.000000038_dp, 36.0_dp, 35.968306822_dp, 0.000000038_dp, 37.0_dp, 36.965902573_dp, 0.000000055_dp, 38.0_dp, 37.968010408_dp, 0.000000105_dp, 39.0_dp, 38.968008151_dp, 0.000001859_dp, 40.0_dp, 39.970415466_dp, 0.000034423_dp, 41.0_dp, 40.970684525_dp, 0.000073777_dp, 42.0_dp, 41.973342000_dp, 0.000064000_dp, 43.0_dp, 42.974063700_dp, 0.000066407_dp, 44.0_dp, 43.978014918_dp, 0.000091859_dp, 45.0_dp, 44.980394353_dp, 0.000146177_dp, 46.0_dp, 45.985254926_dp, 0.000104400_dp, 47.0_dp, 46.989715_dp, 0.000215_dp, 48.0_dp, 47.995405_dp, 0.000537_dp, 49.0_dp, 49.000794_dp, 0.000429_dp, 50.0_dp, 50.008266_dp, 0.000429_dp, 51.0_dp, 51.015341_dp, 0.000751_dp, 52.0_dp, 52.024004_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Cm_naw | = | naw_type(22, transpose(reshape([231.0_dp, 231.050746_dp, 0.000322_dp, 232.0_dp, 232.049740_dp, 0.000216_dp, 233.0_dp, 233.050771485_dp, 0.000087059_dp, 234.0_dp, 234.050158568_dp, 0.000018333_dp, 235.0_dp, 235.051545_dp, 0.000110_dp, 236.0_dp, 236.051372112_dp, 0.000018931_dp, 237.0_dp, 237.052868988_dp, 0.000079870_dp, 238.0_dp, 238.053081606_dp, 0.000013133_dp, 239.0_dp, 239.054908519_dp, 0.000161107_dp, 240.0_dp, 240.055528233_dp, 0.000002045_dp, 241.0_dp, 241.057651218_dp, 0.000001725_dp, 242.0_dp, 242.058834187_dp, 0.000001224_dp, 243.0_dp, 243.061387329_dp, 0.000001605_dp, 244.0_dp, 244.062750622_dp, 0.000001187_dp, 245.0_dp, 245.065491047_dp, 0.000001233_dp, 246.0_dp, 246.067222016_dp, 0.000001637_dp, 247.0_dp, 247.070352678_dp, 0.000004076_dp, 248.0_dp, 248.072349086_dp, 0.000002531_dp, 249.0_dp, 249.075953992_dp, 0.000002545_dp, 250.0_dp, 250.078357541_dp, 0.000011029_dp, 251.0_dp, 251.082284988_dp, 0.000024367_dp, 252.0_dp, 252.084870_dp, 0.000320_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Cn_naw | = | naw_type(13, transpose(reshape([276.0_dp, 276.161418_dp, 0.000537_dp, 277.0_dp, 277.163535_dp, 0.000165_dp, 278.0_dp, 278.164083_dp, 0.000470_dp, 279.0_dp, 279.166422_dp, 0.000424_dp, 280.0_dp, 280.167102_dp, 0.000626_dp, 281.0_dp, 281.169563_dp, 0.000427_dp, 282.0_dp, 282.170507_dp, 0.000588_dp, 283.0_dp, 283.173202_dp, 0.000660_dp, 284.0_dp, 284.174360_dp, 0.000819_dp, 285.0_dp, 285.177227_dp, 0.000544_dp, 286.0_dp, 286.178691_dp, 0.000751_dp, 287.0_dp, 287.181826_dp, 0.000751_dp, 288.0_dp, 288.183501_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Co_naw | = | naw_type(32, transpose(reshape([47.0_dp, 47.011401_dp, 0.000644_dp, 48.0_dp, 48.001857_dp, 0.000537_dp, 49.0_dp, 48.989501_dp, 0.000537_dp, 50.0_dp, 49.981117000_dp, 0.000135000_dp, 51.0_dp, 50.970647000_dp, 0.000052000_dp, 52.0_dp, 51.963130224_dp, 0.000005669_dp, 53.0_dp, 52.954203278_dp, 0.000001854_dp, 54.0_dp, 53.948459075_dp, 0.000000380_dp, 55.0_dp, 54.941996416_dp, 0.000000434_dp, 56.0_dp, 55.939838032_dp, 0.000000510_dp, 57.0_dp, 56.936289819_dp, 0.000000553_dp, 58.0_dp, 57.935751292_dp, 0.000001237_dp, 59.0_dp, 58.933193524_dp, 0.000000426_dp, 60.0_dp, 59.933815536_dp, 0.000000433_dp, 61.0_dp, 60.932476031_dp, 0.000000901_dp, 62.0_dp, 61.934058198_dp, 0.000019940_dp, 63.0_dp, 62.933599630_dp, 0.000019941_dp, 64.0_dp, 63.935810176_dp, 0.000021476_dp, 65.0_dp, 64.936462071_dp, 0.000002235_dp, 66.0_dp, 65.939442943_dp, 0.000015000_dp, 67.0_dp, 66.940609625_dp, 0.000006917_dp, 68.0_dp, 67.944559401_dp, 0.000004142_dp, 69.0_dp, 68.945909000_dp, 0.000092000_dp, 70.0_dp, 69.950053400_dp, 0.000011800_dp, 71.0_dp, 70.952366923_dp, 0.000499230_dp, 72.0_dp, 71.956736_dp, 0.000322_dp, 73.0_dp, 72.959238_dp, 0.000322_dp, 74.0_dp, 73.963993_dp, 0.000429_dp, 75.0_dp, 74.967192_dp, 0.000429_dp, 76.0_dp, 75.972453_dp, 0.000537_dp, 77.0_dp, 76.976479_dp, 0.000644_dp, 78.0_dp, 77.983553_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Cr_naw | = | naw_type(30, transpose(reshape([41.0_dp, 41.021911_dp, 0.000429_dp, 42.0_dp, 42.007579_dp, 0.000322_dp, 43.0_dp, 42.997885_dp, 0.000215_dp, 44.0_dp, 43.985591000_dp, 0.000055000_dp, 45.0_dp, 44.979050000_dp, 0.000038000_dp, 46.0_dp, 45.968360969_dp, 0.000012295_dp, 47.0_dp, 46.962894995_dp, 0.000005578_dp, 48.0_dp, 47.954029431_dp, 0.000007848_dp, 49.0_dp, 48.951333720_dp, 0.000002363_dp, 50.0_dp, 49.946042209_dp, 0.000000100_dp, 51.0_dp, 50.944765388_dp, 0.000000178_dp, 52.0_dp, 51.940504714_dp, 0.000000120_dp, 53.0_dp, 52.940646304_dp, 0.000000124_dp, 54.0_dp, 53.938877359_dp, 0.000000142_dp, 55.0_dp, 54.940836637_dp, 0.000000245_dp, 56.0_dp, 55.940648977_dp, 0.000000620_dp, 57.0_dp, 56.943612112_dp, 0.000002000_dp, 58.0_dp, 57.944184501_dp, 0.000003200_dp, 59.0_dp, 58.948345426_dp, 0.000000720_dp, 60.0_dp, 59.949641656_dp, 0.000001200_dp, 61.0_dp, 60.954378130_dp, 0.000002000_dp, 62.0_dp, 61.956142920_dp, 0.000003700_dp, 63.0_dp, 62.961161000_dp, 0.000078000_dp, 64.0_dp, 63.963886000_dp, 0.000322000_dp, 65.0_dp, 64.969608_dp, 0.000215_dp, 66.0_dp, 65.973011_dp, 0.000322_dp, 67.0_dp, 66.979313_dp, 0.000429_dp, 68.0_dp, 67.983156_dp, 0.000537_dp, 69.0_dp, 68.989662_dp, 0.000537_dp, 70.0_dp, 69.993945_dp, 0.000644_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Cs_naw | = | naw_type(42, transpose(reshape([111.0_dp, 110.953945_dp, 0.000215_dp, 112.0_dp, 111.950172_dp, 0.000124_dp, 113.0_dp, 112.944428484_dp, 0.000009207_dp, 114.0_dp, 113.941292244_dp, 0.000091323_dp, 115.0_dp, 114.935910_dp, 0.000110_dp, 116.0_dp, 115.933395_dp, 0.000108_dp, 117.0_dp, 116.928616723_dp, 0.000067000_dp, 118.0_dp, 117.926559517_dp, 0.000013690_dp, 119.0_dp, 118.922377327_dp, 0.000014965_dp, 120.0_dp, 119.920677277_dp, 0.000010702_dp, 121.0_dp, 120.917227235_dp, 0.000015340_dp, 122.0_dp, 121.916108144_dp, 0.000036164_dp, 123.0_dp, 122.912996060_dp, 0.000013000_dp, 124.0_dp, 123.912247366_dp, 0.000009823_dp, 125.0_dp, 124.909725953_dp, 0.000008304_dp, 126.0_dp, 125.909445821_dp, 0.000011120_dp, 127.0_dp, 126.907417527_dp, 0.000005987_dp, 128.0_dp, 127.907748452_dp, 0.000005771_dp, 129.0_dp, 128.906065910_dp, 0.000004888_dp, 130.0_dp, 129.906709281_dp, 0.000008971_dp, 131.0_dp, 130.905468457_dp, 0.000000190_dp, 132.0_dp, 131.906437740_dp, 0.000001112_dp, 133.0_dp, 132.905451958_dp, 0.000000008_dp, 134.0_dp, 133.906718501_dp, 0.000000017_dp, 135.0_dp, 134.905976907_dp, 0.000000390_dp, 136.0_dp, 135.907311431_dp, 0.000002010_dp, 137.0_dp, 136.907089296_dp, 0.000000324_dp, 138.0_dp, 137.911017119_dp, 0.000009831_dp, 139.0_dp, 138.913363822_dp, 0.000003364_dp, 140.0_dp, 139.917283707_dp, 0.000008801_dp, 141.0_dp, 140.920045279_dp, 0.000009871_dp, 142.0_dp, 141.924299514_dp, 0.000007586_dp, 143.0_dp, 142.927347346_dp, 0.000008130_dp, 144.0_dp, 143.932075402_dp, 0.000021612_dp, 145.0_dp, 144.935528927_dp, 0.000009733_dp, 146.0_dp, 145.940621867_dp, 0.000003106_dp, 147.0_dp, 146.944261512_dp, 0.000009000_dp, 148.0_dp, 147.949639026_dp, 0.000014000_dp, 149.0_dp, 148.953516_dp, 0.000429_dp, 150.0_dp, 149.959023_dp, 0.000429_dp, 151.0_dp, 150.963199_dp, 0.000537_dp, 152.0_dp, 151.968728_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Cu_naw | = | naw_type(33, transpose(reshape([52.0_dp, 51.997982_dp, 0.000644_dp, 53.0_dp, 52.985894_dp, 0.000537_dp, 54.0_dp, 53.977198_dp, 0.000429_dp, 55.0_dp, 54.966038000_dp, 0.000167000_dp, 56.0_dp, 55.958529278_dp, 0.000006864_dp, 57.0_dp, 56.949211686_dp, 0.000000537_dp, 58.0_dp, 57.944532283_dp, 0.000000604_dp, 59.0_dp, 58.939496713_dp, 0.000000566_dp, 60.0_dp, 59.937363787_dp, 0.000001731_dp, 61.0_dp, 60.933457375_dp, 0.000001020_dp, 62.0_dp, 61.932594803_dp, 0.000000683_dp, 63.0_dp, 62.929597119_dp, 0.000000457_dp, 64.0_dp, 63.929764001_dp, 0.000000458_dp, 65.0_dp, 64.927789476_dp, 0.000000690_dp, 66.0_dp, 65.928868804_dp, 0.000000696_dp, 67.0_dp, 66.927729490_dp, 0.000000957_dp, 68.0_dp, 67.929610887_dp, 0.000001700_dp, 69.0_dp, 68.929429267_dp, 0.000001500_dp, 70.0_dp, 69.932392078_dp, 0.000001161_dp, 71.0_dp, 70.932676831_dp, 0.000001600_dp, 72.0_dp, 71.935820306_dp, 0.000001500_dp, 73.0_dp, 72.936674376_dp, 0.000002084_dp, 74.0_dp, 73.939874860_dp, 0.000006600_dp, 75.0_dp, 74.941523817_dp, 0.000000770_dp, 76.0_dp, 75.945268974_dp, 0.000000980_dp, 77.0_dp, 76.947543599_dp, 0.000001300_dp, 78.0_dp, 77.951916524_dp, 0.000014312_dp, 79.0_dp, 78.954473100_dp, 0.000112700_dp, 80.0_dp, 79.960623_dp, 0.000322_dp, 81.0_dp, 80.965743_dp, 0.000322_dp, 82.0_dp, 81.972378_dp, 0.000429_dp, 83.0_dp, 82.978110_dp, 0.000537_dp, 84.0_dp, 83.985271_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Db_naw | = | naw_type(16, transpose(reshape([255.0_dp, 255.106919_dp, 0.000304_dp, 256.0_dp, 256.107674_dp, 0.000201_dp, 257.0_dp, 257.107520042_dp, 0.000176741_dp, 258.0_dp, 258.108972995_dp, 0.000098613_dp, 259.0_dp, 259.109491859_dp, 0.000060854_dp, 260.0_dp, 260.111297_dp, 0.000100_dp, 261.0_dp, 261.111979_dp, 0.000118_dp, 262.0_dp, 262.114067_dp, 0.000154_dp, 263.0_dp, 263.114987_dp, 0.000180_dp, 264.0_dp, 264.117297_dp, 0.000253_dp, 265.0_dp, 265.118500_dp, 0.000240_dp, 266.0_dp, 266.121032_dp, 0.000304_dp, 267.0_dp, 267.122399_dp, 0.000402_dp, 268.0_dp, 268.125669_dp, 0.000568_dp, 269.0_dp, 269.127911_dp, 0.000669_dp, 270.0_dp, 270.131399_dp, 0.000617_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ds_naw | = | naw_type(18, transpose(reshape([267.0_dp, 267.143726_dp, 0.000219_dp, 268.0_dp, 268.143477_dp, 0.000324_dp, 269.0_dp, 269.144750965_dp, 0.000033712_dp, 270.0_dp, 270.144586620_dp, 0.000042163_dp, 271.0_dp, 271.145951_dp, 0.000104_dp, 272.0_dp, 272.146091_dp, 0.000456_dp, 273.0_dp, 273.148455_dp, 0.000152_dp, 274.0_dp, 274.149434_dp, 0.000418_dp, 275.0_dp, 275.152085_dp, 0.000366_dp, 276.0_dp, 276.153022_dp, 0.000588_dp, 277.0_dp, 277.155763_dp, 0.000421_dp, 278.0_dp, 278.157007_dp, 0.000548_dp, 279.0_dp, 279.159984_dp, 0.000649_dp, 280.0_dp, 280.161375_dp, 0.000803_dp, 281.0_dp, 281.164545_dp, 0.000529_dp, 282.0_dp, 282.166174_dp, 0.000322_dp, 283.0_dp, 283.169437_dp, 0.000537_dp, 284.0_dp, 284.171187_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Dy_naw | = | naw_type(39, transpose(reshape([138.0_dp, 137.962500_dp, 0.000540_dp, 139.0_dp, 138.959527_dp, 0.000537_dp, 140.0_dp, 139.954020_dp, 0.000430_dp, 141.0_dp, 140.951280_dp, 0.000320_dp, 142.0_dp, 141.946194_dp, 0.000782_dp, 143.0_dp, 142.943994332_dp, 0.000014000_dp, 144.0_dp, 143.939269512_dp, 0.000007700_dp, 145.0_dp, 144.937473992_dp, 0.000007000_dp, 146.0_dp, 145.932844526_dp, 0.000007187_dp, 147.0_dp, 146.931082712_dp, 0.000009500_dp, 148.0_dp, 147.927149944_dp, 0.000009365_dp, 149.0_dp, 148.927327516_dp, 0.000009858_dp, 150.0_dp, 149.925593068_dp, 0.000004636_dp, 151.0_dp, 150.926191279_dp, 0.000003486_dp, 152.0_dp, 151.924725274_dp, 0.000004930_dp, 153.0_dp, 152.925771729_dp, 0.000004295_dp, 154.0_dp, 153.924428920_dp, 0.000007977_dp, 155.0_dp, 154.925758049_dp, 0.000010354_dp, 156.0_dp, 155.924283593_dp, 0.000001060_dp, 157.0_dp, 156.925469555_dp, 0.000005532_dp, 158.0_dp, 157.924414817_dp, 0.000002509_dp, 159.0_dp, 158.925745938_dp, 0.000001544_dp, 160.0_dp, 159.925203578_dp, 0.000000751_dp, 161.0_dp, 160.926939425_dp, 0.000000748_dp, 162.0_dp, 161.926804507_dp, 0.000000746_dp, 163.0_dp, 162.928737221_dp, 0.000000744_dp, 164.0_dp, 163.929180819_dp, 0.000000746_dp, 165.0_dp, 164.931709402_dp, 0.000000748_dp, 166.0_dp, 165.932812810_dp, 0.000000862_dp, 167.0_dp, 166.935682415_dp, 0.000004300_dp, 168.0_dp, 167.937134977_dp, 0.000150303_dp, 169.0_dp, 168.940315231_dp, 0.000322781_dp, 170.0_dp, 169.942340_dp, 0.000215_dp, 171.0_dp, 170.946312_dp, 0.000215_dp, 172.0_dp, 171.948728_dp, 0.000322_dp, 173.0_dp, 172.953043_dp, 0.000429_dp, 174.0_dp, 173.955845_dp, 0.000537_dp, 175.0_dp, 174.960569_dp, 0.000537_dp, 176.0_dp, 175.963918_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Er_naw | = | naw_type(39, transpose(reshape([142.0_dp, 141.970016_dp, 0.000537_dp, 143.0_dp, 142.966548_dp, 0.000429_dp, 144.0_dp, 143.960700_dp, 0.000210_dp, 145.0_dp, 144.957874_dp, 0.000215_dp, 146.0_dp, 145.952418357_dp, 0.000007197_dp, 147.0_dp, 146.949964456_dp, 0.000041000_dp, 148.0_dp, 147.944735026_dp, 0.000011000_dp, 149.0_dp, 148.942306000_dp, 0.000030000_dp, 150.0_dp, 149.937915524_dp, 0.000018458_dp, 151.0_dp, 150.937448567_dp, 0.000017681_dp, 152.0_dp, 151.935050347_dp, 0.000009478_dp, 153.0_dp, 152.935086350_dp, 0.000009967_dp, 154.0_dp, 153.932790799_dp, 0.000005325_dp, 155.0_dp, 154.933215710_dp, 0.000006520_dp, 156.0_dp, 155.931065926_dp, 0.000026440_dp, 157.0_dp, 156.931922652_dp, 0.000028454_dp, 158.0_dp, 157.929893474_dp, 0.000027074_dp, 159.0_dp, 158.930690790_dp, 0.000003910_dp, 160.0_dp, 159.929077193_dp, 0.000026029_dp, 161.0_dp, 160.930003530_dp, 0.000009419_dp, 162.0_dp, 161.928787299_dp, 0.000000811_dp, 163.0_dp, 162.930039908_dp, 0.000004967_dp, 164.0_dp, 163.929207739_dp, 0.000000755_dp, 165.0_dp, 164.930733482_dp, 0.000000985_dp, 166.0_dp, 165.930301067_dp, 0.000000358_dp, 167.0_dp, 166.932056192_dp, 0.000000306_dp, 168.0_dp, 167.932378282_dp, 0.000000280_dp, 169.0_dp, 168.934598444_dp, 0.000000326_dp, 170.0_dp, 169.935471933_dp, 0.000001488_dp, 171.0_dp, 170.938037372_dp, 0.000001511_dp, 172.0_dp, 171.939363461_dp, 0.000004253_dp, 173.0_dp, 172.942400_dp, 0.000210_dp, 174.0_dp, 173.944230_dp, 0.000320_dp, 175.0_dp, 174.947770_dp, 0.000430_dp, 176.0_dp, 175.949940_dp, 0.000430_dp, 177.0_dp, 176.953990_dp, 0.000540_dp, 178.0_dp, 177.956779_dp, 0.000640_dp, 179.0_dp, 178.961267_dp, 0.000537_dp, 180.0_dp, 179.964380_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Es_naw | = | naw_type(20, transpose(reshape([239.0_dp, 239.068310_dp, 0.000322_dp, 240.0_dp, 240.068949_dp, 0.000393_dp, 241.0_dp, 241.068592_dp, 0.000248_dp, 242.0_dp, 242.069567_dp, 0.000276_dp, 243.0_dp, 243.069508_dp, 0.000222_dp, 244.0_dp, 244.070881_dp, 0.000195_dp, 245.0_dp, 245.071192_dp, 0.000178_dp, 246.0_dp, 246.072806474_dp, 0.000096538_dp, 247.0_dp, 247.073621929_dp, 0.000020870_dp, 248.0_dp, 248.075469_dp, 0.000056_dp, 249.0_dp, 249.076409_dp, 0.000032_dp, 250.0_dp, 250.078611_dp, 0.000107_dp, 251.0_dp, 251.079991431_dp, 0.000005676_dp, 252.0_dp, 252.082979173_dp, 0.000053736_dp, 253.0_dp, 253.084821241_dp, 0.000001341_dp, 254.0_dp, 254.088024337_dp, 0.000003152_dp, 255.0_dp, 255.090273504_dp, 0.000011612_dp, 256.0_dp, 256.093597_dp, 0.000107_dp, 257.0_dp, 257.095979_dp, 0.000441_dp, 258.0_dp, 258.099520_dp, 0.000430_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Eu_naw | = | naw_type(41, transpose(reshape([130.0_dp, 129.964022_dp, 0.000578_dp, 131.0_dp, 130.957634_dp, 0.000429_dp, 132.0_dp, 131.954696_dp, 0.000429_dp, 133.0_dp, 132.949290_dp, 0.000320_dp, 134.0_dp, 133.946537_dp, 0.000322_dp, 135.0_dp, 134.941870_dp, 0.000210_dp, 136.0_dp, 135.939620_dp, 0.000210_dp, 137.0_dp, 136.935430719_dp, 0.000004700_dp, 138.0_dp, 137.933709000_dp, 0.000030000_dp, 139.0_dp, 138.929792307_dp, 0.000014117_dp, 140.0_dp, 139.928087633_dp, 0.000055328_dp, 141.0_dp, 140.924931734_dp, 0.000013568_dp, 142.0_dp, 141.923446719_dp, 0.000032268_dp, 143.0_dp, 142.920298678_dp, 0.000011793_dp, 144.0_dp, 143.918819481_dp, 0.000011580_dp, 145.0_dp, 144.916272659_dp, 0.000003285_dp, 146.0_dp, 145.917210852_dp, 0.000006451_dp, 147.0_dp, 146.916752440_dp, 0.000002758_dp, 148.0_dp, 147.918091288_dp, 0.000010693_dp, 149.0_dp, 148.917936875_dp, 0.000004190_dp, 150.0_dp, 149.919707092_dp, 0.000006688_dp, 151.0_dp, 150.919856606_dp, 0.000001251_dp, 152.0_dp, 151.921750980_dp, 0.000001252_dp, 153.0_dp, 152.921236789_dp, 0.000001257_dp, 154.0_dp, 153.922985699_dp, 0.000001275_dp, 155.0_dp, 154.922899847_dp, 0.000001343_dp, 156.0_dp, 155.924762976_dp, 0.000003791_dp, 157.0_dp, 156.925432556_dp, 0.000004545_dp, 158.0_dp, 157.927782192_dp, 0.000002181_dp, 159.0_dp, 158.929099512_dp, 0.000004637_dp, 160.0_dp, 159.931836982_dp, 0.000000970_dp, 161.0_dp, 160.933663991_dp, 0.000011164_dp, 162.0_dp, 161.936958329_dp, 0.000001410_dp, 163.0_dp, 162.939265510_dp, 0.000000970_dp, 164.0_dp, 163.942852943_dp, 0.000002219_dp, 165.0_dp, 164.945540070_dp, 0.000005596_dp, 166.0_dp, 165.949813_dp, 0.000107_dp, 167.0_dp, 166.953011_dp, 0.000429_dp, 168.0_dp, 167.957863_dp, 0.000429_dp, 169.0_dp, 168.961717_dp, 0.000537_dp, 170.0_dp, 169.966870_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | F_naw | = | naw_type(19, transpose(reshape([13.0_dp, 13.045121_dp, 0.000537_dp, 14.0_dp, 14.034315196_dp, 0.000044142_dp, 15.0_dp, 15.017785139_dp, 0.000015029_dp, 16.0_dp, 16.011460278_dp, 0.000005758_dp, 17.0_dp, 17.002095237_dp, 0.000000266_dp, 18.0_dp, 18.000937324_dp, 0.000000497_dp, 19.0_dp, 18.99840316207_dp, 0.00000000088_dp, 20.0_dp, 19.999981252_dp, 0.000000031_dp, 21.0_dp, 20.999948893_dp, 0.000001932_dp, 22.0_dp, 22.002998812_dp, 0.000013310_dp, 23.0_dp, 23.003526875_dp, 0.000035770_dp, 24.0_dp, 24.008099370_dp, 0.000104853_dp, 25.0_dp, 25.012167727_dp, 0.000103535_dp, 26.0_dp, 26.020048065_dp, 0.000114898_dp, 27.0_dp, 27.026981897_dp, 0.000129037_dp, 28.0_dp, 28.035860448_dp, 0.000129198_dp, 29.0_dp, 29.043103000_dp, 0.000564000_dp, 30.0_dp, 30.052561_dp, 0.000537_dp, 31.0_dp, 31.061023_dp, 0.000574_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Fe_naw | = | naw_type(32, transpose(reshape([45.0_dp, 45.015467_dp, 0.000304_dp, 46.0_dp, 46.001299_dp, 0.000322_dp, 47.0_dp, 46.992346_dp, 0.000537_dp, 48.0_dp, 47.980667000_dp, 0.000099000_dp, 49.0_dp, 48.973429000_dp, 0.000026000_dp, 50.0_dp, 49.962988000_dp, 0.000009000_dp, 51.0_dp, 50.956855137_dp, 0.000001501_dp, 52.0_dp, 51.948113364_dp, 0.000000192_dp, 53.0_dp, 52.945305629_dp, 0.000001792_dp, 54.0_dp, 53.939608189_dp, 0.000000368_dp, 55.0_dp, 54.938291158_dp, 0.000000330_dp, 56.0_dp, 55.934935537_dp, 0.000000287_dp, 57.0_dp, 56.935391950_dp, 0.000000287_dp, 58.0_dp, 57.933273575_dp, 0.000000339_dp, 59.0_dp, 58.934873492_dp, 0.000000354_dp, 60.0_dp, 59.934070249_dp, 0.000003656_dp, 61.0_dp, 60.936746241_dp, 0.000002800_dp, 62.0_dp, 61.936791809_dp, 0.000003000_dp, 63.0_dp, 62.940272698_dp, 0.000004618_dp, 64.0_dp, 63.940987761_dp, 0.000005386_dp, 65.0_dp, 64.945015323_dp, 0.000005487_dp, 66.0_dp, 65.946249958_dp, 0.000004400_dp, 67.0_dp, 66.950930000_dp, 0.000004100_dp, 68.0_dp, 67.952875_dp, 0.000207_dp, 69.0_dp, 68.957918_dp, 0.000215_dp, 70.0_dp, 69.960397_dp, 0.000322_dp, 71.0_dp, 70.965722_dp, 0.000429_dp, 72.0_dp, 71.968599_dp, 0.000537_dp, 73.0_dp, 72.974246_dp, 0.000537_dp, 74.0_dp, 73.977821_dp, 0.000537_dp, 75.0_dp, 74.984219_dp, 0.000644_dp, 76.0_dp, 75.988631_dp, 0.000644_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Fl_naw | = | naw_type(8, transpose(reshape([284.0_dp, 284.181192_dp, 0.000704_dp, 285.0_dp, 285.183503_dp, 0.000433_dp, 286.0_dp, 286.184226_dp, 0.000590_dp, 287.0_dp, 287.186720_dp, 0.000663_dp, 288.0_dp, 288.187781_dp, 0.000819_dp, 289.0_dp, 289.190517_dp, 0.000548_dp, 290.0_dp, 290.191875_dp, 0.000752_dp, 291.0_dp, 291.194848_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Fm_naw | = | naw_type(20, transpose(reshape([241.0_dp, 241.074311_dp, 0.000322_dp, 242.0_dp, 242.073430_dp, 0.000430_dp, 243.0_dp, 243.074414_dp, 0.000140_dp, 244.0_dp, 244.074036_dp, 0.000216_dp, 245.0_dp, 245.075354_dp, 0.000210_dp, 246.0_dp, 246.075353334_dp, 0.000014675_dp, 247.0_dp, 247.076944_dp, 0.000194_dp, 248.0_dp, 248.077185451_dp, 0.000009122_dp, 249.0_dp, 249.078926042_dp, 0.000006668_dp, 250.0_dp, 250.079519765_dp, 0.000008468_dp, 251.0_dp, 251.081545130_dp, 0.000015342_dp, 252.0_dp, 252.082466019_dp, 0.000005604_dp, 253.0_dp, 253.085180945_dp, 0.000001662_dp, 254.0_dp, 254.086852424_dp, 0.000001978_dp, 255.0_dp, 255.089963495_dp, 0.000004223_dp, 256.0_dp, 256.091771699_dp, 0.000003241_dp, 257.0_dp, 257.095105419_dp, 0.000004669_dp, 258.0_dp, 258.097077_dp, 0.000215_dp, 259.0_dp, 259.100596_dp, 0.000304_dp, 260.0_dp, 260.102809_dp, 0.000467_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Fr_naw | = | naw_type(37, transpose(reshape([197.0_dp, 197.011008086_dp, 0.000060584_dp, 198.0_dp, 198.010282081_dp, 0.000033419_dp, 199.0_dp, 199.007269384_dp, 0.000014734_dp, 200.0_dp, 200.006584666_dp, 0.000032769_dp, 201.0_dp, 201.003852491_dp, 0.000009747_dp, 202.0_dp, 202.003329637_dp, 0.000006476_dp, 203.0_dp, 203.000940867_dp, 0.000006689_dp, 204.0_dp, 204.000651972_dp, 0.000026389_dp, 205.0_dp, 204.998593854_dp, 0.000008399_dp, 206.0_dp, 205.998661441_dp, 0.000029856_dp, 207.0_dp, 206.996941450_dp, 0.000018847_dp, 208.0_dp, 207.997139082_dp, 0.000012514_dp, 209.0_dp, 208.995939701_dp, 0.000012349_dp, 210.0_dp, 209.996410596_dp, 0.000014407_dp, 211.0_dp, 210.995555189_dp, 0.000012872_dp, 212.0_dp, 211.996225420_dp, 0.000009419_dp, 213.0_dp, 212.996184410_dp, 0.000005053_dp, 214.0_dp, 213.998971193_dp, 0.000009145_dp, 215.0_dp, 215.000341534_dp, 0.000007585_dp, 216.0_dp, 216.003189523_dp, 0.000004480_dp, 217.0_dp, 217.004631980_dp, 0.000007011_dp, 218.0_dp, 218.007578620_dp, 0.000004546_dp, 219.0_dp, 219.009250664_dp, 0.000007380_dp, 220.0_dp, 220.012326789_dp, 0.000004324_dp, 221.0_dp, 221.014253714_dp, 0.000005245_dp, 222.0_dp, 222.017582615_dp, 0.000008000_dp, 223.0_dp, 223.019734241_dp, 0.000002073_dp, 224.0_dp, 224.023348096_dp, 0.000012000_dp, 225.0_dp, 225.025572466_dp, 0.000012847_dp, 226.0_dp, 226.029544512_dp, 0.000006688_dp, 227.0_dp, 227.031865413_dp, 0.000006332_dp, 228.0_dp, 228.035839433_dp, 0.000007226_dp, 229.0_dp, 229.038291443_dp, 0.000005368_dp, 230.0_dp, 230.042390787_dp, 0.000007022_dp, 231.0_dp, 231.045175353_dp, 0.000008300_dp, 232.0_dp, 232.049461219_dp, 0.000015000_dp, 233.0_dp, 233.052517833_dp, 0.000021000_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ga_naw | = | naw_type(33, transpose(reshape([56.0_dp, 55.995878_dp, 0.000537_dp, 57.0_dp, 56.983457_dp, 0.000429_dp, 58.0_dp, 57.974729_dp, 0.000322_dp, 59.0_dp, 58.963757_dp, 0.000183_dp, 60.0_dp, 59.957498_dp, 0.000215_dp, 61.0_dp, 60.949398861_dp, 0.000040787_dp, 62.0_dp, 61.944189639_dp, 0.000000684_dp, 63.0_dp, 62.939294194_dp, 0.000001400_dp, 64.0_dp, 63.936840366_dp, 0.000001533_dp, 65.0_dp, 64.932734424_dp, 0.000000849_dp, 66.0_dp, 65.931589766_dp, 0.000001172_dp, 67.0_dp, 66.928202276_dp, 0.000001262_dp, 68.0_dp, 67.927980161_dp, 0.000001535_dp, 69.0_dp, 68.925573528_dp, 0.000001285_dp, 70.0_dp, 69.926021914_dp, 0.000001289_dp, 71.0_dp, 70.924702554_dp, 0.000000870_dp, 72.0_dp, 71.926367452_dp, 0.000000878_dp, 73.0_dp, 72.925174680_dp, 0.000001800_dp, 74.0_dp, 73.926945725_dp, 0.000003214_dp, 75.0_dp, 74.926504484_dp, 0.000000720_dp, 76.0_dp, 75.928827624_dp, 0.000002100_dp, 77.0_dp, 76.929154299_dp, 0.000002600_dp, 78.0_dp, 77.931610854_dp, 0.000001127_dp, 79.0_dp, 78.932851582_dp, 0.000001296_dp, 80.0_dp, 79.936420773_dp, 0.000003103_dp, 81.0_dp, 80.938133841_dp, 0.000003503_dp, 82.0_dp, 81.943176531_dp, 0.000002604_dp, 83.0_dp, 82.947120300_dp, 0.000002804_dp, 84.0_dp, 83.952663000_dp, 0.000032000_dp, 85.0_dp, 84.957333000_dp, 0.000040000_dp, 86.0_dp, 85.963757_dp, 0.000429_dp, 87.0_dp, 86.969007_dp, 0.000537_dp, 88.0_dp, 87.975963_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Gd_naw | = | naw_type(40, transpose(reshape([133.0_dp, 132.961288_dp, 0.000537_dp, 134.0_dp, 133.955416_dp, 0.000429_dp, 135.0_dp, 134.952496_dp, 0.000429_dp, 136.0_dp, 135.947300_dp, 0.000320_dp, 137.0_dp, 136.945020_dp, 0.000320_dp, 138.0_dp, 137.940247_dp, 0.000215_dp, 139.0_dp, 138.938130_dp, 0.000210_dp, 140.0_dp, 139.933674000_dp, 0.000030000_dp, 141.0_dp, 140.932126000_dp, 0.000021213_dp, 142.0_dp, 141.928116000_dp, 0.000030000_dp, 143.0_dp, 142.926750678_dp, 0.000215032_dp, 144.0_dp, 143.922963000_dp, 0.000030000_dp, 145.0_dp, 144.921710051_dp, 0.000021165_dp, 146.0_dp, 145.918318513_dp, 0.000004376_dp, 147.0_dp, 146.919101014_dp, 0.000002025_dp, 148.0_dp, 147.918121414_dp, 0.000001566_dp, 149.0_dp, 148.919347666_dp, 0.000003553_dp, 150.0_dp, 149.918663949_dp, 0.000006500_dp, 151.0_dp, 150.920354922_dp, 0.000003212_dp, 152.0_dp, 151.919798414_dp, 0.000001081_dp, 153.0_dp, 152.921756945_dp, 0.000001075_dp, 154.0_dp, 153.920872974_dp, 0.000001066_dp, 155.0_dp, 154.922629356_dp, 0.000001055_dp, 156.0_dp, 155.922130120_dp, 0.000001054_dp, 157.0_dp, 156.923967424_dp, 0.000001048_dp, 158.0_dp, 157.924111200_dp, 0.000001048_dp, 159.0_dp, 158.926395822_dp, 0.000001051_dp, 160.0_dp, 159.927061202_dp, 0.000001206_dp, 161.0_dp, 160.929676267_dp, 0.000001614_dp, 162.0_dp, 161.930991812_dp, 0.000004254_dp, 163.0_dp, 162.934096640_dp, 0.000000855_dp, 164.0_dp, 163.935916193_dp, 0.000001073_dp, 165.0_dp, 164.939317080_dp, 0.000001400_dp, 166.0_dp, 165.941630413_dp, 0.000001700_dp, 167.0_dp, 166.945490012_dp, 0.000005596_dp, 168.0_dp, 167.948309_dp, 0.000322_dp, 169.0_dp, 168.952882_dp, 0.000429_dp, 170.0_dp, 169.956146_dp, 0.000537_dp, 171.0_dp, 170.961127_dp, 0.000537_dp, 172.0_dp, 171.964605_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ge_naw | = | naw_type(33, transpose(reshape([58.0_dp, 57.991863_dp, 0.000537_dp, 59.0_dp, 58.982426_dp, 0.000429_dp, 60.0_dp, 59.970445_dp, 0.000322_dp, 61.0_dp, 60.963725_dp, 0.000322_dp, 62.0_dp, 61.954761_dp, 0.000150_dp, 63.0_dp, 62.949628000_dp, 0.000040000_dp, 64.0_dp, 63.941689912_dp, 0.000004000_dp, 65.0_dp, 64.939368136_dp, 0.000002323_dp, 66.0_dp, 65.933862124_dp, 0.000002577_dp, 67.0_dp, 66.932716999_dp, 0.000004636_dp, 68.0_dp, 67.928095305_dp, 0.000002014_dp, 69.0_dp, 68.927964467_dp, 0.000001414_dp, 70.0_dp, 69.924248542_dp, 0.000000880_dp, 71.0_dp, 70.924952120_dp, 0.000000874_dp, 72.0_dp, 71.922075824_dp, 0.000000081_dp, 73.0_dp, 72.923458954_dp, 0.000000061_dp, 74.0_dp, 73.921177760_dp, 0.000000013_dp, 75.0_dp, 74.922858370_dp, 0.000000055_dp, 76.0_dp, 75.921402725_dp, 0.000000019_dp, 77.0_dp, 76.923549843_dp, 0.000000056_dp, 78.0_dp, 77.922852911_dp, 0.000003795_dp, 79.0_dp, 78.925359506_dp, 0.000039893_dp, 80.0_dp, 79.925350773_dp, 0.000002205_dp, 81.0_dp, 80.928832941_dp, 0.000002205_dp, 82.0_dp, 81.929774031_dp, 0.000002405_dp, 83.0_dp, 82.934539100_dp, 0.000002604_dp, 84.0_dp, 83.937575090_dp, 0.000003403_dp, 85.0_dp, 84.942969658_dp, 0.000004003_dp, 86.0_dp, 85.946967000_dp, 0.000470000_dp, 87.0_dp, 86.953204_dp, 0.000322_dp, 88.0_dp, 87.957574_dp, 0.000429_dp, 89.0_dp, 88.964530_dp, 0.000429_dp, 90.0_dp, 89.969436_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | H_naw | = | naw_type(7, transpose(reshape([1.0_dp, 1.007825031898_dp, 0.000000000014_dp, 2.0_dp, 2.014101777844_dp, 0.000000000015_dp, 3.0_dp, 3.01604928132_dp, 0.00000000008_dp, 4.0_dp, 4.026431867_dp, 0.000107354_dp, 5.0_dp, 5.035311492_dp, 0.000096020_dp, 6.0_dp, 6.044955437_dp, 0.000272816_dp, 7.0_dp, 7.052749_dp, 0.001078_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | He_naw | = | naw_type(8, transpose(reshape([3.0_dp, 3.01602932197_dp, 0.00000000006_dp, 4.0_dp, 4.00260325413_dp, 0.00000000016_dp, 5.0_dp, 5.012057224_dp, 0.000021470_dp, 6.0_dp, 6.018885889_dp, 0.000000057_dp, 7.0_dp, 7.027990652_dp, 0.000008115_dp, 8.0_dp, 8.033934388_dp, 0.000000095_dp, 9.0_dp, 9.043946414_dp, 0.000050259_dp, 10.0_dp, 10.052815306_dp, 0.000099676_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Hf_naw | = | naw_type(38, transpose(reshape([153.0_dp, 152.970692_dp, 0.000322_dp, 154.0_dp, 153.964863_dp, 0.000322_dp, 155.0_dp, 154.963167_dp, 0.000322_dp, 156.0_dp, 155.959399083_dp, 0.000160752_dp, 157.0_dp, 156.958288_dp, 0.000215_dp, 158.0_dp, 157.954801217_dp, 0.000018780_dp, 159.0_dp, 158.953995837_dp, 0.000018049_dp, 160.0_dp, 159.950682728_dp, 0.000010241_dp, 161.0_dp, 160.950277927_dp, 0.000025174_dp, 162.0_dp, 161.947215526_dp, 0.000009610_dp, 163.0_dp, 162.947107211_dp, 0.000027582_dp, 164.0_dp, 163.944370709_dp, 0.000016975_dp, 165.0_dp, 164.944567000_dp, 0.000030000_dp, 166.0_dp, 165.942180000_dp, 0.000030000_dp, 167.0_dp, 166.942600000_dp, 0.000030000_dp, 168.0_dp, 167.940568000_dp, 0.000030000_dp, 169.0_dp, 168.941259000_dp, 0.000030000_dp, 170.0_dp, 169.939609000_dp, 0.000030000_dp, 171.0_dp, 170.940492000_dp, 0.000031000_dp, 172.0_dp, 171.939449716_dp, 0.000026224_dp, 173.0_dp, 172.940513000_dp, 0.000030000_dp, 174.0_dp, 173.940048377_dp, 0.000002425_dp, 175.0_dp, 174.941511424_dp, 0.000002450_dp, 176.0_dp, 175.941409797_dp, 0.000001591_dp, 177.0_dp, 176.943230187_dp, 0.000001514_dp, 178.0_dp, 177.943708322_dp, 0.000001519_dp, 179.0_dp, 178.945825705_dp, 0.000001520_dp, 180.0_dp, 179.946559537_dp, 0.000001525_dp, 181.0_dp, 180.949110834_dp, 0.000001527_dp, 182.0_dp, 181.950563684_dp, 0.000006619_dp, 183.0_dp, 182.953533203_dp, 0.000032251_dp, 184.0_dp, 183.955448507_dp, 0.000042625_dp, 185.0_dp, 184.958862000_dp, 0.000069000_dp, 186.0_dp, 185.960897000_dp, 0.000055000_dp, 187.0_dp, 186.964573_dp, 0.000215_dp, 188.0_dp, 187.966903_dp, 0.000322_dp, 189.0_dp, 188.970853_dp, 0.000322_dp, 190.0_dp, 189.973376_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Hg_naw | = | naw_type(47, transpose(reshape([170.0_dp, 170.005814_dp, 0.000324_dp, 171.0_dp, 171.003585_dp, 0.000329_dp, 172.0_dp, 171.998860581_dp, 0.000161098_dp, 173.0_dp, 172.997143_dp, 0.000215_dp, 174.0_dp, 173.992870575_dp, 0.000020623_dp, 175.0_dp, 174.991444451_dp, 0.000087047_dp, 176.0_dp, 175.987348670_dp, 0.000011936_dp, 177.0_dp, 176.986284590_dp, 0.000090952_dp, 178.0_dp, 177.982484756_dp, 0.000011548_dp, 179.0_dp, 178.981821759_dp, 0.000030188_dp, 180.0_dp, 179.978260180_dp, 0.000013574_dp, 181.0_dp, 180.977819368_dp, 0.000016513_dp, 182.0_dp, 181.974689173_dp, 0.000010510_dp, 183.0_dp, 182.974444652_dp, 0.000007604_dp, 184.0_dp, 183.971717709_dp, 0.000010235_dp, 185.0_dp, 184.971890696_dp, 0.000014641_dp, 186.0_dp, 185.969362061_dp, 0.000012507_dp, 187.0_dp, 186.969813540_dp, 0.000013810_dp, 188.0_dp, 187.967580738_dp, 0.000007285_dp, 189.0_dp, 188.968194776_dp, 0.000033873_dp, 190.0_dp, 189.966322250_dp, 0.000017076_dp, 191.0_dp, 190.967158301_dp, 0.000023918_dp, 192.0_dp, 191.965634263_dp, 0.000016679_dp, 193.0_dp, 192.966653395_dp, 0.000016645_dp, 194.0_dp, 193.965449108_dp, 0.000003100_dp, 195.0_dp, 194.966705809_dp, 0.000024843_dp, 196.0_dp, 195.965833445_dp, 0.000003163_dp, 197.0_dp, 196.967213715_dp, 0.000003442_dp, 198.0_dp, 197.966769177_dp, 0.000000491_dp, 199.0_dp, 198.968280994_dp, 0.000000564_dp, 200.0_dp, 199.968326941_dp, 0.000000568_dp, 201.0_dp, 200.970303054_dp, 0.000000763_dp, 202.0_dp, 201.970643604_dp, 0.000000757_dp, 203.0_dp, 202.972872396_dp, 0.000001750_dp, 204.0_dp, 203.973494037_dp, 0.000000534_dp, 205.0_dp, 204.976073151_dp, 0.000003923_dp, 206.0_dp, 205.977513837_dp, 0.000021943_dp, 207.0_dp, 206.982300000_dp, 0.000032000_dp, 208.0_dp, 207.985759000_dp, 0.000033000_dp, 209.0_dp, 208.990757_dp, 0.000161_dp, 210.0_dp, 209.994310_dp, 0.000215_dp, 211.0_dp, 210.999581_dp, 0.000215_dp, 212.0_dp, 212.003242_dp, 0.000322_dp, 213.0_dp, 213.008803_dp, 0.000322_dp, 214.0_dp, 214.012636_dp, 0.000429_dp, 215.0_dp, 215.018368_dp, 0.000429_dp, 216.0_dp, 216.022459_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ho_naw | = | naw_type(39, transpose(reshape([140.0_dp, 139.968526_dp, 0.000537_dp, 141.0_dp, 140.963108_dp, 0.000430_dp, 142.0_dp, 141.960010_dp, 0.000430_dp, 143.0_dp, 142.954860_dp, 0.000320_dp, 144.0_dp, 143.952109712_dp, 0.000009100_dp, 145.0_dp, 144.947267392_dp, 0.000008000_dp, 146.0_dp, 145.944993503_dp, 0.000007071_dp, 147.0_dp, 146.940142293_dp, 0.000005368_dp, 148.0_dp, 147.937743925_dp, 0.000090000_dp, 149.0_dp, 148.933820457_dp, 0.000012866_dp, 150.0_dp, 149.933498353_dp, 0.000015209_dp, 151.0_dp, 150.931698176_dp, 0.000008908_dp, 152.0_dp, 151.931717618_dp, 0.000013449_dp, 153.0_dp, 152.930206671_dp, 0.000005438_dp, 154.0_dp, 153.930606776_dp, 0.000008820_dp, 155.0_dp, 154.929103363_dp, 0.000018754_dp, 156.0_dp, 155.929641634_dp, 0.000041249_dp, 157.0_dp, 156.928251974_dp, 0.000025194_dp, 158.0_dp, 157.928944910_dp, 0.000029099_dp, 159.0_dp, 158.927718683_dp, 0.000003268_dp, 160.0_dp, 159.928735538_dp, 0.000016120_dp, 161.0_dp, 160.927861815_dp, 0.000002309_dp, 162.0_dp, 161.929102543_dp, 0.000003330_dp, 163.0_dp, 162.928740260_dp, 0.000000744_dp, 164.0_dp, 163.930240548_dp, 0.000001492_dp, 165.0_dp, 164.930329116_dp, 0.000000844_dp, 166.0_dp, 165.932291209_dp, 0.000000844_dp, 167.0_dp, 166.933140254_dp, 0.000005570_dp, 168.0_dp, 167.935523766_dp, 0.000032207_dp, 169.0_dp, 168.936879890_dp, 0.000021522_dp, 170.0_dp, 169.939626548_dp, 0.000053697_dp, 171.0_dp, 170.941472713_dp, 0.000644128_dp, 172.0_dp, 171.944730_dp, 0.000210_dp, 173.0_dp, 172.947020_dp, 0.000320_dp, 174.0_dp, 173.950757_dp, 0.000322_dp, 175.0_dp, 174.953516_dp, 0.000429_dp, 176.0_dp, 175.957713_dp, 0.000537_dp, 177.0_dp, 176.961052_dp, 0.000537_dp, 178.0_dp, 177.965507_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Hs_naw | = | naw_type(18, transpose(reshape([263.0_dp, 263.128479_dp, 0.000212_dp, 264.0_dp, 264.128356330_dp, 0.000031005_dp, 265.0_dp, 265.129791744_dp, 0.000025719_dp, 266.0_dp, 266.130048783_dp, 0.000029099_dp, 267.0_dp, 267.131678_dp, 0.000102_dp, 268.0_dp, 268.132011_dp, 0.000322_dp, 269.0_dp, 269.133649_dp, 0.000141_dp, 270.0_dp, 270.134313_dp, 0.000266_dp, 271.0_dp, 271.137082_dp, 0.000296_dp, 272.0_dp, 272.138492_dp, 0.000547_dp, 273.0_dp, 273.141458_dp, 0.000401_dp, 274.0_dp, 274.143217_dp, 0.000504_dp, 275.0_dp, 275.146530_dp, 0.000637_dp, 276.0_dp, 276.148348_dp, 0.000773_dp, 277.0_dp, 277.151772_dp, 0.000480_dp, 278.0_dp, 278.153753_dp, 0.000322_dp, 279.0_dp, 279.157274_dp, 0.000644_dp, 280.0_dp, 280.159335_dp, 0.000644_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | I_naw | = | naw_type(42, transpose(reshape([106.0_dp, 105.953516_dp, 0.000429_dp, 107.0_dp, 106.946935_dp, 0.000322_dp, 108.0_dp, 107.943348_dp, 0.000109_dp, 109.0_dp, 108.938086022_dp, 0.000007223_dp, 110.0_dp, 109.935085102_dp, 0.000066494_dp, 111.0_dp, 110.930269236_dp, 0.000005103_dp, 112.0_dp, 111.928004548_dp, 0.000011000_dp, 113.0_dp, 112.923650062_dp, 0.000008600_dp, 114.0_dp, 113.922018900_dp, 0.000021500_dp, 115.0_dp, 114.918048000_dp, 0.000031000_dp, 116.0_dp, 115.916885513_dp, 0.000080555_dp, 117.0_dp, 116.913645649_dp, 0.000027437_dp, 118.0_dp, 117.913074000_dp, 0.000021213_dp, 119.0_dp, 118.910060910_dp, 0.000023302_dp, 120.0_dp, 119.910093729_dp, 0.000016212_dp, 121.0_dp, 120.907411492_dp, 0.000005070_dp, 122.0_dp, 121.907590094_dp, 0.000005561_dp, 123.0_dp, 122.905589753_dp, 0.000003956_dp, 124.0_dp, 123.906210297_dp, 0.000002467_dp, 125.0_dp, 124.904630610_dp, 0.000001452_dp, 126.0_dp, 125.905624205_dp, 0.000004055_dp, 127.0_dp, 126.904472592_dp, 0.000003887_dp, 128.0_dp, 127.905809355_dp, 0.000003887_dp, 129.0_dp, 128.904983643_dp, 0.000003385_dp, 130.0_dp, 129.906670168_dp, 0.000003385_dp, 131.0_dp, 130.906126375_dp, 0.000000649_dp, 132.0_dp, 131.907993511_dp, 0.000004364_dp, 133.0_dp, 132.907828400_dp, 0.000006335_dp, 134.0_dp, 133.909775660_dp, 0.000005213_dp, 135.0_dp, 134.910059355_dp, 0.000002211_dp, 136.0_dp, 135.914604693_dp, 0.000015231_dp, 137.0_dp, 136.918028178_dp, 0.000009000_dp, 138.0_dp, 137.922726392_dp, 0.000006400_dp, 139.0_dp, 138.926493400_dp, 0.000004300_dp, 140.0_dp, 139.931715914_dp, 0.000013000_dp, 141.0_dp, 140.935666081_dp, 0.000017000_dp, 142.0_dp, 141.941166595_dp, 0.000005300_dp, 143.0_dp, 142.945475_dp, 0.000215_dp, 144.0_dp, 143.951336_dp, 0.000429_dp, 145.0_dp, 144.955845_dp, 0.000537_dp, 146.0_dp, 145.961846_dp, 0.000322_dp, 147.0_dp, 146.966505_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | In_naw | = | naw_type(42, transpose(reshape([96.0_dp, 95.959109_dp, 0.000537_dp, 97.0_dp, 96.949125_dp, 0.000430_dp, 98.0_dp, 97.942129_dp, 0.000327_dp, 99.0_dp, 98.934110_dp, 0.000320_dp, 100.0_dp, 99.931101929_dp, 0.000002400_dp, 101.0_dp, 100.926414025_dp, 0.000012519_dp, 102.0_dp, 101.924105911_dp, 0.000004909_dp, 103.0_dp, 102.919878830_dp, 0.000009640_dp, 104.0_dp, 103.918214538_dp, 0.000006200_dp, 105.0_dp, 104.914502322_dp, 0.000011000_dp, 106.0_dp, 105.913463596_dp, 0.000013125_dp, 107.0_dp, 106.910287497_dp, 0.000010363_dp, 108.0_dp, 107.909693654_dp, 0.000009276_dp, 109.0_dp, 108.907149679_dp, 0.000004261_dp, 110.0_dp, 109.907170674_dp, 0.000012402_dp, 111.0_dp, 110.905107236_dp, 0.000003675_dp, 112.0_dp, 111.905538718_dp, 0.000004563_dp, 113.0_dp, 112.904060451_dp, 0.000000202_dp, 114.0_dp, 113.904916405_dp, 0.000000323_dp, 115.0_dp, 114.903878772_dp, 0.000000012_dp, 116.0_dp, 115.905259992_dp, 0.000000236_dp, 117.0_dp, 116.904515729_dp, 0.000005239_dp, 118.0_dp, 117.906356705_dp, 0.000008322_dp, 119.0_dp, 118.905851622_dp, 0.000007847_dp, 120.0_dp, 119.907967489_dp, 0.000042953_dp, 121.0_dp, 120.907852778_dp, 0.000029435_dp, 122.0_dp, 121.910282458_dp, 0.000053741_dp, 123.0_dp, 122.910435252_dp, 0.000021290_dp, 124.0_dp, 123.913184873_dp, 0.000032808_dp, 125.0_dp, 124.913673841_dp, 0.000001900_dp, 126.0_dp, 125.916468202_dp, 0.000004500_dp, 127.0_dp, 126.917466040_dp, 0.000010736_dp, 128.0_dp, 127.920353637_dp, 0.000001419_dp, 129.0_dp, 128.921808534_dp, 0.000002116_dp, 130.0_dp, 129.924952257_dp, 0.000001921_dp, 131.0_dp, 130.926972839_dp, 0.000002367_dp, 132.0_dp, 131.932998444_dp, 0.000064447_dp, 133.0_dp, 132.938067_dp, 0.000215_dp, 134.0_dp, 133.944208_dp, 0.000215_dp, 135.0_dp, 134.949425_dp, 0.000322_dp, 136.0_dp, 135.956017_dp, 0.000322_dp, 137.0_dp, 136.961535_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ir_naw | = | naw_type(43, transpose(reshape([163.0_dp, 162.994299_dp, 0.000429_dp, 164.0_dp, 163.991966_dp, 0.000339_dp, 165.0_dp, 164.987552_dp, 0.000170_dp, 166.0_dp, 165.985716_dp, 0.000215_dp, 167.0_dp, 166.981671973_dp, 0.000019694_dp, 168.0_dp, 167.979960978_dp, 0.000059277_dp, 169.0_dp, 168.976281743_dp, 0.000025020_dp, 170.0_dp, 169.975113_dp, 0.000109_dp, 171.0_dp, 170.971645520_dp, 0.000041295_dp, 172.0_dp, 171.970607035_dp, 0.000034785_dp, 173.0_dp, 172.967505477_dp, 0.000011316_dp, 174.0_dp, 173.966949939_dp, 0.000012046_dp, 175.0_dp, 174.964149519_dp, 0.000013295_dp, 176.0_dp, 175.963626261_dp, 0.000008679_dp, 177.0_dp, 176.961301500_dp, 0.000021213_dp, 178.0_dp, 177.961079395_dp, 0.000020204_dp, 179.0_dp, 178.959117594_dp, 0.000010489_dp, 180.0_dp, 179.959229446_dp, 0.000023302_dp, 181.0_dp, 180.957634691_dp, 0.000005631_dp, 182.0_dp, 181.958076296_dp, 0.000022509_dp, 183.0_dp, 182.956841231_dp, 0.000026486_dp, 184.0_dp, 183.957476000_dp, 0.000030000_dp, 185.0_dp, 184.956698000_dp, 0.000030000_dp, 186.0_dp, 185.957946754_dp, 0.000017740_dp, 187.0_dp, 186.957542000_dp, 0.000030000_dp, 188.0_dp, 187.958834999_dp, 0.000010116_dp, 189.0_dp, 188.958722602_dp, 0.000013500_dp, 190.0_dp, 189.960543374_dp, 0.000001470_dp, 191.0_dp, 190.960591455_dp, 0.000001406_dp, 192.0_dp, 191.962602414_dp, 0.000001410_dp, 193.0_dp, 192.962923753_dp, 0.000001425_dp, 194.0_dp, 193.965075703_dp, 0.000001429_dp, 195.0_dp, 194.965976898_dp, 0.000001431_dp, 196.0_dp, 195.968399669_dp, 0.000041239_dp, 197.0_dp, 196.969657217_dp, 0.000021588_dp, 198.0_dp, 197.972399_dp, 0.000215_dp, 199.0_dp, 198.973807097_dp, 0.000044073_dp, 200.0_dp, 199.976844_dp, 0.000210_dp, 201.0_dp, 200.978701_dp, 0.000215_dp, 202.0_dp, 201.982136_dp, 0.000322_dp, 203.0_dp, 202.984573_dp, 0.000429_dp, 204.0_dp, 203.989726_dp, 0.000429_dp, 205.0_dp, 204.993988_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | K_naw | = | naw_type(29, transpose(reshape([31.0_dp, 31.036780_dp, 0.000322_dp, 32.0_dp, 32.023607_dp, 0.000429_dp, 33.0_dp, 33.008095_dp, 0.000215_dp, 34.0_dp, 33.998690_dp, 0.000210_dp, 35.0_dp, 34.988005406_dp, 0.000000550_dp, 36.0_dp, 35.981301887_dp, 0.000000349_dp, 37.0_dp, 36.973375890_dp, 0.000000100_dp, 38.0_dp, 37.969081114_dp, 0.000000209_dp, 39.0_dp, 38.96370648482_dp, 0.00000000489_dp, 40.0_dp, 39.963998165_dp, 0.000000060_dp, 41.0_dp, 40.96182525611_dp, 0.00000000403_dp, 42.0_dp, 41.962402305_dp, 0.000000113_dp, 43.0_dp, 42.960734701_dp, 0.000000440_dp, 44.0_dp, 43.961586984_dp, 0.000000450_dp, 45.0_dp, 44.960691491_dp, 0.000000560_dp, 46.0_dp, 45.961981584_dp, 0.000000780_dp, 47.0_dp, 46.961661612_dp, 0.000001500_dp, 48.0_dp, 47.965341184_dp, 0.000000830_dp, 49.0_dp, 48.968210753_dp, 0.000000860_dp, 50.0_dp, 49.972380015_dp, 0.000008300_dp, 51.0_dp, 50.975828664_dp, 0.000014000_dp, 52.0_dp, 51.981602000_dp, 0.000036000_dp, 53.0_dp, 52.986800000_dp, 0.000120000_dp, 54.0_dp, 53.994471_dp, 0.000429_dp, 55.0_dp, 55.000505_dp, 0.000537_dp, 56.0_dp, 56.008567_dp, 0.000644_dp, 57.0_dp, 57.015169_dp, 0.000644_dp, 58.0_dp, 58.023543_dp, 0.000751_dp, 59.0_dp, 59.030864_dp, 0.000859_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Kr_naw | = | naw_type(35, transpose(reshape([67.0_dp, 66.983305_dp, 0.000455_dp, 68.0_dp, 67.972489_dp, 0.000537_dp, 69.0_dp, 68.965496_dp, 0.000322_dp, 70.0_dp, 69.955877_dp, 0.000215_dp, 71.0_dp, 70.950265695_dp, 0.000138238_dp, 72.0_dp, 71.942092406_dp, 0.000008600_dp, 73.0_dp, 72.939289193_dp, 0.000007061_dp, 74.0_dp, 73.933084016_dp, 0.000002161_dp, 75.0_dp, 74.930945744_dp, 0.000008700_dp, 76.0_dp, 75.925910743_dp, 0.000004308_dp, 77.0_dp, 76.924669999_dp, 0.000002100_dp, 78.0_dp, 77.920366341_dp, 0.000000329_dp, 79.0_dp, 78.920082919_dp, 0.000003736_dp, 80.0_dp, 79.916377940_dp, 0.000000745_dp, 81.0_dp, 80.916589703_dp, 0.000001152_dp, 82.0_dp, 81.91348115368_dp, 0.00000000591_dp, 83.0_dp, 82.914126516_dp, 0.000000009_dp, 84.0_dp, 83.91149772708_dp, 0.00000000410_dp, 85.0_dp, 84.912527260_dp, 0.000002147_dp, 86.0_dp, 85.91061062468_dp, 0.00000000399_dp, 87.0_dp, 86.913354759_dp, 0.000000264_dp, 88.0_dp, 87.914447879_dp, 0.000002800_dp, 89.0_dp, 88.917835449_dp, 0.000002300_dp, 90.0_dp, 89.919527929_dp, 0.000002000_dp, 91.0_dp, 90.923806309_dp, 0.000002400_dp, 92.0_dp, 91.926173092_dp, 0.000002900_dp, 93.0_dp, 92.931147172_dp, 0.000002700_dp, 94.0_dp, 93.934140452_dp, 0.000013000_dp, 95.0_dp, 94.939710922_dp, 0.000020000_dp, 96.0_dp, 95.943014473_dp, 0.000020695_dp, 97.0_dp, 96.949088782_dp, 0.000140000_dp, 98.0_dp, 97.952635_dp, 0.000322_dp, 99.0_dp, 98.958776_dp, 0.000429_dp, 100.0_dp, 99.962995_dp, 0.000429_dp, 101.0_dp, 100.969318_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | La_naw | = | naw_type(42, transpose(reshape([116.0_dp, 115.957005_dp, 0.000345_dp, 117.0_dp, 116.950326_dp, 0.000215_dp, 118.0_dp, 117.946731_dp, 0.000322_dp, 119.0_dp, 118.940934_dp, 0.000322_dp, 120.0_dp, 119.938196_dp, 0.000322_dp, 121.0_dp, 120.933236_dp, 0.000322_dp, 122.0_dp, 121.930710_dp, 0.000320_dp, 123.0_dp, 122.926300_dp, 0.000210_dp, 124.0_dp, 123.924574275_dp, 0.000060836_dp, 125.0_dp, 124.920815931_dp, 0.000027909_dp, 126.0_dp, 125.919512667_dp, 0.000097163_dp, 127.0_dp, 126.916375083_dp, 0.000027912_dp, 128.0_dp, 127.915592123_dp, 0.000058452_dp, 129.0_dp, 128.912695592_dp, 0.000022913_dp, 130.0_dp, 129.912369413_dp, 0.000027854_dp, 131.0_dp, 130.910070000_dp, 0.000030000_dp, 132.0_dp, 131.910119047_dp, 0.000039032_dp, 133.0_dp, 132.908218000_dp, 0.000030000_dp, 134.0_dp, 133.908514011_dp, 0.000021395_dp, 135.0_dp, 134.906984427_dp, 0.000010126_dp, 136.0_dp, 135.907634962_dp, 0.000057081_dp, 137.0_dp, 136.906450438_dp, 0.000001760_dp, 138.0_dp, 137.907124041_dp, 0.000000446_dp, 139.0_dp, 138.906362927_dp, 0.000000651_dp, 140.0_dp, 139.909487285_dp, 0.000000651_dp, 141.0_dp, 140.910971155_dp, 0.000004430_dp, 142.0_dp, 141.914090760_dp, 0.000006748_dp, 143.0_dp, 142.916079482_dp, 0.000007868_dp, 144.0_dp, 143.919645589_dp, 0.000013888_dp, 145.0_dp, 144.921808065_dp, 0.000013170_dp, 146.0_dp, 145.925688017_dp, 0.000001797_dp, 147.0_dp, 146.928417800_dp, 0.000011500_dp, 148.0_dp, 147.932679400_dp, 0.000020900_dp, 149.0_dp, 148.935351259_dp, 0.000214990_dp, 150.0_dp, 149.939547500_dp, 0.000002700_dp, 151.0_dp, 150.942769000_dp, 0.000467500_dp, 152.0_dp, 151.947085_dp, 0.000322_dp, 153.0_dp, 152.950553_dp, 0.000322_dp, 154.0_dp, 153.955416_dp, 0.000322_dp, 155.0_dp, 154.959280_dp, 0.000429_dp, 156.0_dp, 155.964519_dp, 0.000429_dp, 157.0_dp, 156.968792_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Li_naw | = | naw_type(11, transpose(reshape([3.0_dp, 3.030775_dp, 0.002147_dp, 4.0_dp, 4.027185561_dp, 0.000227733_dp, 5.0_dp, 5.012537800_dp, 0.000053677_dp, 6.0_dp, 6.01512288742_dp, 0.00000000155_dp, 7.0_dp, 7.01600343426_dp, 0.00000000450_dp, 8.0_dp, 8.022486244_dp, 0.000000050_dp, 9.0_dp, 9.026790191_dp, 0.000000200_dp, 10.0_dp, 10.035483453_dp, 0.000013656_dp, 11.0_dp, 11.043723581_dp, 0.000000660_dp, 12.0_dp, 12.052613942_dp, 0.000032213_dp, 13.0_dp, 13.061171503_dp, 0.000075150_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Lr_naw | = | naw_type(16, transpose(reshape([251.0_dp, 251.094289_dp, 0.000215_dp, 252.0_dp, 252.095048_dp, 0.000198_dp, 253.0_dp, 253.095033850_dp, 0.000176634_dp, 254.0_dp, 254.096238813_dp, 0.000098026_dp, 255.0_dp, 255.096562399_dp, 0.000019000_dp, 256.0_dp, 256.098494024_dp, 0.000089000_dp, 257.0_dp, 257.099480_dp, 0.000047_dp, 258.0_dp, 258.101753_dp, 0.000109_dp, 259.0_dp, 259.102900_dp, 0.000076_dp, 260.0_dp, 260.105504_dp, 0.000134_dp, 261.0_dp, 261.106879_dp, 0.000215_dp, 262.0_dp, 262.109615_dp, 0.000215_dp, 263.0_dp, 263.111293_dp, 0.000240_dp, 264.0_dp, 264.114198_dp, 0.000468_dp, 265.0_dp, 265.116193_dp, 0.000587_dp, 266.0_dp, 266.119874_dp, 0.000579_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Lu_naw | = | naw_type(39, transpose(reshape([150.0_dp, 149.973407_dp, 0.000322_dp, 151.0_dp, 150.967471_dp, 0.000322_dp, 152.0_dp, 151.964120_dp, 0.000210_dp, 153.0_dp, 152.958802248_dp, 0.000161050_dp, 154.0_dp, 153.957416_dp, 0.000216_dp, 155.0_dp, 154.954326005_dp, 0.000020660_dp, 156.0_dp, 155.953086606_dp, 0.000058102_dp, 157.0_dp, 156.950144807_dp, 0.000012961_dp, 158.0_dp, 157.949315620_dp, 0.000016236_dp, 159.0_dp, 158.946635615_dp, 0.000040433_dp, 160.0_dp, 159.946033000_dp, 0.000061000_dp, 161.0_dp, 160.943572000_dp, 0.000030000_dp, 162.0_dp, 161.943282776_dp, 0.000080554_dp, 163.0_dp, 162.941179000_dp, 0.000030000_dp, 164.0_dp, 163.941339000_dp, 0.000030000_dp, 165.0_dp, 164.939406758_dp, 0.000028490_dp, 166.0_dp, 165.939859000_dp, 0.000032000_dp, 167.0_dp, 166.938243000_dp, 0.000040000_dp, 168.0_dp, 167.938729798_dp, 0.000040766_dp, 169.0_dp, 168.937645845_dp, 0.000003226_dp, 170.0_dp, 169.938479230_dp, 0.000018081_dp, 171.0_dp, 170.937918591_dp, 0.000001999_dp, 172.0_dp, 171.939091320_dp, 0.000002507_dp, 173.0_dp, 172.938935722_dp, 0.000001682_dp, 174.0_dp, 173.940342840_dp, 0.000001682_dp, 175.0_dp, 174.940777211_dp, 0.000001295_dp, 176.0_dp, 175.942691711_dp, 0.000001301_dp, 177.0_dp, 176.943763570_dp, 0.000001310_dp, 178.0_dp, 177.945960065_dp, 0.000002416_dp, 179.0_dp, 178.947332985_dp, 0.000005528_dp, 180.0_dp, 179.949890744_dp, 0.000075926_dp, 181.0_dp, 180.951908000_dp, 0.000135000_dp, 182.0_dp, 181.955158_dp, 0.000215_dp, 183.0_dp, 182.957363000_dp, 0.000086000_dp, 184.0_dp, 183.961030_dp, 0.000215_dp, 185.0_dp, 184.963542_dp, 0.000322_dp, 186.0_dp, 185.967450_dp, 0.000429_dp, 187.0_dp, 186.970188_dp, 0.000429_dp, 188.0_dp, 187.974428_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Lv_naw | = | naw_type(5, transpose(reshape([289.0_dp, 289.198023_dp, 0.000540_dp, 290.0_dp, 290.198635_dp, 0.000593_dp, 291.0_dp, 291.201014_dp, 0.000669_dp, 292.0_dp, 292.201969_dp, 0.000819_dp, 293.0_dp, 293.204583_dp, 0.000553_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Mc_naw | = | naw_type(6, transpose(reshape([287.0_dp, 287.190820_dp, 0.000475_dp, 288.0_dp, 288.192879_dp, 0.000575_dp, 289.0_dp, 289.193971_dp, 0.000834_dp, 290.0_dp, 290.196235_dp, 0.000635_dp, 291.0_dp, 291.197725_dp, 0.000789_dp, 292.0_dp, 292.200323_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Md_naw | = | naw_type(19, transpose(reshape([244.0_dp, 244.081157_dp, 0.000402_dp, 245.0_dp, 245.080864_dp, 0.000279_dp, 246.0_dp, 246.081713_dp, 0.000279_dp, 247.0_dp, 247.081520_dp, 0.000223_dp, 248.0_dp, 248.082607_dp, 0.000198_dp, 249.0_dp, 249.082857155_dp, 0.000176516_dp, 250.0_dp, 250.084164934_dp, 0.000097606_dp, 251.0_dp, 251.084774287_dp, 0.000020310_dp, 252.0_dp, 252.086385000_dp, 0.000098000_dp, 253.0_dp, 253.087143_dp, 0.000034_dp, 254.0_dp, 254.089590_dp, 0.000107_dp, 255.0_dp, 255.091081702_dp, 0.000005976_dp, 256.0_dp, 256.093888_dp, 0.000133_dp, 257.0_dp, 257.095537343_dp, 0.000001683_dp, 258.0_dp, 258.098433634_dp, 0.000003729_dp, 259.0_dp, 259.100445_dp, 0.000108_dp, 260.0_dp, 260.103650_dp, 0.000339_dp, 261.0_dp, 261.105828_dp, 0.000546_dp, 262.0_dp, 262.109144_dp, 0.000481_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Mg_naw | = | naw_type(23, transpose(reshape([19.0_dp, 19.034179920_dp, 0.000064413_dp, 20.0_dp, 20.018763075_dp, 0.000002000_dp, 21.0_dp, 21.011705764_dp, 0.000000810_dp, 22.0_dp, 21.999570597_dp, 0.000000170_dp, 23.0_dp, 22.994123768_dp, 0.000000034_dp, 24.0_dp, 23.985041689_dp, 0.000000013_dp, 25.0_dp, 24.985836966_dp, 0.000000050_dp, 26.0_dp, 25.982592972_dp, 0.000000031_dp, 27.0_dp, 26.984340647_dp, 0.000000050_dp, 28.0_dp, 27.983875426_dp, 0.000000280_dp, 29.0_dp, 28.988607163_dp, 0.000000369_dp, 30.0_dp, 29.990465454_dp, 0.000001390_dp, 31.0_dp, 30.996648232_dp, 0.000003300_dp, 32.0_dp, 31.999110138_dp, 0.000003500_dp, 33.0_dp, 33.005327862_dp, 0.000002859_dp, 34.0_dp, 34.008935455_dp, 0.000007400_dp, 35.0_dp, 35.016790000_dp, 0.000289500_dp, 36.0_dp, 36.021879000_dp, 0.000741000_dp, 37.0_dp, 37.030286265_dp, 0.000750350_dp, 38.0_dp, 38.036580_dp, 0.000540_dp, 39.0_dp, 39.045921_dp, 0.000551_dp, 40.0_dp, 40.053194_dp, 0.000537_dp, 41.0_dp, 41.062373_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Mn_naw | = | naw_type(31, transpose(reshape([43.0_dp, 43.018647_dp, 0.000429_dp, 44.0_dp, 44.008009_dp, 0.000322_dp, 45.0_dp, 44.994654_dp, 0.000322_dp, 46.0_dp, 45.986669000_dp, 0.000093000_dp, 47.0_dp, 46.975774000_dp, 0.000034000_dp, 48.0_dp, 47.968548760_dp, 0.000007191_dp, 49.0_dp, 48.959613350_dp, 0.000002377_dp, 50.0_dp, 49.954238157_dp, 0.000000123_dp, 51.0_dp, 50.948208770_dp, 0.000000326_dp, 52.0_dp, 51.945559090_dp, 0.000000138_dp, 53.0_dp, 52.941287497_dp, 0.000000371_dp, 54.0_dp, 53.940355772_dp, 0.000001080_dp, 55.0_dp, 54.938043040_dp, 0.000000279_dp, 56.0_dp, 55.938902816_dp, 0.000000314_dp, 57.0_dp, 56.938285944_dp, 0.000001615_dp, 58.0_dp, 57.940066643_dp, 0.000002900_dp, 59.0_dp, 58.940391111_dp, 0.000002500_dp, 60.0_dp, 59.943136574_dp, 0.000002500_dp, 61.0_dp, 60.944452541_dp, 0.000002500_dp, 62.0_dp, 61.947907384_dp, 0.000007023_dp, 63.0_dp, 62.949664672_dp, 0.000004000_dp, 64.0_dp, 63.953849369_dp, 0.000003800_dp, 65.0_dp, 64.956019749_dp, 0.000004000_dp, 66.0_dp, 65.960546833_dp, 0.000012000_dp, 67.0_dp, 66.963950_dp, 0.000215_dp, 68.0_dp, 67.968953_dp, 0.000322_dp, 69.0_dp, 68.972775_dp, 0.000429_dp, 70.0_dp, 69.978046_dp, 0.000537_dp, 71.0_dp, 70.982158_dp, 0.000537_dp, 72.0_dp, 71.988009_dp, 0.000644_dp, 73.0_dp, 72.992807_dp, 0.000644_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Mo_naw | = | naw_type(39, transpose(reshape([81.0_dp, 80.966226_dp, 0.000537_dp, 82.0_dp, 81.956661_dp, 0.000429_dp, 83.0_dp, 82.950252_dp, 0.000430_dp, 84.0_dp, 83.941846_dp, 0.000320_dp, 85.0_dp, 84.938260736_dp, 0.000017000_dp, 86.0_dp, 85.931174092_dp, 0.000003147_dp, 87.0_dp, 86.928196198_dp, 0.000003067_dp, 88.0_dp, 87.921967779_dp, 0.000004100_dp, 89.0_dp, 88.919468149_dp, 0.000004200_dp, 90.0_dp, 89.913931270_dp, 0.000003717_dp, 91.0_dp, 90.911745190_dp, 0.000006696_dp, 92.0_dp, 91.906807153_dp, 0.000000168_dp, 93.0_dp, 92.906808772_dp, 0.000000193_dp, 94.0_dp, 93.905083586_dp, 0.000000151_dp, 95.0_dp, 94.905837436_dp, 0.000000132_dp, 96.0_dp, 95.904674770_dp, 0.000000128_dp, 97.0_dp, 96.906016903_dp, 0.000000176_dp, 98.0_dp, 97.905403609_dp, 0.000000186_dp, 99.0_dp, 98.907707299_dp, 0.000000245_dp, 100.0_dp, 99.907467982_dp, 0.000000322_dp, 101.0_dp, 100.910337648_dp, 0.000000331_dp, 102.0_dp, 101.910293725_dp, 0.000008916_dp, 103.0_dp, 102.913091954_dp, 0.000009900_dp, 104.0_dp, 103.913747443_dp, 0.000009566_dp, 105.0_dp, 104.916981989_dp, 0.000009721_dp, 106.0_dp, 105.918273231_dp, 0.000009801_dp, 107.0_dp, 106.922119770_dp, 0.000009901_dp, 108.0_dp, 107.924047508_dp, 0.000009901_dp, 109.0_dp, 108.928438318_dp, 0.000012000_dp, 110.0_dp, 109.930717956_dp, 0.000026000_dp, 111.0_dp, 110.935651966_dp, 0.000013503_dp, 112.0_dp, 111.938293_dp, 0.000215_dp, 113.0_dp, 112.943478_dp, 0.000322_dp, 114.0_dp, 113.946666_dp, 0.000322_dp, 115.0_dp, 114.952174_dp, 0.000429_dp, 116.0_dp, 115.955759_dp, 0.000537_dp, 117.0_dp, 116.961686_dp, 0.000537_dp, 118.0_dp, 117.965249_dp, 0.000537_dp, 119.0_dp, 118.971465_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Mt_naw | = | naw_type(18, transpose(reshape([265.0_dp, 265.135937_dp, 0.000471_dp, 266.0_dp, 266.137062253_dp, 0.000103568_dp, 267.0_dp, 267.137189_dp, 0.000540_dp, 268.0_dp, 268.138649_dp, 0.000250_dp, 269.0_dp, 269.138809_dp, 0.000335_dp, 270.0_dp, 270.140322_dp, 0.000205_dp, 271.0_dp, 271.140741_dp, 0.000354_dp, 272.0_dp, 272.143298_dp, 0.000521_dp, 273.0_dp, 273.144695_dp, 0.000455_dp, 274.0_dp, 274.147343_dp, 0.000404_dp, 275.0_dp, 275.148972_dp, 0.000416_dp, 276.0_dp, 276.151705_dp, 0.000571_dp, 277.0_dp, 277.153525_dp, 0.000711_dp, 278.0_dp, 278.156487_dp, 0.000621_dp, 279.0_dp, 279.158439_dp, 0.000720_dp, 280.0_dp, 280.161579_dp, 0.000644_dp, 281.0_dp, 281.163608_dp, 0.000644_dp, 282.0_dp, 282.166888_dp, 0.000480_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | N_naw | = | naw_type(16, transpose(reshape([10.0_dp, 10.041653540_dp, 0.000429417_dp, 11.0_dp, 11.026157593_dp, 0.000005368_dp, 12.0_dp, 12.018613180_dp, 0.000001073_dp, 13.0_dp, 13.005738609_dp, 0.000000289_dp, 14.0_dp, 14.00307400425_dp, 0.00000000024_dp, 15.0_dp, 15.00010889827_dp, 0.00000000062_dp, 16.0_dp, 16.006101925_dp, 0.000002470_dp, 17.0_dp, 17.008448876_dp, 0.000016103_dp, 18.0_dp, 18.014077563_dp, 0.000019935_dp, 19.0_dp, 19.017022389_dp, 0.000017610_dp, 20.0_dp, 20.023367295_dp, 0.000084696_dp, 21.0_dp, 21.027087573_dp, 0.000143906_dp, 22.0_dp, 22.034100918_dp, 0.000223060_dp, 23.0_dp, 23.039421000_dp, 0.000451500_dp, 24.0_dp, 24.050390_dp, 0.000430_dp, 25.0_dp, 25.060100_dp, 0.000540_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Na_naw | = | naw_type(23, transpose(reshape([17.0_dp, 17.037273000_dp, 0.000064000_dp, 18.0_dp, 18.026879388_dp, 0.000100785_dp, 19.0_dp, 19.013880264_dp, 0.000011309_dp, 20.0_dp, 20.007354301_dp, 0.000001190_dp, 21.0_dp, 20.997654459_dp, 0.000000045_dp, 22.0_dp, 21.994437547_dp, 0.000000141_dp, 23.0_dp, 22.98976928195_dp, 0.00000000194_dp, 24.0_dp, 23.990963012_dp, 0.000000017_dp, 25.0_dp, 24.989953974_dp, 0.000001288_dp, 26.0_dp, 25.992634649_dp, 0.000003759_dp, 27.0_dp, 26.994076408_dp, 0.000004000_dp, 28.0_dp, 27.998939000_dp, 0.000011000_dp, 29.0_dp, 29.002877091_dp, 0.000007876_dp, 30.0_dp, 30.009097931_dp, 0.000005074_dp, 31.0_dp, 31.013146654_dp, 0.000015000_dp, 32.0_dp, 32.020011024_dp, 0.000040000_dp, 33.0_dp, 33.025529000_dp, 0.000483000_dp, 34.0_dp, 34.034010000_dp, 0.000643500_dp, 35.0_dp, 35.040614_dp, 0.000720_dp, 36.0_dp, 36.049279_dp, 0.000737_dp, 37.0_dp, 37.057042_dp, 0.000737_dp, 38.0_dp, 38.066458_dp, 0.000768_dp, 39.0_dp, 39.075123_dp, 0.000797_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Nb_naw | = | naw_type(38, transpose(reshape([79.0_dp, 78.966022_dp, 0.000537_dp, 80.0_dp, 79.958754_dp, 0.000429_dp, 81.0_dp, 80.950230_dp, 0.000429_dp, 82.0_dp, 81.944380_dp, 0.000322_dp, 83.0_dp, 82.938150000_dp, 0.000174000_dp, 84.0_dp, 83.934305711_dp, 0.000000430_dp, 85.0_dp, 84.928845836_dp, 0.000004400_dp, 86.0_dp, 85.925781536_dp, 0.000005903_dp, 87.0_dp, 86.920692473_dp, 0.000007302_dp, 88.0_dp, 87.918226476_dp, 0.000062059_dp, 89.0_dp, 88.913444696_dp, 0.000025367_dp, 90.0_dp, 89.911259201_dp, 0.000003561_dp, 91.0_dp, 90.906990256_dp, 0.000003140_dp, 92.0_dp, 91.907188580_dp, 0.000001915_dp, 93.0_dp, 92.906373170_dp, 0.000001599_dp, 94.0_dp, 93.907279001_dp, 0.000001600_dp, 95.0_dp, 94.906831110_dp, 0.000000545_dp, 96.0_dp, 95.908101586_dp, 0.000000157_dp, 97.0_dp, 96.908101622_dp, 0.000004556_dp, 98.0_dp, 97.910332645_dp, 0.000005369_dp, 99.0_dp, 98.911609377_dp, 0.000012886_dp, 100.0_dp, 99.914340578_dp, 0.000008562_dp, 101.0_dp, 100.915306508_dp, 0.000004024_dp, 102.0_dp, 101.918090447_dp, 0.000002695_dp, 103.0_dp, 102.919453416_dp, 0.000004224_dp, 104.0_dp, 103.922907728_dp, 0.000001915_dp, 105.0_dp, 104.924942577_dp, 0.000004324_dp, 106.0_dp, 105.928928505_dp, 0.000001520_dp, 107.0_dp, 106.931589685_dp, 0.000008612_dp, 108.0_dp, 107.936075604_dp, 0.000008844_dp, 109.0_dp, 108.939141000_dp, 0.000462500_dp, 110.0_dp, 109.943843000_dp, 0.000900000_dp, 111.0_dp, 110.947439_dp, 0.000322_dp, 112.0_dp, 111.952689_dp, 0.000322_dp, 113.0_dp, 112.956833_dp, 0.000429_dp, 114.0_dp, 113.962469_dp, 0.000537_dp, 115.0_dp, 114.966849_dp, 0.000537_dp, 116.0_dp, 115.972914_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Nd_naw | = | naw_type(40, transpose(reshape([124.0_dp, 123.951873_dp, 0.000537_dp, 125.0_dp, 124.948395_dp, 0.000429_dp, 126.0_dp, 125.942694_dp, 0.000322_dp, 127.0_dp, 126.939978_dp, 0.000322_dp, 128.0_dp, 127.935018_dp, 0.000215_dp, 129.0_dp, 128.933038_dp, 0.000217_dp, 130.0_dp, 129.928506000_dp, 0.000030000_dp, 131.0_dp, 130.927248020_dp, 0.000029541_dp, 132.0_dp, 131.923321237_dp, 0.000025985_dp, 133.0_dp, 132.922348000_dp, 0.000050000_dp, 134.0_dp, 133.918790207_dp, 0.000012686_dp, 135.0_dp, 134.918181318_dp, 0.000020534_dp, 136.0_dp, 135.914976061_dp, 0.000012686_dp, 137.0_dp, 136.914563099_dp, 0.000012586_dp, 138.0_dp, 137.911950938_dp, 0.000012456_dp, 139.0_dp, 138.911951208_dp, 0.000029545_dp, 140.0_dp, 139.909546130_dp, 0.000003500_dp, 141.0_dp, 140.909616690_dp, 0.000003417_dp, 142.0_dp, 141.907728824_dp, 0.000001348_dp, 143.0_dp, 142.909819815_dp, 0.000001347_dp, 144.0_dp, 143.910092798_dp, 0.000001346_dp, 145.0_dp, 144.912579151_dp, 0.000001364_dp, 146.0_dp, 145.913122459_dp, 0.000001366_dp, 147.0_dp, 146.916105969_dp, 0.000001368_dp, 148.0_dp, 147.916899027_dp, 0.000002203_dp, 149.0_dp, 148.920154583_dp, 0.000002205_dp, 150.0_dp, 149.920901322_dp, 0.000001211_dp, 151.0_dp, 150.923839363_dp, 0.000001215_dp, 152.0_dp, 151.924691242_dp, 0.000026276_dp, 153.0_dp, 152.927717868_dp, 0.000002949_dp, 154.0_dp, 153.929597404_dp, 0.000001100_dp, 155.0_dp, 154.933135598_dp, 0.000009826_dp, 156.0_dp, 155.935370358_dp, 0.000001400_dp, 157.0_dp, 156.939351074_dp, 0.000002294_dp, 158.0_dp, 157.942205620_dp, 0.000001400_dp, 159.0_dp, 158.946619085_dp, 0.000032000_dp, 160.0_dp, 159.949839172_dp, 0.000050000_dp, 161.0_dp, 160.954664_dp, 0.000429_dp, 162.0_dp, 161.958121_dp, 0.000429_dp, 163.0_dp, 162.963414_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ne_naw | = | naw_type(20, transpose(reshape([15.0_dp, 15.043172977_dp, 0.000071588_dp, 16.0_dp, 16.025750860_dp, 0.000021986_dp, 17.0_dp, 17.017713962_dp, 0.000000380_dp, 18.0_dp, 18.005708696_dp, 0.000000390_dp, 19.0_dp, 19.001880906_dp, 0.000000171_dp, 20.0_dp, 19.99244017525_dp, 0.00000000165_dp, 21.0_dp, 20.993846685_dp, 0.000000041_dp, 22.0_dp, 21.991385113_dp, 0.000000018_dp, 23.0_dp, 22.994466905_dp, 0.000000112_dp, 24.0_dp, 23.993610649_dp, 0.000000550_dp, 25.0_dp, 24.997814797_dp, 0.000031181_dp, 26.0_dp, 26.000516496_dp, 0.000019784_dp, 27.0_dp, 27.007569462_dp, 0.000097445_dp, 28.0_dp, 28.012130767_dp, 0.000135339_dp, 29.0_dp, 29.019753000_dp, 0.000160500_dp, 30.0_dp, 30.024992235_dp, 0.000271875_dp, 31.0_dp, 31.033474816_dp, 0.000285772_dp, 32.0_dp, 32.039720_dp, 0.000540_dp, 33.0_dp, 33.049523_dp, 0.000644_dp, 34.0_dp, 34.056728_dp, 0.000551_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Nh_naw | = | naw_type(13, transpose(reshape([278.0_dp, 278.170725_dp, 0.000240_dp, 279.0_dp, 279.171187_dp, 0.000644_dp, 280.0_dp, 280.173098_dp, 0.000429_dp, 281.0_dp, 281.173710_dp, 0.000322_dp, 282.0_dp, 282.175770_dp, 0.000430_dp, 283.0_dp, 283.176666_dp, 0.000469_dp, 284.0_dp, 284.178843_dp, 0.000573_dp, 285.0_dp, 285.180106_dp, 0.000832_dp, 286.0_dp, 286.182456_dp, 0.000634_dp, 287.0_dp, 287.184064_dp, 0.000759_dp, 288.0_dp, 288.186764_dp, 0.000751_dp, 289.0_dp, 289.188461_dp, 0.000537_dp, 290.0_dp, 290.191429_dp, 0.000503_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ni_naw | = | naw_type(35, transpose(reshape([48.0_dp, 48.019515_dp, 0.000455_dp, 49.0_dp, 49.009157_dp, 0.000644_dp, 50.0_dp, 49.996286_dp, 0.000537_dp, 51.0_dp, 50.987493_dp, 0.000537_dp, 52.0_dp, 51.975781000_dp, 0.000089000_dp, 53.0_dp, 52.968190000_dp, 0.000027000_dp, 54.0_dp, 53.957833000_dp, 0.000005000_dp, 55.0_dp, 54.951329846_dp, 0.000000757_dp, 56.0_dp, 55.942127761_dp, 0.000000428_dp, 57.0_dp, 56.939791394_dp, 0.000000608_dp, 58.0_dp, 57.935341650_dp, 0.000000374_dp, 59.0_dp, 58.934345442_dp, 0.000000376_dp, 60.0_dp, 59.930785129_dp, 0.000000378_dp, 61.0_dp, 60.931054819_dp, 0.000000381_dp, 62.0_dp, 61.928344753_dp, 0.000000455_dp, 63.0_dp, 62.929669021_dp, 0.000000457_dp, 64.0_dp, 63.927966228_dp, 0.000000497_dp, 65.0_dp, 64.930084585_dp, 0.000000518_dp, 66.0_dp, 65.929139333_dp, 0.000001500_dp, 67.0_dp, 66.931569413_dp, 0.000003100_dp, 68.0_dp, 67.931868787_dp, 0.000003200_dp, 69.0_dp, 68.935610267_dp, 0.000004000_dp, 70.0_dp, 69.936431300_dp, 0.000002301_dp, 71.0_dp, 70.940518962_dp, 0.000002401_dp, 72.0_dp, 71.941785924_dp, 0.000002401_dp, 73.0_dp, 72.946206681_dp, 0.000002601_dp, 74.0_dp, 73.947718_dp, 0.000215_dp, 75.0_dp, 74.952506_dp, 0.000215_dp, 76.0_dp, 75.954707_dp, 0.000322_dp, 77.0_dp, 76.959903_dp, 0.000429_dp, 78.0_dp, 77.962555_dp, 0.000429_dp, 79.0_dp, 78.969769_dp, 0.000537_dp, 80.0_dp, 79.975051_dp, 0.000644_dp, 81.0_dp, 80.982727_dp, 0.000751_dp, 82.0_dp, 81.988492_dp, 0.000859_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | No_naw | = | naw_type(17, transpose(reshape([248.0_dp, 248.086623_dp, 0.000241_dp, 249.0_dp, 249.087802_dp, 0.000300_dp, 250.0_dp, 250.087565_dp, 0.000215_dp, 251.0_dp, 251.088942_dp, 0.000194_dp, 252.0_dp, 252.088966070_dp, 0.000009975_dp, 253.0_dp, 253.090562780_dp, 0.000007420_dp, 254.0_dp, 254.090954211_dp, 0.000010367_dp, 255.0_dp, 255.093196439_dp, 0.000015079_dp, 256.0_dp, 256.094281912_dp, 0.000008103_dp, 257.0_dp, 257.096884203_dp, 0.000006652_dp, 258.0_dp, 258.098205_dp, 0.000107_dp, 259.0_dp, 259.100998364_dp, 0.000006829_dp, 260.0_dp, 260.102641_dp, 0.000215_dp, 261.0_dp, 261.105696_dp, 0.000215_dp, 262.0_dp, 262.107463_dp, 0.000387_dp, 263.0_dp, 263.110714_dp, 0.000526_dp, 264.0_dp, 264.112734_dp, 0.000634_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Np_naw | = | naw_type(27, transpose(reshape([219.0_dp, 219.031601865_dp, 0.000098732_dp, 220.0_dp, 220.032716280_dp, 0.000032977_dp, 221.0_dp, 221.032110_dp, 0.000215_dp, 222.0_dp, 222.033574706_dp, 0.000040849_dp, 223.0_dp, 223.032913340_dp, 0.000088956_dp, 224.0_dp, 224.034388030_dp, 0.000031052_dp, 225.0_dp, 225.033943422_dp, 0.000098355_dp, 226.0_dp, 226.035230364_dp, 0.000109568_dp, 227.0_dp, 227.034975012_dp, 0.000082651_dp, 228.0_dp, 228.036313_dp, 0.000108_dp, 229.0_dp, 229.036287269_dp, 0.000108618_dp, 230.0_dp, 230.037828060_dp, 0.000059051_dp, 231.0_dp, 231.038243598_dp, 0.000054916_dp, 232.0_dp, 232.040107_dp, 0.000107_dp, 233.0_dp, 233.040739421_dp, 0.000054729_dp, 234.0_dp, 234.042893245_dp, 0.000009014_dp, 235.0_dp, 235.044061518_dp, 0.000001490_dp, 236.0_dp, 236.046568296_dp, 0.000054129_dp, 237.0_dp, 237.048171640_dp, 0.000001201_dp, 238.0_dp, 238.050944603_dp, 0.000001220_dp, 239.0_dp, 239.052937538_dp, 0.000001406_dp, 240.0_dp, 240.056163778_dp, 0.000018284_dp, 241.0_dp, 241.058309671_dp, 0.000107360_dp, 242.0_dp, 242.061639548_dp, 0.000214712_dp, 243.0_dp, 243.064204_dp, 0.000034_dp, 244.0_dp, 244.067891_dp, 0.000107_dp, 245.0_dp, 245.070693_dp, 0.000215_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | O_naw | = | naw_type(18, transpose(reshape([11.0_dp, 11.051249828_dp, 0.000064453_dp, 12.0_dp, 12.034367726_dp, 0.000012882_dp, 13.0_dp, 13.024815435_dp, 0.000010226_dp, 14.0_dp, 14.008596706_dp, 0.000000027_dp, 15.0_dp, 15.003065636_dp, 0.000000526_dp, 16.0_dp, 15.99491461926_dp, 0.00000000032_dp, 17.0_dp, 16.99913175595_dp, 0.00000000069_dp, 18.0_dp, 17.99915961214_dp, 0.00000000069_dp, 19.0_dp, 19.003577969_dp, 0.000002830_dp, 20.0_dp, 20.004075357_dp, 0.000000950_dp, 21.0_dp, 21.008654948_dp, 0.000012882_dp, 22.0_dp, 22.009965744_dp, 0.000061107_dp, 23.0_dp, 23.015696686_dp, 0.000130663_dp, 24.0_dp, 24.019861000_dp, 0.000177000_dp, 25.0_dp, 25.029338919_dp, 0.000177225_dp, 26.0_dp, 26.037210155_dp, 0.000177081_dp, 27.0_dp, 27.047955_dp, 0.000537_dp, 28.0_dp, 28.055910_dp, 0.000750_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Og_naw | = | naw_type(3, transpose(reshape([293.0_dp, 293.213423_dp, 0.000761_dp, 294.0_dp, 294.213979_dp, 0.000594_dp, 295.0_dp, 295.216178_dp, 0.000703_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Os_naw | = | naw_type(43, transpose(reshape([161.0_dp, 160.989054_dp, 0.000429_dp, 162.0_dp, 161.984434_dp, 0.000322_dp, 163.0_dp, 162.982462_dp, 0.000322_dp, 164.0_dp, 163.978073158_dp, 0.000160927_dp, 165.0_dp, 164.976654_dp, 0.000215_dp, 166.0_dp, 165.972698135_dp, 0.000019287_dp, 167.0_dp, 166.971552304_dp, 0.000086841_dp, 168.0_dp, 167.967799050_dp, 0.000010631_dp, 169.0_dp, 168.967017521_dp, 0.000027847_dp, 170.0_dp, 169.963579273_dp, 0.000010476_dp, 171.0_dp, 170.963180402_dp, 0.000019589_dp, 172.0_dp, 171.960017309_dp, 0.000013704_dp, 173.0_dp, 172.959808387_dp, 0.000016059_dp, 174.0_dp, 173.957063192_dp, 0.000011008_dp, 175.0_dp, 174.956945126_dp, 0.000012640_dp, 176.0_dp, 175.954770315_dp, 0.000011754_dp, 177.0_dp, 176.954957902_dp, 0.000015687_dp, 178.0_dp, 177.953253334_dp, 0.000014634_dp, 179.0_dp, 178.953815985_dp, 0.000016645_dp, 180.0_dp, 179.952381665_dp, 0.000016878_dp, 181.0_dp, 180.953247188_dp, 0.000027201_dp, 182.0_dp, 181.952110154_dp, 0.000023344_dp, 183.0_dp, 182.953125028_dp, 0.000053428_dp, 184.0_dp, 183.952492919_dp, 0.000000890_dp, 185.0_dp, 184.954045969_dp, 0.000000893_dp, 186.0_dp, 185.953837569_dp, 0.000000816_dp, 187.0_dp, 186.955749569_dp, 0.000000791_dp, 188.0_dp, 187.955837292_dp, 0.000000788_dp, 189.0_dp, 188.958145949_dp, 0.000000715_dp, 190.0_dp, 189.958445442_dp, 0.000000697_dp, 191.0_dp, 190.960928105_dp, 0.000000707_dp, 192.0_dp, 191.961478765_dp, 0.000002484_dp, 193.0_dp, 192.964149637_dp, 0.000002490_dp, 194.0_dp, 193.965179407_dp, 0.000002579_dp, 195.0_dp, 194.968318000_dp, 0.000060000_dp, 196.0_dp, 195.969643261_dp, 0.000043000_dp, 197.0_dp, 196.973076_dp, 0.000215_dp, 198.0_dp, 197.974664_dp, 0.000215_dp, 199.0_dp, 198.978239_dp, 0.000215_dp, 200.0_dp, 199.980086_dp, 0.000322_dp, 201.0_dp, 200.984069_dp, 0.000322_dp, 202.0_dp, 201.986548_dp, 0.000429_dp, 203.0_dp, 202.992195_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | P_naw | = | naw_type(24, transpose(reshape([24.0_dp, 24.036522_dp, 0.000537_dp, 25.0_dp, 25.021675_dp, 0.000429_dp, 26.0_dp, 26.011780_dp, 0.000210_dp, 27.0_dp, 26.999292499_dp, 0.000009662_dp, 28.0_dp, 27.992326460_dp, 0.000001231_dp, 29.0_dp, 28.981800368_dp, 0.000000385_dp, 30.0_dp, 29.978313490_dp, 0.000000069_dp, 31.0_dp, 30.97376199768_dp, 0.00000000080_dp, 32.0_dp, 31.973907643_dp, 0.000000042_dp, 33.0_dp, 32.971725692_dp, 0.000001170_dp, 34.0_dp, 33.973645886_dp, 0.000000870_dp, 35.0_dp, 34.973314045_dp, 0.000002003_dp, 36.0_dp, 35.978259610_dp, 0.000014078_dp, 37.0_dp, 36.979606942_dp, 0.000040738_dp, 38.0_dp, 37.984303105_dp, 0.000077918_dp, 39.0_dp, 38.986285865_dp, 0.000120929_dp, 40.0_dp, 39.991262221_dp, 0.000089755_dp, 41.0_dp, 40.994654000_dp, 0.000129000_dp, 42.0_dp, 42.001172140_dp, 0.000101996_dp, 43.0_dp, 43.005411_dp, 0.000322_dp, 44.0_dp, 44.011927_dp, 0.000429_dp, 45.0_dp, 45.017134_dp, 0.000537_dp, 46.0_dp, 46.024520_dp, 0.000537_dp, 47.0_dp, 47.030929_dp, 0.000644_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Pa_naw | = | naw_type(31, transpose(reshape([211.0_dp, 211.023674036_dp, 0.000074581_dp, 212.0_dp, 212.023184819_dp, 0.000094047_dp, 213.0_dp, 213.021099644_dp, 0.000061374_dp, 214.0_dp, 214.020891055_dp, 0.000087180_dp, 215.0_dp, 215.019113955_dp, 0.000088513_dp, 216.0_dp, 216.019134633_dp, 0.000026459_dp, 217.0_dp, 217.018309024_dp, 0.000013417_dp, 218.0_dp, 218.020021133_dp, 0.000019158_dp, 219.0_dp, 219.019949909_dp, 0.000074831_dp, 220.0_dp, 220.021769753_dp, 0.000015732_dp, 221.0_dp, 221.021873393_dp, 0.000063746_dp, 222.0_dp, 222.023687064_dp, 0.000092975_dp, 223.0_dp, 223.023980414_dp, 0.000081193_dp, 224.0_dp, 224.025617286_dp, 0.000008145_dp, 225.0_dp, 225.026147927_dp, 0.000087887_dp, 226.0_dp, 226.027948217_dp, 0.000012037_dp, 227.0_dp, 227.028803586_dp, 0.000007797_dp, 228.0_dp, 228.031050758_dp, 0.000004659_dp, 229.0_dp, 229.032095585_dp, 0.000003521_dp, 230.0_dp, 230.034539717_dp, 0.000003261_dp, 231.0_dp, 231.035882500_dp, 0.000001901_dp, 232.0_dp, 232.038590205_dp, 0.000008206_dp, 233.0_dp, 233.040246535_dp, 0.000001433_dp, 234.0_dp, 234.043305555_dp, 0.000004395_dp, 235.0_dp, 235.045399000_dp, 0.000015000_dp, 236.0_dp, 236.048668000_dp, 0.000015000_dp, 237.0_dp, 237.051023000_dp, 0.000014000_dp, 238.0_dp, 238.054637000_dp, 0.000017000_dp, 239.0_dp, 239.057260_dp, 0.000210_dp, 240.0_dp, 240.061203_dp, 0.000215_dp, 241.0_dp, 241.064134_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Pb_naw | = | naw_type(43, transpose(reshape([178.0_dp, 178.003836171_dp, 0.000024889_dp, 179.0_dp, 179.002202492_dp, 0.000087203_dp, 180.0_dp, 179.997916177_dp, 0.000013306_dp, 181.0_dp, 180.996660600_dp, 0.000091290_dp, 182.0_dp, 181.992673537_dp, 0.000012975_dp, 183.0_dp, 182.991862527_dp, 0.000031110_dp, 184.0_dp, 183.988135634_dp, 0.000013743_dp, 185.0_dp, 184.987610000_dp, 0.000017364_dp, 186.0_dp, 185.984239409_dp, 0.000011813_dp, 187.0_dp, 186.983910842_dp, 0.000005468_dp, 188.0_dp, 187.980879079_dp, 0.000010868_dp, 189.0_dp, 188.980843658_dp, 0.000015096_dp, 190.0_dp, 189.978081872_dp, 0.000013434_dp, 191.0_dp, 190.978216455_dp, 0.000007099_dp, 192.0_dp, 191.975789598_dp, 0.000006147_dp, 193.0_dp, 192.976135914_dp, 0.000011044_dp, 194.0_dp, 193.974011788_dp, 0.000018717_dp, 195.0_dp, 194.974516167_dp, 0.000005461_dp, 196.0_dp, 195.972787552_dp, 0.000008277_dp, 197.0_dp, 196.973434737_dp, 0.000005157_dp, 198.0_dp, 197.972015450_dp, 0.000009393_dp, 199.0_dp, 198.972912620_dp, 0.000007322_dp, 200.0_dp, 199.971818546_dp, 0.000010744_dp, 201.0_dp, 200.972870431_dp, 0.000014758_dp, 202.0_dp, 201.972151613_dp, 0.000004075_dp, 203.0_dp, 202.973390617_dp, 0.000007036_dp, 204.0_dp, 203.973043506_dp, 0.000001231_dp, 205.0_dp, 204.974481682_dp, 0.000001228_dp, 206.0_dp, 205.974465210_dp, 0.000001228_dp, 207.0_dp, 206.975896821_dp, 0.000001231_dp, 208.0_dp, 207.976652005_dp, 0.000001232_dp, 209.0_dp, 208.981089978_dp, 0.000001875_dp, 210.0_dp, 209.984188381_dp, 0.000001554_dp, 211.0_dp, 210.988735288_dp, 0.000002426_dp, 212.0_dp, 211.991895891_dp, 0.000001975_dp, 213.0_dp, 212.996560796_dp, 0.000007465_dp, 214.0_dp, 213.999803521_dp, 0.000002114_dp, 215.0_dp, 215.004661591_dp, 0.000056560_dp, 216.0_dp, 216.008062_dp, 0.000215_dp, 217.0_dp, 217.013162_dp, 0.000322_dp, 218.0_dp, 218.016779_dp, 0.000322_dp, 219.0_dp, 219.022136_dp, 0.000429_dp, 220.0_dp, 220.025905_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Pd_naw | = | naw_type(42, transpose(reshape([90.0_dp, 89.957370_dp, 0.000429_dp, 91.0_dp, 90.950435_dp, 0.000454_dp, 92.0_dp, 91.941192225_dp, 0.000370402_dp, 93.0_dp, 92.936680426_dp, 0.000397221_dp, 94.0_dp, 93.929036286_dp, 0.000004602_dp, 95.0_dp, 94.924888506_dp, 0.000003253_dp, 96.0_dp, 95.918213739_dp, 0.000004502_dp, 97.0_dp, 96.916471985_dp, 0.000005200_dp, 98.0_dp, 97.912698335_dp, 0.000005090_dp, 99.0_dp, 98.911773073_dp, 0.000005482_dp, 100.0_dp, 99.908520438_dp, 0.000018934_dp, 101.0_dp, 100.908284824_dp, 0.000004925_dp, 102.0_dp, 101.905632292_dp, 0.000000449_dp, 103.0_dp, 102.906111074_dp, 0.000000942_dp, 104.0_dp, 103.904030393_dp, 0.000001434_dp, 105.0_dp, 104.905079479_dp, 0.000001222_dp, 106.0_dp, 105.903480287_dp, 0.000001186_dp, 107.0_dp, 106.905128058_dp, 0.000001289_dp, 108.0_dp, 107.903891806_dp, 0.000001189_dp, 109.0_dp, 108.905950576_dp, 0.000001195_dp, 110.0_dp, 109.905172878_dp, 0.000000657_dp, 111.0_dp, 110.907690358_dp, 0.000000785_dp, 112.0_dp, 111.907330557_dp, 0.000007027_dp, 113.0_dp, 112.910261912_dp, 0.000007458_dp, 114.0_dp, 113.910369430_dp, 0.000007459_dp, 115.0_dp, 114.913659333_dp, 0.000014543_dp, 116.0_dp, 115.914297872_dp, 0.000007659_dp, 117.0_dp, 116.917955584_dp, 0.000007788_dp, 118.0_dp, 117.919067273_dp, 0.000002677_dp, 119.0_dp, 118.923341138_dp, 0.000008854_dp, 120.0_dp, 119.924551745_dp, 0.000002464_dp, 121.0_dp, 120.928950342_dp, 0.000003600_dp, 122.0_dp, 121.930631693_dp, 0.000021000_dp, 123.0_dp, 122.935126000_dp, 0.000847500_dp, 124.0_dp, 123.937305_dp, 0.000322_dp, 125.0_dp, 124.942072_dp, 0.000429_dp, 126.0_dp, 125.944401_dp, 0.000429_dp, 127.0_dp, 126.949307_dp, 0.000537_dp, 128.0_dp, 127.952345_dp, 0.000537_dp, 129.0_dp, 128.959334_dp, 0.000644_dp, 130.0_dp, 129.964863_dp, 0.000322_dp, 131.0_dp, 130.972367_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Pm_naw | = | naw_type(40, transpose(reshape([126.0_dp, 125.957327_dp, 0.000537_dp, 127.0_dp, 126.951358_dp, 0.000429_dp, 128.0_dp, 127.948234_dp, 0.000322_dp, 129.0_dp, 128.942909_dp, 0.000322_dp, 130.0_dp, 129.940451_dp, 0.000215_dp, 131.0_dp, 130.935834_dp, 0.000215_dp, 132.0_dp, 131.933840_dp, 0.000160_dp, 133.0_dp, 132.929782000_dp, 0.000054000_dp, 134.0_dp, 133.928326000_dp, 0.000045000_dp, 135.0_dp, 134.924785000_dp, 0.000089000_dp, 136.0_dp, 135.923595949_dp, 0.000074152_dp, 137.0_dp, 136.920479519_dp, 0.000014000_dp, 138.0_dp, 137.919576119_dp, 0.000012456_dp, 139.0_dp, 138.916799228_dp, 0.000014587_dp, 140.0_dp, 139.916035918_dp, 0.000026001_dp, 141.0_dp, 140.913555081_dp, 0.000015000_dp, 142.0_dp, 141.912890982_dp, 0.000025330_dp, 143.0_dp, 142.910938068_dp, 0.000003160_dp, 144.0_dp, 143.912596208_dp, 0.000003126_dp, 145.0_dp, 144.912755748_dp, 0.000003011_dp, 146.0_dp, 145.914702240_dp, 0.000004589_dp, 147.0_dp, 146.915144944_dp, 0.000001382_dp, 148.0_dp, 147.917481091_dp, 0.000006108_dp, 149.0_dp, 148.918341507_dp, 0.000002344_dp, 150.0_dp, 149.920990014_dp, 0.000021504_dp, 151.0_dp, 150.921216613_dp, 0.000004949_dp, 152.0_dp, 151.923505185_dp, 0.000027809_dp, 153.0_dp, 152.924156252_dp, 0.000009729_dp, 154.0_dp, 153.926712791_dp, 0.000026861_dp, 155.0_dp, 154.928136951_dp, 0.000005065_dp, 156.0_dp, 155.931114059_dp, 0.000001275_dp, 157.0_dp, 156.933121298_dp, 0.000007521_dp, 158.0_dp, 157.936546948_dp, 0.000000953_dp, 159.0_dp, 158.939286409_dp, 0.000010777_dp, 160.0_dp, 159.943215272_dp, 0.000002200_dp, 161.0_dp, 160.946229837_dp, 0.000009700_dp, 162.0_dp, 161.950574_dp, 0.000322_dp, 163.0_dp, 162.953881_dp, 0.000429_dp, 164.0_dp, 163.958819_dp, 0.000429_dp, 165.0_dp, 164.962780_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Po_naw | = | naw_type(42, transpose(reshape([186.0_dp, 186.004403174_dp, 0.000019622_dp, 187.0_dp, 187.003031482_dp, 0.000035030_dp, 188.0_dp, 187.999415586_dp, 0.000021438_dp, 189.0_dp, 188.998473425_dp, 0.000023681_dp, 190.0_dp, 189.995101731_dp, 0.000014131_dp, 191.0_dp, 190.994558494_dp, 0.000007624_dp, 192.0_dp, 191.991340274_dp, 0.000011416_dp, 193.0_dp, 192.991062421_dp, 0.000015599_dp, 194.0_dp, 193.988186058_dp, 0.000013860_dp, 195.0_dp, 194.988065781_dp, 0.000006486_dp, 196.0_dp, 195.985540722_dp, 0.000005778_dp, 197.0_dp, 196.985621939_dp, 0.000010585_dp, 198.0_dp, 197.983388753_dp, 0.000018705_dp, 199.0_dp, 198.983640445_dp, 0.000005828_dp, 200.0_dp, 199.981812355_dp, 0.000008136_dp, 201.0_dp, 200.982263799_dp, 0.000005305_dp, 202.0_dp, 201.980738934_dp, 0.000009307_dp, 203.0_dp, 202.981416072_dp, 0.000004981_dp, 204.0_dp, 203.980310078_dp, 0.000010811_dp, 205.0_dp, 204.981190006_dp, 0.000010798_dp, 206.0_dp, 205.980473662_dp, 0.000004306_dp, 207.0_dp, 206.981593334_dp, 0.000007148_dp, 208.0_dp, 207.981246035_dp, 0.000001795_dp, 209.0_dp, 208.982430361_dp, 0.000001909_dp, 210.0_dp, 209.982873686_dp, 0.000001230_dp, 211.0_dp, 210.986653171_dp, 0.000001347_dp, 212.0_dp, 211.988867982_dp, 0.000001237_dp, 213.0_dp, 212.992857154_dp, 0.000003277_dp, 214.0_dp, 213.995201287_dp, 0.000001556_dp, 215.0_dp, 214.999418385_dp, 0.000002276_dp, 216.0_dp, 216.001913416_dp, 0.000001948_dp, 217.0_dp, 217.006316145_dp, 0.000007025_dp, 218.0_dp, 218.008971234_dp, 0.000002112_dp, 219.0_dp, 219.013614000_dp, 0.000017000_dp, 220.0_dp, 220.016386000_dp, 0.000019000_dp, 221.0_dp, 221.021228000_dp, 0.000021000_dp, 222.0_dp, 222.024140000_dp, 0.000043000_dp, 223.0_dp, 223.029070_dp, 0.000210_dp, 224.0_dp, 224.032110_dp, 0.000210_dp, 225.0_dp, 225.037123_dp, 0.000322_dp, 226.0_dp, 226.040310_dp, 0.000430_dp, 227.0_dp, 227.045390_dp, 0.000430_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Pr_naw | = | naw_type(41, transpose(reshape([121.0_dp, 120.955393_dp, 0.000537_dp, 122.0_dp, 121.951927_dp, 0.000537_dp, 123.0_dp, 122.946076_dp, 0.000429_dp, 124.0_dp, 123.942940_dp, 0.000430_dp, 125.0_dp, 124.937659_dp, 0.000322_dp, 126.0_dp, 125.935240_dp, 0.000210_dp, 127.0_dp, 126.930710_dp, 0.000210_dp, 128.0_dp, 127.928791000_dp, 0.000032000_dp, 129.0_dp, 128.925095000_dp, 0.000032000_dp, 130.0_dp, 129.923590000_dp, 0.000069000_dp, 131.0_dp, 130.920234960_dp, 0.000050451_dp, 132.0_dp, 131.919240000_dp, 0.000031000_dp, 133.0_dp, 132.916330558_dp, 0.000013416_dp, 134.0_dp, 133.915696729_dp, 0.000021810_dp, 135.0_dp, 134.913111772_dp, 0.000012686_dp, 136.0_dp, 135.912677470_dp, 0.000012296_dp, 137.0_dp, 136.910679183_dp, 0.000008733_dp, 138.0_dp, 137.910757495_dp, 0.000010748_dp, 139.0_dp, 138.908932700_dp, 0.000003917_dp, 140.0_dp, 139.909085600_dp, 0.000006593_dp, 141.0_dp, 140.907659604_dp, 0.000001607_dp, 142.0_dp, 141.910051640_dp, 0.000001607_dp, 143.0_dp, 142.910822624_dp, 0.000001949_dp, 144.0_dp, 143.913310682_dp, 0.000002907_dp, 145.0_dp, 144.914517987_dp, 0.000007674_dp, 146.0_dp, 145.917687630_dp, 0.000036882_dp, 147.0_dp, 146.919007438_dp, 0.000017020_dp, 148.0_dp, 147.922129992_dp, 0.000016147_dp, 149.0_dp, 148.923736100_dp, 0.000010600_dp, 150.0_dp, 149.926676391_dp, 0.000009677_dp, 151.0_dp, 150.928309066_dp, 0.000012506_dp, 152.0_dp, 151.931552900_dp, 0.000019900_dp, 153.0_dp, 152.933903511_dp, 0.000012755_dp, 154.0_dp, 153.937885165_dp, 0.000107360_dp, 155.0_dp, 154.940509193_dp, 0.000018462_dp, 156.0_dp, 155.944766900_dp, 0.000001100_dp, 157.0_dp, 156.948003100_dp, 0.000003400_dp, 158.0_dp, 157.952603_dp, 0.000322_dp, 159.0_dp, 158.956232_dp, 0.000429_dp, 160.0_dp, 159.961138_dp, 0.000429_dp, 161.0_dp, 160.965121_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Pt_naw | = | naw_type(44, transpose(reshape([165.0_dp, 164.999658_dp, 0.000429_dp, 166.0_dp, 165.994866_dp, 0.000322_dp, 167.0_dp, 166.992750_dp, 0.000329_dp, 168.0_dp, 167.988180196_dp, 0.000160960_dp, 169.0_dp, 168.986619_dp, 0.000215_dp, 170.0_dp, 169.982502087_dp, 0.000019588_dp, 171.0_dp, 170.981248868_dp, 0.000086904_dp, 172.0_dp, 171.977341059_dp, 0.000011139_dp, 173.0_dp, 172.976449922_dp, 0.000068096_dp, 174.0_dp, 173.972820431_dp, 0.000011098_dp, 175.0_dp, 174.972400593_dp, 0.000019982_dp, 176.0_dp, 175.968938162_dp, 0.000013647_dp, 177.0_dp, 176.968469541_dp, 0.000016090_dp, 178.0_dp, 177.965649288_dp, 0.000010878_dp, 179.0_dp, 178.965358742_dp, 0.000008563_dp, 180.0_dp, 179.963038010_dp, 0.000010790_dp, 181.0_dp, 180.963089946_dp, 0.000014695_dp, 182.0_dp, 181.961171605_dp, 0.000014057_dp, 183.0_dp, 182.961595895_dp, 0.000015261_dp, 184.0_dp, 183.959921929_dp, 0.000015828_dp, 185.0_dp, 184.960613659_dp, 0.000027731_dp, 186.0_dp, 185.959350845_dp, 0.000023344_dp, 187.0_dp, 186.960616646_dp, 0.000025837_dp, 188.0_dp, 187.959397521_dp, 0.000005694_dp, 189.0_dp, 188.960848485_dp, 0.000010832_dp, 190.0_dp, 189.959949823_dp, 0.000000705_dp, 191.0_dp, 190.961676261_dp, 0.000004430_dp, 192.0_dp, 191.961042667_dp, 0.000002758_dp, 193.0_dp, 192.962984546_dp, 0.000001458_dp, 194.0_dp, 193.962683498_dp, 0.000000532_dp, 195.0_dp, 194.964794325_dp, 0.000000540_dp, 196.0_dp, 195.964954648_dp, 0.000000547_dp, 197.0_dp, 196.967343030_dp, 0.000000575_dp, 198.0_dp, 197.967896718_dp, 0.000002254_dp, 199.0_dp, 198.970597022_dp, 0.000002317_dp, 200.0_dp, 199.971444609_dp, 0.000021588_dp, 201.0_dp, 200.974513305_dp, 0.000053788_dp, 202.0_dp, 201.975639000_dp, 0.000027000_dp, 203.0_dp, 202.979055_dp, 0.000215_dp, 204.0_dp, 203.981084_dp, 0.000215_dp, 205.0_dp, 204.986237_dp, 0.000322_dp, 206.0_dp, 205.990080_dp, 0.000322_dp, 207.0_dp, 206.995556_dp, 0.000429_dp, 208.0_dp, 207.999463_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Pu_naw | = | naw_type(27, transpose(reshape([221.0_dp, 221.038572_dp, 0.000322_dp, 222.0_dp, 222.037638_dp, 0.000322_dp, 223.0_dp, 223.038777_dp, 0.000322_dp, 224.0_dp, 224.037875_dp, 0.000322_dp, 225.0_dp, 225.038970_dp, 0.000322_dp, 226.0_dp, 226.038250_dp, 0.000215_dp, 227.0_dp, 227.039474_dp, 0.000107_dp, 228.0_dp, 228.038763325_dp, 0.000025069_dp, 229.0_dp, 229.040145099_dp, 0.000065092_dp, 230.0_dp, 230.039648313_dp, 0.000015514_dp, 231.0_dp, 231.041125946_dp, 0.000023683_dp, 232.0_dp, 232.041182133_dp, 0.000018126_dp, 233.0_dp, 233.042997411_dp, 0.000058162_dp, 234.0_dp, 234.043317489_dp, 0.000007298_dp, 235.0_dp, 235.045284609_dp, 0.000022030_dp, 236.0_dp, 236.046056661_dp, 0.000001942_dp, 237.0_dp, 237.048407888_dp, 0.000001821_dp, 238.0_dp, 238.049558175_dp, 0.000001221_dp, 239.0_dp, 239.052161596_dp, 0.000001194_dp, 240.0_dp, 240.053811740_dp, 0.000001186_dp, 241.0_dp, 241.056849651_dp, 0.000001186_dp, 242.0_dp, 242.058740979_dp, 0.000001336_dp, 243.0_dp, 243.062002068_dp, 0.000002728_dp, 244.0_dp, 244.064204401_dp, 0.000002518_dp, 245.0_dp, 245.067824554_dp, 0.000014621_dp, 246.0_dp, 246.070204172_dp, 0.000016087_dp, 247.0_dp, 247.074300_dp, 0.000215_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ra_naw | = | naw_type(35, transpose(reshape([201.0_dp, 201.012814699_dp, 0.000021794_dp, 202.0_dp, 202.009742305_dp, 0.000016122_dp, 203.0_dp, 203.009233907_dp, 0.000010400_dp, 204.0_dp, 204.006506855_dp, 0.000009580_dp, 205.0_dp, 205.006230692_dp, 0.000024446_dp, 206.0_dp, 206.003827842_dp, 0.000019332_dp, 207.0_dp, 207.003772420_dp, 0.000062572_dp, 208.0_dp, 208.001855012_dp, 0.000009686_dp, 209.0_dp, 209.001994902_dp, 0.000006169_dp, 210.0_dp, 210.000475406_dp, 0.000009868_dp, 211.0_dp, 211.000893049_dp, 0.000005331_dp, 212.0_dp, 211.999786619_dp, 0.000011007_dp, 213.0_dp, 213.000370971_dp, 0.000010540_dp, 214.0_dp, 214.000099560_dp, 0.000005636_dp, 215.0_dp, 215.002718208_dp, 0.000007730_dp, 216.0_dp, 216.003533534_dp, 0.000008592_dp, 217.0_dp, 217.006322676_dp, 0.000007564_dp, 218.0_dp, 218.007134297_dp, 0.000010528_dp, 219.0_dp, 219.010084715_dp, 0.000007315_dp, 220.0_dp, 220.011027542_dp, 0.000008153_dp, 221.0_dp, 221.013917293_dp, 0.000004970_dp, 222.0_dp, 222.015373371_dp, 0.000004781_dp, 223.0_dp, 223.018500648_dp, 0.000002243_dp, 224.0_dp, 224.020210361_dp, 0.000001944_dp, 225.0_dp, 225.023610502_dp, 0.000002786_dp, 226.0_dp, 226.025408186_dp, 0.000002068_dp, 227.0_dp, 227.029176205_dp, 0.000002089_dp, 228.0_dp, 228.031068574_dp, 0.000002141_dp, 229.0_dp, 229.034956703_dp, 0.000016576_dp, 230.0_dp, 230.037054776_dp, 0.000011053_dp, 231.0_dp, 231.041027085_dp, 0.000012206_dp, 232.0_dp, 232.043475267_dp, 0.000009823_dp, 233.0_dp, 233.047594570_dp, 0.000009235_dp, 234.0_dp, 234.050382100_dp, 0.000009000_dp, 235.0_dp, 235.054890_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Rb_naw | = | naw_type(34, transpose(reshape([71.0_dp, 70.965335_dp, 0.000429_dp, 72.0_dp, 71.958851_dp, 0.000537_dp, 73.0_dp, 72.950604506_dp, 0.000043794_dp, 74.0_dp, 73.944265867_dp, 0.000003249_dp, 75.0_dp, 74.938573200_dp, 0.000001266_dp, 76.0_dp, 75.935073031_dp, 0.000001006_dp, 77.0_dp, 76.930401599_dp, 0.000001400_dp, 78.0_dp, 77.928141866_dp, 0.000003475_dp, 79.0_dp, 78.923990095_dp, 0.000002085_dp, 80.0_dp, 79.922516442_dp, 0.000002000_dp, 81.0_dp, 80.918993900_dp, 0.000005265_dp, 82.0_dp, 81.918209023_dp, 0.000003230_dp, 83.0_dp, 82.915114181_dp, 0.000002500_dp, 84.0_dp, 83.914375223_dp, 0.000002355_dp, 85.0_dp, 84.91178973604_dp, 0.00000000537_dp, 86.0_dp, 85.911167443_dp, 0.000000214_dp, 87.0_dp, 86.909180529_dp, 0.000000006_dp, 88.0_dp, 87.911315590_dp, 0.000000170_dp, 89.0_dp, 88.912278136_dp, 0.000005825_dp, 90.0_dp, 89.914797557_dp, 0.000006926_dp, 91.0_dp, 90.916537261_dp, 0.000008375_dp, 92.0_dp, 91.919728477_dp, 0.000006573_dp, 93.0_dp, 92.922039334_dp, 0.000008406_dp, 94.0_dp, 93.926394819_dp, 0.000002177_dp, 95.0_dp, 94.929263849_dp, 0.000021733_dp, 96.0_dp, 95.934133398_dp, 0.000003599_dp, 97.0_dp, 96.937177117_dp, 0.000002052_dp, 98.0_dp, 97.941632317_dp, 0.000017265_dp, 99.0_dp, 98.945119190_dp, 0.000004327_dp, 100.0_dp, 99.950331532_dp, 0.000014089_dp, 101.0_dp, 100.954302000_dp, 0.000022000_dp, 102.0_dp, 101.960008000_dp, 0.000089000_dp, 103.0_dp, 102.964401_dp, 0.000429_dp, 104.0_dp, 103.970531_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Re_naw | = | naw_type(41, transpose(reshape([159.0_dp, 158.984106_dp, 0.000327_dp, 160.0_dp, 159.981880_dp, 0.000322_dp, 161.0_dp, 160.977624313_dp, 0.000160930_dp, 162.0_dp, 161.975896_dp, 0.000215_dp, 163.0_dp, 162.972085434_dp, 0.000019897_dp, 164.0_dp, 163.970507122_dp, 0.000058566_dp, 165.0_dp, 164.967085831_dp, 0.000025328_dp, 166.0_dp, 165.965821216_dp, 0.000094731_dp, 167.0_dp, 166.962604_dp, 0.000043_dp, 168.0_dp, 167.961572607_dp, 0.000033087_dp, 169.0_dp, 168.958765979_dp, 0.000012204_dp, 170.0_dp, 169.958234844_dp, 0.000012267_dp, 171.0_dp, 170.955716000_dp, 0.000030000_dp, 172.0_dp, 171.955376165_dp, 0.000038183_dp, 173.0_dp, 172.953243000_dp, 0.000030000_dp, 174.0_dp, 173.953115000_dp, 0.000030000_dp, 175.0_dp, 174.951381000_dp, 0.000030000_dp, 176.0_dp, 175.951623000_dp, 0.000030000_dp, 177.0_dp, 176.950328000_dp, 0.000030000_dp, 178.0_dp, 177.950989000_dp, 0.000030000_dp, 179.0_dp, 178.949989686_dp, 0.000026450_dp, 180.0_dp, 179.950791568_dp, 0.000022965_dp, 181.0_dp, 180.950061507_dp, 0.000013471_dp, 182.0_dp, 181.951211560_dp, 0.000109483_dp, 183.0_dp, 182.950821306_dp, 0.000008625_dp, 184.0_dp, 183.952528073_dp, 0.000004590_dp, 185.0_dp, 184.952958320_dp, 0.000000879_dp, 186.0_dp, 185.954989172_dp, 0.000000880_dp, 187.0_dp, 186.955752217_dp, 0.000000791_dp, 188.0_dp, 187.958113658_dp, 0.000000792_dp, 189.0_dp, 188.959227764_dp, 0.000008793_dp, 190.0_dp, 189.961800064_dp, 0.000005227_dp, 191.0_dp, 190.963123322_dp, 0.000011019_dp, 192.0_dp, 191.966088000_dp, 0.000076000_dp, 193.0_dp, 192.967545000_dp, 0.000042000_dp, 194.0_dp, 193.970735_dp, 0.000215_dp, 195.0_dp, 194.972560_dp, 0.000322_dp, 196.0_dp, 195.975996_dp, 0.000322_dp, 197.0_dp, 196.978153_dp, 0.000322_dp, 198.0_dp, 197.981760_dp, 0.000429_dp, 199.0_dp, 198.984187_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Rf_naw | = | naw_type(16, transpose(reshape([253.0_dp, 253.100528_dp, 0.000440_dp, 254.0_dp, 254.100055_dp, 0.000304_dp, 255.0_dp, 255.101267_dp, 0.000194_dp, 256.0_dp, 256.101151464_dp, 0.000019160_dp, 257.0_dp, 257.102916796_dp, 0.000011612_dp, 258.0_dp, 258.103429895_dp, 0.000017288_dp, 259.0_dp, 259.105601_dp, 0.000078_dp, 260.0_dp, 260.106440_dp, 0.000215_dp, 261.0_dp, 261.108769591_dp, 0.000070492_dp, 262.0_dp, 262.109923_dp, 0.000240_dp, 263.0_dp, 263.112461_dp, 0.000164_dp, 264.0_dp, 264.113876_dp, 0.000387_dp, 265.0_dp, 265.116683_dp, 0.000387_dp, 266.0_dp, 266.118236_dp, 0.000443_dp, 267.0_dp, 267.121787_dp, 0.000617_dp, 268.0_dp, 268.123968_dp, 0.000711_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Rg_naw | = | naw_type(15, transpose(reshape([272.0_dp, 272.153273_dp, 0.000251_dp, 273.0_dp, 273.153393_dp, 0.000429_dp, 274.0_dp, 274.155247_dp, 0.000225_dp, 275.0_dp, 275.156088_dp, 0.000479_dp, 276.0_dp, 276.158226_dp, 0.000675_dp, 277.0_dp, 277.159322_dp, 0.000504_dp, 278.0_dp, 278.161590_dp, 0.000417_dp, 279.0_dp, 279.162880_dp, 0.000453_dp, 280.0_dp, 280.165204_dp, 0.000571_dp, 281.0_dp, 281.166757_dp, 0.000831_dp, 282.0_dp, 282.169343_dp, 0.000631_dp, 283.0_dp, 283.171101_dp, 0.000728_dp, 284.0_dp, 284.173882_dp, 0.000537_dp, 285.0_dp, 285.175771_dp, 0.000644_dp, 286.0_dp, 286.178756_dp, 0.000492_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Rh_naw | = | naw_type(41, transpose(reshape([88.0_dp, 87.960429_dp, 0.000429_dp, 89.0_dp, 88.950992_dp, 0.000387_dp, 90.0_dp, 89.944569_dp, 0.000215_dp, 91.0_dp, 90.937123_dp, 0.000320_dp, 92.0_dp, 91.932367692_dp, 0.000004700_dp, 93.0_dp, 92.925912778_dp, 0.000002821_dp, 94.0_dp, 93.921730450_dp, 0.000003627_dp, 95.0_dp, 94.915897893_dp, 0.000004171_dp, 96.0_dp, 95.914451705_dp, 0.000010737_dp, 97.0_dp, 96.911327872_dp, 0.000038071_dp, 98.0_dp, 97.910707734_dp, 0.000012782_dp, 99.0_dp, 98.908121241_dp, 0.000020881_dp, 100.0_dp, 99.908114147_dp, 0.000019458_dp, 101.0_dp, 100.906158903_dp, 0.000006270_dp, 102.0_dp, 101.906834282_dp, 0.000006880_dp, 103.0_dp, 102.905494081_dp, 0.000002470_dp, 104.0_dp, 103.906645309_dp, 0.000002471_dp, 105.0_dp, 104.905687787_dp, 0.000002685_dp, 106.0_dp, 105.907285879_dp, 0.000005786_dp, 107.0_dp, 106.906747975_dp, 0.000012937_dp, 108.0_dp, 107.908715304_dp, 0.000015026_dp, 109.0_dp, 108.908749555_dp, 0.000004336_dp, 110.0_dp, 109.911079745_dp, 0.000019114_dp, 111.0_dp, 110.911643164_dp, 0.000007356_dp, 112.0_dp, 111.914405199_dp, 0.000047327_dp, 113.0_dp, 112.915440212_dp, 0.000007656_dp, 114.0_dp, 113.918721680_dp, 0.000076824_dp, 115.0_dp, 114.920311649_dp, 0.000007857_dp, 116.0_dp, 115.924062060_dp, 0.000079261_dp, 117.0_dp, 116.926036291_dp, 0.000009548_dp, 118.0_dp, 117.930341116_dp, 0.000026018_dp, 119.0_dp, 118.932556951_dp, 0.000010000_dp, 120.0_dp, 119.937069_dp, 0.000215_dp, 121.0_dp, 120.939613000_dp, 0.000665000_dp, 122.0_dp, 121.944305_dp, 0.000322_dp, 123.0_dp, 122.947192_dp, 0.000429_dp, 124.0_dp, 123.952002_dp, 0.000429_dp, 125.0_dp, 124.955094_dp, 0.000537_dp, 126.0_dp, 125.960064_dp, 0.000537_dp, 127.0_dp, 126.963789_dp, 0.000644_dp, 128.0_dp, 127.970649_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Rn_naw | = | naw_type(39, transpose(reshape([193.0_dp, 193.009707973_dp, 0.000026958_dp, 194.0_dp, 194.006145636_dp, 0.000017884_dp, 195.0_dp, 195.005421703_dp, 0.000055487_dp, 196.0_dp, 196.002120431_dp, 0.000015087_dp, 197.0_dp, 197.001621446_dp, 0.000017383_dp, 198.0_dp, 197.998679197_dp, 0.000014406_dp, 199.0_dp, 198.998325436_dp, 0.000007833_dp, 200.0_dp, 199.995705335_dp, 0.000006217_dp, 201.0_dp, 200.995590511_dp, 0.000010865_dp, 202.0_dp, 201.993263982_dp, 0.000018808_dp, 203.0_dp, 202.993361155_dp, 0.000006242_dp, 204.0_dp, 203.991443729_dp, 0.000007991_dp, 205.0_dp, 204.991723228_dp, 0.000005453_dp, 206.0_dp, 205.990195409_dp, 0.000009223_dp, 207.0_dp, 206.990730224_dp, 0.000005090_dp, 208.0_dp, 207.989634513_dp, 0.000010910_dp, 209.0_dp, 208.990401389_dp, 0.000010692_dp, 210.0_dp, 209.989688862_dp, 0.000004892_dp, 211.0_dp, 210.990600767_dp, 0.000007314_dp, 212.0_dp, 211.990703946_dp, 0.000003338_dp, 213.0_dp, 212.993885147_dp, 0.000003618_dp, 214.0_dp, 213.995362650_dp, 0.000009862_dp, 215.0_dp, 214.998745037_dp, 0.000006538_dp, 216.0_dp, 216.000271942_dp, 0.000006192_dp, 217.0_dp, 217.003927632_dp, 0.000004506_dp, 218.0_dp, 218.005601123_dp, 0.000002486_dp, 219.0_dp, 219.009478683_dp, 0.000002254_dp, 220.0_dp, 220.011392443_dp, 0.000001947_dp, 221.0_dp, 221.015535637_dp, 0.000006134_dp, 222.0_dp, 222.017576017_dp, 0.000002086_dp, 223.0_dp, 223.021889283_dp, 0.000008397_dp, 224.0_dp, 224.024095803_dp, 0.000010536_dp, 225.0_dp, 225.028485572_dp, 0.000011958_dp, 226.0_dp, 226.030861380_dp, 0.000011247_dp, 227.0_dp, 227.035304393_dp, 0.000015127_dp, 228.0_dp, 228.037835415_dp, 0.000018977_dp, 229.0_dp, 229.042257272_dp, 0.000014000_dp, 230.0_dp, 230.045271_dp, 0.000215_dp, 231.0_dp, 231.049973_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ru_naw | = | naw_type(41, transpose(reshape([85.0_dp, 84.967117_dp, 0.000537_dp, 86.0_dp, 85.957305_dp, 0.000429_dp, 87.0_dp, 86.950907_dp, 0.000429_dp, 88.0_dp, 87.941664_dp, 0.000322_dp, 89.0_dp, 88.937337849_dp, 0.000026000_dp, 90.0_dp, 89.930344378_dp, 0.000004004_dp, 91.0_dp, 90.926741530_dp, 0.000002384_dp, 92.0_dp, 91.920234373_dp, 0.000002917_dp, 93.0_dp, 92.917104442_dp, 0.000002216_dp, 94.0_dp, 93.911342860_dp, 0.000003374_dp, 95.0_dp, 94.910404415_dp, 0.000010200_dp, 96.0_dp, 95.907588910_dp, 0.000000182_dp, 97.0_dp, 96.907545776_dp, 0.000002965_dp, 98.0_dp, 97.905286709_dp, 0.000006937_dp, 99.0_dp, 98.905930284_dp, 0.000000368_dp, 100.0_dp, 99.904210460_dp, 0.000000367_dp, 101.0_dp, 100.905573086_dp, 0.000000443_dp, 102.0_dp, 101.904340312_dp, 0.000000446_dp, 103.0_dp, 102.906314846_dp, 0.000000473_dp, 104.0_dp, 103.905425312_dp, 0.000002682_dp, 105.0_dp, 104.907745478_dp, 0.000002683_dp, 106.0_dp, 105.907328181_dp, 0.000005787_dp, 107.0_dp, 106.909969837_dp, 0.000009310_dp, 108.0_dp, 107.910185793_dp, 0.000009318_dp, 109.0_dp, 108.913323707_dp, 0.000009612_dp, 110.0_dp, 109.914038501_dp, 0.000009580_dp, 111.0_dp, 110.917567566_dp, 0.000010394_dp, 112.0_dp, 111.918806922_dp, 0.000010305_dp, 113.0_dp, 112.922846729_dp, 0.000041097_dp, 114.0_dp, 113.924614430_dp, 0.000003817_dp, 115.0_dp, 114.929033049_dp, 0.000027016_dp, 116.0_dp, 115.931219191_dp, 0.000004000_dp, 117.0_dp, 116.936135000_dp, 0.000465000_dp, 118.0_dp, 117.938808_dp, 0.000215_dp, 119.0_dp, 118.944090_dp, 0.000322_dp, 120.0_dp, 119.946623_dp, 0.000429_dp, 121.0_dp, 120.952098_dp, 0.000429_dp, 122.0_dp, 121.955147_dp, 0.000537_dp, 123.0_dp, 122.960762_dp, 0.000537_dp, 124.0_dp, 123.963940_dp, 0.000644_dp, 125.0_dp, 124.969544_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | S_naw | = | naw_type(24, transpose(reshape([26.0_dp, 26.029716_dp, 0.000644_dp, 27.0_dp, 27.018777_dp, 0.000430_dp, 28.0_dp, 28.004372762_dp, 0.000171767_dp, 29.0_dp, 28.996678000_dp, 0.000014000_dp, 30.0_dp, 29.984906770_dp, 0.000000221_dp, 31.0_dp, 30.979557002_dp, 0.000000246_dp, 32.0_dp, 31.97207117354_dp, 0.00000000141_dp, 33.0_dp, 32.97145890862_dp, 0.00000000144_dp, 34.0_dp, 33.967867011_dp, 0.000000047_dp, 35.0_dp, 34.969032321_dp, 0.000000043_dp, 36.0_dp, 35.967080692_dp, 0.000000201_dp, 37.0_dp, 36.971125500_dp, 0.000000212_dp, 38.0_dp, 37.971163300_dp, 0.000007699_dp, 39.0_dp, 38.975133850_dp, 0.000053677_dp, 40.0_dp, 39.975482561_dp, 0.000004274_dp, 41.0_dp, 40.979593451_dp, 0.000004400_dp, 42.0_dp, 41.981065100_dp, 0.000003000_dp, 43.0_dp, 42.986907635_dp, 0.000005335_dp, 44.0_dp, 43.990118846_dp, 0.000005600_dp, 45.0_dp, 44.996414_dp, 0.000322_dp, 46.0_dp, 46.000687_dp, 0.000429_dp, 47.0_dp, 47.007730_dp, 0.000429_dp, 48.0_dp, 48.013301_dp, 0.000537_dp, 49.0_dp, 49.021891_dp, 0.000626_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Sb_naw | = | naw_type(41, transpose(reshape([102.0_dp, 101.945142_dp, 0.000429_dp, 103.0_dp, 102.939162_dp, 0.000322_dp, 104.0_dp, 103.936344_dp, 0.000109_dp, 105.0_dp, 104.931276547_dp, 0.000023431_dp, 106.0_dp, 105.928637979_dp, 0.000008000_dp, 107.0_dp, 106.924150621_dp, 0.000004452_dp, 108.0_dp, 107.922226731_dp, 0.000005900_dp, 109.0_dp, 108.918141203_dp, 0.000005652_dp, 110.0_dp, 109.916854283_dp, 0.000006400_dp, 111.0_dp, 110.913218187_dp, 0.000009500_dp, 112.0_dp, 111.912399903_dp, 0.000019140_dp, 113.0_dp, 112.909374664_dp, 0.000018457_dp, 114.0_dp, 113.909289155_dp, 0.000021226_dp, 115.0_dp, 114.906598000_dp, 0.000017203_dp, 116.0_dp, 115.906792732_dp, 0.000005533_dp, 117.0_dp, 116.904841519_dp, 0.000009057_dp, 118.0_dp, 117.905532194_dp, 0.000003237_dp, 119.0_dp, 118.903944062_dp, 0.000007512_dp, 120.0_dp, 119.905080308_dp, 0.000007728_dp, 121.0_dp, 120.903811353_dp, 0.000002690_dp, 122.0_dp, 121.905169335_dp, 0.000002687_dp, 123.0_dp, 122.904215292_dp, 0.000001456_dp, 124.0_dp, 123.905937065_dp, 0.000001457_dp, 125.0_dp, 124.905254264_dp, 0.000002700_dp, 126.0_dp, 125.907253158_dp, 0.000034189_dp, 127.0_dp, 126.906925557_dp, 0.000005457_dp, 128.0_dp, 127.909146121_dp, 0.000020169_dp, 129.0_dp, 128.909146623_dp, 0.000022786_dp, 130.0_dp, 129.911662686_dp, 0.000015257_dp, 131.0_dp, 130.911989339_dp, 0.000002236_dp, 132.0_dp, 131.914508013_dp, 0.000002648_dp, 133.0_dp, 132.915272128_dp, 0.000003357_dp, 134.0_dp, 133.920537334_dp, 0.000003300_dp, 135.0_dp, 134.925184354_dp, 0.000002834_dp, 136.0_dp, 135.930749009_dp, 0.000006258_dp, 137.0_dp, 136.935522519_dp, 0.000056000_dp, 138.0_dp, 137.941331_dp, 0.000322_dp, 139.0_dp, 138.946269_dp, 0.000429_dp, 140.0_dp, 139.952345_dp, 0.000644_dp, 141.0_dp, 140.957552_dp, 0.000537_dp, 142.0_dp, 141.963918_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Sc_naw | = | naw_type(29, transpose(reshape([35.0_dp, 35.029093_dp, 0.000429_dp, 36.0_dp, 36.017338_dp, 0.000322_dp, 37.0_dp, 37.004058_dp, 0.000322_dp, 38.0_dp, 37.995438_dp, 0.000215_dp, 39.0_dp, 38.984784953_dp, 0.000025765_dp, 40.0_dp, 39.977967275_dp, 0.000003036_dp, 41.0_dp, 40.969251163_dp, 0.000000083_dp, 42.0_dp, 41.965516686_dp, 0.000000165_dp, 43.0_dp, 42.961150425_dp, 0.000001999_dp, 44.0_dp, 43.959402818_dp, 0.000001884_dp, 45.0_dp, 44.955907051_dp, 0.000000712_dp, 46.0_dp, 45.955167034_dp, 0.000000720_dp, 47.0_dp, 46.952402444_dp, 0.000002072_dp, 48.0_dp, 47.952222903_dp, 0.000005313_dp, 49.0_dp, 48.950013159_dp, 0.000002434_dp, 50.0_dp, 49.952187437_dp, 0.000002700_dp, 51.0_dp, 50.953568838_dp, 0.000002700_dp, 52.0_dp, 51.956496170_dp, 0.000003300_dp, 53.0_dp, 52.958379173_dp, 0.000019000_dp, 54.0_dp, 53.963029359_dp, 0.000015000_dp, 55.0_dp, 54.966889637_dp, 0.000067000_dp, 56.0_dp, 55.972607611_dp, 0.000278761_dp, 57.0_dp, 56.977048000_dp, 0.000193000_dp, 58.0_dp, 57.983382000_dp, 0.000204000_dp, 59.0_dp, 58.988374000_dp, 0.000268000_dp, 60.0_dp, 59.995115_dp, 0.000537_dp, 61.0_dp, 61.000537_dp, 0.000644_dp, 62.0_dp, 62.007848_dp, 0.000644_dp, 63.0_dp, 63.014031_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Se_naw | = | naw_type(33, transpose(reshape([63.0_dp, 62.981911_dp, 0.000537_dp, 64.0_dp, 63.971165_dp, 0.000537_dp, 65.0_dp, 64.964552_dp, 0.000322_dp, 66.0_dp, 65.955276_dp, 0.000215_dp, 67.0_dp, 66.949994000_dp, 0.000072000_dp, 68.0_dp, 67.941825236_dp, 0.000000532_dp, 69.0_dp, 68.939414845_dp, 0.000001599_dp, 70.0_dp, 69.933515521_dp, 0.000001700_dp, 71.0_dp, 70.932209431_dp, 0.000003000_dp, 72.0_dp, 71.927140506_dp, 0.000002100_dp, 73.0_dp, 72.926754881_dp, 0.000007969_dp, 74.0_dp, 73.922475933_dp, 0.000000015_dp, 75.0_dp, 74.922522870_dp, 0.000000078_dp, 76.0_dp, 75.919213702_dp, 0.000000017_dp, 77.0_dp, 76.919914150_dp, 0.000000067_dp, 78.0_dp, 77.917309244_dp, 0.000000191_dp, 79.0_dp, 78.918499252_dp, 0.000000238_dp, 80.0_dp, 79.916521761_dp, 0.000001016_dp, 81.0_dp, 80.917993019_dp, 0.000001049_dp, 82.0_dp, 81.916699531_dp, 0.000000500_dp, 83.0_dp, 82.919118604_dp, 0.000003259_dp, 84.0_dp, 83.918466761_dp, 0.000002105_dp, 85.0_dp, 84.922260758_dp, 0.000002804_dp, 86.0_dp, 85.924311732_dp, 0.000002705_dp, 87.0_dp, 86.928688616_dp, 0.000002405_dp, 88.0_dp, 87.931417490_dp, 0.000003604_dp, 89.0_dp, 88.936669058_dp, 0.000004003_dp, 90.0_dp, 89.940096000_dp, 0.000354000_dp, 91.0_dp, 90.945700000_dp, 0.000465000_dp, 92.0_dp, 91.949840_dp, 0.000429_dp, 93.0_dp, 92.956135_dp, 0.000429_dp, 94.0_dp, 93.960490_dp, 0.000537_dp, 95.0_dp, 94.967300_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Sg_naw | = | naw_type(16, transpose(reshape([258.0_dp, 258.113040_dp, 0.000443_dp, 259.0_dp, 259.114353_dp, 0.000194_dp, 260.0_dp, 260.114383435_dp, 0.000022045_dp, 261.0_dp, 261.115948135_dp, 0.000019853_dp, 262.0_dp, 262.116338978_dp, 0.000023797_dp, 263.0_dp, 263.118299_dp, 0.000101_dp, 264.0_dp, 264.118930_dp, 0.000304_dp, 265.0_dp, 265.121089_dp, 0.000149_dp, 266.0_dp, 266.121973_dp, 0.000263_dp, 267.0_dp, 267.124323_dp, 0.000281_dp, 268.0_dp, 268.125389_dp, 0.000504_dp, 269.0_dp, 269.128495_dp, 0.000395_dp, 270.0_dp, 270.130362_dp, 0.000492_dp, 271.0_dp, 271.133782_dp, 0.000634_dp, 272.0_dp, 272.135825_dp, 0.000743_dp, 273.0_dp, 273.139475_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Si_naw | = | naw_type(24, transpose(reshape([22.0_dp, 22.036114_dp, 0.000537_dp, 23.0_dp, 23.025711_dp, 0.000537_dp, 24.0_dp, 24.011535430_dp, 0.000020904_dp, 25.0_dp, 25.004108798_dp, 0.000010735_dp, 26.0_dp, 25.992333818_dp, 0.000000115_dp, 27.0_dp, 26.986704687_dp, 0.000000115_dp, 28.0_dp, 27.97692653442_dp, 0.00000000055_dp, 29.0_dp, 28.97649466434_dp, 0.00000000060_dp, 30.0_dp, 29.973770137_dp, 0.000000023_dp, 31.0_dp, 30.975363196_dp, 0.000000046_dp, 32.0_dp, 31.974151538_dp, 0.000000320_dp, 33.0_dp, 32.977976964_dp, 0.000000750_dp, 34.0_dp, 33.978538045_dp, 0.000000860_dp, 35.0_dp, 34.984550111_dp, 0.000038494_dp, 36.0_dp, 35.986649271_dp, 0.000077077_dp, 37.0_dp, 36.992945191_dp, 0.000122179_dp, 38.0_dp, 37.995523000_dp, 0.000112500_dp, 39.0_dp, 39.002491000_dp, 0.000145500_dp, 40.0_dp, 40.006083641_dp, 0.000130962_dp, 41.0_dp, 41.014171_dp, 0.000322_dp, 42.0_dp, 42.018078_dp, 0.000322_dp, 43.0_dp, 43.026119_dp, 0.000429_dp, 44.0_dp, 44.031466_dp, 0.000537_dp, 45.0_dp, 45.039818_dp, 0.000644_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Sm_naw | = | naw_type(41, transpose(reshape([128.0_dp, 127.957971_dp, 0.000537_dp, 129.0_dp, 128.954557_dp, 0.000537_dp, 130.0_dp, 129.948792_dp, 0.000429_dp, 131.0_dp, 130.946022_dp, 0.000429_dp, 132.0_dp, 131.940805_dp, 0.000322_dp, 133.0_dp, 132.938560_dp, 0.000320_dp, 134.0_dp, 133.934110_dp, 0.000210_dp, 135.0_dp, 134.932520000_dp, 0.000166000_dp, 136.0_dp, 135.928275553_dp, 0.000013416_dp, 137.0_dp, 136.927007959_dp, 0.000030718_dp, 138.0_dp, 137.923243988_dp, 0.000012686_dp, 139.0_dp, 138.922296631_dp, 0.000011684_dp, 140.0_dp, 139.918994714_dp, 0.000013416_dp, 141.0_dp, 140.918481545_dp, 0.000009162_dp, 142.0_dp, 141.915209415_dp, 0.000002002_dp, 143.0_dp, 142.914634848_dp, 0.000002951_dp, 144.0_dp, 143.912006285_dp, 0.000001566_dp, 145.0_dp, 144.913417157_dp, 0.000001594_dp, 146.0_dp, 145.913046835_dp, 0.000003269_dp, 147.0_dp, 146.914904401_dp, 0.000001354_dp, 148.0_dp, 147.914829233_dp, 0.000001337_dp, 149.0_dp, 148.917191211_dp, 0.000001241_dp, 150.0_dp, 149.917281993_dp, 0.000001193_dp, 151.0_dp, 150.919938859_dp, 0.000001191_dp, 152.0_dp, 151.919738646_dp, 0.000001090_dp, 153.0_dp, 152.922103576_dp, 0.000001100_dp, 154.0_dp, 153.922215756_dp, 0.000001400_dp, 155.0_dp, 154.924646645_dp, 0.000001429_dp, 156.0_dp, 155.925538191_dp, 0.000009148_dp, 157.0_dp, 156.928418598_dp, 0.000004759_dp, 158.0_dp, 157.929949262_dp, 0.000005133_dp, 159.0_dp, 158.933217130_dp, 0.000006370_dp, 160.0_dp, 159.935337032_dp, 0.000002100_dp, 161.0_dp, 160.939160062_dp, 0.000007318_dp, 162.0_dp, 161.941621687_dp, 0.000003782_dp, 163.0_dp, 162.945679085_dp, 0.000007900_dp, 164.0_dp, 163.948550061_dp, 0.000004400_dp, 165.0_dp, 164.953290_dp, 0.000429_dp, 166.0_dp, 165.956575_dp, 0.000429_dp, 167.0_dp, 166.962072_dp, 0.000537_dp, 168.0_dp, 167.966033_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Sn_naw | = | naw_type(42, transpose(reshape([99.0_dp, 98.948495_dp, 0.000625_dp, 100.0_dp, 99.938648944_dp, 0.000257661_dp, 101.0_dp, 100.935259252_dp, 0.000322068_dp, 102.0_dp, 101.930289525_dp, 0.000107466_dp, 103.0_dp, 102.927973_dp, 0.000108_dp, 104.0_dp, 103.923105195_dp, 0.000006167_dp, 105.0_dp, 104.921268421_dp, 0.000004263_dp, 106.0_dp, 105.916957394_dp, 0.000005465_dp, 107.0_dp, 106.915713649_dp, 0.000005700_dp, 108.0_dp, 107.911894290_dp, 0.000005778_dp, 109.0_dp, 108.911292857_dp, 0.000008533_dp, 110.0_dp, 109.907844835_dp, 0.000014790_dp, 111.0_dp, 110.907741143_dp, 0.000005728_dp, 112.0_dp, 111.904824894_dp, 0.000000315_dp, 113.0_dp, 112.905175857_dp, 0.000001690_dp, 114.0_dp, 113.902780130_dp, 0.000000031_dp, 115.0_dp, 114.903344695_dp, 0.000000016_dp, 116.0_dp, 115.901742825_dp, 0.000000103_dp, 117.0_dp, 116.902954036_dp, 0.000000518_dp, 118.0_dp, 117.901606630_dp, 0.000000536_dp, 119.0_dp, 118.903311266_dp, 0.000000778_dp, 120.0_dp, 119.902202557_dp, 0.000000987_dp, 121.0_dp, 120.904243488_dp, 0.000001050_dp, 122.0_dp, 121.903445494_dp, 0.000002627_dp, 123.0_dp, 122.905727065_dp, 0.000002661_dp, 124.0_dp, 123.905279619_dp, 0.000001410_dp, 125.0_dp, 124.907789370_dp, 0.000001426_dp, 126.0_dp, 125.907658958_dp, 0.000011473_dp, 127.0_dp, 126.910391726_dp, 0.000009904_dp, 128.0_dp, 127.910507828_dp, 0.000018982_dp, 129.0_dp, 128.913482440_dp, 0.000018540_dp, 130.0_dp, 129.913974531_dp, 0.000002010_dp, 131.0_dp, 130.917053067_dp, 0.000003887_dp, 132.0_dp, 131.917823898_dp, 0.000002121_dp, 133.0_dp, 132.923913753_dp, 0.000002043_dp, 134.0_dp, 133.928680430_dp, 0.000003400_dp, 135.0_dp, 134.934908603_dp, 0.000003300_dp, 136.0_dp, 135.939699_dp, 0.000215_dp, 137.0_dp, 136.946162_dp, 0.000322_dp, 138.0_dp, 137.951143_dp, 0.000429_dp, 139.0_dp, 138.957799_dp, 0.000429_dp, 140.0_dp, 139.962973_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Sr_naw | = | naw_type(35, transpose(reshape([73.0_dp, 72.965700_dp, 0.000430_dp, 74.0_dp, 73.956170_dp, 0.000107_dp, 75.0_dp, 74.949952767_dp, 0.000236183_dp, 76.0_dp, 75.941762760_dp, 0.000037000_dp, 77.0_dp, 76.937945454_dp, 0.000008500_dp, 78.0_dp, 77.932179979_dp, 0.000008000_dp, 79.0_dp, 78.929704692_dp, 0.000007967_dp, 80.0_dp, 79.924517538_dp, 0.000003718_dp, 81.0_dp, 80.923211393_dp, 0.000003358_dp, 82.0_dp, 81.918399845_dp, 0.000006432_dp, 83.0_dp, 82.917554372_dp, 0.000007336_dp, 84.0_dp, 83.913419118_dp, 0.000001334_dp, 85.0_dp, 84.912932041_dp, 0.000003020_dp, 86.0_dp, 85.90926072473_dp, 0.00000000563_dp, 87.0_dp, 86.90887749454_dp, 0.00000000550_dp, 88.0_dp, 87.905612253_dp, 0.000000006_dp, 89.0_dp, 88.907450808_dp, 0.000000098_dp, 90.0_dp, 89.907727870_dp, 0.000001555_dp, 91.0_dp, 90.910195942_dp, 0.000005853_dp, 92.0_dp, 91.911038222_dp, 0.000003675_dp, 93.0_dp, 92.914024314_dp, 0.000008109_dp, 94.0_dp, 93.915355641_dp, 0.000001785_dp, 95.0_dp, 94.919358282_dp, 0.000006237_dp, 96.0_dp, 95.921719045_dp, 0.000009089_dp, 97.0_dp, 96.926375621_dp, 0.000003633_dp, 98.0_dp, 97.928692636_dp, 0.000003463_dp, 99.0_dp, 98.932883604_dp, 0.000005085_dp, 100.0_dp, 99.935783270_dp, 0.000007426_dp, 101.0_dp, 100.940606264_dp, 0.000009103_dp, 102.0_dp, 101.944004679_dp, 0.000072000_dp, 103.0_dp, 102.949243_dp, 0.000215_dp, 104.0_dp, 103.953022_dp, 0.000322_dp, 105.0_dp, 104.959001_dp, 0.000537_dp, 106.0_dp, 105.963177_dp, 0.000644_dp, 107.0_dp, 106.969672_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ta_naw | = | naw_type(40, transpose(reshape([155.0_dp, 154.974248_dp, 0.000322_dp, 156.0_dp, 155.972087_dp, 0.000322_dp, 157.0_dp, 156.968227445_dp, 0.000161087_dp, 158.0_dp, 157.966593_dp, 0.000215_dp, 159.0_dp, 158.963028046_dp, 0.000021137_dp, 160.0_dp, 159.961541678_dp, 0.000058310_dp, 161.0_dp, 160.958369489_dp, 0.000026174_dp, 162.0_dp, 161.957292907_dp, 0.000067979_dp, 163.0_dp, 162.954337194_dp, 0.000040860_dp, 164.0_dp, 163.953534000_dp, 0.000030000_dp, 165.0_dp, 164.950780287_dp, 0.000014571_dp, 166.0_dp, 165.950512000_dp, 0.000030000_dp, 167.0_dp, 166.948093000_dp, 0.000030000_dp, 168.0_dp, 167.948047000_dp, 0.000030000_dp, 169.0_dp, 168.946011000_dp, 0.000030000_dp, 170.0_dp, 169.946175000_dp, 0.000030000_dp, 171.0_dp, 170.944476000_dp, 0.000030000_dp, 172.0_dp, 171.944895000_dp, 0.000030000_dp, 173.0_dp, 172.943750000_dp, 0.000030000_dp, 174.0_dp, 173.944454000_dp, 0.000030000_dp, 175.0_dp, 174.943737000_dp, 0.000030000_dp, 176.0_dp, 175.944857000_dp, 0.000033000_dp, 177.0_dp, 176.944481940_dp, 0.000003558_dp, 178.0_dp, 177.945680_dp, 0.000056_dp, 179.0_dp, 178.945939050_dp, 0.000001574_dp, 180.0_dp, 179.947467589_dp, 0.000002219_dp, 181.0_dp, 180.947998528_dp, 0.000001692_dp, 182.0_dp, 181.950154612_dp, 0.000001693_dp, 183.0_dp, 182.951375380_dp, 0.000001707_dp, 184.0_dp, 183.954009958_dp, 0.000027923_dp, 185.0_dp, 184.955561317_dp, 0.000015202_dp, 186.0_dp, 185.958553036_dp, 0.000064425_dp, 187.0_dp, 186.960391000_dp, 0.000060000_dp, 188.0_dp, 187.963596_dp, 0.000215_dp, 189.0_dp, 188.965690_dp, 0.000215_dp, 190.0_dp, 189.969168_dp, 0.000215_dp, 191.0_dp, 190.971530_dp, 0.000322_dp, 192.0_dp, 191.975201_dp, 0.000429_dp, 193.0_dp, 192.977660_dp, 0.000429_dp, 194.0_dp, 193.981610_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Tb_naw | = | naw_type(40, transpose(reshape([135.0_dp, 134.964516_dp, 0.000429_dp, 136.0_dp, 135.961460_dp, 0.000537_dp, 137.0_dp, 136.956020_dp, 0.000430_dp, 138.0_dp, 137.953193_dp, 0.000322_dp, 139.0_dp, 138.948330_dp, 0.000320_dp, 140.0_dp, 139.945805048_dp, 0.000859359_dp, 141.0_dp, 140.941448000_dp, 0.000113000_dp, 142.0_dp, 141.939280858_dp, 0.000752079_dp, 143.0_dp, 142.935137332_dp, 0.000055000_dp, 144.0_dp, 143.933045000_dp, 0.000030000_dp, 145.0_dp, 144.928717001_dp, 0.000119051_dp, 146.0_dp, 145.927252739_dp, 0.000048159_dp, 147.0_dp, 146.924054620_dp, 0.000008691_dp, 148.0_dp, 147.924275476_dp, 0.000013379_dp, 149.0_dp, 148.923253792_dp, 0.000003895_dp, 150.0_dp, 149.923664799_dp, 0.000007912_dp, 151.0_dp, 150.923108970_dp, 0.000004395_dp, 152.0_dp, 151.924081855_dp, 0.000042955_dp, 153.0_dp, 152.923441694_dp, 0.000004237_dp, 154.0_dp, 153.924683681_dp, 0.000048641_dp, 155.0_dp, 154.923509511_dp, 0.000010552_dp, 156.0_dp, 155.924754209_dp, 0.000004044_dp, 157.0_dp, 156.924031888_dp, 0.000001092_dp, 158.0_dp, 157.925419942_dp, 0.000001360_dp, 159.0_dp, 158.925353707_dp, 0.000001184_dp, 160.0_dp, 159.927174553_dp, 0.000001191_dp, 161.0_dp, 160.927576806_dp, 0.000001308_dp, 162.0_dp, 161.929275400_dp, 0.000002200_dp, 163.0_dp, 162.930653609_dp, 0.000004358_dp, 164.0_dp, 163.933327561_dp, 0.000002000_dp, 165.0_dp, 164.934955198_dp, 0.000001654_dp, 166.0_dp, 165.937939727_dp, 0.000001570_dp, 167.0_dp, 166.940007046_dp, 0.000002071_dp, 168.0_dp, 167.943337074_dp, 0.000004500_dp, 169.0_dp, 168.945807_dp, 0.000322_dp, 170.0_dp, 169.949855_dp, 0.000322_dp, 171.0_dp, 170.953011_dp, 0.000429_dp, 172.0_dp, 171.957391_dp, 0.000537_dp, 173.0_dp, 172.960805_dp, 0.000537_dp, 174.0_dp, 173.965679_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Tc_naw | = | naw_type(40, transpose(reshape([83.0_dp, 82.966377_dp, 0.000537_dp, 84.0_dp, 83.959527_dp, 0.000429_dp, 85.0_dp, 84.950778_dp, 0.000429_dp, 86.0_dp, 85.944637_dp, 0.000322_dp, 87.0_dp, 86.938067185_dp, 0.000004500_dp, 88.0_dp, 87.933794211_dp, 0.000004400_dp, 89.0_dp, 88.927648649_dp, 0.000004100_dp, 90.0_dp, 89.924073919_dp, 0.000001100_dp, 91.0_dp, 90.918424972_dp, 0.000002536_dp, 92.0_dp, 91.915269777_dp, 0.000003330_dp, 93.0_dp, 92.910245147_dp, 0.000001086_dp, 94.0_dp, 93.909652319_dp, 0.000004370_dp, 95.0_dp, 94.907652281_dp, 0.000005453_dp, 96.0_dp, 95.907866675_dp, 0.000005524_dp, 97.0_dp, 96.906360720_dp, 0.000004420_dp, 98.0_dp, 97.907211206_dp, 0.000003628_dp, 99.0_dp, 98.906249681_dp, 0.000000974_dp, 100.0_dp, 99.907652715_dp, 0.000001450_dp, 101.0_dp, 100.907305271_dp, 0.000025768_dp, 102.0_dp, 101.909207239_dp, 0.000009840_dp, 103.0_dp, 102.909173960_dp, 0.000010531_dp, 104.0_dp, 103.911433718_dp, 0.000026716_dp, 105.0_dp, 104.911662024_dp, 0.000037856_dp, 106.0_dp, 105.914356674_dp, 0.000013150_dp, 107.0_dp, 106.915458437_dp, 0.000009310_dp, 108.0_dp, 107.918493493_dp, 0.000009413_dp, 109.0_dp, 108.920254107_dp, 0.000010380_dp, 110.0_dp, 109.923741263_dp, 0.000010195_dp, 111.0_dp, 110.925898966_dp, 0.000011359_dp, 112.0_dp, 111.929941658_dp, 0.000005920_dp, 113.0_dp, 112.932569032_dp, 0.000003600_dp, 114.0_dp, 113.937090000_dp, 0.000465000_dp, 115.0_dp, 114.940100_dp, 0.000210_dp, 116.0_dp, 115.945020_dp, 0.000320_dp, 117.0_dp, 116.948320_dp, 0.000429_dp, 118.0_dp, 117.953526_dp, 0.000429_dp, 119.0_dp, 118.956876_dp, 0.000537_dp, 120.0_dp, 119.962426_dp, 0.000537_dp, 121.0_dp, 120.966140_dp, 0.000537_dp, 122.0_dp, 121.971760_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Te_naw | = | naw_type(42, transpose(reshape([104.0_dp, 103.946723408_dp, 0.000340967_dp, 105.0_dp, 104.943304516_dp, 0.000322084_dp, 106.0_dp, 105.937498521_dp, 0.000107934_dp, 107.0_dp, 106.934882_dp, 0.000108_dp, 108.0_dp, 107.929380469_dp, 0.000005808_dp, 109.0_dp, 108.927304532_dp, 0.000004704_dp, 110.0_dp, 109.922458102_dp, 0.000007058_dp, 111.0_dp, 110.921000587_dp, 0.000006900_dp, 112.0_dp, 111.916727848_dp, 0.000009000_dp, 113.0_dp, 112.915891000_dp, 0.000030000_dp, 114.0_dp, 113.912087820_dp, 0.000026224_dp, 115.0_dp, 114.911902000_dp, 0.000030000_dp, 116.0_dp, 115.908465558_dp, 0.000025986_dp, 117.0_dp, 116.908646227_dp, 0.000014444_dp, 118.0_dp, 117.905860104_dp, 0.000019652_dp, 119.0_dp, 118.906405699_dp, 0.000007813_dp, 120.0_dp, 119.904065779_dp, 0.000001880_dp, 121.0_dp, 120.904945065_dp, 0.000027734_dp, 122.0_dp, 121.903044708_dp, 0.000001456_dp, 123.0_dp, 122.904271022_dp, 0.000001454_dp, 124.0_dp, 123.902818341_dp, 0.000001451_dp, 125.0_dp, 124.904431178_dp, 0.000001451_dp, 126.0_dp, 125.903312144_dp, 0.000001453_dp, 127.0_dp, 126.905226993_dp, 0.000001465_dp, 128.0_dp, 127.904461237_dp, 0.000000758_dp, 129.0_dp, 128.906596419_dp, 0.000000763_dp, 130.0_dp, 129.906222745_dp, 0.000000011_dp, 131.0_dp, 130.908522210_dp, 0.000000065_dp, 132.0_dp, 131.908546713_dp, 0.000003742_dp, 133.0_dp, 132.910963330_dp, 0.000002218_dp, 134.0_dp, 133.911396376_dp, 0.000002948_dp, 135.0_dp, 134.916554715_dp, 0.000001848_dp, 136.0_dp, 135.920101180_dp, 0.000002448_dp, 137.0_dp, 136.925599354_dp, 0.000002254_dp, 138.0_dp, 137.929472452_dp, 0.000004065_dp, 139.0_dp, 138.935367191_dp, 0.000003800_dp, 140.0_dp, 139.939487057_dp, 0.000015434_dp, 141.0_dp, 140.945604_dp, 0.000429_dp, 142.0_dp, 141.950027_dp, 0.000537_dp, 143.0_dp, 142.956489_dp, 0.000537_dp, 144.0_dp, 143.961116_dp, 0.000322_dp, 145.0_dp, 144.967783_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Th_naw | = | naw_type(32, transpose(reshape([208.0_dp, 208.017915348_dp, 0.000034208_dp, 209.0_dp, 209.017601_dp, 0.000111_dp, 210.0_dp, 210.015093515_dp, 0.000020299_dp, 211.0_dp, 211.014896923_dp, 0.000092399_dp, 212.0_dp, 212.013001570_dp, 0.000010852_dp, 213.0_dp, 213.013011470_dp, 0.000009895_dp, 214.0_dp, 214.011481480_dp, 0.000011445_dp, 215.0_dp, 215.011724640_dp, 0.000006800_dp, 216.0_dp, 216.011055933_dp, 0.000011920_dp, 217.0_dp, 217.013103443_dp, 0.000011394_dp, 218.0_dp, 218.013276248_dp, 0.000011289_dp, 219.0_dp, 219.015526432_dp, 0.000060611_dp, 220.0_dp, 220.015769866_dp, 0.000014693_dp, 221.0_dp, 221.018185757_dp, 0.000008582_dp, 222.0_dp, 222.018468220_dp, 0.000010966_dp, 223.0_dp, 223.020811083_dp, 0.000008527_dp, 224.0_dp, 224.021466137_dp, 0.000010310_dp, 225.0_dp, 225.023950975_dp, 0.000005467_dp, 226.0_dp, 226.024903699_dp, 0.000004810_dp, 227.0_dp, 227.027702546_dp, 0.000002241_dp, 228.0_dp, 228.028739741_dp, 0.000001938_dp, 229.0_dp, 229.031761357_dp, 0.000002581_dp, 230.0_dp, 230.033132267_dp, 0.000001297_dp, 231.0_dp, 231.036302764_dp, 0.000001306_dp, 232.0_dp, 232.038053606_dp, 0.000001525_dp, 233.0_dp, 233.041580126_dp, 0.000001528_dp, 234.0_dp, 234.043599801_dp, 0.000002779_dp, 235.0_dp, 235.047255000_dp, 0.000014000_dp, 236.0_dp, 236.049657000_dp, 0.000015000_dp, 237.0_dp, 237.053629000_dp, 0.000017000_dp, 238.0_dp, 238.056388_dp, 0.000304_dp, 239.0_dp, 239.060655_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ti_naw | = | naw_type(29, transpose(reshape([37.0_dp, 37.027021_dp, 0.000429_dp, 38.0_dp, 38.012206_dp, 0.000322_dp, 39.0_dp, 39.002684_dp, 0.000215_dp, 40.0_dp, 39.990345146_dp, 0.000073262_dp, 41.0_dp, 40.983148000_dp, 0.000030000_dp, 42.0_dp, 41.973049369_dp, 0.000000289_dp, 43.0_dp, 42.968528420_dp, 0.000006139_dp, 44.0_dp, 43.959689936_dp, 0.000000751_dp, 45.0_dp, 44.958120758_dp, 0.000000897_dp, 46.0_dp, 45.952626356_dp, 0.000000097_dp, 47.0_dp, 46.951757491_dp, 0.000000085_dp, 48.0_dp, 47.947940677_dp, 0.000000079_dp, 49.0_dp, 48.947864391_dp, 0.000000084_dp, 50.0_dp, 49.944785622_dp, 0.000000088_dp, 51.0_dp, 50.946609468_dp, 0.000000519_dp, 52.0_dp, 51.946883509_dp, 0.000002948_dp, 53.0_dp, 52.949670714_dp, 0.000003100_dp, 54.0_dp, 53.950892000_dp, 0.000017000_dp, 55.0_dp, 54.955091000_dp, 0.000031000_dp, 56.0_dp, 55.957677675_dp, 0.000107569_dp, 57.0_dp, 56.963068098_dp, 0.000221020_dp, 58.0_dp, 57.966808519_dp, 0.000196823_dp, 59.0_dp, 58.972217_dp, 0.000322_dp, 60.0_dp, 59.976275000_dp, 0.000258000_dp, 61.0_dp, 60.982426_dp, 0.000322_dp, 62.0_dp, 61.986903_dp, 0.000429_dp, 63.0_dp, 62.993709_dp, 0.000537_dp, 64.0_dp, 63.998411_dp, 0.000644_dp, 65.0_dp, 65.005593_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Tl_naw | = | naw_type(43, transpose(reshape([176.0_dp, 176.000627731_dp, 0.000089166_dp, 177.0_dp, 176.996414252_dp, 0.000023218_dp, 178.0_dp, 177.995047_dp, 0.000110_dp, 179.0_dp, 178.991122185_dp, 0.000041495_dp, 180.0_dp, 179.989918950_dp, 0.000075058_dp, 181.0_dp, 180.986259978_dp, 0.000009771_dp, 182.0_dp, 181.985692649_dp, 0.000012856_dp, 183.0_dp, 182.982192843_dp, 0.000010017_dp, 184.0_dp, 183.981874973_dp, 0.000010747_dp, 185.0_dp, 184.978789189_dp, 0.000022194_dp, 186.0_dp, 185.978654787_dp, 0.000022276_dp, 187.0_dp, 186.975904740_dp, 0.000008640_dp, 188.0_dp, 187.976020886_dp, 0.000032103_dp, 189.0_dp, 188.973573525_dp, 0.000008983_dp, 190.0_dp, 189.973841771_dp, 0.000007784_dp, 191.0_dp, 190.971784093_dp, 0.000007889_dp, 192.0_dp, 191.972225000_dp, 0.000034000_dp, 193.0_dp, 192.970501994_dp, 0.000007200_dp, 194.0_dp, 193.971081408_dp, 0.000015000_dp, 195.0_dp, 194.969774052_dp, 0.000011944_dp, 196.0_dp, 195.970481189_dp, 0.000013000_dp, 197.0_dp, 196.969560492_dp, 0.000014573_dp, 198.0_dp, 197.970446669_dp, 0.000008100_dp, 199.0_dp, 198.969877000_dp, 0.000030000_dp, 200.0_dp, 199.970963608_dp, 0.000006182_dp, 201.0_dp, 200.970820235_dp, 0.000015228_dp, 202.0_dp, 201.972108874_dp, 0.000001972_dp, 203.0_dp, 202.972344098_dp, 0.000001257_dp, 204.0_dp, 203.973863420_dp, 0.000001238_dp, 205.0_dp, 204.974427318_dp, 0.000001330_dp, 206.0_dp, 205.976110108_dp, 0.000001380_dp, 207.0_dp, 206.977418605_dp, 0.000005839_dp, 208.0_dp, 207.982018006_dp, 0.000001989_dp, 209.0_dp, 208.985351713_dp, 0.000006559_dp, 210.0_dp, 209.990072942_dp, 0.000012456_dp, 211.0_dp, 210.993475000_dp, 0.000045000_dp, 212.0_dp, 211.998335_dp, 0.000215_dp, 213.0_dp, 213.001915000_dp, 0.000029000_dp, 214.0_dp, 214.006940_dp, 0.000210_dp, 215.0_dp, 215.010768_dp, 0.000322_dp, 216.0_dp, 216.015964_dp, 0.000322_dp, 217.0_dp, 217.020032_dp, 0.000429_dp, 218.0_dp, 218.025454_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Tm_naw | = | naw_type(39, transpose(reshape([144.0_dp, 143.976211_dp, 0.000429_dp, 145.0_dp, 144.970389_dp, 0.000210_dp, 146.0_dp, 145.966661_dp, 0.000215_dp, 147.0_dp, 146.961379887_dp, 0.000007341_dp, 148.0_dp, 147.958384026_dp, 0.000011000_dp, 149.0_dp, 148.952828_dp, 0.000215_dp, 150.0_dp, 149.950090_dp, 0.000210_dp, 151.0_dp, 150.945494433_dp, 0.000020799_dp, 152.0_dp, 151.944476000_dp, 0.000058000_dp, 153.0_dp, 152.942058023_dp, 0.000012860_dp, 154.0_dp, 153.941570062_dp, 0.000015471_dp, 155.0_dp, 154.939209576_dp, 0.000010651_dp, 156.0_dp, 155.938985746_dp, 0.000015328_dp, 157.0_dp, 156.936973000_dp, 0.000030000_dp, 158.0_dp, 157.936979525_dp, 0.000027074_dp, 159.0_dp, 158.934975000_dp, 0.000030000_dp, 160.0_dp, 159.935264177_dp, 0.000035089_dp, 161.0_dp, 160.933549000_dp, 0.000030000_dp, 162.0_dp, 161.934001211_dp, 0.000027974_dp, 163.0_dp, 162.932658282_dp, 0.000005920_dp, 164.0_dp, 163.933538019_dp, 0.000026845_dp, 165.0_dp, 164.932441843_dp, 0.000001779_dp, 166.0_dp, 165.933562136_dp, 0.000012401_dp, 167.0_dp, 166.932857206_dp, 0.000001350_dp, 168.0_dp, 167.934178457_dp, 0.000001800_dp, 169.0_dp, 168.934218956_dp, 0.000000792_dp, 170.0_dp, 169.935807093_dp, 0.000000785_dp, 171.0_dp, 170.936435162_dp, 0.000001043_dp, 172.0_dp, 171.938406959_dp, 0.000005884_dp, 173.0_dp, 172.939606630_dp, 0.000004723_dp, 174.0_dp, 173.942174061_dp, 0.000048010_dp, 175.0_dp, 174.943842310_dp, 0.000053677_dp, 176.0_dp, 175.946997707_dp, 0.000107354_dp, 177.0_dp, 176.948932_dp, 0.000215_dp, 178.0_dp, 177.952506_dp, 0.000322_dp, 179.0_dp, 178.955018_dp, 0.000429_dp, 180.0_dp, 179.959023_dp, 0.000429_dp, 181.0_dp, 180.961954_dp, 0.000537_dp, 182.0_dp, 181.966194_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Ts_naw | = | naw_type(4, transpose(reshape([291.0_dp, 291.205748_dp, 0.000640_dp, 292.0_dp, 292.207861_dp, 0.000718_dp, 293.0_dp, 293.208727_dp, 0.000835_dp, 294.0_dp, 294.210840_dp, 0.000637_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | U_naw | = | naw_type(29, transpose(reshape([215.0_dp, 215.026719774_dp, 0.000111794_dp, 216.0_dp, 216.024762829_dp, 0.000030158_dp, 217.0_dp, 217.024660_dp, 0.000086_dp, 218.0_dp, 218.023504877_dp, 0.000014722_dp, 219.0_dp, 219.025009233_dp, 0.000014319_dp, 220.0_dp, 220.024706_dp, 0.000108_dp, 221.0_dp, 221.026323297_dp, 0.000077440_dp, 222.0_dp, 222.026057957_dp, 0.000055817_dp, 223.0_dp, 223.027960754_dp, 0.000063396_dp, 224.0_dp, 224.027635913_dp, 0.000016383_dp, 225.0_dp, 225.029385050_dp, 0.000010664_dp, 226.0_dp, 226.029338669_dp, 0.000011884_dp, 227.0_dp, 227.031181124_dp, 0.000009136_dp, 228.0_dp, 228.031368959_dp, 0.000014465_dp, 229.0_dp, 229.033505976_dp, 0.000006374_dp, 230.0_dp, 230.033940114_dp, 0.000004841_dp, 231.0_dp, 231.036292180_dp, 0.000002866_dp, 232.0_dp, 232.037154765_dp, 0.000001941_dp, 233.0_dp, 233.039634294_dp, 0.000002420_dp, 234.0_dp, 234.040950296_dp, 0.000001212_dp, 235.0_dp, 235.043928117_dp, 0.000001198_dp, 236.0_dp, 236.045566130_dp, 0.000001193_dp, 237.0_dp, 237.048728309_dp, 0.000001290_dp, 238.0_dp, 238.050786936_dp, 0.000001601_dp, 239.0_dp, 239.054291989_dp, 0.000001612_dp, 240.0_dp, 240.056592411_dp, 0.000002740_dp, 241.0_dp, 241.060330_dp, 0.000210_dp, 242.0_dp, 242.062931_dp, 0.000215_dp, 243.0_dp, 243.067075_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | V_naw | = | naw_type(29, transpose(reshape([39.0_dp, 39.024230_dp, 0.000429_dp, 40.0_dp, 40.013387_dp, 0.000322_dp, 41.0_dp, 41.000333_dp, 0.000215_dp, 42.0_dp, 41.991820_dp, 0.000210_dp, 43.0_dp, 42.980766000_dp, 0.000046000_dp, 44.0_dp, 43.974440977_dp, 0.000007799_dp, 45.0_dp, 44.965768498_dp, 0.000000926_dp, 46.0_dp, 45.960197389_dp, 0.000000143_dp, 47.0_dp, 46.954903558_dp, 0.000000118_dp, 48.0_dp, 47.952250900_dp, 0.000001043_dp, 49.0_dp, 48.948510509_dp, 0.000000884_dp, 50.0_dp, 49.947156681_dp, 0.000000099_dp, 51.0_dp, 50.943957664_dp, 0.000000104_dp, 52.0_dp, 51.944773636_dp, 0.000000170_dp, 53.0_dp, 52.944334940_dp, 0.000003331_dp, 54.0_dp, 53.946432009_dp, 0.000012001_dp, 55.0_dp, 54.947262000_dp, 0.000029000_dp, 56.0_dp, 55.950420082_dp, 0.000188819_dp, 57.0_dp, 56.952297000_dp, 0.000091000_dp, 58.0_dp, 57.956595985_dp, 0.000102862_dp, 59.0_dp, 58.959623343_dp, 0.000147505_dp, 60.0_dp, 59.964479215_dp, 0.000195327_dp, 61.0_dp, 60.967603529_dp, 0.000252196_dp, 62.0_dp, 61.972932556_dp, 0.000283723_dp, 63.0_dp, 62.976661000_dp, 0.000365000_dp, 64.0_dp, 63.982480_dp, 0.000429_dp, 65.0_dp, 64.986999_dp, 0.000537_dp, 66.0_dp, 65.993237_dp, 0.000537_dp, 67.0_dp, 66.998128_dp, 0.000644_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | W_naw | = | naw_type(41, transpose(reshape([157.0_dp, 156.978862_dp, 0.000429_dp, 158.0_dp, 157.974565_dp, 0.000322_dp, 159.0_dp, 158.972696_dp, 0.000322_dp, 160.0_dp, 159.968513946_dp, 0.000160828_dp, 161.0_dp, 160.967249_dp, 0.000215_dp, 162.0_dp, 161.963500341_dp, 0.000018955_dp, 163.0_dp, 162.962524251_dp, 0.000062722_dp, 164.0_dp, 163.958952445_dp, 0.000010384_dp, 165.0_dp, 164.958280663_dp, 0.000027649_dp, 166.0_dp, 165.955031952_dp, 0.000010159_dp, 167.0_dp, 166.954811080_dp, 0.000020078_dp, 168.0_dp, 167.951805459_dp, 0.000014233_dp, 169.0_dp, 168.951778689_dp, 0.000016571_dp, 170.0_dp, 169.949231235_dp, 0.000014165_dp, 171.0_dp, 170.949451000_dp, 0.000030000_dp, 172.0_dp, 171.947292000_dp, 0.000030000_dp, 173.0_dp, 172.947689000_dp, 0.000030000_dp, 174.0_dp, 173.946079000_dp, 0.000030000_dp, 175.0_dp, 174.946717000_dp, 0.000030000_dp, 176.0_dp, 175.945634000_dp, 0.000030000_dp, 177.0_dp, 176.946643000_dp, 0.000030000_dp, 178.0_dp, 177.945885791_dp, 0.000016316_dp, 179.0_dp, 178.947079378_dp, 0.000015644_dp, 180.0_dp, 179.946713304_dp, 0.000001545_dp, 181.0_dp, 180.948218733_dp, 0.000001554_dp, 182.0_dp, 181.948205636_dp, 0.000000799_dp, 183.0_dp, 182.950224416_dp, 0.000000798_dp, 184.0_dp, 183.950933180_dp, 0.000000792_dp, 185.0_dp, 184.953421206_dp, 0.000000793_dp, 186.0_dp, 185.954365140_dp, 0.000001302_dp, 187.0_dp, 186.957161249_dp, 0.000001302_dp, 188.0_dp, 187.958488325_dp, 0.000003316_dp, 189.0_dp, 188.961557_dp, 0.000215_dp, 190.0_dp, 189.963103542_dp, 0.000037993_dp, 191.0_dp, 190.966531000_dp, 0.000045000_dp, 192.0_dp, 191.968202_dp, 0.000215_dp, 193.0_dp, 192.971884_dp, 0.000215_dp, 194.0_dp, 193.973795_dp, 0.000322_dp, 195.0_dp, 194.977735_dp, 0.000322_dp, 196.0_dp, 195.979882_dp, 0.000429_dp, 197.0_dp, 196.984036_dp, 0.000429_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Xe_naw | = | naw_type(43, transpose(reshape([108.0_dp, 107.954232285_dp, 0.000407406_dp, 109.0_dp, 108.950434955_dp, 0.000322178_dp, 110.0_dp, 109.944258759_dp, 0.000108415_dp, 111.0_dp, 110.941470_dp, 0.000124_dp, 112.0_dp, 111.935559068_dp, 0.000008891_dp, 113.0_dp, 112.933221663_dp, 0.000007342_dp, 114.0_dp, 113.927980329_dp, 0.000012000_dp, 115.0_dp, 114.926293943_dp, 0.000013000_dp, 116.0_dp, 115.921580955_dp, 0.000013974_dp, 117.0_dp, 116.920358758_dp, 0.000011141_dp, 118.0_dp, 117.916178678_dp, 0.000011141_dp, 119.0_dp, 118.915410641_dp, 0.000011141_dp, 120.0_dp, 119.911784267_dp, 0.000012686_dp, 121.0_dp, 120.911453012_dp, 0.000010995_dp, 122.0_dp, 121.908367655_dp, 0.000011928_dp, 123.0_dp, 122.908482235_dp, 0.000010234_dp, 124.0_dp, 123.905885174_dp, 0.000001457_dp, 125.0_dp, 124.906387640_dp, 0.000001518_dp, 126.0_dp, 125.904297422_dp, 0.000000006_dp, 127.0_dp, 126.905183636_dp, 0.000004388_dp, 128.0_dp, 127.90353075341_dp, 0.00000000558_dp, 129.0_dp, 128.90478085742_dp, 0.00000000542_dp, 130.0_dp, 129.903509346_dp, 0.000000010_dp, 131.0_dp, 130.90508412808_dp, 0.00000000549_dp, 132.0_dp, 131.90415508346_dp, 0.00000000544_dp, 133.0_dp, 132.905910748_dp, 0.000002576_dp, 134.0_dp, 133.905393030_dp, 0.000000006_dp, 135.0_dp, 134.907231441_dp, 0.000003938_dp, 136.0_dp, 135.907214474_dp, 0.000000007_dp, 137.0_dp, 136.911557771_dp, 0.000000111_dp, 138.0_dp, 137.914146268_dp, 0.000003010_dp, 139.0_dp, 138.918792200_dp, 0.000002300_dp, 140.0_dp, 139.921645814_dp, 0.000002500_dp, 141.0_dp, 140.926787181_dp, 0.000003100_dp, 142.0_dp, 141.929973095_dp, 0.000002900_dp, 143.0_dp, 142.935369550_dp, 0.000005000_dp, 144.0_dp, 143.938945076_dp, 0.000005700_dp, 145.0_dp, 144.944719631_dp, 0.000012000_dp, 146.0_dp, 145.948518245_dp, 0.000026000_dp, 147.0_dp, 146.954482_dp, 0.000215_dp, 148.0_dp, 147.958508_dp, 0.000322_dp, 149.0_dp, 148.964573_dp, 0.000322_dp, 150.0_dp, 149.968878_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Y_naw | = | naw_type(35, transpose(reshape([75.0_dp, 74.965840_dp, 0.000322_dp, 76.0_dp, 75.958937_dp, 0.000322_dp, 77.0_dp, 76.950146_dp, 0.000218_dp, 78.0_dp, 77.943990_dp, 0.000320_dp, 79.0_dp, 78.937946000_dp, 0.000086000_dp, 80.0_dp, 79.934354750_dp, 0.000006701_dp, 81.0_dp, 80.929454283_dp, 0.000005802_dp, 82.0_dp, 81.926930189_dp, 0.000005902_dp, 83.0_dp, 82.922484026_dp, 0.000020000_dp, 84.0_dp, 83.920671060_dp, 0.000004615_dp, 85.0_dp, 84.916433039_dp, 0.000020360_dp, 86.0_dp, 85.914886095_dp, 0.000015182_dp, 87.0_dp, 86.910876100_dp, 0.000001210_dp, 88.0_dp, 87.909501274_dp, 0.000001610_dp, 89.0_dp, 88.905838156_dp, 0.000000363_dp, 90.0_dp, 89.907141749_dp, 0.000000379_dp, 91.0_dp, 90.907298048_dp, 0.000001978_dp, 92.0_dp, 91.908945752_dp, 0.000009798_dp, 93.0_dp, 92.909578434_dp, 0.000011259_dp, 94.0_dp, 93.911592062_dp, 0.000006849_dp, 95.0_dp, 94.912819697_dp, 0.000007277_dp, 96.0_dp, 95.915909305_dp, 0.000006521_dp, 97.0_dp, 96.918286702_dp, 0.000007201_dp, 98.0_dp, 97.922394841_dp, 0.000008501_dp, 99.0_dp, 98.924160839_dp, 0.000007101_dp, 100.0_dp, 99.927727678_dp, 0.000012000_dp, 101.0_dp, 100.930160817_dp, 0.000007601_dp, 102.0_dp, 101.934328471_dp, 0.000004381_dp, 103.0_dp, 102.937243796_dp, 0.000012029_dp, 104.0_dp, 103.941943_dp, 0.000215_dp, 105.0_dp, 104.945711_dp, 0.000429_dp, 106.0_dp, 105.950842_dp, 0.000537_dp, 107.0_dp, 106.954943_dp, 0.000537_dp, 108.0_dp, 107.960515_dp, 0.000644_dp, 109.0_dp, 108.965131_dp, 0.000751_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Yb_naw | = | naw_type(38, transpose(reshape([148.0_dp, 147.967547_dp, 0.000429_dp, 149.0_dp, 148.964219_dp, 0.000322_dp, 150.0_dp, 149.958314_dp, 0.000322_dp, 151.0_dp, 150.955402453_dp, 0.000322591_dp, 152.0_dp, 151.950326699_dp, 0.000160718_dp, 153.0_dp, 152.949372_dp, 0.000215_dp, 154.0_dp, 153.946395696_dp, 0.000018551_dp, 155.0_dp, 154.945783216_dp, 0.000017820_dp, 156.0_dp, 155.942817096_dp, 0.000009992_dp, 157.0_dp, 156.942651368_dp, 0.000011706_dp, 158.0_dp, 157.939871202_dp, 0.000008559_dp, 159.0_dp, 158.940060257_dp, 0.000018874_dp, 160.0_dp, 159.937559210_dp, 0.000005900_dp, 161.0_dp, 160.937912384_dp, 0.000016211_dp, 162.0_dp, 161.935779342_dp, 0.000016213_dp, 163.0_dp, 162.936345406_dp, 0.000016215_dp, 164.0_dp, 163.934500743_dp, 0.000016217_dp, 165.0_dp, 164.935270241_dp, 0.000028490_dp, 166.0_dp, 165.933876439_dp, 0.000007515_dp, 167.0_dp, 166.934954069_dp, 0.000004251_dp, 168.0_dp, 167.933891297_dp, 0.000000100_dp, 169.0_dp, 168.935184208_dp, 0.000000191_dp, 170.0_dp, 169.934767242_dp, 0.000000011_dp, 171.0_dp, 170.936331515_dp, 0.000000013_dp, 172.0_dp, 171.936386654_dp, 0.000000014_dp, 173.0_dp, 172.938216211_dp, 0.000000012_dp, 174.0_dp, 173.938867545_dp, 0.000000011_dp, 175.0_dp, 174.941281907_dp, 0.000000076_dp, 176.0_dp, 175.942574706_dp, 0.000000015_dp, 177.0_dp, 176.945263846_dp, 0.000000236_dp, 178.0_dp, 177.946669400_dp, 0.000007072_dp, 179.0_dp, 178.949930_dp, 0.000215_dp, 180.0_dp, 179.951991_dp, 0.000322_dp, 181.0_dp, 180.955890_dp, 0.000320_dp, 182.0_dp, 181.958239_dp, 0.000429_dp, 183.0_dp, 182.962426_dp, 0.000429_dp, 184.0_dp, 183.965002_dp, 0.000540_dp, 185.0_dp, 184.969425_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Zn_naw | = | naw_type(33, transpose(reshape([54.0_dp, 53.993879_dp, 0.000232_dp, 55.0_dp, 54.984681_dp, 0.000429_dp, 56.0_dp, 55.972743_dp, 0.000429_dp, 57.0_dp, 56.965056_dp, 0.000215_dp, 58.0_dp, 57.954590296_dp, 0.000053678_dp, 59.0_dp, 58.949311886_dp, 0.000000814_dp, 60.0_dp, 59.941841317_dp, 0.000000588_dp, 61.0_dp, 60.939506964_dp, 0.000017068_dp, 62.0_dp, 61.934333359_dp, 0.000000660_dp, 63.0_dp, 62.933211140_dp, 0.000001674_dp, 64.0_dp, 63.929141776_dp, 0.000000690_dp, 65.0_dp, 64.929240534_dp, 0.000000693_dp, 66.0_dp, 65.926033639_dp, 0.000000798_dp, 67.0_dp, 66.927127422_dp, 0.000000810_dp, 68.0_dp, 67.924844232_dp, 0.000000835_dp, 69.0_dp, 68.926550360_dp, 0.000000853_dp, 70.0_dp, 69.925319175_dp, 0.000002058_dp, 71.0_dp, 70.927719578_dp, 0.000002849_dp, 72.0_dp, 71.926842806_dp, 0.000002300_dp, 73.0_dp, 72.929582580_dp, 0.000002000_dp, 74.0_dp, 73.929407260_dp, 0.000002700_dp, 75.0_dp, 74.932840244_dp, 0.000002100_dp, 76.0_dp, 75.933114956_dp, 0.000001562_dp, 77.0_dp, 76.936887197_dp, 0.000002117_dp, 78.0_dp, 77.938289204_dp, 0.000002086_dp, 79.0_dp, 78.942638067_dp, 0.000002388_dp, 80.0_dp, 79.944552929_dp, 0.000002774_dp, 81.0_dp, 80.950402617_dp, 0.000005400_dp, 82.0_dp, 81.954574097_dp, 0.000003300_dp, 83.0_dp, 82.961041_dp, 0.000322_dp, 84.0_dp, 83.965829_dp, 0.000429_dp, 85.0_dp, 84.973054_dp, 0.000537_dp, 86.0_dp, 85.978463_dp, 0.000537_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) | |
type(naw_type), | public, | parameter | :: | Zr_naw | = | naw_type(37, transpose(reshape([77.0_dp, 76.966076_dp, 0.000429_dp, 78.0_dp, 77.956146_dp, 0.000429_dp, 79.0_dp, 78.949790_dp, 0.000322_dp, 80.0_dp, 79.941213_dp, 0.000322_dp, 81.0_dp, 80.938245000_dp, 0.000099000_dp, 82.0_dp, 81.931707497_dp, 0.000001700_dp, 83.0_dp, 82.929240926_dp, 0.000006902_dp, 84.0_dp, 83.923325663_dp, 0.000005903_dp, 85.0_dp, 84.921443199_dp, 0.000006902_dp, 86.0_dp, 85.916296814_dp, 0.000003827_dp, 87.0_dp, 86.914817338_dp, 0.000004450_dp, 88.0_dp, 87.910220715_dp, 0.000005800_dp, 89.0_dp, 88.908879751_dp, 0.000002983_dp, 90.0_dp, 89.904698755_dp, 0.000000126_dp, 91.0_dp, 90.905640205_dp, 0.000000101_dp, 92.0_dp, 91.905035336_dp, 0.000000101_dp, 93.0_dp, 92.906470661_dp, 0.000000489_dp, 94.0_dp, 93.906312523_dp, 0.000000175_dp, 95.0_dp, 94.908040276_dp, 0.000000933_dp, 96.0_dp, 95.908277615_dp, 0.000000122_dp, 97.0_dp, 96.910963802_dp, 0.000000130_dp, 98.0_dp, 97.912740448_dp, 0.000009065_dp, 99.0_dp, 98.916675081_dp, 0.000011271_dp, 100.0_dp, 99.918010499_dp, 0.000008742_dp, 101.0_dp, 100.921458454_dp, 0.000008944_dp, 102.0_dp, 101.923154181_dp, 0.000009401_dp, 103.0_dp, 102.927204054_dp, 0.000009900_dp, 104.0_dp, 103.929449193_dp, 0.000010000_dp, 105.0_dp, 104.934021832_dp, 0.000013000_dp, 106.0_dp, 105.936930_dp, 0.000215_dp, 107.0_dp, 106.942007_dp, 0.000322_dp, 108.0_dp, 107.945303_dp, 0.000429_dp, 109.0_dp, 108.950907_dp, 0.000537_dp, 110.0_dp, 109.954675_dp, 0.000537_dp, 111.0_dp, 110.960837_dp, 0.000644_dp, 112.0_dp, 111.965196_dp, 0.000751_dp, 113.0_dp, 112.971723_dp, 0.000322_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp, -1.0_dp], shape=[3, 50]))) |