summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Enclosing.sci
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2018-02-12 14:52:54 +0900
committerNorbert Preining <norbert@preining.info>2018-02-12 14:52:54 +0900
commit8c3c49fd56de185396400a0e8a636ac03d8239ab (patch)
treeadf96aee3f0bfbdc9df3a9e2dd86332a9dfee9cd /texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Enclosing.sci
parent5a993b26c76714f0810fdc7e3ae7bdc5eb1afd10 (diff)
update ketcindy
Diffstat (limited to 'texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Enclosing.sci')
-rw-r--r--texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Enclosing.sci23
1 files changed, 0 insertions, 23 deletions
diff --git a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Enclosing.sci b/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Enclosing.sci
deleted file mode 100644
index bfc191b9..00000000
--- a/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Enclosing.sci
+++ /dev/null
@@ -1,23 +0,0 @@
-// 08.05.31
-// 10.12.04
-// 16.12.05 to make it a closed curve
-
-function AnsL=Enclosing(varargin)
- global MilliIn;
- Eps=10^(-7); // 12.05
- Nargs=length(varargin);
- P=varargin(1);
- if Mixtype(P)==2
- Tmp=Op(1,P);
- if type(Tmp)~=1 | length(Tmp)~=1
- AnsL=EnclosingS(P,varargin(2:Nargs));
- AnsL=Joincrvs(AnsL) // 10.12.04
- end
- end;
- Tmp1=Op(1,AnsL);
- Tmp2=Op(size(AnsL,1),AnsL);
- if norm(Tmp2-Tmp1)>Eps then // 12.05
- AnsL=[AnsL;Tmp1];
- end;
-endfunction
-