diff options
Diffstat (limited to 'texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Flattenlist.sci')
-rw-r--r-- | texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Flattenlist.sci | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Flattenlist.sci b/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Flattenlist.sci deleted file mode 100644 index 903679ab..00000000 --- a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Flattenlist.sci +++ /dev/null @@ -1,17 +0,0 @@ -// 10.11.13 - -function Out=Flattenlist(varargin) - Out=list(); - for N=1:length(varargin) - D=varargin(N); - if type(D)~=15 - Out($+1)=D; - else - for I=1:length(D) - Ds=D(I); - Tmp=Flattenlist(Ds); - Out=lstcat(Out,Tmp); - end; - end; - end; -endfunction; |