summaryrefslogtreecommitdiff
path: root/tests/unit_tests/test_jacobi/scilabcode/modsntest.sci
diff options
context:
space:
mode:
Diffstat (limited to 'tests/unit_tests/test_jacobi/scilabcode/modsntest.sci')
-rw-r--r--tests/unit_tests/test_jacobi/scilabcode/modsntest.sci6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/unit_tests/test_jacobi/scilabcode/modsntest.sci b/tests/unit_tests/test_jacobi/scilabcode/modsntest.sci
new file mode 100644
index 0000000..dc5d435
--- /dev/null
+++ b/tests/unit_tests/test_jacobi/scilabcode/modsntest.sci
@@ -0,0 +1,6 @@
+function modsntest()
+ u=[1+2*%i 2+3*%i 3+1*%i]; // the corresponding complex vector
+ k=0.6; // parameter of elliptic integral
+ [out]=%sn(u,k);
+ disp(out);
+endfunction