From dc71274f16f7ff65145e034900f582b62453a033 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sat, 14 Oct 2017 11:43:11 +0900 Subject: rename and update ketpic -> ketcindy --- .../samples/s07slides/fig/pointoncircle/p025.sce | 56 ---------------------- 1 file changed, 56 deletions(-) delete mode 100644 texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.sce (limited to 'texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.sce') diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.sce deleted file mode 100644 index 99337104..00000000 --- a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.sce +++ /dev/null @@ -1,56 +0,0 @@ -//date time=2017/8/19 10:55:49 - -cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); -Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); -Ketinit(); -disp('KETpic '+ThisVersion()) -Fnametex='pointoncircle/p025.tex'; -Fnamesci='pointoncircle/p025.sce'; -Fnamescibody='figs0706animatebody.sce'; -Fnameout='figs0706animate.txt'; -pi=%pi; i=%i; -arccos=acos; arcsin=asin; arctan=atan; - -Setwindow([-2.5,2.5], [-2.5,2.5]); -Assignadd('pi',%pi); -Assignadd('XMIN',Xmin()); -Assignadd('XMAX',Xmax()); -Assignadd('YMIN',Ymin()); -Assignadd('YMAX',Ymax()); -A=[0,-4]; Assignrep('A',[0,-4]); -B=[6.28319,-3.96979]; Assignrep('B',[6.28319,-3.96979]); -C=[0.83543,-3.99598]; Assignrep('C',[0.83543,-3.99598]); -mdbw1=evstr('[0.91885,-0.44241]'); Assignrep('mdbw1',[0.91885,-0.44241]); -cr1=Circledata([[0,0],[2,0]]); -sg1=Listplot([[0,0],[1.93717,-0.49738]]); -pt1=Pointdata([1.93717,-0.49738]); -bw1=Bowdata([0,0],[1.93717,-0.49738],1,0.3); -PtL=list(A,B,C); -GrL=list(); -//if length(fileinfo(Fnamescibody))>0 -// Gbdy=ReadfromCindy(Fnamescibody); -// execstr(Gbdy) -//end; - -//Windisp(GrL,'c'); - -if 1==1 then - -Openfile('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p025.tex','1cm'); - Fontsize('s'); - Drwline(cr1); - Letter([2,0],"se","$2$"); - Setcolor("red"); - Drwline(sg1); - Setcolor("black"); - Setpen(0.12); - Drwpt(list(pt1)); - Setpen(1); - Letter([0.92,-0.44],"c","$2$"); - Drwline(bw1); - Letter([2.13,-0.55],"c","$\mathrm{P}$"); -Closefile('1'); - -end; - -quit(); -- cgit v1.2.3