summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Bezierpt.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/ketpic2escifiles6/Bezierpt.sci
parent5a993b26c76714f0810fdc7e3ae7bdc5eb1afd10 (diff)
update ketcindy
Diffstat (limited to 'texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Bezierpt.sci')
-rw-r--r--texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Bezierpt.sci39
1 files changed, 0 insertions, 39 deletions
diff --git a/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Bezierpt.sci b/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Bezierpt.sci
deleted file mode 100644
index ac639249..00000000
--- a/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Bezierpt.sci
+++ /dev/null
@@ -1,39 +0,0 @@
-// 15.01.01
-// 15.02.08 for 3d
-
-function Out=Bezierpt(t,Ptlist,Ctrlist)
- if length(Ptlist)==6 then // 3d 15.02.08
- P0=Ptlist(1:3);
- P3=Ptlist(4:6);
- P1=Ctrlist(1:3);
- if length(Ctrlist)==3 then
- P2=P3;
- flg3=0;
- else
- P2=Ctrlist(4:6);
- flg3=1;
- end;
- else
- P0=Ptlist(1:2);
- P3=Ptlist(3:4);
- P1=Ctrlist(1:2);
- if length(Ctrlist)==2 then
- P2=P3;
- flg3=0;
- else
- P2=Ctrlist(3:4);
- flg3=1;
- end;
- end;
- P4=(1-t)*P0+t*P1;
- P5=(1-t)*P1+t*P2;
- P6=(1-t)*P2+t*P3;
- P7=(1-t)*P4+t*P5;
- P8=(1-t)*P5+t*P6;
- P9=(1-t)*P7+t*P8;
- if flg3==0 then
- Out=P7;
- else
- Out=P9;
- end;
-endfunction;