diff options
-rw-r--r-- | macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci | 2 | ||||
-rw-r--r-- | tests/unit_tests/test_double_Expm.sci | 9 |
2 files changed, 10 insertions, 1 deletions
diff --git a/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci b/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci index 28adf2c9..7ef4c098 100644 --- a/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci +++ b/macros/ToolInitialization/INIT_FillSCI2LibCDirs.sci @@ -2898,7 +2898,7 @@ PrintStringInfo('c2'+ArgSeparator+'c2',ClassFileName,'file','y'); PrintStringInfo('z2'+ArgSeparator+'z2',ClassFileName,'file','y'); // --- Annotation Function And Function List Function. --- -FunctionName = 'expm'; +FunctionName = 'expm'; // AS : Done PrintStringInfo(' Adding Function: '+FunctionName+'.',GeneralReport,'both','y'); INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCAnnFunDir,ClassName,GeneralReport,ExtensionCAnnFun); INIT_GenAnnFLFunctions(FunctionName,SCI2CLibCFLFunDir,ClassName,GeneralReport,ExtensionCFuncListFun); diff --git a/tests/unit_tests/test_double_Expm.sci b/tests/unit_tests/test_double_Expm.sci new file mode 100644 index 00000000..a084fb5a --- /dev/null +++ b/tests/unit_tests/test_double_Expm.sci @@ -0,0 +1,9 @@ +function test_double_Expm() + b = [1 2 3 4 ; 5 6 7 8 ; 9 10 11 12 ; 13 14 15 16]; + c = b*%i ; + + disp(expm(b)); + disp(expm(c)); + + +endfunction |