diff options
Diffstat (limited to 'macros/GeneralFunctions/SCI2Cstring.sci')
-rw-r--r-- | macros/GeneralFunctions/SCI2Cstring.sci | 68 |
1 files changed, 34 insertions, 34 deletions
diff --git a/macros/GeneralFunctions/SCI2Cstring.sci b/macros/GeneralFunctions/SCI2Cstring.sci index cf6d4370..5b16c250 100644 --- a/macros/GeneralFunctions/SCI2Cstring.sci +++ b/macros/GeneralFunctions/SCI2Cstring.sci @@ -1,34 +1,34 @@ -function outstring = SCI2Cstring(innum)
-// function outstring = SCI2Cstring(innum)
-// -----------------------------------------------------------------
-// #RNU_RES_B
-// It fixes the bug of string function when applied to
-// exponential formats:
-// Example:
-// -->string(10e-10)
-// ans =
-// 1.000D-09
-// Note how the "D" is syntactically wrong.
-//
-// Input data:
-// innnum: input number to be converted into string.
-//
-// Output data:
-// outstring: string containing the conversion.
-// #RNU_RES_E
-//
-// Status:
-// 07-May-2008 -- Nutricato Raffaele: Author.
-//
-// Copyright 2008 Raffaele Nutricato.
-// Contact: raffaele.nutricato@tiscali.it
-// -----------------------------------------------------------------
-
-// ------------------------------
-// --- Check input arguments. ---
-// ------------------------------
-SCI2CNInArgCheck(argn(2),1,1);
-
-outstring=strsubst(string(innum),'D','e');
-
-endfunction
+function outstring = SCI2Cstring(innum) +// function outstring = SCI2Cstring(innum) +// ----------------------------------------------------------------- +// #RNU_RES_B +// It fixes the bug of string function when applied to +// exponential formats: +// Example: +// -->string(10e-10) +// ans = +// 1.000D-09 +// Note how the "D" is syntactically wrong. +// +// Input data: +// innnum: input number to be converted into string. +// +// Output data: +// outstring: string containing the conversion. +// #RNU_RES_E +// +// Status: +// 07-May-2008 -- Nutricato Raffaele: Author. +// +// Copyright 2008 Raffaele Nutricato. +// Contact: raffaele.nutricato@tiscali.it +// ----------------------------------------------------------------- + +// ------------------------------ +// --- Check input arguments. --- +// ------------------------------ +SCI2CNInArgCheck(argn(2),1,1); + +outstring=strsubst(string(innum),'D','e'); + +endfunction |