real(kind=f64), dimension(509) | randarray = (/-0.2664, 0.014, -0.3229, -0.3171, -0.0291, -0.0062, -0.4745, 0.4168, 0.1802, -0.3243, 0.3694, -0.1246, -0.1856, -0.0366, 0.0695, -0.2344, -0.4531, 0.0384, -0.0048, -0.4186, -0.4135, 0.0035, 0.473, -0.3343, 0.4867, -0.0914, 0.2798, -0.0493, -0.4807, -0.275, 0.3846, -0.3377, -0.4438, -0.3822, -0.3808, -0.2062, 0.3435, -0.465, -0.4356, 0.1279, -0.4913, 0.2428, 0.0293, -0.0828, -0.3102, 0.3547, 0.4727, 0.1805, -0.4724, -0.1745, -0.3345, -0.2994, 0.0773, 0.0896, 0.2664, 0.299, -0.1944, -0.2085, 0.3635, 0.1152, -0.4352, -0.1202, -0.1496, 0.4634, 0.4438, -0.3141, 0.3368, -0.3054, 0.2811, -0.2799, -0.453, -0.3705, -0.3277, 0.3093, 0.293, -0.3352, 0.2645, -0.2042, -0.0412, -0.1305, 0.3631, 0.2099, 0.1429, 0.3308, 0.1216, -0.3194, -0.4364, -0.4331, 0.2451, -0.1217, -0.0064, -0.4491, 0.474, 0.0612, 0.4629, 0.2188, -0.2955, -0.2415, 0.309, 0.3778, 0.1484, 0.1198, -0.0777, 0.3699, 0.415, -0.2132, 0.01, -0.045, -0.4163, 0.3464, -0.1753, -0.2682, 0.3636, -0.4797, 0.1802, -0.1344, -0.3197, 0.3575, -0.0722, 0.372, -0.2739, -0.3028, -0.1227, -0.0174, -0.4454, 0.3344, 0.3524, -0.481, 0.0944, -0.325, -0.4205, 0.3596, -0.3042, -0.2806, -0.429, 0.2148, -0.1049, 0.1622, -0.0293, 0.2618, 0.3408, -0.3008, 0.061, 0.2094, 0.1375, 0.1928, -0.0813, -0.484, 0.2006, 0.0031, -0.1039, -0.4471, 0.4876, -0.007, -0.2788, 0.1259, 0.4924, -0.2759, 0.4467, 0.4321, -0.0065, 0.3155, -0.0429, 0.1107, 0.2936, -0.239, 0.382, 0.2367, -0.3248, -0.4305, -0.304, -0.1935, -0.1988, 0.2261, 0.1036, -0.1348, -0.3115, 0.363, 0.2836, 0.2853, 0.4983, 0.4221, 0.3994, 0.4019, 0.2773, -0.2255, -0.0043, -0.0997, -0.2185, 0.1486, -0.4017, 0.3383, 0.167, -0.3125, -0.1966, 0.2756, -0.0057, 0.3256, 0.1876, -0.3863, -0.0464, 0.2262, 0.2781, -0.246, -0.1694, -0.0606, -0.4085, 0.4251, 0.2965, 0.3739, -0.4765, 0.2349, -0.2762, -0.3162, 0.1564, -0.058, 0.264, -0.0621, 0.2979, -0.1459, 0.4982, -0.1117, -0.3846, -0.2493, -0.1303, -0.2645, 0.2048, -0.3789, 0.4384, -0.196, -0.2605, -0.3464, 0.443, 0.3775, -0.093, 0.1543, 0.3666, 0.0055, 0.015, 0.124, 0.3759, -0.0529, -0.4103, -0.1574, -0.0722, -0.116, 0.3529, 0.3186, -0.4562, -0.3968, -0.4112, 0.0024, 0.0191, 0.2281, -0.3646, -0.3362, 0.4484, -0.1759, -0.0501, 0.4268, 0.1152, -0.4264, -0.1195, 0.2677, 0.0351, -0.1557, -0.0494, 0.3777, -0.2088, -0.4571, -0.4257, 0.004, 0.0283, -0.2383, 0.3535, 0.3623, -0.4942, 0.0078, 0.0773, -0.2971, -0.2633, 0.081, -0.2694, 0.2239, -0.2029, 0.1425, 0.0181, 0.2826, -0.3549, -0.3291, -0.3042, 0.0888, -0.161, 0.01, 0.4109, -0.026, 0.4173, 0.1474, -0.377, -0.4248, 0.3494, -0.4673, -0.2663, 0.0858, 0.2815, -0.0831, 0.1734, -0.1101, 0.3472, -0.4237, -0.499, -0.4278, 0.0403, -0.2564, 0.106, -0.1339, 0.2183, -0.4593, 0.3897, 0.1814, 0.3096, 0.3329, -0.2162, -0.1349, -0.3752, -0.1155, -0.4494, -0.0356, -0.1776, -0.2952, -0.4692, -0.2821, 0.1987, 0.1159, -0.1637, -0.3908, -0.4081, -0.311, 0.1897, -0.4715, 0.4399, -0.4585, -0.2052, -0.3093, -0.0484, -0.0195, 0.3651, -0.3401, -0.2006, 0.0011, 0.2373, -0.1851, -0.2044, 0.0305, -0.3288, -0.3535, -0.051, 0.2206, -0.0382, 0.325, 0.4449, -0.0674, 0.1765, 0.2122, 0.2747, 0.364, 0.3926, 0.2361, -0.4706, -0.0562, 0.0346, -0.4615, 0.2632, 0.2095, 0.346, -0.0197, -0.3338, 0.4065, -0.3779, -0.0901, 0.0981, -0.1179, -0.1619, -0.2831, 0.4709, 0.3433, -0.0723, 0.1744, -0.2182, -0.0365, 0.3851, -0.4263, 0.2903, -0.0463, 0.4824, -0.349, -0.2941, 0.1386, 0.228, -0.026, 0.1105, -0.3866, 0.417, -0.0021, 0.4718, -0.4834, -0.0377, 0.2265, 0.4044, -0.4975, 0.0467, -0.4142, -0.1741, 0.2117, 0.4677, -0.1504, -0.1259, -0.4895, 0.1251, -0.45, 0.4062, -0.2606, 0.0356, 0.2806, -0.4247, 0.2262, -0.3132, -0.0803, -0.0144, 0.2835, -0.0234, -0.2817, -0.1099, -0.0675, -0.3592, 0.131, -0.0506, 0.4867, 0.0172, -0.1996, 0.2327, -0.1522, 0.3792, 0.0062, -0.1455, 0.4794, -0.4917, 0.3584, 0.387, -0.4079, 0.2842, -0.4815, 0.1635, 0.0122, -0.4488, -0.3681, -0.4737, 0.3576, 0.2158, 0.0163, 0.0637, -0.4268, -0.2131, 0.2677, -0.0808, 0.0681, 0.3314, 0.1626, -0.489, -0.2921, 0.1211, 0.3653, 0.224, 0.427, -0.0387, 0.4869, -0.0176, -0.4717, 0.4876, -0.2194, -0.4679, -0.1669, 0.1821, 0.0641, -0.1187, 0.4273, -0.1504, 0.2218, 0.1033, 0.2177, -0.4011, 0.0596, 0.0083, 0.4719, -0.3228, -0.1893, -0.3938, 0.233, -0.3116, 0.1987, -0.0399, -0.3335, 0.4565, 0.0106, 0.1017, 0.1004, 0.3754, 0.4765, -0.1246 /) |