Home Reference Manuals Return Track Group Documentation
#!/usr/bin/octave -q
# PSD FREQ
# [mē/(1/m)] [1/m]
PSD_VERT= [
7.56479E-04 0.00000E+00
7.56479E-04 1.00000E-02
7.49990E-04 1.00334E-02
3.88254E-04 1.33779E-02
2.43004E-04 1.67224E-02
1.68539E-04 2.00669E-02
1.23978E-04 2.34114E-02
9.65746E-05 2.67559E-02
7.02928E-05 3.01003E-02
5.15814E-05 3.34448E-02
4.26360E-05 3.67893E-02
3.74416E-05 4.01338E-02
3.39094E-05 4.34783E-02
2.96002E-05 4.68227E-02
2.55748E-05 5.01672E-02
2.20214E-05 5.35117E-02
1.93933E-05 5.68562E-02
1.78638E-05 6.02007E-02
1.64843E-05 6.35452E-02
1.35373E-05 6.68896E-02
1.15797E-05 7.02341E-02
1.07890E-05 7.35786E-02
1.03442E-05 7.69231E-02
1.15369E-05 8.02676E-02
1.11835E-05 8.36120E-02
9.57822E-06 8.69565E-02
8.38897E-06 9.03010E-02
7.41745E-06 9.36455E-02
6.88477E-06 9.69900E-02
6.02330E-06 1.00334E-01
5.37697E-06 1.03679E-01
4.35002E-06 1.07023E-01
3.40191E-06 1.10368E-01
3.56514E-06 1.13712E-01
3.46662E-06 1.17057E-01
2.95621E-06 1.20401E-01
2.49901E-06 1.23746E-01
2.10593E-06 1.27090E-01
2.09382E-06 1.30435E-01
2.08522E-06 1.33779E-01
1.79730E-06 1.37124E-01
1.34145E-06 1.40468E-01
1.37584E-06 1.43813E-01
1.64703E-06 1.47157E-01
1.47994E-06 1.50502E-01
1.34488E-06 1.53846E-01
1.20057E-06 1.57191E-01
9.89734E-07 1.60535E-01
8.43586E-07 1.63880E-01
7.43084E-07 1.67224E-01
7.14682E-07 1.70569E-01
6.61502E-07 1.73913E-01
6.62156E-07 1.77258E-01
6.54989E-07 1.80602E-01
5.52394E-07 1.83946E-01
5.16728E-07 1.87291E-01
5.10123E-07 1.90635E-01
4.56148E-07 1.93980E-01
4.32703E-07 1.97324E-01
4.07792E-07 2.00669E-01
3.81232E-07 2.04013E-01
3.44636E-07 2.07358E-01
3.13739E-07 2.10702E-01
3.06503E-07 2.14047E-01
2.87871E-07 2.17391E-01
2.79947E-07 2.20736E-01
2.66620E-07 2.24080E-01
2.26852E-07 2.27425E-01
2.13591E-07 2.30769E-01
2.09042E-07 2.34114E-01
1.80460E-07 2.37458E-01
1.95944E-07 2.40803E-01
1.99400E-07 2.44147E-01
1.59589E-07 2.47492E-01
1.41703E-07 2.50836E-01
1.31293E-07 2.54181E-01
1.41594E-07 2.57525E-01
1.53889E-07 2.60870E-01
1.28863E-07 2.64214E-01
1.04111E-07 2.67559E-01
1.07469E-07 2.70903E-01
1.35022E-07 2.74247E-01
1.43450E-07 2.77592E-01
1.10102E-07 2.80936E-01
7.33022E-08 2.84281E-01
6.43958E-08 2.87625E-01
9.31314E-08 2.90970E-01
1.14060E-07 2.94314E-01
9.80856E-08 2.97659E-01
8.27279E-08 3.01003E-01
7.86170E-08 3.04348E-01
6.71885E-08 3.07692E-01
6.41587E-08 3.11037E-01
8.13734E-08 3.14381E-01
7.83598E-08 3.17726E-01
6.11023E-08 3.21070E-01
5.71857E-08 3.24415E-01
5.74512E-08 3.27759E-01
5.74259E-08 3.31104E-01
5.34267E-08 3.34448E-01
4.90729E-08 3.37793E-01
5.38356E-08 3.41137E-01
5.20471E-08 3.44482E-01
4.52433E-08 3.47826E-01
5.32409E-08 3.51171E-01
4.89383E-08 3.54515E-01
3.17654E-08 3.57860E-01
2.88767E-08 3.61204E-01
3.07510E-08 3.64549E-01
2.74128E-08 3.67893E-01
2.28517E-08 3.71237E-01
2.17786E-08 3.74582E-01
2.78495E-08 3.77926E-01
3.09320E-08 3.81271E-01
2.77590E-08 3.84615E-01
3.00385E-08 3.87960E-01
3.40860E-08 3.91304E-01
2.84361E-08 3.94649E-01
2.28753E-08 3.97993E-01
2.87029E-08 4.01338E-01
2.90047E-08 4.04682E-01
2.45741E-08 4.08027E-01
2.42786E-08 4.11371E-01
2.31845E-08 4.14716E-01
2.10852E-08 4.18060E-01
1.91432E-08 4.21405E-01
1.64033E-08 4.24749E-01
1.69687E-08 4.28094E-01
1.97578E-08 4.31438E-01
2.04330E-08 4.34783E-01
1.84060E-08 4.38127E-01
1.63137E-08 4.41472E-01
1.63515E-08 4.44816E-01
1.58340E-08 4.48161E-01
1.41305E-08 4.51505E-01
1.37707E-08 4.54850E-01
1.47108E-08 4.58194E-01
1.54519E-08 4.61538E-01
1.53488E-08 4.64883E-01
1.54537E-08 4.68227E-01
1.61415E-08 4.71572E-01
1.62875E-08 4.74916E-01
1.61037E-08 4.78261E-01
1.58008E-08 4.81605E-01
1.50897E-08 4.84950E-01
1.40253E-08 4.88294E-01
1.28433E-08 4.91639E-01
1.22436E-08 4.94983E-01
1.21758E-08 4.98328E-01
1.19807E-08 5.01672E-01
1.14525E-08 5.05017E-01
1.07818E-08 5.08361E-01
1.05100E-08 5.11706E-01
1.06293E-08 5.15050E-01
1.05592E-08 5.18395E-01
1.04133E-08 5.21739E-01
1.03875E-08 5.25084E-01
1.03764E-08 5.28428E-01
1.03612E-08 5.31773E-01
1.01965E-08 5.35117E-01
9.93273E-09 5.38462E-01
9.56470E-09 5.41806E-01
9.26176E-09 5.45151E-01
9.24743E-09 5.48495E-01
9.16942E-09 5.51839E-01
8.92966E-09 5.55184E-01
8.72973E-09 5.58528E-01
8.62504E-09 5.61873E-01
8.60519E-09 5.65217E-01
8.49899E-09 5.68562E-01
8.28519E-09 5.71906E-01
8.19367E-09 5.75251E-01
8.22689E-09 5.78595E-01
8.22088E-09 5.81940E-01
7.97523E-09 5.85284E-01
7.45428E-09 5.88629E-01
6.96252E-09 5.91973E-01
6.79182E-09 5.95318E-01
6.82845E-09 5.98662E-01
6.82590E-09 6.02007E-01
6.69684E-09 6.05351E-01
6.44387E-09 6.08696E-01
6.28911E-09 6.12040E-01
6.27830E-09 6.15385E-01
6.28187E-09 6.18729E-01
6.35239E-09 6.22074E-01
6.29725E-09 6.25418E-01
5.98810E-09 6.28763E-01
5.70787E-09 6.32107E-01
5.61181E-09 6.35451E-01
5.57819E-09 6.38796E-01
5.44910E-09 6.42140E-01
5.27215E-09 6.45485E-01
5.12348E-09 6.48829E-01
5.06142E-09 6.52174E-01
5.10391E-09 6.55518E-01
5.04884E-09 6.58863E-01
4.91562E-09 6.62207E-01
4.93050E-09 6.65552E-01
4.94337E-09 6.68896E-01
4.76877E-09 6.72241E-01
4.60135E-09 6.75585E-01
4.53045E-09 6.78930E-01
4.42718E-09 6.82274E-01
4.28062E-09 6.85619E-01
4.22701E-09 6.88963E-01
4.23047E-09 6.92308E-01
4.17040E-09 6.95652E-01
4.11674E-09 6.98997E-01
4.11252E-09 7.02341E-01
4.12531E-09 7.05686E-01
4.09927E-09 7.09030E-01
4.02593E-09 7.12375E-01
3.92815E-09 7.15719E-01
3.83191E-09 7.19064E-01
3.79833E-09 7.22408E-01
3.84548E-09 7.25753E-01
3.86727E-09 7.29097E-01
3.75805E-09 7.32441E-01
3.60523E-09 7.35786E-01
3.53289E-09 7.39130E-01
3.58266E-09 7.42475E-01
3.63074E-09 7.45819E-01
3.64024E-09 7.49164E-01
3.68163E-09 7.52508E-01
3.61977E-09 7.55853E-01
3.55338E-09 7.59197E-01
3.58441E-09 7.62542E-01
3.47116E-09 7.65886E-01
3.28877E-09 7.69231E-01
3.18599E-09 7.72575E-01
3.04853E-09 7.75920E-01
2.94006E-09 7.79264E-01
2.91686E-09 7.82609E-01
2.86009E-09 7.85953E-01
2.75318E-09 7.89298E-01
2.68915E-09 7.92642E-01
2.66050E-09 7.95987E-01
2.64074E-09 7.99331E-01
2.64508E-09 8.02676E-01
2.58084E-09 8.06020E-01
2.41300E-09 8.09365E-01
2.26717E-09 8.12709E-01
2.21178E-09 8.16054E-01
2.14466E-09 8.19398E-01
2.03374E-09 8.22742E-01
1.94336E-09 8.26087E-01
1.88370E-09 8.29431E-01
1.85225E-09 8.32776E-01
1.87414E-09 8.36120E-01
1.95924E-09 8.39465E-01
1.98220E-09 8.42809E-01
1.88479E-09 8.46154E-01
1.82161E-09 8.49498E-01
1.85620E-09 8.52843E-01
1.86772E-09 8.56187E-01
1.82504E-09 8.59532E-01
1.82176E-09 8.62876E-01
1.81315E-09 8.66221E-01
1.75523E-09 8.69565E-01
1.73872E-09 8.72910E-01
1.74361E-09 8.76254E-01
1.72259E-09 8.79599E-01
1.66306E-09 8.82943E-01
1.57036E-09 8.86288E-01
1.50776E-09 8.89632E-01
1.49632E-09 8.92977E-01
1.48908E-09 8.96321E-01
1.45319E-09 8.99666E-01
1.42702E-09 9.03010E-01
1.43195E-09 9.06354E-01
1.48411E-09 9.09699E-01
1.58155E-09 9.13043E-01
1.64113E-09 9.16388E-01
1.64726E-09 9.19732E-01
1.63656E-09 9.23077E-01
1.62639E-09 9.26421E-01
1.62536E-09 9.29766E-01
1.59463E-09 9.33110E-01
1.52276E-09 9.36455E-01
1.44059E-09 9.39799E-01
1.38588E-09 9.43144E-01
1.35484E-09 9.46488E-01
1.35326E-09 9.49833E-01
1.41956E-09 9.53177E-01
1.50932E-09 9.56522E-01
1.54483E-09 9.59866E-01
1.50080E-09 9.63211E-01
1.41099E-09 9.66555E-01
1.31768E-09 9.69900E-01
1.25793E-09 9.73244E-01
1.25213E-09 9.76589E-01
1.26956E-09 9.79933E-01
1.28693E-09 9.83278E-01
1.28907E-09 9.86622E-01
1.25969E-09 9.89967E-01
1.25291E-09 9.93311E-01
1.28490E-09 9.96656E-01
1.31598E-09 1.00000E+00
1.31598E-09 1.00000E+02
];
fid= fopen ("PSD_VERT.psd", "w");
if (fid == -1) error ("Can not open file PSD_VERT.psd"); end
fprintf(fid,"\n PSD_VERT=\n");
for i= 1:length(PSD_VERT)
if (PSD_VERT(i,2) < 1./25.)
PSD_VERT(i,1)= 10.*PSD_VERT(i,1);
else
PSD_VERT(i,1)= PSD_VERT(i,1);
end
fprintf(fid," %e %e\n", PSD_VERT(i,1), PSD_VERT(i,2));
end
fclose (fid);
fprintf("File PSD_VERT.psd has been written\n");