Changeset 1468

Show
Ignore:
Timestamp:
12/16/12 23:05:25 (11 years ago)
Author:
smidl
Message:

uprava generatoru

Location:
applications
Files:
12 modified

Legend:

Unmodified
Added
Removed
  • applications/bdmtoolbox/mex/CMakeLists.txt

    r1012 r1468  
    3030MEX(epdf_evallog_mat) 
    3131 
     32MEX(eEF_lognc) 
     33 
    3234MEX(bm_bayes) 
    3335MEX(bm_bayes_batch) 
  • applications/pmsm/simulator_zdenek/ekf_example/CMakeLists.txt

    r1464 r1468  
    44add_executable (test_exp test_exp.c) 
    55TARGET_LINK_LIBRARIES( test_exp m ) 
     6add_executable (test_rng test_rng.cpp) 
     7TARGET_LINK_LIBRARIES( test_exp m ) 
    68 
    79include_directories(../../bdm) 
  • applications/pmsm/simulator_zdenek/ekf_example/RArandn.h

    r1464 r1468  
    1 #define MAXrandn 1000 
     1#define MAXrandn 997 
    22static const floatx RArandn[MAXrandn]={ 
    3 -4.3256481e-01, -1.6655844e+00, 1.2533231e-01, 2.8767642e-01, -1.1464714e+00, 1.1909155e+00, 1.1891642e+00, -3.7633277e-02, 3.2729236e-01, 1.7463914e-01, -1.8670858e-01, 7.2579055e-01, -5.8831654e-01, 2.1831858e+00, -1.3639588e-01, 1.1393131e-01, 1.0667682e+00, 5.9281461e-02, -9.5648405e-02, -8.3234946e-01, 2.9441082e-01, -1.3361819e+00, 7.1432455e-01, 1.6235621e+00, -6.9177570e-01, 8.5799667e-01, 1.2540014e+00, -1.5937296e+00, -1.4409644e+00, 5.7114762e-01, -3.9988558e-01, 6.8999738e-01, 8.1562229e-01, 7.1190832e-01, 1.2902498e+00, 6.6860051e-01, 1.1908381e+00, -1.2024571e+00, -1.9789558e-02, -1.5671730e-01, -1.6040856e+00, 2.5730423e-01, -1.0564729e+00, 1.4151415e+00, -8.0509040e-01, 5.2874301e-01, 2.1932067e-01, -9.2190162e-01, -2.1706745e+00, -5.9187825e-02, -1.0106337e+00, 6.1446305e-01, 5.0774079e-01, 1.6924299e+00, 5.9128259e-01, -6.4359520e-01, 3.8033725e-01, -1.0091155e+00, -1.9510670e-02, -4.8220789e-02, 4.3191842e-05, -3.1785945e-01, 1.0950037e+00, -1.8739903e+00, 4.2818327e-01, 8.9563847e-01, 7.3095734e-01, 5.7785735e-01, 4.0314032e-02, 6.7708919e-01, 5.6890021e-01, -2.5564542e-01, -3.7746896e-01, -2.9588711e-01, -1.4751345e+00, -2.3400405e-01, 1.1844484e-01, 3.1480904e-01, 1.4435082e+00, -3.5097474e-01, 6.2323385e-01, 7.9904862e-01, 9.4088994e-01, -9.9209174e-01, 2.1203515e-01, 2.3788207e-01, -1.0077634e+00, -7.4204475e-01, 1.0822950e+00, -1.3149970e-01, 3.8988049e-01, 8.7987107e-02, -6.3546523e-01, -5.5957330e-01, 4.4365349e-01, -9.4990380e-01, 7.8118162e-01, 5.6896065e-01, -8.2171429e-01, -2.6560685e-01, -1.1877770e+00, -2.2023207e+00, 9.8633739e-01, -5.1863507e-01, 3.2736756e-01, 2.3405701e-01, 2.1466139e-02, -1.0039445e+00, -9.4714606e-01, -3.7442920e-01, -1.1858862e+00, -1.0559029e+00, 1.4724799e+00, 5.5743832e-02, -1.2173175e+00, -4.1227134e-02, -1.1283439e+00, -1.3492775e+00, -2.6110162e-01, 9.5346545e-01, 1.2864443e-01, 6.5646751e-01, -1.1678194e+00, -4.6060518e-01, -2.6243995e-01, -1.2131521e+00, -1.3194370e+00, 9.3121751e-01, 1.1244896e-02, -6.4514582e-01, 8.0572879e-01, 2.3162601e-01, -9.8975967e-01, 1.3395857e+00, 2.8950203e-01, 1.4789171e+00, 1.1380280e+00, -6.8413859e-01, -1.2919360e+00, -7.2926276e-02, -3.3059888e-01, -8.4362764e-01, 4.9776966e-01, 1.4884905e+00, -5.4647589e-01, -8.4675816e-01, -2.4633653e-01, 6.6302415e-01, -8.5419737e-01, -1.2013148e+00, -1.1986943e-01, -6.5294015e-02, 4.8529556e-01, -5.9549090e-01, -1.4966774e-01, -4.3475193e-01, -7.9330223e-02, 1.5351523e+00, -6.0648286e-01, -1.3473627e+00, 4.6938312e-01, -9.0356694e-01, 3.5879639e-02, -6.2753122e-01, 5.3539795e-01, 5.5288352e-01, -2.0369048e-01, -2.0543247e+00, 1.3256073e-01, 1.5929407e+00, 1.0184118e+00, -1.5804025e+00, -7.8661919e-02, -6.8165686e-01, -1.0245531e+00, -1.2343535e+00, 2.8880702e-01, -4.2930300e-01, 5.5801190e-02, -3.6787357e-01, -4.6497337e-01, 3.7096058e-01, 7.2828293e-01, 2.1121602e+00, -1.3572977e+00, -1.0226101e+00, 1.0378342e+00, -3.8979955e-01, -1.3812656e+00, 3.1554263e-01, 1.5532426e+00, 7.0789388e-01, 1.9573848e+00, 5.0454235e-01, 1.8645290e+00, -3.3981178e-01, -1.1397794e+00, -2.1112348e-01, 1.1902449e+00, -1.1162088e+00, 6.3527413e-01, -6.0141213e-01, 5.5118471e-01, -1.0998405e+00, 8.5990593e-02, -2.0045633e+00, -4.9308792e-01, 4.6204801e-01, -3.2100469e-01, 1.2365557e+00, -6.3127966e-01, -2.3252111e+00, -1.2316365e+00, 1.0556484e+00, -1.1322399e-01, 3.7922362e-01, 9.4419973e-01, -2.1204267e+00, -6.4467892e-01, -7.0430173e-01, -1.0181372e+00, -1.8208187e-01, 1.5210132e+00, -3.8438764e-02, 1.2274480e+00, -6.9620480e-01, 7.5244865e-03, -7.8289304e-01, 5.8693856e-01, -2.5120737e-01, 4.8013582e-01, 6.6815503e-01, -7.8321196e-02, 8.8917262e-01, 2.3092875e+00, 5.2463868e-01, -1.1787324e-02, 9.1314082e-01, 5.5940679e-02, -1.1070699e+00, 4.8549771e-01, -5.0050738e-03, -2.7621786e-01, 1.2764525e+00, 1.8634006e+00, -5.2255930e-01, 1.0342445e-01, -8.0764913e-01, 6.8043858e-01, -2.3645898e+00, 9.9011487e-01, 2.1889912e-01, 2.6166246e-01, 1.2134445e+00, -2.7466699e-01, -1.3313445e-01, -1.2705002e+00, -1.6636065e+00, -7.0355426e-01, 2.8088049e-01, -5.4120933e-01, -1.3335307e+00, 1.0726863e+00, -7.1208545e-01, -1.1285561e-02, -8.1702920e-04, -2.4943628e-01, 3.9657532e-01, -2.6401335e-01, -1.6640109e+00, -1.0289751e+00, 2.4309470e-01, -1.2565901e+00, -3.4718319e-01, -9.4137219e-01, -1.1745603e+00, -1.0211417e+00, -4.0166673e-01, 1.7366567e-01, -1.1611849e-01, 1.0641191e+00, -2.4538630e-01, -1.5175391e+00, 9.7341591e-03, 7.1372865e-02, 3.1653581e-01, 4.9982567e-01, 1.2780841e+00, -5.4781615e-01, 2.6080840e-01, -1.3176672e-02, -5.8026400e-01, 2.1363084e+00, -2.5761712e-01, -1.4095285e+00, 1.7701009e+00, 3.2554598e-01, -1.1190396e+00, 6.2035014e-01, 1.2697818e+00, -8.9604251e-01, 1.3517544e-01, -1.3904001e-01, -1.1633953e+00, 1.1837195e+00, -1.5429662e-02, 5.3621869e-01, -7.1642862e-01, -6.5555939e-01, 3.1436276e-01, 1.0681408e-01, 1.8482162e+00, -2.7510568e-01, 2.2125541e+00, 1.5085258e+00, -1.9450786e+00, -1.6805428e+00, -5.7353413e-01, -1.8581653e-01, 8.9341157e-03, 8.3694989e-01, -7.2227067e-01, -7.2149048e-01, -2.0118100e-01, -2.0464161e-02, 2.7889000e-01, 1.0582948e+00, 6.2167328e-01, -1.7506153e+00, 6.9734755e-01, 8.1148586e-01, 6.3634495e-01, 1.3100803e+00, 3.2709752e-01, -6.7299316e-01, -1.4932750e-01, -2.4490178e+00, 4.7328561e-01, 1.1694566e-01, -5.9110384e-01, -6.5470768e-01, -1.0806619e+00, -4.7730865e-02, 3.7934454e-01, -3.3036105e-01, -4.9989825e-01, -3.5978608e-02, -1.7476033e-01, -9.5726508e-01, 1.2925479e+00, 4.4090964e-01, 1.2809409e+00, -4.9772981e-01, -1.1187166e+00, 8.0764962e-01, 4.1199579e-02, -7.5620861e-01, -8.9129148e-02, -2.0088503e+00, 1.0839180e+00, -9.8119056e-01, -6.8848864e-01, 1.3394795e+00, -9.0924316e-01, -4.1285773e-01, -5.0616319e-01, 1.6197478e+00, 8.0900711e-02, -1.0810565e+00, -1.1245178e+00, 1.7356763e+00, 1.9374586e+00, 1.6350682e+00, -1.2559402e+00, -2.1353751e-01, -1.9893205e-01, 3.0749918e-01, -5.7232546e-01, -9.7764837e-01, -4.4680941e-01, 1.0820919e+00, 2.3726479e+00, 2.2928834e-01, -2.6662314e-01, 7.0167218e-01, -4.8759049e-01, 1.8624797e+00, 1.1068511e+00, -1.2275657e+00, -6.6988511e-01, 1.3409295e+00, 3.8808332e-01, 3.9305893e-01, -1.7073336e+00, 2.2785864e-01, 6.8563286e-01, -6.3679011e-01, -1.0026056e+00, -1.8562067e-01, -1.0540327e+00, -7.1539489e-02, 2.7919842e-01, 1.3732753e+00, 1.7984103e-01, -5.4201656e-01, 1.6341906e+00, 8.2521515e-01, 2.3076114e-01, 6.7163395e-01, -5.0807788e-01, 8.5635160e-01, 2.6850345e-01, 6.2497518e-01, -1.0473379e+00, 1.5356704e+00, 4.3442574e-01, -1.9171359e+00, 4.6993952e-01, 1.2743511e+00, 6.3854245e-01, 1.3807825e+00, 1.3198429e+00, -9.0942924e-01, -2.3056051e+00, 1.7887302e+00, 3.9079781e-01, 2.0323676e-02, -4.0597700e-01, -1.5348945e+00, 2.2137310e-01, -1.3744787e+00, -8.3928553e-01, -2.0864256e-01, 7.5591300e-01, 3.7573445e-01, -1.3454130e+00, 1.4818762e+00, 3.2736138e-02, 1.8704528e+00, -1.2089905e+00, -7.8263187e-01, -7.6729852e-01, -1.0720010e-01, -9.7705667e-01, -9.6398812e-01, -2.3791724e+00, -8.3818791e-01, 2.5734563e-01, -1.8383400e-01, -1.6761530e-01, -1.1698891e-01, 1.6848817e-01, -5.0120630e-01, -7.0507642e-01, 5.0816468e-01, -4.2092154e-01, 2.2913337e-01, -9.5949703e-01, -1.4604259e-01, 7.4453803e-01, -8.9049603e-01, 1.3906186e-01, -2.3614430e-01, -7.5459129e-02, -3.5857191e-01, -2.0776349e+00, -1.4354571e-01, 1.3933415e+00, 6.5180409e-01, -3.7713356e-01, -6.6144306e-01, 2.4895798e-01, -3.8351616e-01, -5.2847980e-01, 5.5388364e-02, 1.2537686e+00, -2.5200036e+00, 5.8485612e-01, -1.0080644e+00, 9.4428482e-01, -2.4239571e+00, -2.2383143e-01, 5.8069883e-02, -4.2461402e-01, -2.0291795e-01, -1.5130770e+00, -1.1263519e+00, -8.1500216e-01, 3.6661427e-01, -5.8610676e-01, 1.5374090e+00, 1.4007153e-01, -1.8627667e+00, -4.5419310e-01, -6.5207411e-01, 1.0331788e-01, -2.2063162e-01, -2.7904337e-01, -7.3366201e-01, -6.4533580e-02, -1.4440041e+00, 6.1234029e-01, -1.3235030e+00, -6.6157668e-01, -1.4611451e-01, 2.4808496e-01, -7.6632557e-02, 1.7381700e+00, 1.6219719e+00, 6.2643590e-01, 9.1813590e-02, -8.0760705e-01, -4.6133709e-01, -1.4059692e+00, -3.7452963e-01, -4.7091124e-01, 1.7512956e+00, 7.5322462e-01, 6.4989341e-02, -2.9276426e-01, 8.2822847e-02, 7.6619148e-01, 2.2368499e+00, 3.2688673e-01, 8.6330394e-01, 6.7938660e-01, 5.5475763e-01, 1.0016304e+00, 1.2593651e+00, 4.4151065e-02, -3.1413767e-01, 2.2670764e-01, 9.9669193e-01, 1.2159117e+00, -5.4270242e-01, 9.1222834e-01, -1.7214113e-01, -3.3595464e-01, 5.4148678e-01, 9.3211121e-01, -5.7025265e-01, -1.4986054e+00, -5.0345644e-02, 5.5302477e-01, 8.3497887e-02, 1.5775235e+00, -3.3077420e-01, 7.9515483e-01, -7.8480015e-01, -1.2631215e+00, 6.6665499e-01, -1.3926322e+00, -1.3005625e+00, -6.0502216e-01, -1.4885645e+00, 5.5854296e-01, -2.7735429e-01, -1.2936848e+00, -8.8843518e-01, -9.8652008e-01, -7.1617644e-02, -2.4145909e+00, -6.9434901e-01, -1.3913890e+00, 3.2964780e-01, 5.9854448e-01, 1.4717540e-01, -1.0143899e-01, -2.6349808e+00, 2.8053414e-02, -8.7631013e-01, -2.6547745e-01, -3.2757791e-01, -1.1582475e+00, 5.8005321e-01, 2.3975573e-01, -3.5088492e-01, 8.9209848e-01, 1.5782988e+00, -1.1081739e+00, -2.5931047e-02, -1.1106277e+00, 7.5083418e-01, 5.0016703e-01, -5.1726088e-01, -5.5920949e-01, -7.5337062e-01, 9.2581269e-01, -2.4852032e-01, -1.4983452e-01, -1.2584154e+00, 3.1261988e-01, 2.6902769e+00, 2.8969629e-01, -1.4228030e+00, 2.4678572e-01, -1.4357729e+00, 1.4857313e-01, -1.6930726e+00, 7.1918848e-01, 1.1417728e+00, 1.5519363e+00, 1.3836301e+00, -7.5809225e-01, 4.4266274e-01, 9.1109790e-01, -1.0740856e+00, 2.0176191e-01, 7.6286322e-01, -1.2881872e+00, -9.5296182e-01, 7.7817450e-01, -6.3310696e-03, 5.2448681e-01, 1.3642718e+00, 4.8203933e-01, -7.8706585e-01, 7.5199927e-01, -1.6688791e-01, -8.1622811e-01, 2.0940652e+00, 8.0152532e-02, -9.3729507e-01, 6.3573878e-01, 1.6820280e+00, 5.9363417e-01, 7.9015288e-01, 1.0525385e-01, -1.5857856e-01, 8.7090745e-01, -1.9475893e-01, 7.5474485e-02, -5.2663484e-01, -6.8548438e-01, -2.6838765e-01, -1.1883460e+00, 2.4857898e-01, 1.0245162e-01, -4.1006877e-02, -2.2475823e+00, -5.1077648e-01, 2.4924264e-01, 3.6919671e-01, 1.7919662e-01, -3.7283412e-02, -1.6033099e+00, 3.3937204e-01, -1.3113481e-01, 4.8518979e-01, 5.9875070e-01, -8.6030887e-02, 3.2529205e-01, -3.3514323e-01, -3.2244920e-01, -3.8237413e-01, -9.5337093e-01, 2.3357560e-01, 1.2352447e+00, -5.7853160e-01, -5.0153737e-01, 7.2286352e-01, 3.9498485e-02, 1.5412788e+00, -1.7010528e+00, -1.0337413e+00, -7.6370764e-01, 2.1764260e+00, 4.3161210e-01, -4.4376518e-01, 2.9995868e-02, -3.1567087e-01, 9.7784570e-01, 1.8294874e-02, 8.1796283e-01, 7.0234110e-01, -2.3127056e-01, -1.1368958e-01, 1.2794052e-01, -7.9940970e-01, -2.3861196e-01, -8.9463238e-02, -1.0232642e+00, 9.3753792e-01, -1.1317193e+00, -7.1070209e-01, -1.1695009e+00, 1.0654371e+00, -6.8039374e-01, -1.7257727e+00, 8.1319960e-01, 1.4418666e+00, 6.7227220e-01, 1.3866496e-01, -8.5953393e-01, -7.5225056e-01, 1.2296151e+00, 1.1507544e+00, -6.0802501e-01, 8.0615792e-01, 2.1713285e-01, -3.7346107e-01, -8.3203043e-01, 2.8686630e-01, -1.8188916e+00, -1.5730514e+00, 2.0156657e+00, -7.1982024e-02, 2.6289094e+00, -2.4331695e-01, 1.7327649e-01, 9.2320708e-01, -1.7855300e-01, -5.2170491e-01, 1.4319620e+00, -8.7011745e-01, 8.0754179e-01, -5.1063464e-01, 7.4351413e-01, 8.4789830e-01, -8.2990072e-01, 5.3299443e-01, 1.0328484e+00, -1.0520240e+00, 3.6211374e-01, -3.6786617e-02, -1.2276356e+00, -2.7509887e-01, -1.6043524e-01, -1.0835748e+00, -1.9542127e+00, -9.0948726e-01, -5.5787277e-03, -1.7234899e+00, 1.2630773e+00, -6.0043337e-01, -2.0639248e+00, 1.1091094e-01, 1.4876143e+00, 5.3002142e-02, 1.6198074e-01, -2.6877919e-02, 1.7357619e-01, 8.8216775e-01, 1.8229442e-01, 7.5529542e-01, 5.0803455e-01, 1.3188014e-01, 2.8010411e-01, -9.8284756e-01, -9.4408743e-01, -1.3057516e-02, 3.5434528e-01, -8.9470883e-01, 8.1211102e-01, 1.0953735e-01, 2.7316440e+00, 4.1107915e-01, -1.3068620e+00, 3.8380649e-01, 4.9950368e-01, -5.1078559e-01, 2.3492205e-01, -5.9782511e-01, 2.0770819e-02, 4.1944276e-01, 1.1911037e+00, 7.7121425e-01, -2.6442219e+00, 2.8542990e-01, 8.2609262e-01, -8.1224925e-03, 8.5843816e-01, 7.7478824e-01, 1.3059453e+00, 1.2315025e+00, 9.5856367e-01, -1.6545477e+00, -9.9039601e-01, 6.8523602e-01, -9.7487001e-01, -6.0672564e-01, 6.8679374e-01, 2.0048856e-02, 1.0638006e+00, -1.3410499e+00, 4.7951044e-01, -1.6339740e+00, -1.4426650e+00, 2.9378142e-01, -1.4036408e-01, -1.1303407e+00, -2.9253805e-01, -5.8253587e-01, -8.9634828e-01, 2.4860108e-01, -1.4896634e+00, 3.1350866e-01, -2.0250844e+00, 5.2898970e-01, 3.4347090e-01, 7.5819261e-01, -6.9194018e-01, 6.8017855e-01, -1.0725410e+00, 8.9977209e-01, -2.1230924e+00, 2.8471227e-01, -7.3332293e-01, -7.7337563e-01, 1.5184172e-01, -3.3684313e-01, 9.7076072e-01, -1.0723636e-01, 1.0134919e+00, -4.7534676e-01, 6.8948145e-02, 3.9859207e-01, 1.1163262e+00, 6.2045113e-01, -2.8767448e-01, -1.3717733e+00, -6.8586843e-01, 3.3168474e-01, -9.9772182e-01, 2.9141810e-01, 1.1070784e+00, 2.4495861e-01, 1.6497578e-01, 4.0623134e-01, 1.2159812e+00, 1.4484243e+00, -1.0251375e+00, 2.0541801e-01, 5.8888219e-01, -2.6402362e-01, 2.4953178e+00, 8.5594767e-01, -8.5095363e-01, 8.1187884e-01, 7.0024172e-01, 7.5993833e-01, -1.7129092e+00, 1.5370212e+00, -1.6098468e+00, 1.1095260e+00, -1.1097040e+00, 3.8546939e-01, 9.6523079e-01, 8.1829723e-01, 3.7048779e-02, -9.2601240e-01, -1.1191866e-01, -8.0302969e-01, -1.6650059e+00, -9.0140060e-01, 5.8834967e-01, 5.5415928e-01, -4.1517261e-01, 6.1794859e-02, 4.5743157e-01, 1.9901391e-01, 2.5755782e-01, 2.0807298e+00, -2.2772365e+00, 3.3902243e-01, 2.8989389e-01, 6.6226085e-01, -5.8086023e-01, 8.8775191e-01, 1.7187104e-01, 8.4882144e-01, 9.6376903e-01, 1.3219180e+00, -6.4344903e-02, 1.3170531e+00, 2.2801733e-01, -1.4296372e+00, -1.4970100e-01, -5.0496756e-01, -1.7291415e+00, -4.1747222e-01, -6.1496852e-01, 7.2077668e-01, 3.3936379e-01, 8.8284508e-01, 2.8424521e-01, -1.4554135e-01, -8.9645900e-02, 2.8916087e-01, 1.1648308e+00, 8.0572935e-01, -1.3556435e+00, 1.2089290e-01, -2.2217791e-01, 5.7173234e-01, -3.0014043e-01, 1.1342768e+00, -1.7935641e-01, -1.4670667e+00, 1.3953457e+00, 4.4083567e-01, 5.6538405e-01, -6.9362259e-01, 8.3386925e-01, -2.2373784e+00, 1.0976441e+00, -1.6169159e-03, -1.6145733e+00, -1.2287268e+00, 2.0740458e-01, 2.2094200e-01, -1.0060731e+00, -4.5306709e-01, 1.3994533e+00, -4.6196398e-01, 3.2715905e-02, 7.9878320e-01, 8.9681579e-01, 1.3789173e-01, -1.6191464e+00, -1.6466057e+00, 4.2870688e-01, -7.3723084e-01, 5.6492614e-01, -1.3841667e+00, 4.6026799e-01, 6.2938365e-01, 3.7984731e-01, -1.0133299e+00, -3.4724278e-01, 4.4191230e-01, -1.5902403e+00, -7.0141671e-01, -1.0776006e+00, 1.0022197e+00, 1.7294805e+00, 7.0903221e-01, -7.4789686e-01, 2.2886239e-01, -2.2349661e-01, -8.5327526e-01, 3.4562680e-01, 1.0976448e-01, -1.1330390e+00, -6.8312354e-01, -2.7785623e-01, 6.5478985e-01, -1.2483940e+00, -5.9753903e-01, -4.8181255e-01, 9.8337217e-01, 1.7621207e+00, 1.4274017e+00, 9.1176303e-01, 3.2682265e-01, 6.9618540e-02, -1.4997627e+00, -4.1822319e-01, -2.1036798e-02, 2.2842453e-01, -1.0081958e+00, -6.6462217e-01, 5.5817658e-01, -1.1885421e+00, -7.7548150e-01, 2.7104207e-01, 1.5349757e+00, -1.0522827e+00, 6.2555857e-01, -7.9762607e-01, -3.1352199e-01, -6.0220975e-01, 1.2590603e+00, 8.5848425e-01, -2.1052919e+00, -3.6093718e-01, 5.5355672e-01, -1.5563838e+00, -2.0666572e-01, -4.2556755e-01, 4.9377825e-01, -8.7090761e-01, 7.9827658e-02, -5.2161914e-01, -1.4138609e+00, -3.8429318e-01, -4.5792222e-01, -2.9147069e-01, -3.0122401e-01, -1.5885938e+00, 1.0942867e+00, 1.3241669e+00, -1.2647963e-01, -7.3716382e-01, 2.1371884e-01, -4.0052913e-01, 6.4937747e-02, -1.7579956e+00, 1.6867480e+00, 3.2740021e-01}; 
     3-4.3256481e-01, -1.6655844e+00, 1.2533231e-01, 2.8767642e-01, -1.1464714e+00, 1.1909155e+00, 1.1891642e+00, -3.7633277e-02, 3.2729236e-01, 1.7463914e-01, -1.8670858e-01, 7.2579055e-01, -5.8831654e-01, 2.1831858e+00, -1.3639588e-01, 1.1393131e-01, 1.0667682e+00, 5.9281461e-02, -9.5648405e-02, -8.3234946e-01, 2.9441082e-01, -1.3361819e+00, 7.1432455e-01, 1.6235621e+00, -6.9177570e-01, 8.5799667e-01, 1.2540014e+00, -1.5937296e+00, -1.4409644e+00, 5.7114762e-01, -3.9988558e-01, 6.8999738e-01, 8.1562229e-01, 7.1190832e-01, 1.2902498e+00, 6.6860051e-01, 1.1908381e+00, -1.2024571e+00, -1.9789558e-02, -1.5671730e-01, -1.6040856e+00, 2.5730423e-01, -1.0564729e+00, 1.4151415e+00, -8.0509040e-01, 5.2874301e-01, 2.1932067e-01, -9.2190162e-01, -2.1706745e+00, -5.9187825e-02, -1.0106337e+00, 6.1446305e-01, 5.0774079e-01, 1.6924299e+00, 5.9128259e-01, -6.4359520e-01, 3.8033725e-01, -1.0091155e+00, -1.9510670e-02, -4.8220789e-02, 4.3191842e-05, -3.1785945e-01, 1.0950037e+00, -1.8739903e+00, 4.2818327e-01, 8.9563847e-01, 7.3095734e-01, 5.7785735e-01, 4.0314032e-02, 6.7708919e-01, 5.6890021e-01, -2.5564542e-01, -3.7746896e-01, -2.9588711e-01, -1.4751345e+00, -2.3400405e-01, 1.1844484e-01, 3.1480904e-01, 1.4435082e+00, -3.5097474e-01, 6.2323385e-01, 7.9904862e-01, 9.4088994e-01, -9.9209174e-01, 2.1203515e-01, 2.3788207e-01, -1.0077634e+00, -7.4204475e-01, 1.0822950e+00, -1.3149970e-01, 3.8988049e-01, 8.7987107e-02, -6.3546523e-01, -5.5957330e-01, 4.4365349e-01, -9.4990380e-01, 7.8118162e-01, 5.6896065e-01, -8.2171429e-01, -2.6560685e-01, -1.1877770e+00, -2.2023207e+00, 9.8633739e-01, -5.1863507e-01, 3.2736756e-01, 2.3405701e-01, 2.1466139e-02, -1.0039445e+00, -9.4714606e-01, -3.7442920e-01, -1.1858862e+00, -1.0559029e+00, 1.4724799e+00, 5.5743832e-02, -1.2173175e+00, -4.1227134e-02, -1.1283439e+00, -1.3492775e+00, -2.6110162e-01, 9.5346545e-01, 1.2864443e-01, 6.5646751e-01, -1.1678194e+00, -4.6060518e-01, -2.6243995e-01, -1.2131521e+00, -1.3194370e+00, 9.3121751e-01, 1.1244896e-02, -6.4514582e-01, 8.0572879e-01, 2.3162601e-01, -9.8975967e-01, 1.3395857e+00, 2.8950203e-01, 1.4789171e+00, 1.1380280e+00, -6.8413859e-01, -1.2919360e+00, -7.2926276e-02, -3.3059888e-01, -8.4362764e-01, 4.9776966e-01, 1.4884905e+00, -5.4647589e-01, -8.4675816e-01, -2.4633653e-01, 6.6302415e-01, -8.5419737e-01, -1.2013148e+00, -1.1986943e-01, -6.5294015e-02, 4.8529556e-01, -5.9549090e-01, -1.4966774e-01, -4.3475193e-01, -7.9330223e-02, 1.5351523e+00, -6.0648286e-01, -1.3473627e+00, 4.6938312e-01, -9.0356694e-01, 3.5879639e-02, -6.2753122e-01, 5.3539795e-01, 5.5288352e-01, -2.0369048e-01, -2.0543247e+00, 1.3256073e-01, 1.5929407e+00, 1.0184118e+00, -1.5804025e+00, -7.8661919e-02, -6.8165686e-01, -1.0245531e+00, -1.2343535e+00, 2.8880702e-01, -4.2930300e-01, 5.5801190e-02, -3.6787357e-01, -4.6497337e-01, 3.7096058e-01, 7.2828293e-01, 2.1121602e+00, -1.3572977e+00, -1.0226101e+00, 1.0378342e+00, -3.8979955e-01, -1.3812656e+00, 3.1554263e-01, 1.5532426e+00, 7.0789388e-01, 1.9573848e+00, 5.0454235e-01, 1.8645290e+00, -3.3981178e-01, -1.1397794e+00, -2.1112348e-01, 1.1902449e+00, -1.1162088e+00, 6.3527413e-01, -6.0141213e-01, 5.5118471e-01, -1.0998405e+00, 8.5990593e-02, -2.0045633e+00, -4.9308792e-01, 4.6204801e-01, -3.2100469e-01, 1.2365557e+00, -6.3127966e-01, -2.3252111e+00, -1.2316365e+00, 1.0556484e+00, -1.1322399e-01, 3.7922362e-01, 9.4419973e-01, -2.1204267e+00, -6.4467892e-01, -7.0430173e-01, -1.0181372e+00, -1.8208187e-01, 1.5210132e+00, -3.8438764e-02, 1.2274480e+00, -6.9620480e-01, 7.5244865e-03, -7.8289304e-01, 5.8693856e-01, -2.5120737e-01, 4.8013582e-01, 6.6815503e-01, -7.8321196e-02, 8.8917262e-01, 2.3092875e+00, 5.2463868e-01, -1.1787324e-02, 9.1314082e-01, 5.5940679e-02, -1.1070699e+00, 4.8549771e-01, -5.0050738e-03, -2.7621786e-01, 1.2764525e+00, 1.8634006e+00, -5.2255930e-01, 1.0342445e-01, -8.0764913e-01, 6.8043858e-01, -2.3645898e+00, 9.9011487e-01, 2.1889912e-01, 2.6166246e-01, 1.2134445e+00, -2.7466699e-01, -1.3313445e-01, -1.2705002e+00, -1.6636065e+00, -7.0355426e-01, 2.8088049e-01, -5.4120933e-01, -1.3335307e+00, 1.0726863e+00, -7.1208545e-01, -1.1285561e-02, -8.1702920e-04, -2.4943628e-01, 3.9657532e-01, -2.6401335e-01, -1.6640109e+00, -1.0289751e+00, 2.4309470e-01, -1.2565901e+00, -3.4718319e-01, -9.4137219e-01, -1.1745603e+00, -1.0211417e+00, -4.0166673e-01, 1.7366567e-01, -1.1611849e-01, 1.0641191e+00, -2.4538630e-01, -1.5175391e+00, 9.7341591e-03, 7.1372865e-02, 3.1653581e-01, 4.9982567e-01, 1.2780841e+00, -5.4781615e-01, 2.6080840e-01, -1.3176672e-02, -5.8026400e-01, 2.1363084e+00, -2.5761712e-01, -1.4095285e+00, 1.7701009e+00, 3.2554598e-01, -1.1190396e+00, 6.2035014e-01, 1.2697818e+00, -8.9604251e-01, 1.3517544e-01, -1.3904001e-01, -1.1633953e+00, 1.1837195e+00, -1.5429662e-02, 5.3621869e-01, -7.1642862e-01, -6.5555939e-01, 3.1436276e-01, 1.0681408e-01, 1.8482162e+00, -2.7510568e-01, 2.2125541e+00, 1.5085258e+00, -1.9450786e+00, -1.6805428e+00, -5.7353413e-01, -1.8581653e-01, 8.9341157e-03, 8.3694989e-01, -7.2227067e-01, -7.2149048e-01, -2.0118100e-01, -2.0464161e-02, 2.7889000e-01, 1.0582948e+00, 6.2167328e-01, -1.7506153e+00, 6.9734755e-01, 8.1148586e-01, 6.3634495e-01, 1.3100803e+00, 3.2709752e-01, -6.7299316e-01, -1.4932750e-01, -2.4490178e+00, 4.7328561e-01, 1.1694566e-01, -5.9110384e-01, -6.5470768e-01, -1.0806619e+00, -4.7730865e-02, 3.7934454e-01, -3.3036105e-01, -4.9989825e-01, -3.5978608e-02, -1.7476033e-01, -9.5726508e-01, 1.2925479e+00, 4.4090964e-01, 1.2809409e+00, -4.9772981e-01, -1.1187166e+00, 8.0764962e-01, 4.1199579e-02, -7.5620861e-01, -8.9129148e-02, -2.0088503e+00, 1.0839180e+00, -9.8119056e-01, -6.8848864e-01, 1.3394795e+00, -9.0924316e-01, -4.1285773e-01, -5.0616319e-01, 1.6197478e+00, 8.0900711e-02, -1.0810565e+00, -1.1245178e+00, 1.7356763e+00, 1.9374586e+00, 1.6350682e+00, -1.2559402e+00, -2.1353751e-01, -1.9893205e-01, 3.0749918e-01, -5.7232546e-01, -9.7764837e-01, -4.4680941e-01, 1.0820919e+00, 2.3726479e+00, 2.2928834e-01, -2.6662314e-01, 7.0167218e-01, -4.8759049e-01, 1.8624797e+00, 1.1068511e+00, -1.2275657e+00, -6.6988511e-01, 1.3409295e+00, 3.8808332e-01, 3.9305893e-01, -1.7073336e+00, 2.2785864e-01, 6.8563286e-01, -6.3679011e-01, -1.0026056e+00, -1.8562067e-01, -1.0540327e+00, -7.1539489e-02, 2.7919842e-01, 1.3732753e+00, 1.7984103e-01, -5.4201656e-01, 1.6341906e+00, 8.2521515e-01, 2.3076114e-01, 6.7163395e-01, -5.0807788e-01, 8.5635160e-01, 2.6850345e-01, 6.2497518e-01, -1.0473379e+00, 1.5356704e+00, 4.3442574e-01, -1.9171359e+00, 4.6993952e-01, 1.2743511e+00, 6.3854245e-01, 1.3807825e+00, 1.3198429e+00, -9.0942924e-01, -2.3056051e+00, 1.7887302e+00, 3.9079781e-01, 2.0323676e-02, -4.0597700e-01, -1.5348945e+00, 2.2137310e-01, -1.3744787e+00, -8.3928553e-01, -2.0864256e-01, 7.5591300e-01, 3.7573445e-01, -1.3454130e+00, 1.4818762e+00, 3.2736138e-02, 1.8704528e+00, -1.2089905e+00, -7.8263187e-01, -7.6729852e-01, -1.0720010e-01, -9.7705667e-01, -9.6398812e-01, -2.3791724e+00, -8.3818791e-01, 2.5734563e-01, -1.8383400e-01, -1.6761530e-01, -1.1698891e-01, 1.6848817e-01, -5.0120630e-01, -7.0507642e-01, 5.0816468e-01, -4.2092154e-01, 2.2913337e-01, -9.5949703e-01, -1.4604259e-01, 7.4453803e-01, -8.9049603e-01, 1.3906186e-01, -2.3614430e-01, -7.5459129e-02, -3.5857191e-01, -2.0776349e+00, -1.4354571e-01, 1.3933415e+00, 6.5180409e-01, -3.7713356e-01, -6.6144306e-01, 2.4895798e-01, -3.8351616e-01, -5.2847980e-01, 5.5388364e-02, 1.2537686e+00, -2.5200036e+00, 5.8485612e-01, -1.0080644e+00, 9.4428482e-01, -2.4239571e+00, -2.2383143e-01, 5.8069883e-02, -4.2461402e-01, -2.0291795e-01, -1.5130770e+00, -1.1263519e+00, -8.1500216e-01, 3.6661427e-01, -5.8610676e-01, 1.5374090e+00, 1.4007153e-01, -1.8627667e+00, -4.5419310e-01, -6.5207411e-01, 1.0331788e-01, -2.2063162e-01, -2.7904337e-01, -7.3366201e-01, -6.4533580e-02, -1.4440041e+00, 6.1234029e-01, -1.3235030e+00, -6.6157668e-01, -1.4611451e-01, 2.4808496e-01, -7.6632557e-02, 1.7381700e+00, 1.6219719e+00, 6.2643590e-01, 9.1813590e-02, -8.0760705e-01, -4.6133709e-01, -1.4059692e+00, -3.7452963e-01, -4.7091124e-01, 1.7512956e+00, 7.5322462e-01, 6.4989341e-02, -2.9276426e-01, 8.2822847e-02, 7.6619148e-01, 2.2368499e+00, 3.2688673e-01, 8.6330394e-01, 6.7938660e-01, 5.5475763e-01, 1.0016304e+00, 1.2593651e+00, 4.4151065e-02, -3.1413767e-01, 2.2670764e-01, 9.9669193e-01, 1.2159117e+00, -5.4270242e-01, 9.1222834e-01, -1.7214113e-01, -3.3595464e-01, 5.4148678e-01, 9.3211121e-01, -5.7025265e-01, -1.4986054e+00, -5.0345644e-02, 5.5302477e-01, 8.3497887e-02, 1.5775235e+00, -3.3077420e-01, 7.9515483e-01, -7.8480015e-01, -1.2631215e+00, 6.6665499e-01, -1.3926322e+00, -1.3005625e+00, -6.0502216e-01, -1.4885645e+00, 5.5854296e-01, -2.7735429e-01, -1.2936848e+00, -8.8843518e-01, -9.8652008e-01, -7.1617644e-02, -2.4145909e+00, -6.9434901e-01, -1.3913890e+00, 3.2964780e-01, 5.9854448e-01, 1.4717540e-01, -1.0143899e-01, -2.6349808e+00, 2.8053414e-02, -8.7631013e-01, -2.6547745e-01, -3.2757791e-01, -1.1582475e+00, 5.8005321e-01, 2.3975573e-01, -3.5088492e-01, 8.9209848e-01, 1.5782988e+00, -1.1081739e+00, -2.5931047e-02, -1.1106277e+00, 7.5083418e-01, 5.0016703e-01, -5.1726088e-01, -5.5920949e-01, -7.5337062e-01, 9.2581269e-01, -2.4852032e-01, -1.4983452e-01, -1.2584154e+00, 3.1261988e-01, 2.6902769e+00, 2.8969629e-01, -1.4228030e+00, 2.4678572e-01, -1.4357729e+00, 1.4857313e-01, -1.6930726e+00, 7.1918848e-01, 1.1417728e+00, 1.5519363e+00, 1.3836301e+00, -7.5809225e-01, 4.4266274e-01, 9.1109790e-01, -1.0740856e+00, 2.0176191e-01, 7.6286322e-01, -1.2881872e+00, -9.5296182e-01, 7.7817450e-01, -6.3310696e-03, 5.2448681e-01, 1.3642718e+00, 4.8203933e-01, -7.8706585e-01, 7.5199927e-01, -1.6688791e-01, -8.1622811e-01, 2.0940652e+00, 8.0152532e-02, -9.3729507e-01, 6.3573878e-01, 1.6820280e+00, 5.9363417e-01, 7.9015288e-01, 1.0525385e-01, -1.5857856e-01, 8.7090745e-01, -1.9475893e-01, 7.5474485e-02, -5.2663484e-01, -6.8548438e-01, -2.6838765e-01, -1.1883460e+00, 2.4857898e-01, 1.0245162e-01, -4.1006877e-02, -2.2475823e+00, -5.1077648e-01, 2.4924264e-01, 3.6919671e-01, 1.7919662e-01, -3.7283412e-02, -1.6033099e+00, 3.3937204e-01, -1.3113481e-01, 4.8518979e-01, 5.9875070e-01, -8.6030887e-02, 3.2529205e-01, -3.3514323e-01, -3.2244920e-01, -3.8237413e-01, -9.5337093e-01, 2.3357560e-01, 1.2352447e+00, -5.7853160e-01, -5.0153737e-01, 7.2286352e-01, 3.9498485e-02, 1.5412788e+00, -1.7010528e+00, -1.0337413e+00, -7.6370764e-01, 2.1764260e+00, 4.3161210e-01, -4.4376518e-01, 2.9995868e-02, -3.1567087e-01, 9.7784570e-01, 1.8294874e-02, 8.1796283e-01, 7.0234110e-01, -2.3127056e-01, -1.1368958e-01, 1.2794052e-01, -7.9940970e-01, -2.3861196e-01, -8.9463238e-02, -1.0232642e+00, 9.3753792e-01, -1.1317193e+00, -7.1070209e-01, -1.1695009e+00, 1.0654371e+00, -6.8039374e-01, -1.7257727e+00, 8.1319960e-01, 1.4418666e+00, 6.7227220e-01, 1.3866496e-01, -8.5953393e-01, -7.5225056e-01, 1.2296151e+00, 1.1507544e+00, -6.0802501e-01, 8.0615792e-01, 2.1713285e-01, -3.7346107e-01, -8.3203043e-01, 2.8686630e-01, -1.8188916e+00, -1.5730514e+00, 2.0156657e+00, -7.1982024e-02, 2.6289094e+00, -2.4331695e-01, 1.7327649e-01, 9.2320708e-01, -1.7855300e-01, -5.2170491e-01, 1.4319620e+00, -8.7011745e-01, 8.0754179e-01, -5.1063464e-01, 7.4351413e-01, 8.4789830e-01, -8.2990072e-01, 5.3299443e-01, 1.0328484e+00, -1.0520240e+00, 3.6211374e-01, -3.6786617e-02, -1.2276356e+00, -2.7509887e-01, -1.6043524e-01, -1.0835748e+00, -1.9542127e+00, -9.0948726e-01, -5.5787277e-03, -1.7234899e+00, 1.2630773e+00, -6.0043337e-01, -2.0639248e+00, 1.1091094e-01, 1.4876143e+00, 5.3002142e-02, 1.6198074e-01, -2.6877919e-02, 1.7357619e-01, 8.8216775e-01, 1.8229442e-01, 7.5529542e-01, 5.0803455e-01, 1.3188014e-01, 2.8010411e-01, -9.8284756e-01, -9.4408743e-01, -1.3057516e-02, 3.5434528e-01, -8.9470883e-01, 8.1211102e-01, 1.0953735e-01, 2.7316440e+00, 4.1107915e-01, -1.3068620e+00, 3.8380649e-01, 4.9950368e-01, -5.1078559e-01, 2.3492205e-01, -5.9782511e-01, 2.0770819e-02, 4.1944276e-01, 1.1911037e+00, 7.7121425e-01, -2.6442219e+00, 2.8542990e-01, 8.2609262e-01, -8.1224925e-03, 8.5843816e-01, 7.7478824e-01, 1.3059453e+00, 1.2315025e+00, 9.5856367e-01, -1.6545477e+00, -9.9039601e-01, 6.8523602e-01, -9.7487001e-01, -6.0672564e-01, 6.8679374e-01, 2.0048856e-02, 1.0638006e+00, -1.3410499e+00, 4.7951044e-01, -1.6339740e+00, -1.4426650e+00, 2.9378142e-01, -1.4036408e-01, -1.1303407e+00, -2.9253805e-01, -5.8253587e-01, -8.9634828e-01, 2.4860108e-01, -1.4896634e+00, 3.1350866e-01, -2.0250844e+00, 5.2898970e-01, 3.4347090e-01, 7.5819261e-01, -6.9194018e-01, 6.8017855e-01, -1.0725410e+00, 8.9977209e-01, -2.1230924e+00, 2.8471227e-01, -7.3332293e-01, -7.7337563e-01, 1.5184172e-01, -3.3684313e-01, 9.7076072e-01, -1.0723636e-01, 1.0134919e+00, -4.7534676e-01, 6.8948145e-02, 3.9859207e-01, 1.1163262e+00, 6.2045113e-01, -2.8767448e-01, -1.3717733e+00, -6.8586843e-01, 3.3168474e-01, -9.9772182e-01, 2.9141810e-01, 1.1070784e+00, 2.4495861e-01, 1.6497578e-01, 4.0623134e-01, 1.2159812e+00, 1.4484243e+00, -1.0251375e+00, 2.0541801e-01, 5.8888219e-01, -2.6402362e-01, 2.4953178e+00, 8.5594767e-01, -8.5095363e-01, 8.1187884e-01, 7.0024172e-01, 7.5993833e-01, -1.7129092e+00, 1.5370212e+00, -1.6098468e+00, 1.1095260e+00, -1.1097040e+00, 3.8546939e-01, 9.6523079e-01, 8.1829723e-01, 3.7048779e-02, -9.2601240e-01, -1.1191866e-01, -8.0302969e-01, -1.6650059e+00, -9.0140060e-01, 5.8834967e-01, 5.5415928e-01, -4.1517261e-01, 6.1794859e-02, 4.5743157e-01, 1.9901391e-01, 2.5755782e-01, 2.0807298e+00, -2.2772365e+00, 3.3902243e-01, 2.8989389e-01, 6.6226085e-01, -5.8086023e-01, 8.8775191e-01, 1.7187104e-01, 8.4882144e-01, 9.6376903e-01, 1.3219180e+00, -6.4344903e-02, 1.3170531e+00, 2.2801733e-01, -1.4296372e+00, -1.4970100e-01, -5.0496756e-01, -1.7291415e+00, -4.1747222e-01, -6.1496852e-01, 7.2077668e-01, 3.3936379e-01, 8.8284508e-01, 2.8424521e-01, -1.4554135e-01, -8.9645900e-02, 2.8916087e-01, 1.1648308e+00, 8.0572935e-01, -1.3556435e+00, 1.2089290e-01, -2.2217791e-01, 5.7173234e-01, -3.0014043e-01, 1.1342768e+00, -1.7935641e-01, -1.4670667e+00, 1.3953457e+00, 4.4083567e-01, 5.6538405e-01, -6.9362259e-01, 8.3386925e-01, -2.2373784e+00, 1.0976441e+00, -1.6169159e-03, -1.6145733e+00, -1.2287268e+00, 2.0740458e-01, 2.2094200e-01, -1.0060731e+00, -4.5306709e-01, 1.3994533e+00, -4.6196398e-01, 3.2715905e-02, 7.9878320e-01, 8.9681579e-01, 1.3789173e-01, -1.6191464e+00, -1.6466057e+00, 4.2870688e-01, -7.3723084e-01, 5.6492614e-01, -1.3841667e+00, 4.6026799e-01, 6.2938365e-01, 3.7984731e-01, -1.0133299e+00, -3.4724278e-01, 4.4191230e-01, -1.5902403e+00, -7.0141671e-01, -1.0776006e+00, 1.0022197e+00, 1.7294805e+00, 7.0903221e-01, -7.4789686e-01, 2.2886239e-01, -2.2349661e-01, -8.5327526e-01, 3.4562680e-01, 1.0976448e-01, -1.1330390e+00, -6.8312354e-01, -2.7785623e-01, 6.5478985e-01, -1.2483940e+00, -5.9753903e-01, -4.8181255e-01, 9.8337217e-01, 1.7621207e+00, 1.4274017e+00, 9.1176303e-01, 3.2682265e-01, 6.9618540e-02, -1.4997627e+00, -4.1822319e-01, -2.1036798e-02, 2.2842453e-01, -1.0081958e+00, -6.6462217e-01, 5.5817658e-01, -1.1885421e+00, -7.7548150e-01, 2.7104207e-01, 1.5349757e+00, -1.0522827e+00, 6.2555857e-01, -7.9762607e-01, -3.1352199e-01, -6.0220975e-01, 1.2590603e+00, 8.5848425e-01, -2.1052919e+00, -3.6093718e-01, 5.5355672e-01, -1.5563838e+00, -2.0666572e-01, -4.2556755e-01, 4.9377825e-01, -8.7090761e-01, 7.9827658e-02, -5.2161914e-01, -1.4138609e+00, -3.8429318e-01, -4.5792222e-01, -2.9147069e-01, -3.0122401e-01, -1.5885938e+00, 1.0942867e+00, 1.3241669e+00, -1.2647963e-01, -7.3716382e-01, 2.1371884e-01, -4.0052913e-01, 6.4937747e-02};//, -1.7579956e+00, 1.6867480e+00, 3.2740021e-01}; 
    44static const floatx *randn_i=&RArandn[0]; 
    55const static floatx *randn_last=&RArandn[MAXrandn-1]; 
  • applications/pmsm/simulator_zdenek/ekf_example/ekf_mm.cpp

    r1466 r1468  
    55 
    66 
    7 void ekfCh2(ekf_data *E, int16 ux, int16 uy, int16 isx, int16 isy, int16 *detS, int16 *rem) 
     7void ekfCh2(ekf_data *E, int16 ux, int16 uy, int16 isx, int16 isy, int32 *detS, int16 *rem) 
    88{ 
    99        int16 t_sin,t_cos; 
     
    4545        E->y_old[1] = isy; 
    4646         
    47         *detS = 32767; *rem=0; 
    4847        carlson_fastC(E->difz,E->x_est,E->Chf,E->C,E->dR,2,2, detS, rem); 
    4948} 
     
    8483void ekfmm(ekf_data* E1, ekf_data* E2, int16 ux, int16 uy, int16 isx, int16 isy) 
    8584{ 
    86         int16 det1, det2, rem1, rem2; 
     85        int32 det1, det2; 
     86        int16 rem1, rem2; 
    8787        ekfCh2(E1, ux,uy,isx,isy,&det1,&rem1); 
    8888        ekfCh2(E2, ux,uy,isx,isy,&det2,&rem2); 
  • applications/pmsm/simulator_zdenek/ekf_example/ekf_mm.h

    r1466 r1468  
    4141 
    4242void init_ekfCh2( ekf_data *E, double Tv); 
    43 void ekfCh2(ekf_data *E, int16 ux, int16 uy, int16 isx, int16 isy, int16 *detS, int16 *rem); 
     43void ekfCh2(ekf_data *E, int16 ux, int16 uy, int16 isx, int16 isy, int32 *detS, int16 *rem); 
    4444 
    4545void ekfmm(ekf_data *E1, ekf_data *E2, int16  ux, int16 uy, int16 isx, int16 isy); 
  • applications/pmsm/simulator_zdenek/ekf_example/ekf_obj.cpp

    r1466 r1468  
    10871087        int16 dR[2];dR[0]=R[0];dR[1]=R[3]; 
    10881088        //int16 xb[4]; xb[0]=x_est[0]<<2; xb[1]=x_est[1]<<2;  xb[2]=x_est[2]<<2;  xb[3]=x_est[3];   
    1089         int16 detS, rem; 
    1090         detS = 32767; rem=0; 
     1089        int16 rem; 
     1090        int32 detS; 
    10911091        carlson_fastC(difz,x_est,Chf,C,dR,2,2, &detS, &rem); 
    10921092        //x_est[0] = xb[0]>>2; x_est[1]=xb[1]>>2; x_est[2]=xb[2]>>2; x_est[3]=xb[3]; 
  • applications/pmsm/simulator_zdenek/ekf_example/ekf_obj.h

    r1466 r1468  
    581581         
    582582        class mp:public epdf{ 
    583                 LOG_LEVEL(mp,logth); 
     583                LOG_LEVEL(mp,logth,logom); 
    584584        public: 
    585                 mp():epdf(){set_dim(3);         log_level[logth]=true; 
     585                mp():epdf(){set_dim(3);         log_level[logth]=true;log_level[logom]=true; 
    586586} 
    587587                vec sample() const {return zeros(3);} 
     
    600600                                L.add_vector( log_level, logth, RV ( th_dim ), prefix ); 
    601601                        } 
     602                        if ( log_level[logom] ) { 
     603                                int th_dim = N; // dimension - dimension of cov 
     604                                L.add_vector( log_level, logom, RV ( th_dim ), prefix ); 
     605                        } 
    602606                } 
    603607                void log_write() const { 
     
    609613                                for(int i=0;i<N;i++){th(i)=Th[i];} 
    610614                                log_level.store( logth, th ); 
     615                        } 
     616                        if ( log_level[logom] ) { 
     617                                floatx Om[N]; 
     618                                mpf_om(Om); 
     619                                vec om(N);  
     620                                for(int i=0;i<N;i++){om(i)=Om[i];} 
     621                                log_level.store( logom, om ); 
    611622                        } 
    612623                } 
     
    730741                yy=prevod(val[1]/Iref,15); 
    731742                 
    732                 int16 detS, rem; 
    733                 ekfCh2(&E, ux,uy,yx,yy, &detS, &rem); 
    734                  
    735                 Est._mu()=vec_2(E.x_est[0]*Uref/32768., E.x_est[1]*Uref/32768.); 
    736                  
    737                 ll = -0.5*qlog(detS)-0.5*rem; 
     743                int32 detS; 
     744                int16 rem; 
     745                ekfCh2(&E, ux,uy,yx,yy, &detS, &rem); //detS,rem asssigned inside 
     746                 
     747                Est._mu()=vec_2(E.x_est[0]*Wref/32768., E.x_est[1]*Thetaref/32768.); 
     748                 
     749                ll = 0.99*ll+( -0.5*(double)rem/32767)*10000-0.0*log((double)detS); // detS in q(8+15+15)-(8+8). - multiplicative differece is not important 
    738750        } 
    739751        const epdf& posterior() const {return Est;}; 
     
    788800                yy=prevod(val[1]/Iref,15); 
    789801                 
    790                 int16 detS, rem; 
     802                int16  rem; 
     803                int32 detS; 
    791804                ekfCh2(&E, ux,uy,yx,yy, &detS, &rem); 
    792805                 
  • applications/pmsm/simulator_zdenek/ekf_example/matrix_vs.cpp

    r1465 r1468  
    669669} 
    670670 
    671 void carlson_fastC(int16 *difz, int16 *xp, int16 *Ch, int16 *C, int16 *R, unsigned int16 dimy, unsigned int16 dimx, int16 *detS, int16 *rem ) { 
     671void carlson_fastC(int16 *difz, int16 *xp, int16 *Ch, int16 *C, int16 *R, unsigned int16 dimy, unsigned int16 dimx, int32 *detS, int16 *rem ) { 
    672672        int16 alpha,beta,gamma; 
    673673        int16 delta, eta,epsilon,zeta,sigma,tau; 
     
    678678        int16 *Ch_ij, *w_i, *x_i, *C_yi; 
    679679         
    680         *detS = 32767; 
     680        *detS = 1;// 
     681        *rem = 0; 
    681682        for (iy=0; iy<dimy; iy++) 
    682683        { 
     
    741742                } 
    742743                 
    743                 *detS = ((int32)*detS*alpha+(1<<14))>>8; 
    744744                *rem += ((int32)delta*delta)/alpha; 
    745         } 
    746 } 
    747  
     745                *detS = ((int32)*detS*alpha); // !!! unshifterd!!, ie.e multipled by q15, all numbers are small 
     746                printf("%d %d %d %d\n", delta, alpha, *rem, *detS); 
     747        } 
     748        printf("\n"); 
     749} 
     750 
  • applications/pmsm/simulator_zdenek/ekf_example/matrix_vs.h

    r1465 r1468  
    6060 
    6161/* perform Carlson update of Ch matrix using difz, R and xp, for size dimx*/ 
    62 extern void carlson_fastC(int16* difz, int16* xp, int16* Ch, int16* C, int16* R, unsigned int16 dimy, unsigned int16 dimx, int16* detS, int16* rem ); 
     62extern void carlson_fastC(int16* difz, int16* xp, int16* Ch, int16* C, int16* R, unsigned int16 dimy, unsigned int16 dimx, int32* detS, int16* rem ); 
  • applications/pmsm/simulator_zdenek/ekf_example/mpf_double.cpp

    r1442 r1468  
    44#include "fastexp.h" 
    55#include "mpf_double.h" 
    6 #include "RArandn.h" 
    76 
    87static floatx om[N]; 
     
    2120static floatx rinv; 
    2221 
    23  
     22#if 1 
     23#include "RArandn.h" 
    2424floatx qrandu() { 
    2525        if ( randu_i==randu_last ) 
     
    3939        return *randn_i; 
    4040} 
     41 
     42void rng_init() 
     43{ 
     44randu_i=&RArandu[0]; 
     45randn_i=&RArandn[0]; 
     46} 
     47 
     48#else 
     49 
     50#include "rnor.h" 
     51floatx qrandu() { 
     52        return UNI; 
     53} 
     54 
     55floatx qrandn() { 
     56        return PolarRNG(); 
     57} 
     58 
     59void rng_init() 
     60{ 
     61zigset(86947731 ); 
     62} 
     63 
     64 
     65#endif 
     66 
    4167 
    4268void resample() { 
     
    213239 
    214240void mpf_init(floatx qom0, floatx qth0, floatx r0) { 
     241         
     242        rng_init(); 
     243         
    215244        int i; 
    216245        r=r0; 
     
    252281        for (i=0;i<N;i++) th1[i]=th[i]; 
    253282} 
     283void mpf_om(floatx om1[N]){ 
     284        int i; 
     285        for (i=0;i<N;i++) om1[i]=om[i]; 
     286} 
    254287 
    255288floatx kalman_om( const floatx isa, const floatx isb , const floatx usa, const floatx usb, const floatx th ) { 
  • applications/pmsm/simulator_zdenek/ekf_example/mpf_double.h

    r1440 r1468  
    2121floatx qrandn(); 
    2222floatx qrandu(); 
     23void rng_init(); 
    2324 
    2425void mpf_bayes ( const floatx isa, const floatx isb , const floatx usa, const floatx usb ); 
     
    2627void mpf_mean(floatx *Ecosth, floatx *Esinth, floatx *Eome); 
    2728void mpf_th(floatx th1[N]); 
     29void mpf_om(floatx om1[N]); 
    2830 
    2931floatx kalman_om ( const floatx isa, const floatx isb , const floatx usa, const floatx usb, const floatx th ); 
  • applications/pmsm/simulator_zdenek/ekf_example/qmath.cpp

    r1464 r1468  
    2828                return -32768; 
    2929        else 
    30                 return prevod(log(x/32768.),15); 
     30                return prevod(log(x/32768.)/11,15); // log (1/32768) = -10.39. log(x) is scaled to -11:0 
    3131}