summaryrefslogtreecommitdiff
path: root/cesar/cp/spoc/test/coeff_generation.scilab
diff options
context:
space:
mode:
Diffstat (limited to 'cesar/cp/spoc/test/coeff_generation.scilab')
-rw-r--r--cesar/cp/spoc/test/coeff_generation.scilab22
1 files changed, 22 insertions, 0 deletions
diff --git a/cesar/cp/spoc/test/coeff_generation.scilab b/cesar/cp/spoc/test/coeff_generation.scilab
new file mode 100644
index 0000000000..f26946f208
--- /dev/null
+++ b/cesar/cp/spoc/test/coeff_generation.scilab
@@ -0,0 +1,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;
+