diff options
Diffstat (limited to 'texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Closefile.sci')
-rw-r--r-- | texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Closefile.sci | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Closefile.sci b/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Closefile.sci deleted file mode 100644 index f2928103..00000000 --- a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Closefile.sci +++ /dev/null @@ -1,24 +0,0 @@ -// -// 13.05.19 openfile error tackled -// 13.11.01 Endpicture joined optionally -// 13.11.05 debugged - -function Closefile(varargin) - global Wfile FID; - if length(varargin)>=1 then - Pa=varargin(1); - if type(Pa)==10 then - if Pa=="1" then // 2013.11.05 - Endpicture(1) - end; - if Pa=="0" then - Endpicture(0) - end // - end - end - if Wfile~='default' then - mclose(FID); - FID=[]; // 2013.05.19 - end - Wfile='default'; -endfunction |