CMSCOPE changed

5 files changed, 82 insertions, 0 deletions

diff --git a/contrib/toolbox_skeleton/demos/c_sum.dem.sce b/contrib/toolbox_skeleton/demos/c_sum.dem.sce
new file mode 100755
index 000000000..68ea6d0a1
--- /dev/null
+++ b/contrib/toolbox_skeleton/demos/c_sum.dem.sce
@@ -0,0 +1,16 @@
+//
+// This file is released under the 3-clause BSD license. See COPYING-BSD.
+
+
+function demo_c_sum()
+
+    mode(-1);
+    lines(0);
+
+    disp("c_sum(3,4)");
+    disp(c_sum(3,4));
+
+endfunction
+
+demo_c_sum();
+clear demo_c_sum;
diff --git a/contrib/toolbox_skeleton/demos/cpp_find.dem.sce b/contrib/toolbox_skeleton/demos/cpp_find.dem.sce
new file mode 100755
index 000000000..56147370a
--- /dev/null
+++ b/contrib/toolbox_skeleton/demos/cpp_find.dem.sce
@@ -0,0 +1,18 @@
+//
+// This file is released under the 3-clause BSD license. See COPYING-BSD.
+
+
+function demo_cpp_find()
+    mode(-1);
+    lines(0);
+
+    disp("cpp_find(''Scilab is a numerical computational package'',''numerical'')");
+    disp("position : " + string(cpp_find("Scilab is a numerical computational package","numerical")));
+    disp("cpp_find(''Scilab is a numerical computational package'',''package'')");
+    disp("position: " + string(cpp_find("Scilab is a numerical computational package","package")));
+
+endfunction
+
+
+demo_cpp_find();
+clear demo_cpp_find;
\ No newline at end of file
diff --git a/contrib/toolbox_skeleton/demos/fortran_sum.dem.sce b/contrib/toolbox_skeleton/demos/fortran_sum.dem.sce
new file mode 100755
index 000000000..de96506c3
--- /dev/null
+++ b/contrib/toolbox_skeleton/demos/fortran_sum.dem.sce
@@ -0,0 +1,16 @@
+//
+// This file is released under the 3-clause BSD license. See COPYING-BSD.
+
+function demo_fortran_sum()
+
+    mode(-1);
+    lines(0);
+
+    disp("fortran_sum(3,4)");
+    disp(fortran_sum(3,4));
+
+endfunction
+
+demo_fortran_sum();
+clear demo_fortran_sum;
+
diff --git a/contrib/toolbox_skeleton/demos/scilab_sum.dem.sce b/contrib/toolbox_skeleton/demos/scilab_sum.dem.sce
new file mode 100755
index 000000000..6e872aac8
--- /dev/null
+++ b/contrib/toolbox_skeleton/demos/scilab_sum.dem.sce
@@ -0,0 +1,15 @@
+// This file is released under the 3-clause BSD license. See COPYING-BSD.
+
+function demo_scilab_sum()
+
+    mode(-1);
+    lines(0);
+
+    disp("scilab_sum(3,4)");
+    disp(scilab_sum(3,4));
+
+endfunction
+
+
+demo_scilab_sum();
+clear demo_scilab_sum;
\ No newline at end of file
diff --git a/contrib/toolbox_skeleton/demos/toolbox_skeleton.dem.gateway.sce b/contrib/toolbox_skeleton/demos/toolbox_skeleton.dem.gateway.sce
new file mode 100755
index 000000000..09d6bf6a7
--- /dev/null
+++ b/contrib/toolbox_skeleton/demos/toolbox_skeleton.dem.gateway.sce
@@ -0,0 +1,17 @@
+//
+// This file is released under the 3-clause BSD license. See COPYING-BSD.
+
+function subdemolist = demo_gateway()
+    demopath = get_absolute_file_path("toolbox_skeleton.dem.gateway.sce");
+
+    subdemolist = ["sum with Scilab"             ,"scilab_sum.dem.sce"; ..
+    "A c sum "                    ,"c_sum.dem.sce"     ; ..
+    "The sum with fortran"        ,"fortran_sum.dem.sce" ; ..
+    "A find in cpp"               ,"cpp_find.dem.sce" ; ];
+
+    subdemolist(:,2) = demopath + subdemolist(:,2);
+
+endfunction
+
+subdemolist = demo_gateway();
+clear demo_gateway; // remove demo_gateway on stack