summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketpic/ketlib/ketpicscifiles6/Sfparadata.sci
diff options
context:
space:
mode:
Diffstat (limited to 'texmf-dist/scripts/ketpic/ketlib/ketpicscifiles6/Sfparadata.sci')
-rwxr-xr-xtexmf-dist/scripts/ketpic/ketlib/ketpicscifiles6/Sfparadata.sci17
1 files changed, 17 insertions, 0 deletions
diff --git a/texmf-dist/scripts/ketpic/ketlib/ketpicscifiles6/Sfparadata.sci b/texmf-dist/scripts/ketpic/ketlib/ketpicscifiles6/Sfparadata.sci
new file mode 100755
index 00000000..5aa4e5e5
--- /dev/null
+++ b/texmf-dist/scripts/ketpic/ketlib/ketpicscifiles6/Sfparadata.sci
@@ -0,0 +1,17 @@
+// 08.08.16
+
+function Out=Sfparadata(varargin)
+ Nargs=length(varargin);
+ Fd=varargin(1);
+ Ndu=25 ; Ndv=25; Np=[50,50];
+ if Nargs>=3
+ Ndu=varargin(2);
+ Ndv=varargin(3);
+ end;
+ if Nargs>=4
+ Np=varargin(4);
+ end;
+ Tmp=Sf3data(Fd,Ndu,Ndv,Np);
+ Out=Projpara(Tmp);
+endfunction
+