diff options
| author | jofret | 2010-06-17 10:10:04 +0000 |
|---|---|---|
| committer | jofret | 2010-06-17 10:10:04 +0000 |
| commit | b351d686f57f85cbe923132164ce718704bcdfa2 (patch) | |
| tree | 8d73b023ff49f0d20d35bd28a85095be73ac4c1c /macros/GeneralFunctions | |
| parent | 6dc276086ebb6bad8d2f4b3a13d583a04a1920f2 (diff) | |
| download | scilab2c-b351d686f57f85cbe923132164ce718704bcdfa2.tar.gz scilab2c-b351d686f57f85cbe923132164ce718704bcdfa2.tar.bz2 scilab2c-b351d686f57f85cbe923132164ce718704bcdfa2.zip | |
Remove SCI2Cisnum wrapping around isnum function
Diffstat (limited to 'macros/GeneralFunctions')
| -rw-r--r-- | macros/GeneralFunctions/SCI2Cisnum.sci | 30 |
1 files changed, 0 insertions, 30 deletions
diff --git a/macros/GeneralFunctions/SCI2Cisnum.sci b/macros/GeneralFunctions/SCI2Cisnum.sci deleted file mode 100644 index 50a5c14e..00000000 --- a/macros/GeneralFunctions/SCI2Cisnum.sci +++ /dev/null @@ -1,30 +0,0 @@ -function outbool = SCI2Cisnum(instring)
-// function outbool = SCI2Cisnum(instring)
-// -----------------------------------------------------------------
-// It fixes the bug of isnum. isnum('d') -> %T!!!
-//
-// Input data:
-// instring: string to analyze.
-//
-// Output data:
-// outbool: %T if instring is a number.
-//
-// Status:
-// 12-Apr-2007 -- Nutricato Raffaele: Author.
-//
-// Copyright 2007 Raffaele Nutricato.
-// Contact: raffaele.nutricato@tiscali.it
-// -----------------------------------------------------------------
-
-// ------------------------------
-// --- Check input arguments. ---
-// ------------------------------
-SCI2CNInArgCheck(argn(2),1,1);
-
-instring = convstr(instring,'l');
-outbool = isnum(instring);
-firstchar = part(instring,1:1);
-if (firstchar == 'd' | firstchar == 'e')
- outbool = %F;
-end
-endfunction
|