summaryrefslogtreecommitdiff
path: root/cesar/cp2/spoc/test/coeff_generation.scilab
blob: f26946f208892491ddfc39c2a3f407e7fa006001 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
pwd
args = sciargs();
rho = msscanf(args(5),"%lg")
getf ("ApproxOrder1ParamMCoeff.sci");
getf ("ApproxOrder2ParamMCoeff.sci");
getf ("get_Approx1.sci");
[args_tx_i,args_tx_e,sinc_tx_i, sinc_tx_e, div_tx, ordo_tx, pente_tx] = get_Approx1( rho,74,1155+74);
[args_rx_i,args_rx_e,sinc_rx_i, sinc_rx_e, div_rx, ordo_rx, pente_rx] = get_Approx1(-rho,74,1155+74);
fp = file("open","./obj/args_of_sinc.txt","unknown");
fprintf (fp, "%5.15g        %5.15g        %5.15g          %5.15g\n", args_tx_i, args_tx_e, args_rx_i, args_rx_e);
file ("close", fp);
fp = file("open","./obj/sinc.txt","unknown");
fprintf (fp, "%5.15g        %5.15g        %5.15g          %5.15g\n", sinc_tx_i, sinc_tx_e, sinc_rx_i, sinc_rx_e);
file ("close", fp);
fp = file("open","./obj/divisor.txt","unknown");
fprintf (fp, "%5.15g          %5.15g\n", div_tx, div_rx);
file ("close", fp);
fp = file("open","./obj/coeff.txt","unknown");
fprintf (fp, "%5.15g        %5.15g        %5.15g          %5.15g\n", ordo_tx, pente_tx, ordo_rx, pente_rx);
file ("close", fp);
exit;