r1=[
1.39118;
1.4517;
1.39925;
1.36731;
1.23614;
1.26064;
1.3415;
1.28585;
1.30809;
1.42323;
1.26033;
1.40771;
1.48618;
1.47547;
1.44544;
1.50658;
1.39109;
1.29743;
1.15995;
1.40637;
1.47556;
1.42283;
1.42438;
1.46978;
1.2451;
1.38741;
1.38291;
1.40373;
1.55003;
1.25388;
1.38796;
1.27101;
1.4545;
1.38453;
1.4424;
1.35999;
1.39305;
1.29787;
1.32581;
1.34797;
1.38435;
1.25686;
1.50724;
1.27609;
1.34385];
r5=[
3.10425;
3.06664;
3.0817;
3.09875;
3.16323;
3.17659;
3.19755;
3.11282;
3.07695;
3.14115;
3.15485;
3.20205;
3.18066;
3.13912;
3.11187;
3.13515;
3.16583;
3.17534;
3.12207;
3.07019;
3.08488;
3.17617;
3.10732;
3.19893;
3.18892;
3.15704;
3.11431;
3.12466;
3.14095;
3.13183;
3.09407;
3.15378;
3.15411;
3.14018;
3.08023;
3.20882;
3.16216;
3.22387;
3.17071;
3.15377;
3.24043;
3.12039;
3.16929;
3.20857;
3.13847];
r10=[
3.62671;
3.66661;
3.67708;
3.56927;
3.67898;
3.69102;
3.65779;
3.69851;
3.65883;
3.66047;
3.65239;
3.64793;
3.60711;
3.67898;
3.69627;
3.61438;
3.65603;
3.68043;
3.73004;
3.69018;
3.66666;
3.70861;
3.75054;
3.71365;
3.75939;
3.57668;
3.74268;
3.70813;
3.71284;
3.77811;
3.66406;
3.73619;
3.75617;
3.6972;
3.77495;
3.70068;
3.6818;
3.68635;
3.74101;
3.71129;
3.73571;
3.74228;
3.69681;
3.74637;
3.72818];
r15=[
3.67268;
3.65831;
3.65172;
3.62506;
3.68692;
3.67609;
3.65232;
3.68633;
3.70629;
3.71992;
3.68244;
3.73747;
3.65893;
3.69069;
3.71103;
3.70521;
3.71517;
3.69661;
3.68679;
3.72212;
3.6554;
3.69081;
3.73805;
3.70065;
3.76292;
3.71767;
3.74779;
3.71389;
3.68239;
3.79537;
3.72382;
3.7607;
3.73696;
3.71152;
3.73513;
3.75706;
3.70233;
3.71566;
3.72345;
3.75712;
3.71851;
3.74733;
3.72538;
3.77298;
3.72377];
r20=[
3.64164;
3.52214;
3.60328;
3.6116;
3.64694;
3.64658;
3.56266;
3.62081;
3.59654;
3.64174;
3.64002;
3.67617;
3.60054;
3.56537;
3.61048;
3.57652;
3.61288;
3.6467;
3.63089;
3.64159;
3.5831;
3.59264;
3.60699;
3.59236;
3.57571;
3.68517;
3.64757;
3.64608;
3.64204;
3.59059;
3.65224;
3.62487;
3.65037;
3.66339;
3.63635;
3.68532;
3.60905;
3.68074;
3.60601;
3.63996;
3.608;
3.66165;
3.62889;
3.63067;
3.64116];
r30=[
3.43386;
3.40735;
3.46247;
3.37308;
3.48881;
3.49014;
3.43056;
3.43879;
3.5041;
3.43067;
3.45527;
3.48889;
3.42722;
3.43878;
3.41196;
3.45422;
3.43289;
3.48091;
3.49801;
3.5259;
3.49178;
3.4762;
3.47838;
3.48683;
3.45422;
3.48028;
3.49568;
3.50469;
3.51759;
3.46604;
3.43081;
3.49999;
3.48575;
3.48836;
3.43905;
3.45455;
3.54719;
3.49118;
3.4627;
3.50358;
3.4639;
3.52857;
3.45233;
3.48393;
3.50467];
r40=[
3.37249;
3.32929;
3.3725;
3.38986;
3.35578;
3.33474;
3.33721;
3.39318;
3.39302;
3.37323;
3.387;
3.34189;
3.32887;
3.37133;
3.35689;
3.37695;
3.42692;
3.34575;
3.37711;
3.40675;
3.41248;
3.40528;
3.37145;
3.36211;
3.36607;
3.38707;
3.37278;
3.37012;
3.39597;
3.45694;
3.4236;
3.36677;
3.37907;
3.38391;
3.42578;
3.47159;
3.39702;
3.39414;
3.3849;
3.43203;
3.37139;
3.39805;
3.40257;
3.36856;
3.38333];
r50=[
3.30346;
3.23588;
3.31592;
3.28001;
3.29934;
3.2711;
3.31145;
3.23486;
3.34393;
3.30362;
3.29813;
3.27242;
3.31255;
3.2756;
3.33651;
3.30818;
3.33692;
3.33107;
3.38234;
3.33406;
3.3202;
3.32828;
3.31007;
3.38379;
3.31109;
3.34125;
3.32149;
3.33265;
3.33873;
3.40207;
3.36419;
3.34904;
3.35788;
3.38187;
3.35342;
3.357;
3.33032;
3.32744;
3.29981;
3.38987;
3.3819;
3.28693;
3.31206;
3.3411;
3.42141];
r60=[
3.23969;
3.22957;
3.23352;
3.20493;
3.25544;
3.28039;
3.27878;
3.23498;
3.28825;
3.40125;
3.22571;
3.36795;
3.21708;
3.24725;
3.24932;
3.28284;
3.26926;
3.32497;
3.302;
3.30338;
3.32023;
3.30344;
3.33105;
3.27323;
3.30694;
3.3514;
3.31048;
3.24149;
3.33492;
3.35729;
3.33675;
3.28346;
3.31035;
3.30174;
3.29064;
3.24739;
3.34699;
3.32058;
3.32124;
3.34394;
3.37886;
3.28222;
3.2763;
3.28155;
3.3285];
r70=[
3.25475;
3.27283;
3.17969;
3.22349;
3.21921;
3.2209;
3.29513;
3.28181;
3.25209;
3.21277;
3.2611;
3.26385;
3.2723;
3.25275;
3.22076;
3.27739;
3.29328;
3.2704;
3.22114;
3.30249;
3.25845;
3.21476;
3.23263;
3.27299;
3.1819;
3.23379;
3.2248;
3.2679;
3.2938;
3.30987;
3.30759;
3.24565;
3.26451;
3.31865;
3.2661;
3.24842;
3.22758;
3.29627;
3.28562;
3.22014;
3.23492;
3.24936;
3.26718;
3.33909;
3.29307];
r80=[
3.16559;
3.23531;
3.24159;
3.28292;
3.18743;
3.19775;
3.23035;
3.25379;
3.19682;
3.25514;
3.21947;
3.15489;
3.17388;
3.1699;
3.22607;
3.25484;
3.21949;
3.22473;
3.24786;
3.19572;
3.28623;
3.20905;
3.25677;
3.23594;
3.23193;
3.24221;
3.26561;
3.26041;
3.22011;
3.2177;
3.20316;
3.25082;
3.25677;
3.17212;
3.2899;
3.25238;
3.2571;
3.24906;
3.2453;
3.25118;
3.28228;
3.32507;
3.27734;
3.26483;
3.30196];
r90=[
3.23647;
3.21628;
3.24496;
3.20125;
3.17657;
3.18641;
3.15564;
3.27718;
3.17331;
3.22335;
3.224;
3.26187;
3.17258;
3.21129;
3.26004;
3.29268;
3.18252;
3.1361;
3.2061;
3.21906;
3.2472;
3.24801;
3.24127;
3.24968;
3.20232;
3.21799;
3.22146;
3.24672;
3.35047;
3.21278;
3.21248;
3.18826;
3.2166;
3.24425;
3.22741;
3.21842;
3.29356;
3.27915;
3.24907;
3.19097;
3.2273;
3.22037;
3.26942;
3.21504;
3.23233];
r100=[
3.18871;
3.18223;
3.16249;
3.18505;
3.21468;
3.21666;
3.28055;
3.20303;
3.24106;
3.24612;
3.17938;
3.26551;
3.19453;
3.12992;
3.27485;
3.29233;
3.21187;
3.1454;
3.26975;
3.2188;
3.22804;
3.30592;
3.19914;
3.21381;
3.25069;
3.31044;
3.26916;
3.30135;
3.2391;
3.18143;
3.25111;
3.21959;
3.16593;
3.24708;
3.24752;
3.17476;
3.24276;
3.18905;
3.2309;
3.15246;
3.22631;
3.26711;
3.21214;
3.15273;
3.20527];
r110=[
3.23163;
3.1786;
3.17231;
3.23407;
3.24089;
3.16564;
3.1706;
3.27721;
3.12251;
3.19182;
3.20058;
3.24009;
3.20765;
3.26611;
3.27904;
3.33044;
3.20851;
3.25653;
3.29485;
3.19689;
3.27487;
3.28409;
3.22368;
3.2098;
3.22332;
3.1854;
3.33605;
3.18232;
3.20631;
3.22641;
3.2608;
3.32645;
3.19297;
3.26513;
3.25139;
3.15617;
3.32949;
3.29485;
3.23264;
3.17034;
3.27376;
3.21974;
3.3276;
3.22064;
3.28987];
r120=[
3.246;
3.35872;
3.32163;
3.34028;
3.20962;
3.37541;
3.31171;
3.29828;
3.31361;
3.26231;
3.32008;
3.24485;
3.23583;
3.32901;
3.23814;
3.31046;
3.30334;
3.18733;
3.26154;
3.30955;
3.32979;
3.36525;
3.36032;
3.27417;
3.27778;
3.28147;
3.22018;
3.20957;
3.36719;
3.29659;
3.32727;
3.33436;
3.39982;
3.3083;
3.25934;
3.27413;
3.3091;
3.27906;
3.3554;
3.21915;
3.29606;
3.34463;
3.36342;
3.30274;
3.31136];
r130=[
3.31153;
3.19237;
3.27941;
3.33948;
3.46093;
3.40547;
3.34474;
3.30564;
3.37811;
3.38469;
3.28565;
3.34334;
3.39601;
3.41143;
3.28139;
3.3083;
3.34499;
3.47091;
3.31442;
3.36176;
3.3408;
3.41659;
3.48989;
3.37261;
3.32222;
3.36418;
3.40156;
3.39877;
3.46471;
3.38778;
3.42486;
3.39636;
3.40581;
3.39283;
3.42513;
3.35447;
3.33524;
3.29445;
3.35697;
3.37893;
3.34541;
3.39337;
3.33727;
3.30136;
3.34195];
r140=[
3.42708;
3.37369;
3.30653;
3.39923;
3.31531;
3.37693;
3.43434;
3.34359;
3.40133;
3.46818;
3.40996;
3.52414;
3.4415;
3.45307;
3.46455;
3.36553;
3.41711;
3.32233;
3.39583;
3.39667;
3.41603;
3.45791;
3.55567;
3.49514;
3.37774;
3.41235;
3.46053;
3.39815;
3.34739;
3.43121;
3.2172;
3.43996;
3.51164;
3.37306;
3.41735;
3.3327;
3.4731;
3.40078;
3.38582;
3.4675;
3.47377;
3.40966;
3.38154;
3.39115;
3.51014];
r150=[
3.3875;
3.42263;
3.38934;
3.55533;
3.29986;
3.45806;
3.4076;
3.26817;
3.41413;
3.3613;
3.31376;
3.55243;
3.42886;
3.63543;
3.49792;
3.36919;
3.54539;
3.28061;
3.52772;
3.48442;
3.46558;
3.34963;
2.99843;
3.33423;
3.3776;
3.40359;
3.45823;
3.48644;
3.53067;
3.40777;
3.55994;
3.42957;
3.40356;
3.36318;
3.55926;
3.48755;
3.57087;
3.56914;
3.39665;
3.34902;
3.38096;
3.38571;
3.48999;
3.48143;
3.48808];
r160=[
3.33832;
3.32051;
3.61193;
3.16815;
3.30548;
3.53549;
3.58504;
3.46965;
3.57066;
3.39386;
3.50378;
3.35824;
3.38138;
3.43259;
3.4404;
3.56448;
3.22822;
3.50769;
3.23341;
3.35965;
3.36027;
3.57448;
3.52523;
3.65289;
3.5794;
3.45311;
3.47119;
3.47426;
3.30988;
3.39907;
3.53606;
3.62462;
3.41139;
3.61769;
3.34771;
3.59721;
3.4824;
3.38491;
3.43758;
3.50749;
3.49672;
3.48426;
3.5691;
3.49312;
3.29028];
r170=[
3.53409;
3.54003;
3.57316;
3.47649;
3.34602;
3.42914;
3.68783;
3.67398;
3.61852;
3.55147;
3.66249;
3.38132;
3.57735;
3.54364;
3.48553;
3.67442;
3.40763;
3.2065;
3.53671;
3.46218;
3.50704;
3.48037;
3.38633;
3.62265;
3.33726;
3.42781;
3.54272;
3.65007;
3.29835;
3.04951;
3.40538;
3.44996;
3.30642;
3.60936;
3.53841;
2.92083;
3.48353;
3.47462;
3.28748;
3.62645;
3.55082;
3.58307;
3.42183;
3.2767;
3.40435];
r180=[
3.42051;
3.6699;
3.48733;
3.5573;
3.44558;
3.07094;
3.56022;
3.62467;
3.57596;
3.34182;
3.43845;
3.40207;
3.69781;
3.35307;
3.61526;
3.50079;
3.3707;
3.46118;
2.94406;
3.56902;
3.1969;
3.52642;
3.61589;
3.33871;
3.71219;
3.54809;
3.47873;
3.60691;
3.59342;
3.43751;
3.47022;
3.41243;
3.27403;
3.45401;
3.41467;
3.53174;
3.32274;
3.44593;
3.54031;
3.34758;
3.12738;
3.40794;
3.35315;
3.71789;
3.20515];
r190=[
3.45214;
3.22912;
3.30496;
3.61062;
3.2716;
3.37054;
3.53785;
3.38629;
3.20785;
3.51481;
3.47281;
3.43976;
3.66533;
3.51291;
3.22842;
3.35306;
3.40175;
3.50392;
3.55162;
3.37804;
3.51108;
3.43247;
3.29366;
3.49525;
3.24756;
2.6047;
3.56304;
3.11313;
3.32364;
3.59498;
3.73884;
3.62272;
3.42225;
2.77747;
3.6058;
3.63363;
3.64545;
3.45184;
3.27025;
3.39877;
3.26711;
3.44241;
3.39287;
3.65147;
3.62638];
r200=[
3.42798;
3.49487;
3.39328;
3.30598;
3.46465;
2.61805;
3.67357;
3.62487;
3.66432;
3.69118;
3.24681;
3.45362;
3.68641;
3.38114;
3.71927;
3.29705;
3.44446;
2.76984;
3.32048;
3.38687;
2.59461;
3.4359;
3.65651;
3.29896;
3.42488;
3.83611;
3.51788;
3.76641;
3.04068;
3.35651;
3.15742;
3.54516;
2.78845;
2.22983;
3.35753;
3.13539;
3.58997;
3.42529;
3.05423;
3.28673;
2.79561;
3.22296;
3.49559;
3.77833;
3.23192];
r220=[
3.62243;
3.3357;
3.35012;
3.45019;
3.57395;
3.52875;
3.34869;
3.34517;
2.73667;
3.42209;
3.59312;
2.83459;
3.35761;
2.96505;
3.4178;
3.05258;
3.35582;
3.22111;
2.90964;
3.28944;
3.35781;
3.45275;
2.71839;
3.59673;
3.54092;
2.91375;
3.32351;
3.07836;
2.83236;
3.47229;
3.05235;
3.44051;
3.59208;
3.40304;
3.71004;
3.58571;
3.04904;
3.31544;
3.5026;
3.43853;
2.57368;
3.53185;
3.26028;
3.44705;
2.83084];
r260=[
2.96125;
2.94616;
3.07254;
3.06481;
3.05506;
3.13726;
2.78858;
2.51382;
2.41985;
3.05322;
3.39853;
3.20205;
3.65454;
3.27901;
3.10676;
3.13484;
3.30904;
2.60811;
2.72865;
2.59676;
3.41166;
1.87436;
2.21188;
3.60308;
2.6242;
3.10643;
3.26844;
3.33989;
2.69103;
3.60476;
2.51285;
3.14972;
3.09571;
3.6885;
1.91642;
3.56936;
3.48545;
2.21445;
3.67529;
3.20189;
3.15658;
3.33563;
3.43026;
3.0521;
3.40297];
r300=[
2.65775;
3.24363;
2.6627;
3.49382;
3.87456;
2.98408;
3.3849;
3.52194;
2.12322;
3.01722;
3.16625;
1.29763;
2.43676;
3.36769;
3.64298;
3.32292;
2.36433;
3.4329;
2.51725;
3.78138;
1.58906;
3.51136;
3.24528;
3.32127;
2.91601;
0.780304;
1.69692;
3.3903;
3.0865;
2.62141;
3.20827;
2.44825;
1.8078;
3.05375;
3.26295;
2.02212;
2.59663;
2.77336;
3.46047;
3.42255;
1.29296;
3.02969;
3.05965;
2.53976;
3.05632];
r340=[
2.7515;
3.23945;
2.64742;
3.1473;
1.75186;
2.65097;
2.64016;
2.1092;
3.03648;
2.82399;
1.7472;
2.51584;
3.28478;
3.54137;
2.99591;
3.1517;
1.8805;
2.86706;
3.18435;
0.223962;
2.39222;
3.07951;
2.30826;
3.32333;
2.39035;
2.21854;
2.85775;
3.43825;
1.61314;
2.63929;
2.71072;
2.96255;
3.10419;
2.9215;
1.89735;
2.50604;
3.22677;
3.72053;
3.37842;
2.22899;
3.40123;
2.88555;
3.25651;
2.61006;
3.02272];
r380=[
2.8742;
2.14215;
3.03634;
2.26568;
1.84661;
3.02294;
2.35391;
3.13807;
2.66071;
3.48644;
2.88328;
3.12105;
2.9915;
1.55644;
0.208106;
3.29383;
3.50723;
2.82124;
2.77971;
2.54888;
2.33176;
3.54878;
2.53924;
3.25632;
2.68962;
2.78968;
3.34948;
2.49302;
3.00729;
0.827154;
1.7189;
3.23066;
2.07945;
3.34878;
3.33285;
1.92962;
2.6318;
2.16733;
2.4747;
2.55513;
2.93457;
1.50556;
3.10265;
2.49651;
2.04504];
r400=[
3.406;
2.73534;
3.24665;
1.91909;
2.25697;
3.37777;
2.31793;
3.41768;
0.301776;
3.11963;
2.1541;
3.20805;
3.59851;
2.38034;
2.25171;
1.85751;
2.95154;
2.92866;
2.76044;
1.70824;
2.53784;
1.69352;
2.66256;
3.31299;
3.33659;
3.29842;
3.57925;
2.97925;
3.64107;
2.95706;
3.10142;
3.40151;
2.77635;
2.69799;
2.31655;
1.7728;
2.65291;
3.04987;
2.65099;
1.39639;
2.5936;
2.1659;
2.6616;
2.934;
1.88777];
r450=[
3.1731;
1.03853;
2.2124;
1.67893;
2.11697;
3.19672;
3.30411;
2.69047;
3.02855;
2.21353;
2.44982;
1.00065;
2.15045;
2.41989;
1.75032;
3.50755;
1.42573;
2.07047;
3.35477;
2.41087;
3.42592;
1.30203;
2.96558;
2.7369;
1.73419;
0.671867;
2.00951;
2.63694;
2.54876;
2.82182;
2.50708;
3.15331;
2.81567;
1.7426;
3.37628;
2.72429;
2.90688;
2.86038;
1.76445;
3.63105;
3.15833;
2.41427;
2.50871;
2.32986;
1.93773];
r500=[
3.48171;
2.21562;
3.10382;
2.81066;
3.20647;
1.62671;
3.2981;
2.6029;
2.99885;
2.78731;
3.74686;
3.64988;
2.45971;
1.82359;
0.579854;
1.55732;
2.57078;
3.09322;
2.8794;
3.10386;
2.98407;
3.54966;
2.98364;
3.35851;
2.66497;
1.46048;
2.91893;
3.29681;
3.0353;
2.66894;
2.70342;
2.77854;
2.85865;
2.39715;
0.621547;
0.858764;
2.78705;
1.9448;
1.23483;
1.44205;
1.63738;
3.833;
3.50427;
0.606043;
1.93652];
r550=[
1.98603;
3.04144;
3.40575;
1.17567;
3.52468;
3.37021;
1.82282;
2.02469;
2.58719;
1.68081;
1.55758;
2.81044;
2.11849;
1.9221;
1.74487;
2.84815;
2.08055;
3.86128;
2.99068;
2.65891;
4.01806;
3.15584;
2.71998;
2.86714;
3.68249;
2.5212;
3.25849;
3.38755;
0.684171;
3.52628;
3.10486;
3.06985;
2.14966;
3.67245;
3.87965;
2.8746;
2.6168;
2.41045;
3.17263;
3.2244;
3.94199;
3.4875;
2.70452;
2.48044;
1.98032];
r600=[
3.03478;
2.68839;
2.85373;
2.70527;
2.55666;
1.63544;
2.66366;
1.3452;
1.51334;
3.57124;
3.54396;
3.42878;
3.44354;
3.09594;
2.78736;
2.37028;
3.68297;
2.97469;
3.13004;
1.44333;
3.39376;
3.51432;
3.07357;
2.48886;
2.91028;
0.848513;
3.63176;
3.18132;
3.18388;
2.41361;
2.92151;
2.16909;
1.32326;
2.3917;
2.71773;
2.08099;
3.59724;
2.47732;
2.83725;
3.42885;
1.77919;
2.62532;
3.70946;
3.67686;
2.58733];
p1=[
0.000185138;
0.000185585;
0.000179742;
0.000162746;
0.000158692;
0.000156609;
0.000165835;
0.000139348;
0.000153806;
0.000185783;
0.000166243;
0.000182962;
0.000183305;
0.000182183;
0.000194373;
0.000220484;
0.000174711;
0.000157478;
0.00012036;
0.000190021;
0.000191188;
0.000201269;
0.000160065;
0.000195023;
0.00013108;
0.000188677;
0.000162715;
0.000183515;
0.000211872;
0.000136991;
0.000179958;
0.000151848;
0.000199471;
0.000180855;
0.000188958;
0.000185163;
0.000183513;
0.000151633;
0.000173842;
0.000154257;
0.000183052;
0.00013422;
0.000223623;
0.000148682;
1.34385];
p5=[
0.00213429;
0.00203835;
0.00208426;
0.0020946;
0.00220092;
0.00229412;
0.0023988;
0.00200486;
0.00202052;
0.00208004;
0.00211401;
0.00212912;
0.00223795;
0.0021243;
0.00214186;
0.00211151;
0.00217824;
0.00215351;
0.00204116;
0.00219353;
0.00206101;
0.00220342;
0.00206678;
0.00225351;
0.00213626;
0.00205253;
0.0021239;
0.00210127;
0.00217929;
0.00215138;
0.00195609;
0.00225018;
0.00211536;
0.00201093;
0.00210755;
0.00214154;
0.00221349;
0.00228876;
0.00220968;
0.00207112;
0.00224846;
0.00212939;
0.00207359;
0.00225171;
3.13847];
p10=[
0.00513047;
0.00520475;
0.00516861;
0.00507699;
0.00547379;
0.00519933;
0.00527045;
0.00544343;
0.00523793;
0.00541538;
0.005184;
0.00539305;
0.00503154;
0.00550192;
0.00559331;
0.00530978;
0.0052691;
0.0053251;
0.00569797;
0.00512665;
0.00535743;
0.00536988;
0.00527851;
0.00555546;
0.00535054;
0.00534106;
0.00538872;
0.00551529;
0.00537768;
0.00524559;
0.00523119;
0.00543568;
0.00549756;
0.00513846;
0.00543047;
0.00515856;
0.00519914;
0.00532012;
0.00532598;
0.00548416;
0.00523907;
0.00512557;
0.00532963;
0.00542579;
3.72818];
p15=[
0.00863165;
0.00825616;
0.00865034;
0.00844393;
0.00867511;
0.00852337;
0.0086045;
0.00849718;
0.00879305;
0.00873586;
0.00832353;
0.00881396;
0.00899169;
0.00876172;
0.00901207;
0.00866232;
0.0087832;
0.00872975;
0.00860533;
0.00890102;
0.00853685;
0.00844817;
0.00889349;
0.00860988;
0.00821555;
0.00883176;
0.0083971;
0.00834128;
0.00859789;
0.00827144;
0.00857187;
0.00876748;
0.00834582;
0.00841455;
0.00854852;
0.00828247;
0.00837033;
0.00832149;
0.00833678;
0.00859902;
0.00822493;
0.0085391;
0.00846104;
0.00829072;
3.72377];
p20=[
0.0118052;
0.0116501;
0.0120841;
0.0118938;
0.0117735;
0.0124882;
0.0115766;
0.0119808;
0.0123178;
0.0121229;
0.0121659;
0.0119419;
0.0120804;
0.0120894;
0.0122532;
0.0124632;
0.0118784;
0.0119205;
0.0120657;
0.0117676;
0.0116723;
0.0122829;
0.0118171;
0.0120731;
0.0116551;
0.0119854;
0.0118039;
0.0119586;
0.0117953;
0.0121088;
0.0119358;
0.0121393;
0.0118441;
0.0117653;
0.0116921;
0.0117466;
0.0116453;
0.0120078;
0.011777;
0.0116215;
0.0112756;
0.0112892;
0.0114069;
0.0116204;
3.64116];
p30=[
0.0191572;
0.0187915;
0.018788;
0.0185654;
0.0195743;
0.0183056;
0.0193881;
0.0191953;
0.0189738;
0.0193176;
0.018996;
0.019291;
0.0194165;
0.0193391;
0.0186341;
0.0186509;
0.0191333;
0.0192016;
0.0185001;
0.0184244;
0.0186989;
0.0185568;
0.0185662;
0.0184881;
0.0188204;
0.0185723;
0.0183658;
0.0185582;
0.0186391;
0.0182814;
0.0181236;
0.0189576;
0.0178109;
0.0183978;
0.018097;
0.0183019;
0.0180688;
0.0181938;
0.0184779;
0.0182848;
0.0185706;
0.0183735;
0.0184039;
0.0188747;
3.50467];
p40=[
0.0259385;
0.0250952;
0.0260589;
0.0254681;
0.0248802;
0.0261641;
0.0260161;
0.0267812;
0.0248806;
0.0247218;
0.0259672;
0.0252955;
0.0250889;
0.0257625;
0.0249586;
0.0254595;
0.0251536;
0.0247148;
0.0249575;
0.0250027;
0.0246664;
0.0251627;
0.0247594;
0.0248695;
0.0250611;
0.0249175;
0.0242049;
0.0250141;
0.0250303;
0.0242819;
0.0256797;
0.0243275;
0.024658;
0.0257033;
0.0246558;
0.0245549;
0.0247298;
0.0244016;
0.024209;
0.0251067;
0.0251597;
0.0250748;
0.0248946;
0.0248785;
3.38333];
p50=[
0.0319757;
0.0324118;
0.0327615;
0.0316714;
0.0316502;
0.0320642;
0.0317506;
0.0323858;
0.0311552;
0.0318302;
0.0320161;
0.0315549;
0.0325813;
0.0321164;
0.0314201;
0.0309735;
0.0322044;
0.0314333;
0.0309486;
0.0304234;
0.0314682;
0.0313883;
0.030913;
0.031899;
0.0308761;
0.0301989;
0.0315281;
0.0308252;
0.0308542;
0.0307597;
0.0305905;
0.0300079;
0.0309907;
0.0304228;
0.0303722;
0.0312993;
0.0316851;
0.0297378;
0.0309763;
0.0309528;
0.0312148;
0.0313497;
0.0314722;
0.0312949;
3.42141];
p60=[
0.038065;
0.0387701;
0.037288;
0.0380448;
0.0375922;
0.0375466;
0.0385883;
0.0374225;
0.0377381;
0.037536;
0.037291;
0.0383141;
0.0372565;
0.0375831;
0.0375325;
0.0374086;
0.0387535;
0.0365923;
0.0366435;
0.0372734;
0.0367993;
0.0369701;
0.0369365;
0.03718;
0.0363974;
0.035428;
0.0378229;
0.0374795;
0.0369719;
0.0364453;
0.0368132;
0.0369538;
0.0365751;
0.0370822;
0.0374055;
0.0370287;
0.0363295;
0.0372059;
0.0370213;
0.0363699;
0.0367055;
0.036774;
0.0379855;
0.0372966;
3.3285];
p70=[
0.0438168;
0.0433249;
0.0431409;
0.0444525;
0.0423405;
0.0431947;
0.0423137;
0.0418521;
0.0429976;
0.0429728;
0.0428127;
0.0422467;
0.0429596;
0.0417599;
0.0424884;
0.042309;
0.0423808;
0.0418525;
0.0433052;
0.0425414;
0.0432149;
0.0422642;
0.0429995;
0.0433865;
0.0420309;
0.0428703;
0.0420478;
0.043123;
0.0413614;
0.0414248;
0.0433028;
0.0414981;
0.0420554;
0.041256;
0.0412929;
0.0437922;
0.0414483;
0.0428473;
0.042769;
0.0417712;
0.0433575;
0.0429691;
0.0434392;
0.042317;
3.29307];
p80=[
0.0481883;
0.0486617;
0.0481527;
0.0481006;
0.048694;
0.0485114;
0.0471257;
0.0479639;
0.0498115;
0.048634;
0.0483411;
0.0476846;
0.0478388;
0.0473327;
0.0482769;
0.0471483;
0.0483424;
0.0481449;
0.0500673;
0.0475087;
0.0478846;
0.0465673;
0.0483129;
0.0481939;
0.046336;
0.0474768;
0.0484504;
0.0483276;
0.04701;
0.047586;
0.0475733;
0.0474719;
0.047205;
0.0476377;
0.0477379;
0.0476997;
0.0465836;
0.0472017;
0.047616;
0.0456607;
0.0481347;
0.0476071;
0.0474126;
0.048071;
3.30196];
p90=[
0.0545381;
0.0533881;
0.05368;
0.0531717;
0.0537705;
0.0544619;
0.0543788;
0.0520672;
0.0535682;
0.0541324;
0.0548315;
0.0527997;
0.0529053;
0.0510836;
0.0534007;
0.0525784;
0.0526441;
0.0530949;
0.0523327;
0.0533798;
0.0526646;
0.0539961;
0.053621;
0.0523703;
0.0542917;
0.0530269;
0.0526086;
0.0523175;
0.0540649;
0.0503209;
0.051545;
0.0512445;
0.0538053;
0.0522674;
0.0522803;
0.0524037;
0.0524313;
0.0516624;
0.0528634;
0.0511963;
0.0520791;
0.0523089;
0.0518693;
0.0520058;
3.23233];
p100=[
0.0584576;
0.0571251;
0.0586428;
0.0578188;
0.0593554;
0.0601358;
0.0592571;
0.0584659;
0.0584365;
0.0576952;
0.0581733;
0.0565749;
0.0573702;
0.0577351;
0.0569882;
0.0571757;
0.0588788;
0.0568388;
0.0578752;
0.0574016;
0.0582157;
0.0568559;
0.0579109;
0.0577114;
0.0578531;
0.0571682;
0.058043;
0.0595003;
0.0589239;
0.0576014;
0.0588103;
0.0578417;
0.0586552;
0.0583388;
0.0593349;
0.0568412;
0.0574613;
0.0574175;
0.0554474;
0.0579998;
0.0577722;
0.0578063;
0.0578716;
0.0574288;
3.20527];
p110=[
0.0639367;
0.0625408;
0.0617525;
0.0645048;
0.061521;
0.0644461;
0.063394;
0.0631993;
0.0625379;
0.0615975;
0.0632897;
0.0634952;
0.0621419;
0.062626;
0.0640666;
0.0610038;
0.0637962;
0.0625168;
0.0627329;
0.0619813;
0.0638272;
0.0617393;
0.0607255;
0.0611287;
0.0617229;
0.0621103;
0.0625663;
0.0648058;
0.0614835;
0.0616926;
0.0622099;
0.0632956;
0.0612615;
0.0624527;
0.0632568;
0.062715;
0.0634229;
0.0628034;
0.0629304;
0.061283;
0.0616263;
0.0628637;
0.0614612;
0.06165;
3.28987];
p120=[
0.0692589;
0.069914;
0.0716647;
0.0698075;
0.0695044;
0.071733;
0.0676288;
0.0691808;
0.0696919;
0.0690257;
0.0677231;
0.070029;
0.0694752;
0.0692158;
0.0693654;
0.0680712;
0.0675018;
0.0682083;
0.0679552;
0.0681921;
0.0690815;
0.0659158;
0.0676968;
0.0686469;
0.0682478;
0.0670195;
0.0672798;
0.0703561;
0.0683315;
0.0679655;
0.0678898;
0.0692789;
0.0686856;
0.0673579;
0.0663977;
0.0677062;
0.0676999;
0.070302;
0.0683404;
0.0676895;
0.0688592;
0.0663122;
0.0687566;
0.0671897;
3.31136];
p130=[
0.0761577;
0.0748332;
0.0756373;
0.0768286;
0.0750396;
0.0770075;
0.0766046;
0.0738001;
0.0731768;
0.0740632;
0.0778189;
0.073313;
0.0733844;
0.0750052;
0.0754409;
0.0755963;
0.0757906;
0.0740874;
0.0744628;
0.075688;
0.0755426;
0.0745802;
0.0735911;
0.0745558;
0.0749062;
0.0732848;
0.0737347;
0.0752358;
0.075656;
0.0744326;
0.0747406;
0.0781713;
0.0737629;
0.0768561;
0.0762773;
0.0754053;
0.0737769;
0.0744787;
0.0728499;
0.0743344;
0.0741306;
0.0747387;
0.0756035;
0.0764624;
3.34195];
p140=[
0.08157;
0.0822083;
0.0823306;
0.0824288;
0.0809231;
0.0829736;
0.0813326;
0.0808063;
0.0835686;
0.0820889;
0.0800051;
0.0801391;
0.0828592;
0.0811025;
0.0794293;
0.0818604;
0.0816378;
0.0816371;
0.0829183;
0.0805974;
0.0820632;
0.083001;
0.0817192;
0.0806499;
0.0806326;
0.0811351;
0.0805156;
0.0814455;
0.0812292;
0.081442;
0.0829331;
0.0804579;
0.0784725;
0.0804098;
0.0815807;
0.0827819;
0.0819862;
0.0818774;
0.0817974;
0.0831747;
0.082399;
0.0809326;
0.0814214;
0.0797172;
3.51014];
p150=[
0.0888814;
0.0889028;
0.0870409;
0.0854631;
0.0891522;
0.085536;
0.0878703;
0.0869525;
0.0882896;
0.0842829;
0.0865351;
0.0877164;
0.0866676;
0.087429;
0.0874379;
0.0878219;
0.0859119;
0.0861933;
0.0844412;
0.0863789;
0.0872127;
0.0854538;
0.0852464;
0.0877428;
0.0861329;
0.0851441;
0.0880807;
0.0868787;
0.0894778;
0.0857649;
0.0859779;
0.0880789;
0.0881602;
0.0845625;
0.0859616;
0.0879196;
0.0877462;
0.0848275;
0.0881783;
0.0871216;
0.0879632;
0.0854008;
0.0846459;
0.0876451;
3.48808];
p160=[
0.0940129;
0.0920033;
0.0930175;
0.0952586;
0.0941776;
0.0932718;
0.0925756;
0.0935131;
0.0927213;
0.0948644;
0.0949917;
0.0926469;
0.0911294;
0.0928204;
0.0923437;
0.0948634;
0.0943369;
0.0920881;
0.0907294;
0.0908283;
0.0932781;
0.0918705;
0.0940921;
0.0931302;
0.0920628;
0.0899156;
0.0934397;
0.0922002;
0.0924938;
0.0893677;
0.0929864;
0.0916018;
0.0924833;
0.0919899;
0.0914496;
0.0931305;
0.090411;
0.0935494;
0.0944393;
0.0925585;
0.0948745;
0.0921832;
0.0909357;
0.090848;
3.29028];
p170=[
0.0959394;
0.0979438;
0.0967433;
0.0963081;
0.095613;
0.0989166;
0.101008;
0.0972484;
0.0967999;
0.098372;
0.0962815;
0.0969131;
0.0954774;
0.0977059;
0.0972131;
0.0997743;
0.0984807;
0.0988667;
0.0953576;
0.0935971;
0.0986382;
0.0993229;
0.0999377;
0.0979225;
0.0985606;
0.098088;
0.097546;
0.0948985;
0.0987507;
0.0962337;
0.0993665;
0.0971153;
0.098413;
0.0982701;
0.0949311;
0.0997857;
0.097748;
0.0966771;
0.0998638;
0.0967025;
0.0981014;
0.0982195;
0.0957447;
0.0985206;
3.40435];
p180=[
0.102674;
0.102607;
0.101943;
0.102669;
0.100183;
0.10321;
0.101318;
0.103834;
0.100295;
0.103671;
0.10016;
0.102258;
0.103267;
0.101025;
0.103009;
0.0986647;
0.10277;
0.102657;
0.102161;
0.099887;
0.105184;
0.10042;
0.0968102;
0.105177;
0.102764;
0.101055;
0.104948;
0.10106;
0.0995364;
0.102551;
0.103932;
0.104236;
0.102278;
0.103409;
0.100677;
0.101634;
0.10064;
0.101329;
0.102988;
0.103227;
0.101062;
0.104268;
0.101528;
0.102303;
3.20515];
p190=[
0.106868;
0.10776;
0.105569;
0.106294;
0.104724;
0.107769;
0.105111;
0.106007;
0.105831;
0.108855;
0.1063;
0.105211;
0.106107;
0.105388;
0.108433;
0.106328;
0.107448;
0.106555;
0.107623;
0.103923;
0.107306;
0.105922;
0.102784;
0.105933;
0.106279;
0.107821;
0.108622;
0.103878;
0.10432;
0.106416;
0.107263;
0.106138;
0.107078;
0.107186;
0.108246;
0.105787;
0.103941;
0.104905;
0.104399;
0.104256;
0.105735;
0.106155;
0.105889;
0.106427;
3.62638];
p200=[
0.113323;
0.110545;
0.112424;
0.109193;
0.109677;
0.115938;
0.111284;
0.11032;
0.110526;
0.107776;
0.110409;
0.107976;
0.107431;
0.109437;
0.109599;
0.108717;
0.108254;
0.107196;
0.10748;
0.112266;
0.113534;
0.108162;
0.109687;
0.112552;
0.110804;
0.108571;
0.107448;
0.111333;
0.111003;
0.112222;
0.111721;
0.105352;
0.112393;
0.109483;
0.108705;
0.112192;
0.107073;
0.111244;
0.109553;
0.107986;
0.110327;
0.107317;
0.108823;
0.105948;
3.23192];
p220=[
0.112945;
0.118059;
0.115988;
0.114553;
0.116887;
0.117078;
0.120319;
0.114016;
0.118481;
0.117766;
0.115945;
0.115828;
0.11641;
0.114888;
0.116104;
0.114255;
0.116298;
0.116512;
0.116519;
0.118017;
0.115253;
0.114436;
0.118889;
0.118238;
0.115851;
0.11599;
0.11751;
0.120765;
0.112625;
0.114723;
0.115903;
0.117073;
0.115773;
0.117282;
0.119156;
0.115606;
0.115275;
0.114739;
0.117816;
0.115634;
0.116521;
0.117493;
0.118521;
0.114941;
2.83084];
p260=[
0.130465;
0.128142;
0.128374;
0.130128;
0.127125;
0.130198;
0.128332;
0.128947;
0.128044;
0.128985;
0.127365;
0.125492;
0.126205;
0.130667;
0.129017;
0.128553;
0.127923;
0.129884;
0.126493;
0.127666;
0.130087;
0.13377;
0.124387;
0.12479;
0.123629;
0.131107;
0.127102;
0.126585;
0.127801;
0.127864;
0.132014;
0.128158;
0.129408;
0.127738;
0.132745;
0.129776;
0.125796;
0.132008;
0.126887;
0.126411;
0.128568;
0.126601;
0.130108;
0.129523;
3.40297];
p300=[
0.131499;
0.135721;
0.14199;
0.13239;
0.135102;
0.137648;
0.132096;
0.134523;
0.135786;
0.137799;
0.13768;
0.1351;
0.140292;
0.135244;
0.135295;
0.133369;
0.136177;
0.134903;
0.137742;
0.134238;
0.131248;
0.136127;
0.136523;
0.132069;
0.128582;
0.141562;
0.130893;
0.133923;
0.131786;
0.13505;
0.136869;
0.137918;
0.133852;
0.133218;
0.137591;
0.134599;
0.129616;
0.138307;
0.13658;
0.131676;
0.138722;
0.137177;
0.135519;
0.134055;
3.05632];
p340=[
0.141393;
0.139243;
0.142268;
0.138551;
0.143157;
0.138776;
0.141297;
0.139581;
0.140975;
0.139999;
0.138982;
0.140956;
0.139762;
0.140724;
0.14021;
0.140854;
0.139721;
0.142008;
0.138774;
0.157258;
0.146217;
0.141488;
0.136554;
0.140966;
0.144597;
0.140365;
0.143018;
0.138719;
0.141378;
0.134478;
0.141889;
0.138505;
0.139472;
0.138572;
0.142973;
0.148545;
0.139703;
0.14249;
0.14569;
0.139377;
0.141824;
0.137454;
0.140711;
0.14345;
3.02272];
p380=[
0.137674;
0.14595;
0.146157;
0.152931;
0.145383;
0.144821;
0.144017;
0.142274;
0.14652;
0.145998;
0.149255;
0.145802;
0.147343;
0.149553;
0.202532;
0.145556;
0.147085;
0.147843;
0.148278;
0.149129;
0.150992;
0.144923;
0.14678;
0.14699;
0.147112;
0.143531;
0.149399;
0.1416;
0.14578;
0.156149;
0.149148;
0.14712;
0.148078;
0.153548;
0.148931;
0.143189;
0.150607;
0.147349;
0.148863;
0.150341;
0.152057;
0.143074;
0.148392;
0.151454;
2.04504];
p400=[
0.147046;
0.147971;
0.151931;
0.162352;
0.152883;
0.149009;
0.149171;
0.146985;
0.16606;
0.152181;
0.148645;
0.152019;
0.150086;
0.148208;
0.148968;
0.152078;
0.144111;
0.149321;
0.149593;
0.150723;
0.147142;
0.159651;
0.151454;
0.146724;
0.148211;
0.146509;
0.149796;
0.148711;
0.148265;
0.147131;
0.149252;
0.147306;
0.152508;
0.151558;
0.149538;
0.157178;
0.144244;
0.147113;
0.14641;
0.159861;
0.150893;
0.151292;
0.15131;
0.151838;
1.88777];
p450=[
0.155765;
0.159113;
0.155971;
0.160678;
0.158009;
0.15;
0.150918;
0.152466;
0.157136;
0.156642;
0.156913;
0.158285;
0.156801;
0.156045;
0.157867;
0.154675;
0.160689;
0.157904;
0.155587;
0.155043;
0.153541;
0.154533;
0.155091;
0.150247;
0.152364;
0.15315;
0.155228;
0.153969;
0.155829;
0.154107;
0.152944;
0.155758;
0.158061;
0.165083;
0.157702;
0.152641;
0.154801;
0.153379;
0.162475;
0.157427;
0.158532;
0.156206;
0.153474;
0.154544;
1.93773];
p500=[
0.154901;
0.160224;
0.154974;
0.157997;
0.158178;
0.154234;
0.159723;
0.159275;
0.15535;
0.161276;
0.156609;
0.154378;
0.158881;
0.157241;
0.165811;
0.160997;
0.152103;
0.159919;
0.153363;
0.155379;
0.157403;
0.157098;
0.152832;
0.157333;
0.160737;
0.158665;
0.156139;
0.154868;
0.158105;
0.156604;
0.160982;
0.157179;
0.155199;
0.15674;
0.163294;
0.163387;
0.158423;
0.164609;
0.170705;
0.16954;
0.169075;
0.158671;
0.15422;
0.176887;
1.93652];
p550=[
0.156168;
0.154309;
0.159076;
0.160663;
0.15895;
0.157232;
0.151636;
0.15438;
0.16086;
0.157979;
0.160016;
0.159182;
0.15889;
0.155525;
0.162464;
0.154993;
0.158173;
0.156183;
0.153431;
0.152071;
0.159062;
0.158172;
0.155902;
0.156597;
0.150966;
0.16211;
0.154489;
0.164993;
0.164408;
0.155344;
0.158779;
0.154902;
0.159996;
0.162226;
0.157768;
0.157662;
0.1571;
0.158135;
0.15824;
0.15573;
0.158635;
0.160583;
0.156773;
0.156001;
1.98032];
p600=[
0.159645;
0.160932;
0.160656;
0.157067;
0.160855;
0.172483;
0.160115;
0.165335;
0.16631;
0.162566;
0.160431;
0.160441;
0.157496;
0.161753;
0.157563;
0.159889;
0.162242;
0.164345;
0.159655;
0.169221;
0.158515;
0.157323;
0.15639;
0.166853;
0.15961;
0.16177;
0.159173;
0.161801;
0.163812;
0.163837;
0.159068;
0.158191;
0.166244;
0.158917;
0.166421;
0.16897;
0.156805;
0.163071;
0.159447;
0.163008;
0.159622;
0.164091;
0.159562;
0.158403;
2.58733];







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('file8inc25.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











