r1=[
1.29442;
1.4064;
1.42299;
1.42061;
1.47831;
1.36441;
1.2309;
1.39979;
1.31199;
1.22168;
1.21891;
1.41386;
1.37685;
1.35315;
1.36384;
1.17991;
1.2081;
1.25876;
1.28971;
1.25004;
1.33358;
1.38316;
1.24267;
1.42182;
1.19952;
1.2653;
1.41667;
1.42725;
1.28457;
1.31338;
1.33498;
1.43898;
1.28617;
1.3666;
1.28747;
1.4716;
1.43103;
1.33389;
1.30742;
1.38257;
1.43074;
1.23348;
1.2045;
1.42981;
1.37469];
r5=[
2.92635;
2.87529;
2.88654;
2.91934;
2.96172;
2.88706;
2.90172;
2.97251;
2.87673;
2.95052;
2.94378;
2.98831;
2.97154;
2.9858;
2.94123;
2.99312;
2.88482;
2.94421;
2.92648;
2.96444;
2.9113;
3.06452;
2.97574;
2.93121;
2.94016;
2.93752;
2.98583;
2.98724;
3.01344;
2.94433;
2.88626;
2.95114;
2.98737;
3.00524;
2.94459;
2.98603;
2.97018;
2.95012;
2.94843;
2.91415;
3.0373;
2.94122;
2.98566;
2.98372;
2.97114];
r10=[
3.2676;
3.2708;
3.25264;
3.2346;
3.3056;
3.24532;
3.25221;
3.22877;
3.24876;
3.30105;
3.21822;
3.27542;
3.28926;
3.24238;
3.26551;
3.25332;
3.26381;
3.30048;
3.31476;
3.28013;
3.26734;
3.31865;
3.32755;
3.31885;
3.24862;
3.24455;
3.32166;
3.25803;
3.27002;
3.3238;
3.321;
3.26242;
3.33029;
3.30572;
3.28592;
3.32893;
3.30948;
3.33255;
3.32318;
3.31958;
3.32709;
3.32389;
3.33251;
3.34855;
3.34011];
r15=[
3.22049;
3.14447;
3.23803;
3.1998;
3.26196;
3.20589;
3.21044;
3.26806;
3.22895;
3.23235;
3.21853;
3.2488;
3.19925;
3.20527;
3.26114;
3.22174;
3.22379;
3.21762;
3.22813;
3.22832;
3.19929;
3.22666;
3.23197;
3.26225;
3.24676;
3.20184;
3.26906;
3.25072;
3.2331;
3.28838;
3.23894;
3.24573;
3.27172;
3.26848;
3.247;
3.27445;
3.23356;
3.24704;
3.24548;
3.21992;
3.26877;
3.26837;
3.28683;
3.26468;
3.26418];
r20=[
3.17197;
3.09849;
3.10044;
3.13884;
3.15709;
3.12088;
3.11233;
3.12909;
3.15806;
3.16862;
3.16638;
3.14209;
3.17121;
3.1276;
3.20471;
3.15528;
3.18659;
3.14501;
3.18109;
3.17329;
3.12713;
3.19399;
3.16386;
3.16457;
3.15746;
3.21546;
3.16855;
3.17816;
3.17227;
3.19636;
3.16515;
3.14804;
3.14905;
3.16474;
3.18296;
3.16051;
3.18081;
3.17736;
3.19249;
3.17774;
3.17291;
3.14449;
3.2027;
3.17395;
3.20585];
r30=[
3.03816;
3.05441;
3.02717;
3.01623;
3.02217;
3.02928;
3.01599;
3.00951;
3.02543;
3.05877;
3.04369;
3.05875;
3.04588;
3.05;
3.09741;
3.05383;
3.08069;
3.06671;
3.04471;
3.08001;
3.07633;
3.02282;
3.07574;
3.05765;
3.07201;
3.04471;
3.10522;
3.00958;
3.03845;
3.09058;
3.06323;
3.08233;
3.05585;
3.03421;
3.07066;
3.05949;
3.09136;
3.08034;
3.07495;
3.05543;
3.07674;
3.07192;
3.07473;
3.07208;
3.07239];
r40=[
2.95307;
2.98951;
2.95643;
2.98697;
3.00053;
2.95819;
2.95808;
2.97406;
2.99146;
3.00289;
3.021;
2.95209;
3.01008;
3.04175;
2.98778;
3.01515;
3.01935;
2.97022;
2.99625;
3.04153;
2.99851;
3.01282;
3.00378;
3.04401;
3.05768;
2.98923;
3.0246;
2.97197;
3.00397;
3.01679;
3.03548;
3.02132;
2.97794;
3.02326;
3.03068;
3.04242;
3.0358;
3.03553;
3.06091;
3.01799;
2.99916;
2.99454;
3.01877;
3.02685;
2.99159];
r50=[
2.90294;
2.92368;
2.89358;
2.94077;
2.90926;
2.961;
2.96297;
2.939;
2.99815;
2.95565;
2.97351;
2.97943;
2.93716;
2.98485;
2.94068;
3.01607;
2.96922;
2.98306;
2.93188;
3.00006;
2.93205;
2.96078;
2.98902;
2.96568;
2.97252;
2.98167;
2.98992;
2.97457;
2.956;
2.97291;
2.95137;
2.96587;
3.02211;
2.98017;
3.00379;
3.02518;
2.94871;
3.00237;
3.00019;
2.94798;
3.01938;
2.95969;
2.99829;
2.97967;
2.99704];
r60=[
2.8734;
2.88948;
2.82968;
2.87646;
2.91989;
2.96686;
2.93706;
2.90665;
2.87295;
2.94263;
2.92072;
2.92363;
2.88632;
2.9169;
2.93145;
2.92435;
2.95064;
2.95196;
2.89173;
2.96264;
2.9291;
2.95435;
2.91891;
2.9112;
2.92239;
2.92659;
2.92377;
2.96587;
2.97536;
2.91657;
3.00262;
2.9321;
2.93159;
2.97901;
2.92324;
2.93231;
2.96769;
3.00192;
2.96059;
2.97369;
2.87647;
2.91318;
2.9698;
2.96892;
2.96862];
r70=[
2.86872;
2.84795;
2.86062;
2.82819;
2.92347;
2.88734;
2.86681;
2.9097;
2.9156;
2.91738;
2.8687;
2.80557;
2.89108;
2.862;
2.94286;
2.87469;
2.89427;
2.91895;
2.91239;
2.90007;
2.96094;
2.87856;
2.86654;
2.93537;
2.89094;
2.88311;
2.96106;
2.85701;
2.93449;
2.92177;
2.96652;
2.8871;
2.91906;
2.95615;
2.91896;
2.94152;
2.99604;
2.94658;
2.9034;
2.95382;
2.98799;
2.97075;
2.96553;
2.91294;
3.02696];
r80=[
2.87724;
2.87745;
2.87204;
2.86377;
2.81995;
2.87442;
2.9145;
2.92105;
2.83292;
2.85397;
2.87851;
2.92884;
2.8568;
2.86631;
2.97747;
2.89162;
2.91307;
2.89784;
2.90352;
2.84818;
2.82851;
2.89853;
2.93211;
2.94981;
2.8942;
2.93051;
2.98921;
2.85551;
2.89732;
2.93071;
2.88803;
2.89557;
2.93906;
2.91717;
2.90249;
2.92988;
2.91085;
2.91295;
2.96332;
2.96229;
2.85358;
2.86857;
2.92814;
2.9323;
2.94406];
r90=[
2.83808;
2.87528;
2.91748;
2.91683;
2.77796;
2.90052;
2.88518;
2.82696;
2.84561;
2.84018;
2.94064;
2.88361;
2.90392;
2.88835;
2.85796;
2.87026;
2.7891;
2.85582;
2.91932;
2.88764;
2.85677;
2.83768;
2.92249;
2.8656;
2.88111;
2.91846;
2.9207;
2.96124;
2.86002;
2.84145;
2.89286;
2.94284;
2.83652;
2.91009;
2.96967;
2.89593;
2.9533;
2.91915;
2.91389;
2.91637;
2.872;
2.83825;
2.95586;
2.90245;
2.8756];
r100=[
2.89868;
2.88349;
2.87925;
2.87764;
2.88877;
2.89233;
2.86225;
2.91615;
2.84604;
2.93625;
2.86592;
2.85396;
2.86162;
2.89937;
2.94694;
2.89847;
2.89467;
2.86959;
2.9579;
2.89104;
2.89075;
2.82408;
2.93833;
2.93261;
2.88908;
2.89342;
2.90046;
2.8563;
2.8712;
2.86895;
2.93294;
2.88198;
2.87971;
2.90045;
2.83092;
2.95579;
2.9253;
2.92956;
2.89849;
2.89869;
2.86148;
2.93208;
2.93235;
2.96006;
2.8683];
r110=[
2.86503;
2.85389;
2.88917;
2.84254;
2.83292;
2.77643;
2.8294;
2.80593;
2.84281;
2.87571;
2.83324;
2.93865;
2.88683;
2.90209;
2.88268;
2.88578;
2.84596;
2.88445;
2.867;
2.87839;
2.91319;
2.85774;
2.92494;
2.88959;
2.87295;
2.93378;
2.74134;
2.87147;
2.87836;
2.84163;
2.93726;
2.90236;
2.91359;
2.88821;
2.88071;
2.90716;
2.84862;
2.97755;
2.8735;
2.96223;
2.94256;
2.93312;
2.82948;
2.93836;
2.89636];
r120=[
2.84879;
2.87173;
3.01931;
2.88659;
2.91026;
2.94771;
2.97884;
2.93349;
2.92565;
2.90012;
2.84284;
2.92219;
2.88489;
2.90296;
2.96722;
2.91954;
2.96864;
2.94173;
2.94208;
2.89973;
2.94465;
2.87437;
2.9785;
2.94422;
2.90583;
2.95409;
2.97602;
2.94764;
2.95067;
3.00526;
2.96856;
2.97296;
2.95526;
2.99223;
2.54378;
2.98133;
2.94891;
2.94433;
2.93966;
2.93469;
2.93622;
2.89404;
2.94943;
2.90549;
3.03569];
r130=[
3.01402;
2.89893;
2.98994;
3.01535;
2.8753;
3.01917;
2.95609;
3.00333;
3.05311;
3.03398;
2.92105;
3.05959;
2.88166;
2.8668;
2.93313;
3.0031;
2.99915;
2.92583;
2.97754;
2.84707;
2.95989;
3.01598;
3.01047;
3.07587;
3.05508;
3.00313;
3.00486;
2.99236;
2.99315;
3.04432;
3.03439;
2.94434;
2.96524;
3.03003;
3.09636;
3.06878;
3.03413;
2.9887;
3.02104;
3.05375;
2.9555;
2.98011;
3.06543;
3.03116;
3.0293];
r140=[
3.02265;
3.10993;
2.96564;
2.94497;
3.04894;
2.97285;
2.95932;
2.95037;
2.98553;
2.99066;
3.08015;
2.91024;
3.02779;
2.9631;
2.84484;
2.99022;
2.92671;
2.94826;
3.06331;
3.06862;
3.09892;
3.14758;
3.0719;
2.97916;
3.07786;
3.04381;
3.03082;
2.86938;
3.05659;
3.12655;
3.08059;
3.04249;
3.10025;
3.10167;
2.92538;
3.06262;
3.08879;
3.10072;
2.99118;
3.10025;
2.96764;
3.07338;
3.02606;
3.07644;
3.06124];
r150=[
2.74993;
3.0337;
3.00781;
3.09469;
2.93269;
2.82786;
2.97087;
3.07059;
3.14874;
3.13295;
3.03527;
3.11103;
3.10614;
3.15563;
3.23187;
3.12756;
3.15116;
3.13049;
3.08511;
3.16597;
3.16576;
3.12191;
2.95371;
3.09586;
3.15801;
2.96938;
3.11815;
3.21587;
3.18693;
3.13553;
3.27221;
3.10306;
3.03209;
3.2771;
3.16417;
3.18776;
3.29891;
3.15581;
3.08742;
3.08197;
3.02845;
3.13751;
2.97894;
3.05587;
3.20498];
r160=[
3.17061;
3.06574;
3.18352;
3.17864;
2.69754;
3.18189;
3.12661;
3.24377;
3.12771;
3.04193;
3.16213;
3.21706;
3.13191;
3.14032;
3.33564;
3.06301;
3.19584;
3.18143;
3.01327;
3.17243;
3.13935;
3.07806;
2.99156;
3.19865;
3.13393;
3.10186;
3.2533;
3.18899;
2.83147;
3.22409;
3.1603;
3.22277;
3.1506;
3.23149;
3.18329;
3.20777;
3.10926;
2.86967;
3.21659;
3.16626;
3.17198;
2.69677;
3.0954;
2.96703;
3.15392];
r170=[
3.20401;
3.05731;
3.07463;
3.38496;
3.31493;
3.12397;
3.29882;
3.21273;
3.26209;
3.10129;
3.0718;
2.79588;
3.09232;
3.23;
3.10987;
3.25782;
2.91087;
3.1353;
3.30301;
3.03534;
3.16787;
3.04758;
3.22514;
3.21416;
3.12687;
3.1093;
3.27431;
3.22864;
3.14896;
3.3061;
3.2123;
3.15488;
3.18748;
3.15554;
2.93698;
3.14483;
3.28064;
3.30021;
3.22077;
3.11573;
3.07117;
3.36137;
3.25417;
3.32134;
2.98146];
r180=[
3.2023;
3.26594;
3.32655;
3.24985;
3.15428;
3.24066;
2.54011;
3.00794;
3.2152;
3.15988;
3.25598;
3.11629;
3.04421;
3.19238;
3.13608;
3.24909;
3.1506;
3.17247;
3.28637;
3.28079;
3.13477;
3.13242;
3.10007;
3.24585;
2.43211;
3.16822;
3.2936;
3.32144;
3.33321;
2.69609;
3.19286;
3.17467;
3.22094;
3.02385;
3.45594;
2.87329;
2.92195;
3.20766;
3.23662;
2.99019;
3.12432;
3.32023;
2.79292;
3.01326;
3.27242];
r190=[
3.2105;
3.25134;
3.23871;
3.23742;
3.19034;
3.10999;
3.18657;
2.92651;
3.00193;
2.79766;
3.1065;
3.31999;
3.22689;
3.02666;
3.37585;
3.29727;
3.2213;
3.27235;
2.66612;
2.94316;
3.35108;
3.3077;
2.81021;
3.1205;
3.18809;
3.17124;
3.14493;
3.08216;
3.22804;
2.76086;
3.18402;
3.25388;
3.31647;
3.19315;
3.25429;
3.37582;
3.08442;
3.15692;
2.98781;
3.2839;
3.15805;
3.38574;
3.06805;
2.86235;
3.1726];
r200=[
2.93014;
2.99935;
3.39125;
3.06869;
3.00055;
2.9837;
3.40909;
3.04135;
3.04591;
3.21808;
2.9328;
3.27074;
3.3896;
3.04492;
2.86603;
3.03261;
1.75786;
3.27113;
2.93406;
2.93345;
3.05995;
3.22404;
3.11527;
3.11167;
3.36529;
3.06242;
3.10646;
2.98743;
2.01563;
3.17201;
3.18779;
2.88812;
3.28257;
3.44021;
3.20759;
3.21519;
3.24909;
3.20731;
2.11516;
3.19401;
3.27553;
3.18031;
3.29047;
3.31136;
3.4365];
r220=[
3.00244;
2.93335;
3.22716;
2.70653;
3.33496;
3.24702;
3.45104;
3.33087;
3.26295;
3.13866;
2.76379;
2.67731;
3.52742;
3.07355;
3.06706;
3.21857;
1.41395;
3.17041;
3.30544;
3.23229;
3.12745;
3.43636;
3.22236;
2.98897;
2.9097;
2.90285;
2.91854;
3.18301;
3.27424;
3.3927;
3.2225;
3.36681;
3.25084;
2.94062;
3.14468;
2.9838;
3.09013;
3.24125;
3.2911;
1.75372;
3.45452;
3.15817;
3.16946;
3.40707;
3.2688];
r260=[
1.87107;
3.18244;
3.11716;
2.2168;
1.53445;
3.03347;
3.24032;
2.88163;
2.26909;
2.90012;
3.17265;
3.48465;
2.48779;
3.02172;
3.15461;
2.99075;
3.52884;
3.09774;
2.60044;
2.43818;
1.99497;
2.95032;
3.27213;
3.12806;
2.5212;
2.80213;
3.15365;
2.30552;
2.46703;
2.69343;
3.39106;
3.00181;
3.21936;
3.36684;
2.17664;
2.58453;
2.53634;
2.9881;
2.97609;
2.8962;
2.71947;
3.11617;
2.78974;
1.78842;
3.30998];
r300=[
2.71498;
2.59924;
1.87043;
2.46875;
3.46052;
3.46905;
2.50579;
3.44482;
3.0422;
2.9691;
2.48695;
2.4252;
1.67933;
2.44049;
2.47876;
3.38144;
3.23001;
3.09421;
3.19039;
3.41839;
2.72503;
3.05417;
2.22502;
2.64867;
2.20813;
3.17425;
2.78614;
3.08691;
3.5504;
3.14266;
3.10866;
2.88447;
2.04034;
1.17696;
3.17804;
2.92797;
2.77148;
3.11484;
3.04241;
2.52585;
3.10644;
2.06476;
3.30691;
3.00519;
2.88025];
r340=[
2.79681;
2.71091;
2.8414;
2.65121;
2.51144;
3.2337;
3.10142;
1.13126;
2.99344;
1.80746;
3.70107;
3.35661;
3.12389;
2.86704;
3.29045;
3.30333;
3.21704;
1.93111;
2.52423;
3.21032;
3.45646;
3.00989;
2.24047;
2.81177;
2.81358;
2.60799;
2.95793;
3.20256;
3.5269;
1.44631;
2.90752;
3.25971;
3.23807;
3.21894;
3.17265;
3.09485;
2.81732;
3.3823;
2.46606;
2.60333;
1.88236;
2.11374;
3.16472;
2.86272;
2.97286];
r380=[
0.678718;
2.25109;
2.94462;
3.23316;
2.60352;
2.95562;
2.2963;
2.32675;
3.33005;
2.70039;
2.32651;
3.33468;
2.39294;
3.46485;
1.31131;
2.83722;
1.62107;
2.95709;
2.62849;
2.93565;
3.32553;
0.498041;
3.01906;
2.90986;
3.39991;
2.55459;
3.11299;
1.88209;
3.42093;
2.7411;
3.06518;
3.30541;
2.43386;
1.85353;
1.95977;
2.67802;
2.61799;
3.08657;
1.78485;
2.51354;
3.62682;
2.09874;
2.79351;
3.43789;
1.96501];
r400=[
2.69017;
3.18564;
2.88712;
1.83971;
1.76851;
3.39442;
2.56945;
2.44207;
3.1281;
3.12442;
2.35951;
3.0399;
3.28586;
2.46466;
3.15382;
2.47102;
1.78939;
2.3864;
1.78737;
1.8003;
3.13503;
2.15925;
2.82151;
2.94329;
3.44827;
3.09795;
2.8038;
2.5636;
2.01736;
2.46362;
2.04915;
2.79787;
1.34568;
1.60064;
2.66113;
3.05626;
1.10037;
1.95567;
1.87768;
2.91335;
1.93921;
3.43842;
1.95109;
3.01643;
3.19217];
r450=[
2.84942;
2.46315;
1.5542;
2.61992;
1.78725;
2.74545;
2.84831;
2.90428;
2.73534;
2.98991;
2.95315;
2.80405;
3.19695;
3.10068;
1.94908;
2.42581;
2.83371;
1.41396;
3.1917;
2.76403;
3.16104;
3.37225;
2.71631;
3.20675;
1.48564;
2.01825;
3.1691;
2.40619;
2.88883;
2.02668;
3.0348;
1.7264;
3.03716;
0.961704;
2.2283;
2.43852;
3.30601;
2.3802;
3.23384;
2.41089;
2.59962;
2.94543;
2.50387;
3.3455;
0.579416];
r500=[
2.00007;
0.705417;
2.9912;
2.19271;
2.25602;
1.89241;
2.40555;
2.44125;
2.987;
2.22196;
2.47478;
2.79304;
1.71947;
2.00247;
2.01896;
2.86313;
2.88151;
2.65399;
0.895814;
2.93522;
3.12399;
3.75696;
0.804341;
2.98082;
2.11712;
2.27446;
3.09508;
2.18671;
3.11809;
2.10125;
3.21774;
2.67288;
2.9883;
3.05739;
2.26708;
2.36272;
1.84325;
1.33923;
2.91226;
1.35581;
1.34015;
1.32193;
2.98238;
1.98837;
2.04606];
r550=[
2.66389;
1.59818;
1.46641;
1.16691;
1.85064;
2.37299;
2.54559;
2.62477;
2.89829;
2.98877;
2.89951;
2.43068;
3.0266;
2.6921;
2.76189;
3.01297;
3.11625;
2.01716;
3.54371;
2.47474;
2.91591;
1.69233;
1.29021;
2.21568;
2.06509;
3.19013;
2.88494;
2.31475;
2.02975;
2.74421;
2.83957;
2.91632;
1.57952;
1.28701;
2.34295;
2.97857;
2.06639;
2.87079;
2.41454;
1.83651;
2.62544;
2.97795;
3.42269;
3.10899;
1.51823];
r600=[
2.26941;
2.72764;
1.47554;
0.900878;
2.10502;
3.32248;
2.09667;
1.80185;
3.43166;
3.22089;
2.30512;
3.00999;
3.46102;
1.42172;
2.78271;
1.82019;
1.39442;
3.25918;
2.58285;
0.745393;
3.03842;
2.2458;
2.67399;
2.80669;
3.07252;
3.69924;
2.18134;
3.33988;
2.75814;
2.47869;
3.35667;
2.24405;
3.00329;
3.4656;
0.27859;
2.13627;
1.77611;
1.61806;
1.71454;
2.78981;
3.15205;
2.59386;
2.85194;
2.83608;
3.34685];
p1=[
0.000146272;
0.000187109;
0.000181684;
0.000186936;
0.00020127;
0.000178042;
0.000160856;
0.000186281;
0.000151885;
0.000123314;
0.000125782;
0.000198127;
0.000183782;
0.000151929;
0.000160548;
0.000132022;
0.000143471;
0.000126275;
0.000152332;
0.000145906;
0.000160287;
0.000186515;
0.00016376;
0.000203844;
0.000129309;
0.000149348;
0.000180846;
0.000193359;
0.000169354;
0.000169774;
0.000169323;
0.00019348;
0.000152382;
0.000178089;
0.000157897;
0.000192932;
0.00019017;
0.000163801;
0.000174188;
0.000175494;
0.000178023;
0.000152081;
0.000112407;
0.000202103;
1.37469];
p5=[
0.00200601;
0.00192045;
0.00201286;
0.00203781;
0.00194743;
0.00216588;
0.00208483;
0.00194841;
0.00199869;
0.00214116;
0.00203421;
0.00212537;
0.00217687;
0.00207886;
0.00207315;
0.00213912;
0.00193195;
0.00212543;
0.00198454;
0.00209023;
0.00208457;
0.00213519;
0.00223852;
0.00188046;
0.00206325;
0.00205645;
0.00196185;
0.00216721;
0.00209038;
0.00202357;
0.00190351;
0.00209661;
0.00210338;
0.00212423;
0.00195792;
0.00205734;
0.00211969;
0.00205141;
0.00205358;
0.00192757;
0.0020795;
0.00203621;
0.00196686;
0.00204516;
2.97114];
p10=[
0.00500746;
0.00495331;
0.00498289;
0.00475945;
0.00507817;
0.00485943;
0.00512451;
0.00520889;
0.00495405;
0.00513567;
0.00495552;
0.00476997;
0.00481148;
0.00486845;
0.00512795;
0.00488287;
0.00491641;
0.00492401;
0.00542272;
0.00496885;
0.00508523;
0.00515433;
0.00503354;
0.00504866;
0.00505166;
0.00517106;
0.0050114;
0.00506772;
0.00484963;
0.00498466;
0.00498764;
0.00501978;
0.00498546;
0.00500921;
0.00499531;
0.00497989;
0.00489145;
0.00498173;
0.00504074;
0.00507642;
0.00512479;
0.00503185;
0.00491647;
0.00503441;
3.34011];
p15=[
0.00796052;
0.00830925;
0.00804433;
0.0077884;
0.00834006;
0.00792736;
0.00807635;
0.00855666;
0.00859589;
0.00835461;
0.00823193;
0.00806282;
0.00820926;
0.00798591;
0.00854773;
0.00805773;
0.00832861;
0.00831305;
0.00825786;
0.00839664;
0.00816239;
0.00824981;
0.00918227;
0.00848875;
0.0082893;
0.00824276;
0.00793181;
0.00838524;
0.00791324;
0.00846012;
0.00805884;
0.00851322;
0.00805135;
0.00810453;
0.00845053;
0.00814538;
0.00812189;
0.00812938;
0.00823171;
0.00804423;
0.00809041;
0.00785396;
0.00816901;
0.00787169;
3.26418];
p20=[
0.0113953;
0.0114165;
0.0112772;
0.0116835;
0.0117226;
0.0115419;
0.0111774;
0.0118047;
0.0120382;
0.0116615;
0.0113248;
0.0123651;
0.0120019;
0.0116973;
0.0118094;
0.0116018;
0.0122389;
0.0117559;
0.0112758;
0.0114516;
0.0116233;
0.011952;
0.0116404;
0.0114525;
0.0113768;
0.0115008;
0.0113153;
0.0115849;
0.011873;
0.0114209;
0.011496;
0.0119004;
0.011196;
0.0111632;
0.0115387;
0.0111507;
0.0117534;
0.0112434;
0.0114057;
0.0114276;
0.0108519;
0.011511;
0.0112658;
0.0115575;
3.20585];
p30=[
0.0187524;
0.0188142;
0.0187032;
0.0179676;
0.0190207;
0.018791;
0.0186504;
0.0186402;
0.0187289;
0.0194098;
0.0186289;
0.0191074;
0.0189982;
0.0188917;
0.0187043;
0.0186717;
0.0190401;
0.018041;
0.0182085;
0.0180749;
0.0177154;
0.018295;
0.0183471;
0.017983;
0.0180769;
0.0178866;
0.0183038;
0.0184061;
0.0184808;
0.017746;
0.0184998;
0.0179893;
0.0181406;
0.0179549;
0.0173231;
0.01769;
0.0173173;
0.0172277;
0.0177322;
0.0185898;
0.0174443;
0.017755;
0.0177816;
0.0175598;
3.07239];
p40=[
0.0265651;
0.0247995;
0.0258863;
0.0255474;
0.0246384;
0.0254659;
0.0250081;
0.0248419;
0.0246012;
0.0247871;
0.0254393;
0.0258928;
0.0248117;
0.0249955;
0.0244649;
0.024959;
0.0242189;
0.0248345;
0.0246563;
0.0244918;
0.0247806;
0.0251705;
0.0240008;
0.0239264;
0.0251361;
0.0241944;
0.0251975;
0.0242626;
0.0249449;
0.024243;
0.0247187;
0.0247089;
0.0246109;
0.0247177;
0.0247089;
0.0248039;
0.0239838;
0.0239515;
0.0243306;
0.0243672;
0.0250115;
0.0242791;
0.0234122;
0.0244756;
2.99159];
p50=[
0.0316026;
0.032566;
0.0314678;
0.0329856;
0.0308927;
0.0310637;
0.0316448;
0.0312894;
0.0319208;
0.030143;
0.0316928;
0.0309902;
0.0304311;
0.0311671;
0.0316692;
0.0308899;
0.0306593;
0.031485;
0.031036;
0.0319405;
0.0310808;
0.0316678;
0.0310124;
0.030661;
0.030941;
0.0306781;
0.0310406;
0.0306181;
0.0311253;
0.0302425;
0.0303668;
0.0309352;
0.0309324;
0.0301594;
0.0304521;
0.0293703;
0.0309124;
0.0301026;
0.0298639;
0.0306463;
0.0313836;
0.0298489;
0.0309445;
0.0311638;
2.99704];
p60=[
0.0370855;
0.0371895;
0.0377682;
0.0393976;
0.0372444;
0.0366373;
0.0375313;
0.0373361;
0.0375587;
0.0378286;
0.0377297;
0.0371595;
0.0364305;
0.0366236;
0.0383138;
0.037083;
0.0352048;
0.0371846;
0.0378678;
0.0359396;
0.0371944;
0.0365921;
0.0367743;
0.0360863;
0.036066;
0.035917;
0.0359377;
0.0365656;
0.0367606;
0.0369471;
0.036004;
0.0373987;
0.0364727;
0.0367187;
0.0362923;
0.0364727;
0.0370304;
0.0363152;
0.0365541;
0.0360316;
0.0363044;
0.0371449;
0.0360054;
0.0355767;
2.96862];
p70=[
0.0452596;
0.0426823;
0.0431388;
0.0428176;
0.042272;
0.0419049;
0.04245;
0.044181;
0.0422219;
0.0418792;
0.042144;
0.0421271;
0.043261;
0.0421726;
0.0433599;
0.0425496;
0.0433351;
0.0428518;
0.0425881;
0.0439046;
0.0429006;
0.043233;
0.0429809;
0.0424586;
0.0418633;
0.0422652;
0.0414964;
0.0411433;
0.0426898;
0.0421202;
0.0416276;
0.0428829;
0.0403392;
0.0420065;
0.0415479;
0.0419352;
0.0430977;
0.0422003;
0.0424564;
0.0421757;
0.0425165;
0.0442033;
0.0424839;
0.0407668;
3.02696];
p80=[
0.0479121;
0.0485599;
0.0488697;
0.0482515;
0.047684;
0.0481986;
0.0476021;
0.0490872;
0.0490881;
0.0484355;
0.0476422;
0.0469721;
0.0462871;
0.0479568;
0.0476068;
0.0490563;
0.0467938;
0.0481416;
0.0481352;
0.0472146;
0.0481262;
0.0470614;
0.0470229;
0.0472835;
0.0474684;
0.048191;
0.0477137;
0.0473481;
0.0466083;
0.0470688;
0.0486729;
0.0471425;
0.0462892;
0.0471561;
0.046815;
0.0464374;
0.0463547;
0.0473584;
0.0473867;
0.0474516;
0.0460199;
0.0467989;
0.0470772;
0.046523;
2.94406];
p90=[
0.0530448;
0.0541778;
0.055862;
0.0546464;
0.0527843;
0.0526041;
0.0546982;
0.0532161;
0.0529027;
0.0530825;
0.0536634;
0.0535123;
0.0536459;
0.0528673;
0.0536791;
0.0520437;
0.0527495;
0.0530567;
0.0524424;
0.0520452;
0.0532198;
0.0517753;
0.0521844;
0.0526208;
0.0517121;
0.0512233;
0.0517109;
0.050927;
0.0533716;
0.0526883;
0.0519849;
0.0528079;
0.0515018;
0.0524198;
0.0525497;
0.0526851;
0.0529035;
0.0520108;
0.0525357;
0.0515489;
0.0524441;
0.0528386;
0.054205;
0.0535484;
2.8756];
p100=[
0.0570768;
0.0570064;
0.0572145;
0.0593817;
0.0582558;
0.0593617;
0.0593403;
0.0584467;
0.0572693;
0.0569379;
0.0567859;
0.0582577;
0.0574949;
0.0583352;
0.0582267;
0.0571315;
0.0585102;
0.0577182;
0.0587654;
0.0569693;
0.0559739;
0.0565192;
0.0589055;
0.0562427;
0.055882;
0.0573962;
0.0566431;
0.0576038;
0.0582524;
0.0575681;
0.055936;
0.0572075;
0.0579521;
0.0575868;
0.0572638;
0.0581968;
0.0569868;
0.0555339;
0.0576176;
0.0576229;
0.0564734;
0.0570523;
0.0565494;
0.0569022;
2.8683];
p110=[
0.0633796;
0.0627233;
0.063367;
0.0627434;
0.0629894;
0.0613591;
0.063153;
0.0625359;
0.0614001;
0.0647028;
0.0643192;
0.0629637;
0.0630965;
0.062234;
0.0627633;
0.0632954;
0.0634834;
0.0617561;
0.0619311;
0.0611394;
0.0626655;
0.0634967;
0.062488;
0.0629006;
0.0635637;
0.0599793;
0.0628736;
0.0638811;
0.0614148;
0.0639815;
0.0614949;
0.0623022;
0.0632156;
0.0622264;
0.0612434;
0.0602332;
0.0620191;
0.0631896;
0.0625339;
0.0624548;
0.0618824;
0.0611517;
0.0623776;
0.0617219;
2.89636];
p120=[
0.0686394;
0.068684;
0.0690011;
0.0696978;
0.0717456;
0.0693488;
0.069904;
0.0694641;
0.0684742;
0.070273;
0.0681004;
0.0686313;
0.0699251;
0.0673105;
0.0693413;
0.0698776;
0.0712166;
0.0698292;
0.0691001;
0.0690057;
0.0676202;
0.0688655;
0.067784;
0.0684993;
0.0684691;
0.0680835;
0.0674795;
0.067017;
0.0682352;
0.0689974;
0.0705595;
0.0695805;
0.0688119;
0.0698027;
0.0680606;
0.0695065;
0.0684768;
0.0694459;
0.0690913;
0.0674978;
0.0679127;
0.0691148;
0.0675343;
0.0659292;
3.03569];
p130=[
0.0759171;
0.0758946;
0.0759967;
0.0765616;
0.0733509;
0.0765971;
0.0751298;
0.0746359;
0.0762625;
0.0755715;
0.0758048;
0.0759234;
0.0765249;
0.0746897;
0.0739468;
0.0736277;
0.0755328;
0.0770496;
0.0745469;
0.074149;
0.0763733;
0.0747635;
0.0731817;
0.0747055;
0.0750308;
0.0745035;
0.074633;
0.075979;
0.074477;
0.0747053;
0.0735016;
0.076024;
0.0747509;
0.0749249;
0.0756836;
0.0755441;
0.0755563;
0.0731695;
0.0750013;
0.0743426;
0.0749422;
0.0759279;
0.0720839;
0.0735473;
3.0293];
p140=[
0.0817834;
0.0813546;
0.0842983;
0.0804795;
0.0827575;
0.0817269;
0.0830243;
0.0830189;
0.0821219;
0.0795964;
0.0830606;
0.0818849;
0.0798944;
0.0818653;
0.0829443;
0.0811633;
0.0810603;
0.0812685;
0.0820496;
0.0800407;
0.0820404;
0.0794145;
0.0811432;
0.0822646;
0.0812365;
0.081303;
0.0815504;
0.080827;
0.0810255;
0.0831957;
0.0798843;
0.0813538;
0.0815226;
0.083293;
0.0801772;
0.0813443;
0.0813021;
0.0813669;
0.0811203;
0.0792506;
0.080265;
0.0802582;
0.0823354;
0.0785216;
3.06124];
p150=[
0.088058;
0.0863261;
0.0878396;
0.0877933;
0.081341;
0.0861546;
0.0861927;
0.0886734;
0.0843867;
0.0876017;
0.087775;
0.0873756;
0.0864159;
0.0863002;
0.0884905;
0.0845316;
0.0861082;
0.0869117;
0.0867179;
0.0866121;
0.0899616;
0.087033;
0.0880365;
0.0863517;
0.0862282;
0.0877807;
0.0866488;
0.0844808;
0.0873767;
0.0878925;
0.0858112;
0.0846481;
0.0852981;
0.088697;
0.0855598;
0.0856607;
0.0864498;
0.0875805;
0.0853425;
0.0867049;
0.0824065;
0.0895351;
0.089648;
0.0858174;
3.20498];
p160=[
0.0910203;
0.0904343;
0.0914116;
0.0917019;
0.0935088;
0.0936608;
0.091931;
0.0917026;
0.091173;
0.0933717;
0.0940761;
0.0939059;
0.0930098;
0.0937535;
0.0953803;
0.0934537;
0.0951577;
0.0952075;
0.0920153;
0.0952816;
0.0925441;
0.0912989;
0.0941683;
0.0906771;
0.0926514;
0.0908847;
0.091384;
0.0934834;
0.0900453;
0.0952893;
0.0913512;
0.0912617;
0.0913451;
0.0910147;
0.09184;
0.0928897;
0.0941522;
0.0903054;
0.0942517;
0.0922549;
0.0937949;
0.0947316;
0.0938116;
0.0955363;
3.15392];
p170=[
0.101178;
0.0974627;
0.0971656;
0.0974201;
0.0968927;
0.0973413;
0.100233;
0.096447;
0.0994807;
0.097569;
0.0982744;
0.098615;
0.0955404;
0.095317;
0.100428;
0.096996;
0.0969301;
0.0944573;
0.0961173;
0.0965887;
0.0976221;
0.0974905;
0.0975332;
0.09546;
0.0950111;
0.0973969;
0.0978539;
0.0984773;
0.0958461;
0.0970959;
0.0973943;
0.095233;
0.0951649;
0.0980958;
0.0970656;
0.0995837;
0.100335;
0.0980504;
0.0970936;
0.0987353;
0.100023;
0.0969282;
0.097453;
0.0997996;
2.98146];
p180=[
0.101364;
0.10063;
0.102971;
0.100243;
0.103834;
0.103781;
0.101768;
0.101234;
0.101266;
0.104074;
0.103287;
0.099564;
0.101586;
0.10231;
0.102413;
0.10027;
0.102097;
0.103657;
0.100316;
0.101432;
0.099858;
0.104145;
0.102609;
0.102628;
0.100887;
0.101401;
0.102765;
0.10293;
0.0995951;
0.101923;
0.101517;
0.0998347;
0.103902;
0.103463;
0.101466;
0.105579;
0.101503;
0.0972664;
0.102771;
0.101586;
0.104597;
0.0985245;
0.0996256;
0.101996;
3.27242];
p190=[
0.106318;
0.106055;
0.107241;
0.106212;
0.103454;
0.107709;
0.106516;
0.104695;
0.105753;
0.106933;
0.106188;
0.10658;
0.106234;
0.108956;
0.105896;
0.103977;
0.105479;
0.106193;
0.108321;
0.106228;
0.107483;
0.106024;
0.10976;
0.107646;
0.105806;
0.104114;
0.106299;
0.105604;
0.105137;
0.102788;
0.108986;
0.106826;
0.104496;
0.105078;
0.103969;
0.108048;
0.107133;
0.108456;
0.10569;
0.105327;
0.104226;
0.109948;
0.108412;
0.105946;
3.1726];
p200=[
0.10883;
0.107799;
0.11029;
0.1096;
0.110868;
0.110521;
0.107876;
0.109099;
0.109285;
0.109545;
0.109536;
0.109184;
0.107101;
0.110504;
0.109894;
0.108981;
0.112822;
0.107953;
0.107735;
0.111238;
0.108111;
0.111451;
0.111321;
0.108619;
0.108117;
0.110949;
0.107183;
0.108382;
0.109906;
0.110478;
0.108355;
0.10928;
0.111185;
0.107294;
0.105221;
0.110636;
0.105292;
0.112317;
0.112699;
0.110073;
0.111;
0.109988;
0.109235;
0.110086;
3.4365];
p220=[
0.116931;
0.115841;
0.119723;
0.117692;
0.115463;
0.116311;
0.114826;
0.114419;
0.114335;
0.119094;
0.117822;
0.120301;
0.115997;
0.116546;
0.117756;
0.116687;
0.119374;
0.111841;
0.113323;
0.116236;
0.115055;
0.112764;
0.118567;
0.120153;
0.115647;
0.116008;
0.117843;
0.118839;
0.115226;
0.114739;
0.111435;
0.114623;
0.115477;
0.116058;
0.115871;
0.116652;
0.117765;
0.112461;
0.112324;
0.116895;
0.11604;
0.115103;
0.117329;
0.116877;
3.2688];
p260=[
0.130395;
0.125295;
0.126714;
0.129863;
0.12342;
0.126255;
0.125974;
0.128853;
0.131914;
0.126416;
0.12996;
0.124026;
0.128721;
0.124644;
0.125378;
0.124734;
0.124457;
0.12413;
0.124198;
0.124972;
0.130611;
0.125945;
0.131192;
0.126536;
0.125363;
0.122658;
0.12673;
0.129926;
0.125578;
0.126594;
0.122501;
0.128762;
0.126446;
0.1275;
0.129035;
0.127583;
0.126837;
0.125365;
0.129773;
0.129045;
0.130522;
0.130907;
0.124035;
0.126575;
3.30998];
p300=[
0.137291;
0.136132;
0.131317;
0.135529;
0.136733;
0.132347;
0.136941;
0.132235;
0.133754;
0.140635;
0.137271;
0.13609;
0.134126;
0.135886;
0.131673;
0.128911;
0.127143;
0.133985;
0.133924;
0.132896;
0.136351;
0.131541;
0.135508;
0.134212;
0.132375;
0.132242;
0.128511;
0.134406;
0.129194;
0.130292;
0.133136;
0.140669;
0.130089;
0.135354;
0.134158;
0.129749;
0.137465;
0.137173;
0.131025;
0.130671;
0.129903;
0.137844;
0.128089;
0.134632;
2.88025];
p340=[
0.138036;
0.13865;
0.138254;
0.140116;
0.136534;
0.13513;
0.142297;
0.159269;
0.136074;
0.145503;
0.139027;
0.14119;
0.138626;
0.139389;
0.134664;
0.136646;
0.138392;
0.136333;
0.135618;
0.136467;
0.136288;
0.136573;
0.13766;
0.134135;
0.146384;
0.147216;
0.13802;
0.138232;
0.138436;
0.141656;
0.135628;
0.139832;
0.139401;
0.141321;
0.138911;
0.137599;
0.137062;
0.134443;
0.138761;
0.13685;
0.138364;
0.139294;
0.136805;
0.137199;
2.97286];
p380=[
0.163584;
0.14161;
0.145299;
0.145437;
0.151598;
0.145584;
0.149605;
0.147258;
0.144173;
0.148049;
0.146858;
0.140559;
0.151386;
0.144465;
0.151625;
0.143415;
0.1439;
0.142397;
0.147858;
0.143938;
0.142915;
0.162215;
0.142574;
0.139639;
0.142209;
0.143908;
0.144079;
0.149638;
0.145178;
0.141219;
0.144568;
0.144695;
0.14819;
0.146032;
0.145656;
0.14697;
0.144411;
0.145486;
0.143673;
0.146449;
0.145016;
0.144619;
0.143294;
0.14623;
1.96501];
p400=[
0.14488;
0.149779;
0.147023;
0.149858;
0.148548;
0.145848;
0.151114;
0.151497;
0.143927;
0.147616;
0.153743;
0.148084;
0.146632;
0.148145;
0.151741;
0.145754;
0.15616;
0.151115;
0.14767;
0.151734;
0.151606;
0.151722;
0.147989;
0.147103;
0.149566;
0.146725;
0.143816;
0.148376;
0.151077;
0.146804;
0.150016;
0.150696;
0.153514;
0.149689;
0.146216;
0.146126;
0.152583;
0.14806;
0.15172;
0.147697;
0.152929;
0.143207;
0.153673;
0.149776;
3.19217];
p450=[
0.154031;
0.158406;
0.159292;
0.152112;
0.155952;
0.160777;
0.153662;
0.15592;
0.150519;
0.151014;
0.153526;
0.15393;
0.152745;
0.155547;
0.156528;
0.156073;
0.157616;
0.153694;
0.156593;
0.156094;
0.154823;
0.157168;
0.154562;
0.148008;
0.158201;
0.158689;
0.155561;
0.15583;
0.15754;
0.160406;
0.151363;
0.161521;
0.153659;
0.146867;
0.153233;
0.151942;
0.154899;
0.157995;
0.150286;
0.157033;
0.158141;
0.152313;
0.159361;
0.152211;
0.579416];
p500=[
0.15521;
0.167525;
0.149097;
0.152249;
0.15559;
0.161333;
0.162874;
0.156036;
0.157003;
0.157027;
0.152479;
0.161269;
0.155354;
0.155185;
0.15836;
0.152817;
0.151186;
0.159299;
0.155144;
0.155884;
0.15366;
0.151771;
0.158987;
0.157742;
0.155834;
0.160317;
0.154139;
0.152542;
0.158384;
0.157761;
0.156242;
0.156067;
0.152827;
0.156437;
0.148389;
0.157469;
0.158413;
0.162739;
0.152158;
0.15948;
0.158013;
0.15472;
0.156365;
0.154973;
2.04606];
p550=[
0.153257;
0.161579;
0.153454;
0.164087;
0.15789;
0.153708;
0.156474;
0.151333;
0.155494;
0.155811;
0.161097;
0.159316;
0.156272;
0.154835;
0.155714;
0.152037;
0.155039;
0.160042;
0.161173;
0.15277;
0.158686;
0.156977;
0.157435;
0.157492;
0.150901;
0.149408;
0.160066;
0.155206;
0.158522;
0.147657;
0.158102;
0.154706;
0.153864;
0.158298;
0.154254;
0.150957;
0.158472;
0.156019;
0.154842;
0.155183;
0.15447;
0.149408;
0.154387;
0.153027;
1.51823];
p600=[
0.165159;
0.158896;
0.165393;
0.182772;
0.156735;
0.153108;
0.163037;
0.165022;
0.159356;
0.152935;
0.154491;
0.159757;
0.160497;
0.166165;
0.160794;
0.160645;
0.176931;
0.161576;
0.155174;
0.156604;
0.161282;
0.157673;
0.16106;
0.154846;
0.162083;
0.162026;
0.162057;
0.157284;
0.156092;
0.156836;
0.152276;
0.159619;
0.162003;
0.159224;
0.173525;
0.157281;
0.159031;
0.159235;
0.168765;
0.158977;
0.161047;
0.15757;
0.162128;
0.158371;
3.34685];





y=ones(33);
y(1)=mean(r1);
y(2)=mean(r5);
y(3)=mean(r10);
y(4)=mean(r15);
y(5)=mean(r20);
y(6)=mean(r30);
y(7)=mean(r40);
y(8)=mean(r50);
y(9)=mean(r60);
y(10)=mean(r70);
y(11)=mean(r80);
y(12)=mean(r90);
y(13)=mean(r100);
y(14)=mean(r110);
y(15)=mean(r120);
y(16)=mean(r130);
y(17)=mean(r140);
y(18)=mean(r150);
y(19)=mean(r160);
y(20)=mean(r170);
y(21)=mean(r180);
y(22)=mean(r190);
y(23)=mean(r200);
y(24)=mean(r220);
y(25)=mean(r260);
y(26)=mean(r300);
y(27)=mean(r340);
y(28)=mean(r380);
y(29)=mean(r400);
y(30)=mean(r450);
y(31)=mean(r500);
y(32)=mean(r550);
y(33)=mean(r600);



%d=ones(33);
d(1)=std(r1);
d(2)=std(r5);
d(3)=std(r10);
d(4)=std(r15);
d(5)=std(r20);
d(6)=std(r30);
d(7)=std(r40);
d(8)=std(r50);
d(9)=std(r60);
d(10)=std(r70);
d(11)=std(r80);
d(12)=std(r90);
d(13)=std(r100);
d(14)=std(r110);
d(15)=std(r120);
d(16)=std(r130);
d(17)=std(r140);
d(18)=std(r150);
d(19)=std(r160);
d(20)=std(r170);
d(21)=std(r180);
d(22)=std(r190);
d(23)=std(r200);
d(24)=std(r220);
d(25)=std(r260);
d(26)=std(r300);
d(27)=std(r340);
d(28)=std(r380);
d(29)=std(r400);
d(30)=std(r450);
d(31)=std(r500);
d(32)=std(r550);
d(33)=std(r600);






%x1=ones(20);
%x1(1)=0.005;
%x1(2)=0.010;
%x1(3)=0.015;
%x1(4)=0.020;
%x1(5)=0.025;
%x1(6)=0.030;
%x1(7)=0.035;
%x1(8)=0.040;
%x1(9)=0.045;
%x1(10)=0.050;
%x1(11)=0.055;
%x1(12)=0.060;
%x1(13)=0.065;
%x1(14)=0.070;
%x1(15)=0.075;
%x1(16)=0.080;
%x1(17)=0.085;
%x1(18)=0.090;
%x1(19)=0.095;
%x1(20)=0.100;



x2=ones(33);


x2(1)=mean(p1);
x2(2)=mean(p5);
x2(3)=mean(p10);
x2(4)=mean(p15);
x2(5)=mean(p20);
x2(6)=mean(p30);
x2(7)=mean(p40);
x2(8)=mean(p50);
x2(9)=mean(p60);
x2(10)=mean(p70);
x2(11)=mean(p80);
x2(12)=mean(p90);
x2(13)=mean(p100);
x2(14)=mean(p110);
x2(15)=mean(p120);
x2(16)=mean(p130);
x2(17)=mean(p140);
x2(18)=mean(p150);
x2(19)=mean(p160);
x2(20)=mean(p170);
x2(21)=mean(p180);
x2(22)=mean(p190);
x2(23)=mean(p200);
x2(24)=mean(p220);
x2(25)=mean(p260);
x2(26)=mean(p300);
x2(27)=mean(p340);
x2(28)=mean(p380);
x2(29)=mean(p400);
x2(30)=mean(p450);
x2(31)=mean(p500);
x2(32)=mean(p550);
x2(33)=mean(p600);




%axis([0 0.15 0 7]);
%plot(x1);
%plot(x2);
%plot(d)
%errorbar(x1,y,d);


file = fopen('file8inc16.txt', 'a+');
for i=1:1:length(x2)
fprintf(file,'%6.4f %6.4f %6.4f %6.4f\n',x2(i), x2(i), y(i), d(i));
end











