summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Kyorihensuu.sci
diff options
context:
space:
mode:
Diffstat (limited to 'texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Kyorihensuu.sci')
-rw-r--r--texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Kyorihensuu.sci30
1 files changed, 0 insertions, 30 deletions
diff --git a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Kyorihensuu.sci b/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Kyorihensuu.sci
deleted file mode 100644
index a07a89d1..00000000
--- a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Kyorihensuu.sci
+++ /dev/null
@@ -1,30 +0,0 @@
-function Kyorihensuu(varargin)
- if length(varargin)==0
- FL='default';
- else
- FL=varargin(1);
- if FL==''
- FL='tmp.tex'
- end
- end
- StrM=[...
- '\newlength{\Width}%',...
- '\newlength{\Height}%',...
- '\newlength{\Depth}%'...
- ];
- if FL~='default'
- Fid=mopen(FL,'w');
- mprintf('%s\n\n','Writing to '+FL);
- end;
- for I=1:size(StrM,2)
- Str=StrM(I);
- mprintf('%s\n',Str);
- if FL~='default'
- mfprintf(Fid,'%s\n',Str);
- end
- end
- if FL~='default'
- mclose(Fid)
- end
-endfunction
-