From 08a6eb292c4eb6eca87241d130ccbc82a3679ac0 Mon Sep 17 00:00:00 2001 From: laranjeiro Date: Mon, 19 May 2008 11:45:16 +0000 Subject: pwl: modified the simulation. git-svn-id: svn+ssh://pessac/svn/cesar/trunk@2018 017c9cb6-072f-447c-8318-d5b54f68fe89 --- cesar/cp2/pwl/doc/scilab/Makefile | 1 - cesar/cp2/pwl/doc/scilab/convertc.sce | 8 +++++++- cesar/cp2/pwl/doc/scilab/estimate_acl_freq_decrease.sce | 2 +- cesar/cp2/pwl/doc/scilab/estimate_acl_freq_increase.sce | 2 +- cesar/cp2/pwl/doc/scilab/estimate_acl_stable.sce | 2 +- 5 files changed, 10 insertions(+), 5 deletions(-) (limited to 'cesar/cp2') diff --git a/cesar/cp2/pwl/doc/scilab/Makefile b/cesar/cp2/pwl/doc/scilab/Makefile index 5d5d6d7941..7c4e211550 100644 --- a/cesar/cp2/pwl/doc/scilab/Makefile +++ b/cesar/cp2/pwl/doc/scilab/Makefile @@ -9,7 +9,6 @@ all: $(PAGES) scilab -f myfile.sce rm myfile.sce mv *.csv res - mv *.c res mv *.h res clean: diff --git a/cesar/cp2/pwl/doc/scilab/convertc.sce b/cesar/cp2/pwl/doc/scilab/convertc.sce index 6acedbe389..3d60d70ed9 100644 --- a/cesar/cp2/pwl/doc/scilab/convertc.sce +++ b/cesar/cp2/pwl/doc/scilab/convertc.sce @@ -12,7 +12,13 @@ function convertc_array (file_name, array_name, array) nb_points = length(array); -define_name = file_name + "_" + array_name; +index = strindex(file_name, "."); + +if index < length(file_name) + define_name = part(file_name, [1:index-1]) + "_" + array_name; +else + define_name = file_name + "_" + array_name; +end // Provide an array for the C unit test. result_file = file ('open', file_name, 'unknown'); diff --git a/cesar/cp2/pwl/doc/scilab/estimate_acl_freq_decrease.sce b/cesar/cp2/pwl/doc/scilab/estimate_acl_freq_decrease.sce index 4f11573970..30b4acf06f 100644 --- a/cesar/cp2/pwl/doc/scilab/estimate_acl_freq_decrease.sce +++ b/cesar/cp2/pwl/doc/scilab/estimate_acl_freq_decrease.sce @@ -44,7 +44,7 @@ file('close', result_file); // Write the array. res = result(:,3); -convertc_array ('table_decrease.c', 'ac_decrease', res); +convertc_array ('table_decrease.h', 'ac_decrease', res); // Write the result of the simulation. res = result (:,1); diff --git a/cesar/cp2/pwl/doc/scilab/estimate_acl_freq_increase.sce b/cesar/cp2/pwl/doc/scilab/estimate_acl_freq_increase.sce index eed9bdb6e3..e345504762 100644 --- a/cesar/cp2/pwl/doc/scilab/estimate_acl_freq_increase.sce +++ b/cesar/cp2/pwl/doc/scilab/estimate_acl_freq_increase.sce @@ -48,7 +48,7 @@ file('close', result_file); // Write the array. res = result(:,3); -convertc_array ('table_increase.c', 'ac_increase', res); +convertc_array ('table_increase.h', 'ac_increase', res); // Write the result of the simulation. res = result (:,1); diff --git a/cesar/cp2/pwl/doc/scilab/estimate_acl_stable.sce b/cesar/cp2/pwl/doc/scilab/estimate_acl_stable.sce index 1b6b7a8fbf..da94eaf345 100644 --- a/cesar/cp2/pwl/doc/scilab/estimate_acl_stable.sce +++ b/cesar/cp2/pwl/doc/scilab/estimate_acl_stable.sce @@ -46,7 +46,7 @@ file('close', result_file); // Write the array. res = result(:,3); -convertc_array ('table.c', 'ac_stable', res); +convertc_array ('table.h', 'ac_stable', res); // Write the result of the simulation. res = result (:,1); -- cgit v1.2.3