m0= 362; fs0= 22050.0; tm0=[ 0.000000E+00, 1.000000E+00, 2.000000E+00, 3.000000E+00, 4.000000E+00, 5.000000E+00, 6.000000E+00, 7.000000E+00, 8.000000E+00, 9.000000E+00, 1.000000E+01, 1.100000E+01, 1.200000E+01, 1.300000E+01, 1.400000E+01, 1.500000E+01, 1.600000E+01, 1.700000E+01, 1.800000E+01, 1.900000E+01, 2.000000E+01, 2.100000E+01, 2.200000E+01, 2.300000E+01, 2.400000E+01, 2.500000E+01, 2.600000E+01, 2.700000E+01, 2.800000E+01, 2.900000E+01, 3.000000E+01, 3.100000E+01, 3.200000E+01, 3.300000E+01, 3.400000E+01, 3.500000E+01, 3.600000E+01, 3.700000E+01, 3.800000E+01, 3.900000E+01, 4.000000E+01, 4.100000E+01, 4.200000E+01, 4.300000E+01, 4.400000E+01, 4.500000E+01, 4.600000E+01, 4.700000E+01, 4.800000E+01, 4.900000E+01, 5.000000E+01, 5.100000E+01, 5.200000E+01, 5.300000E+01, 5.400000E+01, 5.500000E+01, 5.600000E+01, 5.700000E+01, 5.800000E+01, 5.900000E+01, 6.000000E+01, 6.100000E+01, 6.200000E+01, 6.300000E+01, 6.400000E+01, 6.500000E+01, 6.600000E+01, 6.700000E+01, 6.800000E+01, 6.900000E+01, 7.000000E+01, 7.100000E+01, 7.200000E+01, 7.300000E+01, 7.400000E+01, 7.500000E+01, 7.600000E+01, 7.700000E+01, 7.800000E+01, 7.900000E+01, 8.000000E+01, 8.100000E+01, 8.200000E+01, 8.300000E+01, 8.400000E+01, 8.500000E+01, 8.600000E+01, 8.700000E+01, 8.800000E+01, 8.900000E+01, 9.000000E+01, 9.100000E+01, 9.200000E+01, 9.300000E+01, 9.400000E+01, 9.500000E+01, 9.600000E+01, 9.700000E+01, 9.800000E+01, 9.900000E+01, 1.000000E+02, 1.010000E+02, 1.020000E+02, 1.030000E+02, 1.040000E+02, 1.050000E+02, 1.060000E+02, 1.070000E+02, 1.080000E+02, 1.090000E+02, 1.100000E+02, 1.110000E+02, 1.120000E+02, 1.130000E+02, 1.140000E+02, 1.150000E+02, 1.160000E+02, 1.170000E+02, 1.180000E+02, 1.190000E+02, 1.200000E+02, 1.210000E+02, 1.220000E+02, 1.230000E+02, 1.240000E+02, 1.250000E+02, 1.260000E+02, 1.270000E+02, 1.280000E+02, 1.290000E+02, 1.300000E+02, 1.310000E+02, 1.320000E+02, 1.330000E+02, 1.340000E+02, 1.350000E+02, 1.360000E+02, 1.370000E+02, 1.380000E+02, 1.390000E+02, 1.400000E+02, 1.410000E+02, 1.420000E+02, 1.430000E+02, 1.440000E+02, 1.450000E+02, 1.460000E+02, 1.470000E+02, 1.480000E+02, 1.490000E+02, 1.500000E+02, 1.510000E+02, 1.520000E+02, 1.530000E+02, 1.540000E+02, 1.550000E+02, 1.560000E+02, 1.570000E+02, 1.580000E+02, 1.590000E+02, 1.600000E+02, 1.610000E+02, 1.620000E+02, 1.630000E+02, 1.640000E+02, 1.650000E+02, 1.660000E+02, 1.670000E+02, 1.680000E+02, 1.690000E+02, 1.700000E+02, 1.710000E+02, 1.720000E+02, 1.730000E+02, 1.740000E+02, 1.750000E+02, 1.760000E+02, 1.770000E+02, 1.780000E+02, 1.790000E+02, 1.800000E+02, 1.810000E+02, 1.820000E+02, 1.830000E+02, 1.840000E+02, 1.850000E+02, 1.860000E+02, 1.870000E+02, 1.880000E+02, 1.890000E+02, 1.900000E+02, 1.910000E+02, 1.920000E+02, 1.930000E+02, 1.940000E+02, 1.950000E+02, 1.960000E+02, 1.970000E+02, 1.980000E+02, 1.990000E+02, 2.000000E+02, 2.010000E+02, 2.020000E+02, 2.030000E+02, 2.040000E+02, 2.050000E+02, 2.060000E+02, 2.070000E+02, 2.080000E+02, 2.090000E+02, 2.100000E+02, 2.110000E+02, 2.120000E+02, 2.130000E+02, 2.140000E+02, 2.150000E+02, 2.160000E+02, 2.170000E+02, 2.180000E+02, 2.190000E+02, 2.200000E+02, 2.210000E+02, 2.220000E+02, 2.230000E+02, 2.240000E+02, 2.250000E+02, 2.260000E+02, 2.270000E+02, 2.280000E+02, 2.290000E+02, 2.300000E+02, 2.310000E+02, 2.320000E+02, 2.330000E+02, 2.340000E+02, 2.350000E+02, 2.360000E+02, 2.370000E+02, 2.380000E+02, 2.390000E+02, 2.400000E+02, 2.410000E+02, 2.420000E+02, 2.430000E+02, 2.440000E+02, 2.450000E+02, 2.460000E+02, 2.470000E+02, 2.480000E+02, 2.490000E+02, 2.500000E+02, 2.510000E+02, 2.520000E+02, 2.530000E+02, 2.540000E+02, 2.550000E+02, 2.560000E+02, 2.570000E+02, 2.580000E+02, 2.590000E+02, 2.600000E+02, 2.610000E+02, 2.620000E+02, 2.630000E+02, 2.640000E+02, 2.650000E+02, 2.660000E+02, 2.670000E+02, 2.680000E+02, 2.690000E+02, 2.700000E+02, 2.710000E+02, 2.720000E+02, 2.730000E+02, 2.740000E+02, 2.750000E+02, 2.760000E+02, 2.770000E+02, 2.780000E+02, 2.790000E+02, 2.800000E+02, 2.810000E+02, 2.820000E+02, 2.830000E+02, 2.840000E+02, 2.850000E+02, 2.860000E+02, 2.870000E+02, 2.880000E+02, 2.890000E+02, 2.900000E+02, 2.910000E+02, 2.920000E+02, 2.930000E+02, 2.940000E+02, 2.950000E+02, 2.960000E+02, 2.970000E+02, 2.980000E+02, 2.990000E+02, 3.000000E+02, 3.010000E+02, 3.020000E+02, 3.030000E+02, 3.040000E+02, 3.050000E+02, 3.060000E+02, 3.070000E+02, 3.080000E+02, 3.090000E+02, 3.100000E+02, 3.110000E+02, 3.120000E+02, 3.130000E+02, 3.140000E+02, 3.150000E+02, 3.160000E+02, 3.170000E+02, 3.180000E+02, 3.190000E+02, 3.200000E+02, 3.210000E+02, 3.220000E+02, 3.230000E+02, 3.240000E+02, 3.250000E+02, 3.260000E+02, 3.270000E+02, 3.280000E+02, 3.290000E+02, 3.300000E+02, 3.310000E+02, 3.320000E+02, 3.330000E+02, 3.340000E+02, 3.350000E+02, 3.360000E+02, 3.370000E+02, 3.380000E+02, 3.390000E+02, 3.400000E+02, 3.410000E+02, 3.420000E+02, 3.430000E+02, 3.440000E+02, 3.450000E+02, 3.460000E+02, 3.470000E+02, 3.480000E+02, 3.490000E+02, 3.500000E+02, 3.510000E+02, 3.520000E+02, 3.530000E+02, 3.540000E+02, 3.550000E+02, 3.560000E+02, 3.570000E+02, 3.580000E+02, 3.590000E+02, 3.600000E+02, 3.610000E+02, ]; ym0=[ -1.189000E+03, -1.985000E+03, -2.910000E+03, -3.947000E+03, -5.066000E+03, -6.221000E+03, -7.354000E+03, -8.397000E+03, -9.272000E+03, -9.900000E+03, -1.020600E+04, -1.012200E+04, -9.598000E+03, -8.605000E+03, -7.137000E+03, -5.219000E+03, -2.903000E+03, -2.700000E+02, 2.572000E+03, 5.497000E+03, 8.361000E+03, 1.101400E+04, 1.330900E+04, 1.511100E+04, 1.630900E+04, 1.681900E+04, 1.659500E+04, 1.563100E+04, 1.396000E+04, 1.165800E+04, 8.834000E+03, 5.631000E+03, 2.212000E+03, -1.246000E+03, -4.565000E+03, -7.576000E+03, -1.013100E+04, -1.210900E+04, -1.342500E+04, -1.403100E+04, -1.392100E+04, -1.312800E+04, -1.172100E+04, -9.797000E+03, -7.479000E+03, -4.904000E+03, -2.213000E+03, 4.510000E+02, 2.963000E+03, 5.209000E+03, 7.098000E+03, 8.563000E+03, 9.566000E+03, 1.008900E+04, 1.014100E+04, 9.750000E+03, 8.958000E+03, 7.822000E+03, 6.407000E+03, 4.783000E+03, 3.021000E+03, 1.195000E+03, -6.270000E+02, -2.381000E+03, -4.005000E+03, -5.444000E+03, -6.646000E+03, -7.570000E+03, -8.180000E+03, -8.450000E+03, -8.365000E+03, -7.919000E+03, -7.119000E+03, -5.990000E+03, -4.567000E+03, -2.907000E+03, -1.078000E+03, 8.400000E+02, 2.760000E+03, 4.592000E+03, 6.246000E+03, 7.637000E+03, 8.692000E+03, 9.351000E+03, 9.574000E+03, 9.345000E+03, 8.671000E+03, 7.588000E+03, 6.152000E+03, 4.441000E+03, 2.545000E+03, 5.650000E+02, -1.394000E+03, -3.233000E+03, -4.858000E+03, -6.189000E+03, -7.165000E+03, -7.747000E+03, -7.920000E+03, -7.692000E+03, -7.093000E+03, -6.171000E+03, -4.991000E+03, -3.628000E+03, -2.160000E+03, -6.690000E+02, 7.690000E+02, 2.086000E+03, 3.223000E+03, 4.136000E+03, 4.792000E+03, 5.176000E+03, 5.286000E+03, 5.133000E+03, 4.740000E+03, 4.139000E+03, 3.368000E+03, 2.470000E+03, 1.491000E+03, 4.770000E+02, -5.250000E+02, -1.474000E+03, -2.327000E+03, -3.048000E+03, -3.609000E+03, -3.987000E+03, -4.166000E+03, -4.141000E+03, -3.912000E+03, -3.492000E+03, -2.899000E+03, -2.161000E+03, -1.313000E+03, -3.990000E+02, 5.340000E+02, 1.438000E+03, 2.265000E+03, 2.969000E+03, 3.512000E+03, 3.861000E+03, 3.997000E+03, 3.910000E+03, 3.605000E+03, 3.097000E+03, 2.414000E+03, 1.596000E+03, 6.890000E+02, -2.530000E+02, -1.179000E+03, -2.034000E+03, -2.768000E+03, -3.341000E+03, -3.723000E+03, -3.897000E+03, -3.858000E+03, -3.615000E+03, -3.187000E+03, -2.602000E+03, -1.898000E+03, -1.117000E+03, -3.050000E+02, 4.910000E+02, 1.230000E+03, 1.877000E+03, 2.404000E+03, 2.796000E+03, 3.046000E+03, 3.156000E+03, 3.136000E+03, 3.002000E+03, 2.772000E+03, 2.470000E+03, 2.119000E+03, 1.739000E+03, 1.345000E+03, 9.450000E+02, 5.410000E+02, 1.270000E+02, -3.080000E+02, -7.800000E+02, -1.306000E+03, -1.899000E+03, -2.573000E+03, -3.329000E+03, -4.164000E+03, -5.060000E+03, -5.989000E+03, -6.910000E+03, -7.772000E+03, -8.514000E+03, -9.071000E+03, -9.376000E+03, -9.368000E+03, -8.996000E+03, -8.225000E+03, -7.040000E+03, -5.447000E+03, -3.481000E+03, -1.199000E+03, 1.314000E+03, 3.957000E+03, 6.607000E+03, 9.136000E+03, 1.140900E+04, 1.330000E+04, 1.469600E+04, 1.550900E+04, 1.567700E+04, 1.517400E+04, 1.400800E+04, 1.222700E+04, 9.909000E+03, 7.168000E+03, 4.140000E+03, 9.770000E+02, -2.157000E+03, -5.109000E+03, -7.730000E+03, -9.895000E+03, -1.150400E+04, -1.249300E+04, -1.283000E+04, -1.252300E+04, -1.161300E+04, -1.017000E+04, -8.292000E+03, -6.094000E+03, -3.702000E+03, -1.243000E+03, 1.157000E+03, 3.387000E+03, 5.351000E+03, 6.973000E+03, 8.200000E+03, 9.001000E+03, 9.369000E+03, 9.315000E+03, 8.867000E+03, 8.068000E+03, 6.968000E+03, 5.626000E+03, 4.103000E+03, 2.463000E+03, 7.660000E+02, -9.260000E+02, -2.559000E+03, -4.079000E+03, -5.435000E+03, -6.581000E+03, -7.477000E+03, -8.088000E+03, -8.386000E+03, -8.351000E+03, -7.972000E+03, -7.251000E+03, -6.202000E+03, -4.855000E+03, -3.257000E+03, -1.468000E+03, 4.370000E+02, 2.378000E+03, 4.265000E+03, 6.008000E+03, 7.519000E+03, 8.720000E+03, 9.544000E+03, 9.940000E+03, 9.881000E+03, 9.366000E+03, 8.415000E+03, 7.077000E+03, 5.418000E+03, 3.524000E+03, 1.494000E+03, -5.680000E+02, -2.556000E+03, -4.369000E+03, -5.917000E+03, -7.127000E+03, -7.947000E+03, -8.346000E+03, -8.319000E+03, -7.883000E+03, -7.079000E+03, -5.963000E+03, -4.608000E+03, -3.093000E+03, -1.504000E+03, 7.500000E+01, 1.566000E+03, 2.901000E+03, 4.020000E+03, 4.881000E+03, 5.456000E+03, 5.734000E+03, 5.717000E+03, 5.425000E+03, 4.885000E+03, 4.135000E+03, 3.222000E+03, 2.194000E+03, 1.103000E+03, 2.000000E+00, -1.058000E+03, -2.033000E+03, -2.880000E+03, -3.564000E+03, -4.058000E+03, -4.345000E+03, -4.415000E+03, -4.267000E+03, -3.912000E+03, -3.369000E+03, -2.665000E+03, -1.837000E+03, -9.250000E+02, 2.300000E+01, 9.600000E+02, 1.837000E+03, 2.608000E+03, 3.232000E+03, 3.676000E+03, 3.916000E+03, 3.941000E+03, 3.749000E+03, 3.354000E+03, 2.779000E+03, 2.057000E+03, 1.231000E+03, 3.480000E+02, -5.390000E+02, -1.381000E+03, -2.129000E+03, -2.741000E+03, -3.187000E+03, -3.446000E+03, -3.510000E+03, -3.383000E+03, -3.079000E+03, -2.621000E+03, -2.040000E+03, -1.374000E+03, -6.620000E+02, 5.100000E+01, 7.300000E+02, 1.341000E+03, 1.858000E+03, 2.264000E+03, 2.549000E+03, 2.713000E+03, 2.760000E+03, 2.699000E+03, 2.543000E+03, 2.307000E+03, 2.006000E+03, 1.651000E+03, 1.253000E+03, 8.160000E+02, 3.400000E+02, -1.770000E+02, -7.430000E+02, -1.363000E+03, ]; wm0=ones(m0,1);