diff options
Diffstat (limited to 'texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle')
53 files changed, 4918 insertions, 0 deletions
diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/all.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/all.sce new file mode 100644 index 00000000..dd783a0f --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/all.sce @@ -0,0 +1,1130 @@ +//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/p001.tex'; +Fnamesci='pointoncircle/p001.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('[1,-0.2]'); Assignrep('mdbw1',[1,-0.2]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[2,0]]); +pt1=Pointdata([2,0]); +bw1=Bowdata([0,0],[2,0],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/p001.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([1,-0.2],"c","$2$"); + Drwline(bw1); + Letter([2.2,0],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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('[1.01832,0.05497]'); Assignrep('mdbw1',[1.01832,0.05497]); +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/p002.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([1.02,0.05],"c","$2$"); + Drwline(bw1); + Letter([2.13,0.55],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.97266,0.30649]'); Assignrep('mdbw1',[0.97266,0.30649]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.75261,0.96351]]); +pt1=Pointdata([1.75261,0.96351]); +bw1=Bowdata([0,0],[1.75261,0.96351],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/p003.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.97,0.31],"c","$2$"); + Drwline(bw1); + Letter([1.93,1.06],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.86588,0.53875]'); Assignrep('mdbw1',[0.86588,0.53875]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.45794,1.36909]]); +pt1=Pointdata([1.45794,1.36909]); +bw1=Bowdata([0,0],[1.45794,1.36909],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/p004.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.87,0.54],"c","$2$"); + Drwline(bw1); + Letter([1.6,1.51],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.70469,0.73716]'); Assignrep('mdbw1',[0.70469,0.73716]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.07165,1.68866]]); +pt1=Pointdata([1.07165,1.68866]); +bw1=Bowdata([0,0],[1.07165,1.68866],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/p005.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.7,0.74],"c","$2$"); + Drwline(bw1); + Letter([1.18,1.86],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.49923,0.88925]'); Assignrep('mdbw1',[0.49923,0.88925]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[0.61803,1.90211]]); +pt1=Pointdata([0.61803,1.90211]); +bw1=Bowdata([0,0],[0.61803,1.90211],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/p006.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.5,0.89],"c","$2$"); + Drwline(bw1); + Letter([0.68,2.09],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.2624,0.98547]'); Assignrep('mdbw1',[0.2624,0.98547]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[0.12558,1.99605]]); +pt1=Pointdata([0.12558,1.99605]); +bw1=Bowdata([0,0],[0.12558,1.99605],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/p007.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.26,0.99],"c","$2$"); + Drwline(bw1); + Letter([0.14,2.2],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.00908,1.01976]'); Assignrep('mdbw1',[0.00908,1.01976]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-0.37476,1.96457]]); +pt1=Pointdata([-0.37476,1.96457]); +bw1=Bowdata([0,0],[-0.37476,1.96457],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/p008.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.01,1.02],"c","$2$"); + Drwline(bw1); + Letter([-0.41,2.16],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.24481,0.98998]'); Assignrep('mdbw1',[-0.24481,0.98998]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-0.85156,1.80965]]); +pt1=Pointdata([-0.85156,1.80965]); +bw1=Bowdata([0,0],[-0.85156,1.80965],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/p009.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.24,0.99],"c","$2$"); + Drwline(bw1); + Letter([-0.94,1.99],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.48332,0.898]'); Assignrep('mdbw1',[-0.48332,0.898]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.27485,1.54103]]); +pt1=Pointdata([-1.27485,1.54103]); +bw1=Bowdata([0,0],[-1.27485,1.54103],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/p010.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.48,0.9],"c","$2$"); + Drwline(bw1); + Letter([-1.4,1.7],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.69146,0.74959]'); Assignrep('mdbw1',[-0.69146,0.74959]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.61803,1.17557]]); +pt1=Pointdata([-1.61803,1.17557]); +bw1=Bowdata([0,0],[-1.61803,1.17557],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/p011.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.69,0.75],"c","$2$"); + Drwline(bw1); + Letter([-1.78,1.29],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.85615,0.55408]'); Assignrep('mdbw1',[-0.85615,0.55408]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.85955,0.73625]]); +pt1=Pointdata([-1.85955,0.73625]); +bw1=Bowdata([0,0],[-1.85955,0.73625],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/p012.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.86,0.55],"c","$2$"); + Drwline(bw1); + Letter([-2.05,0.81],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.96705,0.32376]'); Assignrep('mdbw1',[-0.96705,0.32376]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.98423,0.25067]]); +pt1=Pointdata([-1.98423,0.25067]); +bw1=Bowdata([0,0],[-1.98423,0.25067],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/p013.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.97,0.32],"c","$2$"); + Drwline(bw1); + Letter([-2.18,0.28],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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('[-1.01718,0.07309]'); Assignrep('mdbw1',[-1.01718,0.07309]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.98423,-0.25067]]); +pt1=Pointdata([-1.98423,-0.25067]); +bw1=Bowdata([0,0],[-1.98423,-0.25067],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/p014.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([-1.02,0.07],"c","$2$"); + Drwline(bw1); + Letter([-2.18,-0.28],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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('[-1.0034,-0.18217]'); Assignrep('mdbw1',[-1.0034,-0.18217]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.85955,-0.73625]]); +pt1=Pointdata([-1.85955,-0.73625]); +bw1=Bowdata([0,0],[-1.85955,-0.73625],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/p015.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([-1,-0.18],"c","$2$"); + Drwline(bw1); + Letter([-2.05,-0.81],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.92657,-0.42598]'); Assignrep('mdbw1',[-0.92657,-0.42598]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.61803,-1.17557]]); +pt1=Pointdata([-1.61803,-1.17557]); +bw1=Bowdata([0,0],[-1.61803,-1.17557],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/p016.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.93,-0.43],"c","$2$"); + Drwline(bw1); + Letter([-1.78,-1.29],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.79153,-0.64303]'); Assignrep('mdbw1',[-0.79153,-0.64303]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.27485,-1.54103]]); +pt1=Pointdata([-1.27485,-1.54103]); +bw1=Bowdata([0,0],[-1.27485,-1.54103],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/p017.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.79,-0.64],"c","$2$"); + Drwline(bw1); + Letter([-1.4,-1.7],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.60674,-0.81967]'); Assignrep('mdbw1',[-0.60674,-0.81967]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-0.85156,-1.80965]]); +pt1=Pointdata([-0.85156,-1.80965]); +bw1=Bowdata([0,0],[-0.85156,-1.80965],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/p018.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.61,-0.82],"c","$2$"); + Drwline(bw1); + Letter([-0.94,-1.99],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.38384,-0.94481]'); Assignrep('mdbw1',[-0.38384,-0.94481]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-0.37476,-1.96457]]); +pt1=Pointdata([-0.37476,-1.96457]); +bw1=Bowdata([0,0],[-0.37476,-1.96457],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/p019.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.38,-0.94],"c","$2$"); + Drwline(bw1); + Letter([-0.41,-2.16],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.13681,-1.01058]'); Assignrep('mdbw1',[-0.13681,-1.01058]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[0.12558,-1.99605]]); +pt1=Pointdata([0.12558,-1.99605]); +bw1=Bowdata([0,0],[0.12558,-1.99605],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/p020.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.14,-1.01],"c","$2$"); + Drwline(bw1); + Letter([0.14,-2.2],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.11881,-1.01286]'); Assignrep('mdbw1',[0.11881,-1.01286]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[0.61803,-1.90211]]); +pt1=Pointdata([0.61803,-1.90211]); +bw1=Bowdata([0,0],[0.61803,-1.90211],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/p021.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.12,-1.01],"c","$2$"); + Drwline(bw1); + Letter([0.68,-2.09],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.36696,-0.95149]'); Assignrep('mdbw1',[0.36696,-0.95149]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.07165,-1.68866]]); +pt1=Pointdata([1.07165,-1.68866]); +bw1=Bowdata([0,0],[1.07165,-1.68866],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/p022.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.37,-0.95],"c","$2$"); + Drwline(bw1); + Letter([1.18,-1.86],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.59206,-0.83034]'); Assignrep('mdbw1',[0.59206,-0.83034]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.45794,-1.36909]]); +pt1=Pointdata([1.45794,-1.36909]); +bw1=Bowdata([0,0],[1.45794,-1.36909],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/p023.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.59,-0.83],"c","$2$"); + Drwline(bw1); + Letter([1.6,-1.51],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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.77996,-0.65702]'); Assignrep('mdbw1',[0.77996,-0.65702]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.75261,-0.96351]]); +pt1=Pointdata([1.75261,-0.96351]); +bw1=Bowdata([0,0],[1.75261,-0.96351],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/p024.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.78,-0.66],"c","$2$"); + Drwline(bw1); + Letter([1.93,-1.06],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + + +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; + + +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('[1,-0.2]'); Assignrep('mdbw1',[1,-0.2]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[2,0]]); +pt1=Pointdata([2,0]); +bw1=Bowdata([0,0],[2,0],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/p026.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([1,-0.2],"c","$2$"); + Drwline(bw1); + Letter([2.2,0],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p001.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p001.sce new file mode 100644 index 00000000..28ce91c0 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p001.sce @@ -0,0 +1,56 @@ +//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/p001.tex'; +Fnamesci='pointoncircle/p001.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('[1,-0.2]'); Assignrep('mdbw1',[1,-0.2]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[2,0]]); +pt1=Pointdata([2,0]); +bw1=Bowdata([0,0],[2,0],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/p001.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([1,-0.2],"c","$2$"); + Drwline(bw1); + Letter([2.2,0],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p001.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p001.tex new file mode 100644 index 00000000..58a1a722 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p001.tex @@ -0,0 +1,88 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p001.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 787 0}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 790 -3}\special{pa 785 -3}\special{pa 785 3}\special{pa 790 3}\special{pa 790 -3}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.0000,-0.2000){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 6 3}\special{pa 13 5}\special{pa 19 8}\special{pa 26 10}% +\special{pa 32 13}\special{pa 39 15}\special{pa 45 18}\special{pa 52 20}\special{pa 58 22}% +\special{pa 65 24}\special{pa 71 27}\special{pa 78 29}\special{pa 84 31}\special{pa 91 33}% +\special{pa 97 35}\special{pa 104 37}\special{pa 111 39}\special{pa 117 41}\special{pa 124 43}% +\special{pa 131 44}\special{pa 137 46}\special{pa 144 48}\special{pa 151 49}\special{pa 157 51}% +\special{pa 164 53}\special{pa 171 54}\special{pa 178 56}\special{pa 184 57}\special{pa 191 58}% +\special{pa 198 60}\special{pa 205 61}\special{pa 211 62}\special{pa 218 64}\special{pa 225 65}% +\special{pa 232 66}\special{pa 239 67}\special{pa 245 68}\special{pa 252 69}\special{pa 259 70}% +\special{pa 266 71}\special{pa 273 72}\special{pa 280 72}\special{pa 287 73}\special{pa 293 74}% +\special{pa 300 74}\special{pa 307 75}\special{pa 314 76}\special{pa 321 76}\special{pa 328 77}% +\special{pa 335 77}% +\special{fp}% +\special{pa 453 77}\special{pa 460 77}\special{pa 466 76}\special{pa 473 76}\special{pa 480 75}% +\special{pa 487 74}\special{pa 494 74}\special{pa 501 73}\special{pa 508 72}\special{pa 515 72}% +\special{pa 521 71}\special{pa 528 70}\special{pa 535 69}\special{pa 542 68}\special{pa 549 67}% +\special{pa 556 66}\special{pa 562 65}\special{pa 569 64}\special{pa 576 62}\special{pa 583 61}% +\special{pa 590 60}\special{pa 596 58}\special{pa 603 57}\special{pa 610 56}\special{pa 617 54}% +\special{pa 623 53}\special{pa 630 51}\special{pa 637 49}\special{pa 643 48}\special{pa 650 46}% +\special{pa 657 44}\special{pa 663 43}\special{pa 670 41}\special{pa 677 39}\special{pa 683 37}% +\special{pa 690 35}\special{pa 697 33}\special{pa 703 31}\special{pa 710 29}\special{pa 716 27}% +\special{pa 723 24}\special{pa 729 22}\special{pa 736 20}\special{pa 742 18}\special{pa 749 15}% +\special{pa 755 13}\special{pa 762 10}\special{pa 768 8}\special{pa 775 5}\special{pa 781 3}% +\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.2000,0.0000){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p002.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p002.sce new file mode 100644 index 00000000..981a02f0 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p002.sce @@ -0,0 +1,56 @@ +//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/p002.tex'; +Fnamesci='pointoncircle/p002.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('[1.01832,0.05497]'); Assignrep('mdbw1',[1.01832,0.05497]); +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/p002.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([1.02,0.05],"c","$2$"); + Drwline(bw1); + Letter([2.13,0.55],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p002.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p002.tex new file mode 100644 index 00000000..8e23f56e --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p002.tex @@ -0,0 +1,89 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p002.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 763 -196}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 765 -199}\special{pa 760 -199}\special{pa 760 -193}\special{pa 765 -193}% +\special{pa 765 -199}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.0200,0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 7 1}\special{pa 14 2}\special{pa 21 3}\special{pa 27 4}% +\special{pa 34 4}\special{pa 41 5}\special{pa 48 6}\special{pa 55 6}\special{pa 62 7}% +\special{pa 69 8}\special{pa 75 8}\special{pa 82 9}\special{pa 89 9}\special{pa 96 9}% +\special{pa 103 10}\special{pa 110 10}\special{pa 117 10}\special{pa 124 10}\special{pa 131 10}% +\special{pa 138 10}\special{pa 144 11}\special{pa 151 11}\special{pa 158 10}\special{pa 165 10}% +\special{pa 172 10}\special{pa 179 10}\special{pa 186 10}\special{pa 193 9}\special{pa 200 9}% +\special{pa 206 9}\special{pa 213 8}\special{pa 220 8}\special{pa 227 7}\special{pa 234 7}% +\special{pa 241 6}\special{pa 248 5}\special{pa 255 5}\special{pa 261 4}\special{pa 268 3}% +\special{pa 275 2}\special{pa 282 1}\special{pa 289 1}\special{pa 296 0}\special{pa 303 -1}% +\special{pa 309 -3}\special{pa 316 -4}\special{pa 323 -5}\special{pa 330 -6}\special{pa 337 -7}% +\special{pa 343 -9}% +\special{fp}% +\special{pa 458 -38}\special{pa 464 -40}\special{pa 471 -42}\special{pa 477 -44}\special{pa 484 -47}% +\special{pa 490 -49}\special{pa 497 -51}\special{pa 503 -54}\special{pa 510 -56}\special{pa 516 -59}% +\special{pa 523 -61}\special{pa 529 -64}\special{pa 535 -66}\special{pa 542 -69}\special{pa 548 -72}% +\special{pa 555 -74}\special{pa 561 -77}\special{pa 567 -80}\special{pa 573 -83}\special{pa 580 -86}% +\special{pa 586 -89}\special{pa 592 -92}\special{pa 598 -95}\special{pa 605 -98}\special{pa 611 -101}% +\special{pa 617 -104}\special{pa 623 -107}\special{pa 629 -110}\special{pa 635 -114}% +\special{pa 641 -117}\special{pa 647 -120}\special{pa 653 -124}\special{pa 659 -127}% +\special{pa 665 -131}\special{pa 671 -134}\special{pa 677 -138}\special{pa 683 -141}% +\special{pa 689 -145}\special{pa 695 -149}\special{pa 700 -152}\special{pa 706 -156}% +\special{pa 712 -160}\special{pa 718 -164}\special{pa 723 -168}\special{pa 729 -172}% +\special{pa 735 -176}\special{pa 740 -179}\special{pa 746 -184}\special{pa 752 -188}% +\special{pa 757 -192}\special{pa 763 -196}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.1300,0.5500){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p003.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p003.sce new file mode 100644 index 00000000..099456ca --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p003.sce @@ -0,0 +1,56 @@ +//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/p003.tex'; +Fnamesci='pointoncircle/p003.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.97266,0.30649]'); Assignrep('mdbw1',[0.97266,0.30649]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.75261,0.96351]]); +pt1=Pointdata([1.75261,0.96351]); +bw1=Bowdata([0,0],[1.75261,0.96351],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/p003.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.97,0.31],"c","$2$"); + Drwline(bw1); + Letter([1.93,1.06],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p003.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p003.tex new file mode 100644 index 00000000..1cbf43cf --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p003.tex @@ -0,0 +1,90 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p003.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 690 -379}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 693 -382}\special{pa 687 -382}\special{pa 687 -377}\special{pa 693 -377}% +\special{pa 693 -382}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.9700,0.3100){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 7 -1}\special{pa 14 -2}\special{pa 21 -2}\special{pa 27 -3}% +\special{pa 34 -4}\special{pa 41 -5}\special{pa 48 -6}\special{pa 55 -7}\special{pa 62 -9}% +\special{pa 68 -10}\special{pa 75 -11}\special{pa 82 -12}\special{pa 89 -14}\special{pa 95 -15}% +\special{pa 102 -16}\special{pa 109 -18}\special{pa 116 -19}\special{pa 122 -21}\special{pa 129 -22}% +\special{pa 136 -24}\special{pa 142 -26}\special{pa 149 -27}\special{pa 156 -29}\special{pa 163 -31}% +\special{pa 169 -33}\special{pa 176 -35}\special{pa 182 -37}\special{pa 189 -39}\special{pa 196 -41}% +\special{pa 202 -43}\special{pa 209 -45}\special{pa 215 -47}\special{pa 222 -49}\special{pa 228 -52}% +\special{pa 235 -54}\special{pa 241 -56}\special{pa 248 -59}\special{pa 254 -61}\special{pa 261 -64}% +\special{pa 267 -66}\special{pa 274 -69}\special{pa 280 -71}\special{pa 286 -74}\special{pa 293 -77}% +\special{pa 299 -79}\special{pa 305 -82}\special{pa 312 -85}\special{pa 318 -88}\special{pa 324 -91}% +\special{pa 330 -94}% +\special{fp}% +\special{pa 434 -151}\special{pa 440 -154}\special{pa 445 -158}\special{pa 451 -162}% +\special{pa 457 -166}\special{pa 463 -169}\special{pa 468 -173}\special{pa 474 -177}% +\special{pa 480 -181}\special{pa 485 -185}\special{pa 491 -189}\special{pa 497 -193}% +\special{pa 502 -197}\special{pa 508 -202}\special{pa 513 -206}\special{pa 519 -210}% +\special{pa 524 -214}\special{pa 529 -219}\special{pa 535 -223}\special{pa 540 -227}% +\special{pa 545 -232}\special{pa 551 -236}\special{pa 556 -241}\special{pa 561 -245}% +\special{pa 566 -250}\special{pa 572 -254}\special{pa 577 -259}\special{pa 582 -263}% +\special{pa 587 -268}\special{pa 592 -273}\special{pa 597 -278}\special{pa 602 -282}% +\special{pa 607 -287}\special{pa 612 -292}\special{pa 617 -297}\special{pa 621 -302}% +\special{pa 626 -307}\special{pa 631 -312}\special{pa 636 -317}\special{pa 641 -322}% +\special{pa 645 -327}\special{pa 650 -332}\special{pa 654 -337}\special{pa 659 -342}% +\special{pa 664 -347}\special{pa 668 -353}\special{pa 673 -358}\special{pa 677 -363}% +\special{pa 681 -369}\special{pa 686 -374}\special{pa 690 -379}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.9300,1.0600){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p004.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p004.sce new file mode 100644 index 00000000..dbf4867a --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p004.sce @@ -0,0 +1,56 @@ +//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/p004.tex'; +Fnamesci='pointoncircle/p004.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.86588,0.53875]'); Assignrep('mdbw1',[0.86588,0.53875]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.45794,1.36909]]); +pt1=Pointdata([1.45794,1.36909]); +bw1=Bowdata([0,0],[1.45794,1.36909],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/p004.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.87,0.54],"c","$2$"); + Drwline(bw1); + Letter([1.6,1.51],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p004.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p004.tex new file mode 100644 index 00000000..74156d65 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p004.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p004.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 574 -539}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 577 -542}\special{pa 571 -542}\special{pa 571 -536}\special{pa 577 -536}% +\special{pa 577 -542}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.8700,0.5400){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 6 -2}\special{pa 13 -5}\special{pa 19 -7}\special{pa 26 -10}% +\special{pa 32 -13}\special{pa 38 -15}\special{pa 45 -18}\special{pa 51 -21}\special{pa 57 -24}% +\special{pa 64 -26}\special{pa 70 -29}\special{pa 76 -32}\special{pa 83 -35}\special{pa 89 -38}% +\special{pa 95 -41}\special{pa 101 -44}\special{pa 107 -47}\special{pa 113 -51}\special{pa 119 -54}% +\special{pa 126 -57}\special{pa 132 -60}\special{pa 138 -64}\special{pa 144 -67}\special{pa 150 -70}% +\special{pa 156 -74}\special{pa 162 -77}\special{pa 168 -81}\special{pa 173 -85}\special{pa 179 -88}% +\special{pa 185 -92}\special{pa 191 -96}\special{pa 197 -99}\special{pa 203 -103}% +\special{pa 208 -107}\special{pa 214 -111}\special{pa 220 -115}\special{pa 225 -118}% +\special{pa 231 -122}\special{pa 237 -126}\special{pa 242 -130}\special{pa 248 -135}% +\special{pa 253 -139}\special{pa 259 -143}\special{pa 264 -147}\special{pa 270 -151}% +\special{pa 275 -156}\special{pa 281 -160}\special{pa 286 -164}\special{pa 291 -169}% +\special{pa 297 -173}% +\special{fp}% +\special{pa 383 -254}\special{pa 387 -259}\special{pa 392 -264}\special{pa 397 -269}% +\special{pa 401 -274}\special{pa 406 -279}\special{pa 411 -284}\special{pa 415 -290}% +\special{pa 420 -295}\special{pa 424 -300}\special{pa 429 -305}\special{pa 433 -311}% +\special{pa 437 -316}\special{pa 442 -321}\special{pa 446 -327}\special{pa 450 -332}% +\special{pa 454 -338}\special{pa 458 -343}\special{pa 463 -349}\special{pa 467 -354}% +\special{pa 471 -360}\special{pa 475 -366}\special{pa 479 -371}\special{pa 483 -377}% +\special{pa 487 -383}\special{pa 490 -388}\special{pa 494 -394}\special{pa 498 -400}% +\special{pa 502 -406}\special{pa 505 -411}\special{pa 509 -417}\special{pa 513 -423}% +\special{pa 516 -429}\special{pa 520 -435}\special{pa 523 -441}\special{pa 527 -447}% +\special{pa 530 -453}\special{pa 534 -459}\special{pa 537 -465}\special{pa 540 -471}% +\special{pa 544 -477}\special{pa 547 -483}\special{pa 550 -489}\special{pa 553 -495}% +\special{pa 556 -502}\special{pa 559 -508}\special{pa 562 -514}\special{pa 565 -520}% +\special{pa 568 -526}\special{pa 571 -533}\special{pa 574 -539}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.6000,1.5100){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p005.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p005.sce new file mode 100644 index 00000000..b131fbbe --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p005.sce @@ -0,0 +1,56 @@ +//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/p005.tex'; +Fnamesci='pointoncircle/p005.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.70469,0.73716]'); Assignrep('mdbw1',[0.70469,0.73716]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.07165,1.68866]]); +pt1=Pointdata([1.07165,1.68866]); +bw1=Bowdata([0,0],[1.07165,1.68866],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/p005.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.7,0.74],"c","$2$"); + Drwline(bw1); + Letter([1.18,1.86],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p005.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p005.tex new file mode 100644 index 00000000..336daec2 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p005.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p005.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 422 -665}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 425 -668}\special{pa 419 -668}\special{pa 419 -662}\special{pa 425 -662}% +\special{pa 425 -668}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.7000,0.7400){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 6 -4}\special{pa 11 -8}\special{pa 17 -12}\special{pa 22 -16}% +\special{pa 28 -20}\special{pa 33 -24}\special{pa 39 -29}\special{pa 44 -33}\special{pa 50 -37}% +\special{pa 55 -41}\special{pa 61 -46}\special{pa 66 -50}\special{pa 71 -55}\special{pa 76 -59}% +\special{pa 82 -64}\special{pa 87 -68}\special{pa 92 -73}\special{pa 97 -77}\special{pa 102 -82}% +\special{pa 107 -87}\special{pa 112 -91}\special{pa 118 -96}\special{pa 122 -101}% +\special{pa 127 -105}\special{pa 132 -110}\special{pa 137 -115}\special{pa 142 -120}% +\special{pa 147 -125}\special{pa 152 -130}\special{pa 157 -135}\special{pa 161 -140}% +\special{pa 166 -145}\special{pa 171 -150}\special{pa 175 -155}\special{pa 180 -160}% +\special{pa 184 -166}\special{pa 189 -171}\special{pa 193 -176}\special{pa 198 -181}% +\special{pa 202 -187}\special{pa 207 -192}\special{pa 211 -197}\special{pa 215 -203}% +\special{pa 220 -208}\special{pa 224 -214}\special{pa 228 -219}\special{pa 232 -225}% +\special{pa 236 -230}\special{pa 240 -236}\special{pa 244 -241}% +\special{fp}% +\special{pa 308 -341}\special{pa 311 -347}\special{pa 314 -353}\special{pa 318 -359}% +\special{pa 321 -365}\special{pa 324 -371}\special{pa 327 -378}\special{pa 330 -384}% +\special{pa 333 -390}\special{pa 336 -396}\special{pa 339 -402}\special{pa 342 -409}% +\special{pa 345 -415}\special{pa 348 -421}\special{pa 351 -427}\special{pa 353 -434}% +\special{pa 356 -440}\special{pa 359 -447}\special{pa 361 -453}\special{pa 364 -459}% +\special{pa 366 -466}\special{pa 369 -472}\special{pa 371 -479}\special{pa 374 -485}% +\special{pa 376 -492}\special{pa 378 -498}\special{pa 381 -505}\special{pa 383 -511}% +\special{pa 385 -518}\special{pa 387 -524}\special{pa 389 -531}\special{pa 391 -537}% +\special{pa 393 -544}\special{pa 395 -551}\special{pa 397 -557}\special{pa 399 -564}% +\special{pa 401 -571}\special{pa 403 -577}\special{pa 405 -584}\special{pa 406 -591}% +\special{pa 408 -597}\special{pa 410 -604}\special{pa 411 -611}\special{pa 413 -617}% +\special{pa 414 -624}\special{pa 415 -631}\special{pa 417 -638}\special{pa 418 -644}% +\special{pa 419 -651}\special{pa 421 -658}\special{pa 422 -665}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.1800,1.8600){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p006.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p006.sce new file mode 100644 index 00000000..d6bd547a --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p006.sce @@ -0,0 +1,56 @@ +//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/p006.tex'; +Fnamesci='pointoncircle/p006.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.49923,0.88925]'); Assignrep('mdbw1',[0.49923,0.88925]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[0.61803,1.90211]]); +pt1=Pointdata([0.61803,1.90211]); +bw1=Bowdata([0,0],[0.61803,1.90211],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/p006.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.5,0.89],"c","$2$"); + Drwline(bw1); + Letter([0.68,2.09],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p006.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p006.tex new file mode 100644 index 00000000..1bfb62cf --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p006.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p006.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 243 -749}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 246 -752}\special{pa 241 -752}\special{pa 241 -746}\special{pa 246 -746}% +\special{pa 246 -752}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.5000,0.8900){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 4 -5}\special{pa 9 -11}\special{pa 13 -16}\special{pa 18 -21}% +\special{pa 22 -27}\special{pa 26 -32}\special{pa 31 -37}\special{pa 35 -43}\special{pa 39 -48}% +\special{pa 43 -54}\special{pa 47 -59}\special{pa 51 -65}\special{pa 55 -71}\special{pa 59 -76}% +\special{pa 63 -82}\special{pa 67 -88}\special{pa 71 -93}\special{pa 75 -99}\special{pa 79 -105}% +\special{pa 83 -110}\special{pa 86 -116}\special{pa 90 -122}\special{pa 94 -128}\special{pa 97 -134}% +\special{pa 101 -140}\special{pa 104 -146}\special{pa 108 -152}\special{pa 111 -158}% +\special{pa 115 -164}\special{pa 118 -170}\special{pa 121 -176}\special{pa 125 -182}% +\special{pa 128 -188}\special{pa 131 -194}\special{pa 134 -200}\special{pa 137 -206}% +\special{pa 140 -212}\special{pa 144 -219}\special{pa 147 -225}\special{pa 149 -231}% +\special{pa 152 -237}\special{pa 155 -244}\special{pa 158 -250}\special{pa 161 -256}% +\special{pa 164 -263}\special{pa 166 -269}\special{pa 169 -275}\special{pa 172 -282}% +\special{pa 174 -288}\special{pa 177 -294}% +\special{fp}% +\special{pa 213 -407}\special{pa 215 -413}\special{pa 217 -420}\special{pa 218 -427}% +\special{pa 220 -434}\special{pa 221 -440}\special{pa 223 -447}\special{pa 224 -454}% +\special{pa 226 -461}\special{pa 227 -467}\special{pa 228 -474}\special{pa 230 -481}% +\special{pa 231 -488}\special{pa 232 -494}\special{pa 233 -501}\special{pa 234 -508}% +\special{pa 235 -515}\special{pa 236 -522}\special{pa 237 -529}\special{pa 238 -535}% +\special{pa 239 -542}\special{pa 240 -549}\special{pa 241 -556}\special{pa 241 -563}% +\special{pa 242 -570}\special{pa 243 -577}\special{pa 243 -583}\special{pa 244 -590}% +\special{pa 244 -597}\special{pa 245 -604}\special{pa 245 -611}\special{pa 245 -618}% +\special{pa 246 -625}\special{pa 246 -632}\special{pa 246 -639}\special{pa 246 -645}% +\special{pa 247 -652}\special{pa 247 -659}\special{pa 247 -666}\special{pa 247 -673}% +\special{pa 247 -680}\special{pa 246 -687}\special{pa 246 -694}\special{pa 246 -701}% +\special{pa 246 -708}\special{pa 246 -714}\special{pa 245 -721}\special{pa 245 -728}% +\special{pa 244 -735}\special{pa 244 -742}\special{pa 243 -749}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.6800,2.0900){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p007.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p007.sce new file mode 100644 index 00000000..e489aaf1 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p007.sce @@ -0,0 +1,56 @@ +//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/p007.tex'; +Fnamesci='pointoncircle/p007.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.2624,0.98547]'); Assignrep('mdbw1',[0.2624,0.98547]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[0.12558,1.99605]]); +pt1=Pointdata([0.12558,1.99605]); +bw1=Bowdata([0,0],[0.12558,1.99605],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/p007.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.26,0.99],"c","$2$"); + Drwline(bw1); + Letter([0.14,2.2],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p007.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p007.tex new file mode 100644 index 00000000..74f5a1a9 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p007.tex @@ -0,0 +1,89 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p007.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 49 -786}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 52 -789}\special{pa 47 -789}\special{pa 47 -783}\special{pa 52 -783}\special{pa 52 -789}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.2600,0.9900){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 3 -6}\special{pa 6 -12}\special{pa 9 -19}\special{pa 12 -25}% +\special{pa 15 -31}\special{pa 18 -38}\special{pa 20 -44}\special{pa 23 -50}\special{pa 26 -57}% +\special{pa 28 -63}\special{pa 31 -69}\special{pa 34 -76}\special{pa 36 -82}\special{pa 39 -89}% +\special{pa 41 -95}\special{pa 43 -101}\special{pa 46 -108}\special{pa 48 -114}\special{pa 50 -121}% +\special{pa 52 -128}\special{pa 55 -134}\special{pa 57 -141}\special{pa 59 -147}\special{pa 61 -154}% +\special{pa 63 -160}\special{pa 65 -167}\special{pa 67 -174}\special{pa 69 -180}\special{pa 70 -187}% +\special{pa 72 -194}\special{pa 74 -200}\special{pa 76 -207}\special{pa 77 -214}\special{pa 79 -220}% +\special{pa 80 -227}\special{pa 82 -234}\special{pa 83 -241}\special{pa 85 -247}\special{pa 86 -254}% +\special{pa 87 -261}\special{pa 89 -268}\special{pa 90 -275}\special{pa 91 -281}\special{pa 92 -288}% +\special{pa 93 -295}\special{pa 94 -302}\special{pa 95 -309}\special{pa 96 -315}\special{pa 97 -322}% +\special{pa 98 -329}% +\special{fp}% +\special{pa 105 -447}\special{pa 105 -454}\special{pa 105 -461}\special{pa 105 -468}% +\special{pa 105 -475}\special{pa 105 -481}\special{pa 105 -488}\special{pa 104 -495}% +\special{pa 104 -502}\special{pa 104 -509}\special{pa 103 -516}\special{pa 103 -523}% +\special{pa 102 -530}\special{pa 102 -537}\special{pa 101 -543}\special{pa 101 -550}% +\special{pa 100 -557}\special{pa 99 -564}\special{pa 98 -571}\special{pa 98 -578}% +\special{pa 97 -585}\special{pa 96 -591}\special{pa 95 -598}\special{pa 94 -605}\special{pa 93 -612}% +\special{pa 92 -619}\special{pa 91 -626}\special{pa 89 -632}\special{pa 88 -639}\special{pa 87 -646}% +\special{pa 86 -653}\special{pa 84 -659}\special{pa 83 -666}\special{pa 81 -673}\special{pa 80 -680}% +\special{pa 78 -686}\special{pa 77 -693}\special{pa 75 -700}\special{pa 73 -707}\special{pa 71 -713}% +\special{pa 70 -720}\special{pa 68 -727}\special{pa 66 -733}\special{pa 64 -740}\special{pa 62 -746}% +\special{pa 60 -753}\special{pa 58 -760}\special{pa 56 -766}\special{pa 54 -773}\special{pa 52 -779}% +\special{pa 49 -786}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.1400,2.2000){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p008.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p008.sce new file mode 100644 index 00000000..c11d1d5c --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p008.sce @@ -0,0 +1,56 @@ +//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/p008.tex'; +Fnamesci='pointoncircle/p008.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.00908,1.01976]'); Assignrep('mdbw1',[0.00908,1.01976]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-0.37476,1.96457]]); +pt1=Pointdata([-0.37476,1.96457]); +bw1=Bowdata([0,0],[-0.37476,1.96457],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/p008.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.01,1.02],"c","$2$"); + Drwline(bw1); + Letter([-0.41,2.16],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p008.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p008.tex new file mode 100644 index 00000000..8038ab13 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p008.tex @@ -0,0 +1,90 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p008.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -148 -773}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -145 -776}\special{pa -150 -776}\special{pa -150 -771}\special{pa -145 -771}% +\special{pa -145 -776}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.0100,1.0200){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 1 -7}\special{pa 3 -14}\special{pa 4 -20}\special{pa 5 -27}% +\special{pa 6 -34}\special{pa 8 -41}\special{pa 9 -48}\special{pa 10 -54}\special{pa 11 -61}% +\special{pa 12 -68}\special{pa 13 -75}\special{pa 14 -82}\special{pa 15 -89}\special{pa 15 -95}% +\special{pa 16 -102}\special{pa 17 -109}\special{pa 17 -116}\special{pa 18 -123}\special{pa 19 -130}% +\special{pa 19 -137}\special{pa 20 -143}\special{pa 20 -150}\special{pa 20 -157}\special{pa 21 -164}% +\special{pa 21 -171}\special{pa 21 -178}\special{pa 21 -185}\special{pa 22 -192}\special{pa 22 -199}% +\special{pa 22 -206}\special{pa 22 -212}\special{pa 22 -219}\special{pa 22 -226}\special{pa 21 -233}% +\special{pa 21 -240}\special{pa 21 -247}\special{pa 21 -254}\special{pa 20 -261}\special{pa 20 -268}% +\special{pa 20 -275}\special{pa 19 -281}\special{pa 19 -288}\special{pa 18 -295}\special{pa 18 -302}% +\special{pa 17 -309}\special{pa 16 -316}\special{pa 15 -323}\special{pa 15 -329}\special{pa 14 -336}% +\special{pa 13 -343}% +\special{fp}% +\special{pa -9 -459}\special{pa -11 -466}\special{pa -13 -473}\special{pa -14 -479}% +\special{pa -16 -486}\special{pa -18 -492}\special{pa -20 -499}\special{pa -22 -506}% +\special{pa -24 -512}\special{pa -26 -519}\special{pa -28 -525}\special{pa -30 -532}% +\special{pa -33 -539}\special{pa -35 -545}\special{pa -37 -552}\special{pa -39 -558}% +\special{pa -42 -565}\special{pa -44 -571}\special{pa -47 -577}\special{pa -49 -584}% +\special{pa -52 -590}\special{pa -54 -597}\special{pa -57 -603}\special{pa -60 -609}% +\special{pa -62 -616}\special{pa -65 -622}\special{pa -68 -628}\special{pa -71 -635}% +\special{pa -74 -641}\special{pa -77 -647}\special{pa -80 -653}\special{pa -83 -660}% +\special{pa -86 -666}\special{pa -89 -672}\special{pa -92 -678}\special{pa -95 -684}% +\special{pa -98 -690}\special{pa -101 -697}\special{pa -105 -703}\special{pa -108 -709}% +\special{pa -112 -715}\special{pa -115 -721}\special{pa -118 -727}\special{pa -122 -733}% +\special{pa -125 -738}\special{pa -129 -744}\special{pa -133 -750}\special{pa -136 -756}% +\special{pa -140 -762}\special{pa -144 -768}\special{pa -148 -773}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.4100,2.1600){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p009.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p009.sce new file mode 100644 index 00000000..fa9396ef --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p009.sce @@ -0,0 +1,56 @@ +//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/p009.tex'; +Fnamesci='pointoncircle/p009.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.24481,0.98998]'); Assignrep('mdbw1',[-0.24481,0.98998]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-0.85156,1.80965]]); +pt1=Pointdata([-0.85156,1.80965]); +bw1=Bowdata([0,0],[-0.85156,1.80965],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/p009.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.24,0.99],"c","$2$"); + Drwline(bw1); + Letter([-0.94,1.99],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p009.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p009.tex new file mode 100644 index 00000000..c98778a4 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p009.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p009.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -335 -712}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -332 -715}\special{pa -338 -715}\special{pa -338 -710}\special{pa -332 -710}% +\special{pa -332 -715}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.2400,0.9900){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 0 -7}\special{pa -1 -14}\special{pa -1 -21}\special{pa -2 -28}% +\special{pa -2 -34}\special{pa -3 -41}\special{pa -3 -48}\special{pa -4 -55}\special{pa -5 -62}% +\special{pa -5 -69}\special{pa -6 -76}\special{pa -7 -82}\special{pa -8 -89}\special{pa -9 -96}% +\special{pa -10 -103}\special{pa -11 -110}\special{pa -12 -117}\special{pa -13 -123}% +\special{pa -14 -130}\special{pa -15 -137}\special{pa -17 -144}\special{pa -18 -151}% +\special{pa -19 -157}\special{pa -21 -164}\special{pa -22 -171}\special{pa -24 -178}% +\special{pa -25 -184}\special{pa -27 -191}\special{pa -28 -198}\special{pa -30 -204}% +\special{pa -32 -211}\special{pa -34 -218}\special{pa -35 -225}\special{pa -37 -231}% +\special{pa -39 -238}\special{pa -41 -244}\special{pa -43 -251}\special{pa -45 -258}% +\special{pa -47 -264}\special{pa -49 -271}\special{pa -51 -277}\special{pa -54 -284}% +\special{pa -56 -290}\special{pa -58 -297}\special{pa -60 -303}\special{pa -63 -310}% +\special{pa -65 -316}\special{pa -68 -323}\special{pa -70 -329}\special{pa -73 -336}% +\special{fp}% +\special{pa -123 -442}\special{pa -126 -448}\special{pa -130 -455}\special{pa -133 -461}% +\special{pa -137 -467}\special{pa -140 -472}\special{pa -144 -478}\special{pa -147 -484}% +\special{pa -151 -490}\special{pa -154 -496}\special{pa -158 -502}\special{pa -162 -508}% +\special{pa -165 -514}\special{pa -169 -519}\special{pa -173 -525}\special{pa -177 -531}% +\special{pa -181 -536}\special{pa -185 -542}\special{pa -189 -548}\special{pa -193 -553}% +\special{pa -197 -559}\special{pa -201 -564}\special{pa -205 -570}\special{pa -209 -576}% +\special{pa -214 -581}\special{pa -218 -586}\special{pa -222 -592}\special{pa -226 -597}% +\special{pa -231 -603}\special{pa -235 -608}\special{pa -240 -613}\special{pa -244 -618}% +\special{pa -248 -624}\special{pa -253 -629}\special{pa -258 -634}\special{pa -262 -639}% +\special{pa -267 -644}\special{pa -272 -649}\special{pa -276 -654}\special{pa -281 -659}% +\special{pa -286 -664}\special{pa -291 -669}\special{pa -295 -674}\special{pa -300 -679}% +\special{pa -305 -684}\special{pa -310 -689}\special{pa -315 -694}\special{pa -320 -698}% +\special{pa -325 -703}\special{pa -330 -708}\special{pa -335 -712}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.9400,1.9900){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p010.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p010.sce new file mode 100644 index 00000000..94eff4f8 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p010.sce @@ -0,0 +1,56 @@ +//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/p010.tex'; +Fnamesci='pointoncircle/p010.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.48332,0.898]'); Assignrep('mdbw1',[-0.48332,0.898]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.27485,1.54103]]); +pt1=Pointdata([-1.27485,1.54103]); +bw1=Bowdata([0,0],[-1.27485,1.54103],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/p010.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.48,0.9],"c","$2$"); + Drwline(bw1); + Letter([-1.4,1.7],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p010.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p010.tex new file mode 100644 index 00000000..447d7d5e --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p010.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p010.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -502 -607}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -499 -609}\special{pa -505 -609}\special{pa -505 -604}\special{pa -499 -604}% +\special{pa -499 -609}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.4800,0.9000){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -2 -7}\special{pa -4 -13}\special{pa -6 -20}\special{pa -8 -26}% +\special{pa -11 -33}\special{pa -13 -39}\special{pa -15 -46}\special{pa -18 -52}\special{pa -20 -59}% +\special{pa -22 -65}\special{pa -25 -72}\special{pa -27 -78}\special{pa -30 -85}\special{pa -33 -91}% +\special{pa -35 -97}\special{pa -38 -104}\special{pa -41 -110}\special{pa -43 -116}% +\special{pa -46 -123}\special{pa -49 -129}\special{pa -52 -135}\special{pa -55 -141}% +\special{pa -58 -148}\special{pa -61 -154}\special{pa -64 -160}\special{pa -67 -166}% +\special{pa -70 -172}\special{pa -73 -178}\special{pa -77 -184}\special{pa -80 -191}% +\special{pa -83 -197}\special{pa -87 -203}\special{pa -90 -209}\special{pa -94 -215}% +\special{pa -97 -221}\special{pa -101 -227}\special{pa -104 -232}\special{pa -108 -238}% +\special{pa -111 -244}\special{pa -115 -250}\special{pa -119 -256}\special{pa -123 -262}% +\special{pa -126 -267}\special{pa -130 -273}\special{pa -134 -279}\special{pa -138 -285}% +\special{pa -142 -290}\special{pa -146 -296}\special{pa -150 -301}\special{pa -154 -307}% +\special{fp}% +\special{pa -229 -398}\special{pa -234 -403}\special{pa -239 -408}\special{pa -243 -413}% +\special{pa -248 -418}\special{pa -253 -423}\special{pa -258 -428}\special{pa -263 -433}% +\special{pa -268 -437}\special{pa -273 -442}\special{pa -278 -447}\special{pa -283 -452}% +\special{pa -288 -456}\special{pa -293 -461}\special{pa -298 -465}\special{pa -303 -470}% +\special{pa -309 -475}\special{pa -314 -479}\special{pa -319 -484}\special{pa -324 -488}% +\special{pa -330 -492}\special{pa -335 -497}\special{pa -340 -501}\special{pa -346 -505}% +\special{pa -351 -510}\special{pa -357 -514}\special{pa -362 -518}\special{pa -368 -522}% +\special{pa -373 -526}\special{pa -379 -530}\special{pa -384 -534}\special{pa -390 -538}% +\special{pa -396 -542}\special{pa -401 -546}\special{pa -407 -550}\special{pa -413 -554}% +\special{pa -419 -558}\special{pa -424 -561}\special{pa -430 -565}\special{pa -436 -569}% +\special{pa -442 -573}\special{pa -448 -576}\special{pa -454 -580}\special{pa -460 -583}% +\special{pa -466 -587}\special{pa -472 -590}\special{pa -478 -594}\special{pa -484 -597}% +\special{pa -490 -600}\special{pa -496 -603}\special{pa -502 -607}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-1.4000,1.7000){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p011.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p011.sce new file mode 100644 index 00000000..e8ea5786 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p011.sce @@ -0,0 +1,56 @@ +//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/p011.tex'; +Fnamesci='pointoncircle/p011.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.69146,0.74959]'); Assignrep('mdbw1',[-0.69146,0.74959]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.61803,1.17557]]); +pt1=Pointdata([-1.61803,1.17557]); +bw1=Bowdata([0,0],[-1.61803,1.17557],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/p011.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.69,0.75],"c","$2$"); + Drwline(bw1); + Letter([-1.78,1.29],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p011.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p011.tex new file mode 100644 index 00000000..497fdfed --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p011.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p011.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -637 -463}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -634 -466}\special{pa -640 -466}\special{pa -640 -460}\special{pa -634 -460}% +\special{pa -634 -466}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.6900,0.7500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -4 -6}\special{pa -7 -12}\special{pa -11 -18}\special{pa -15 -23}% +\special{pa -18 -29}\special{pa -22 -35}\special{pa -26 -41}\special{pa -30 -46}\special{pa -34 -52}% +\special{pa -38 -58}\special{pa -42 -63}\special{pa -46 -69}\special{pa -50 -74}\special{pa -54 -80}% +\special{pa -58 -86}\special{pa -62 -91}\special{pa -67 -96}\special{pa -71 -102}% +\special{pa -75 -107}\special{pa -80 -113}\special{pa -84 -118}\special{pa -88 -123}% +\special{pa -93 -129}\special{pa -97 -134}\special{pa -102 -139}\special{pa -106 -144}% +\special{pa -111 -149}\special{pa -116 -155}\special{pa -120 -160}\special{pa -125 -165}% +\special{pa -130 -170}\special{pa -134 -175}\special{pa -139 -180}\special{pa -144 -185}% +\special{pa -149 -190}\special{pa -154 -194}\special{pa -159 -199}\special{pa -164 -204}% +\special{pa -169 -209}\special{pa -174 -214}\special{pa -179 -218}\special{pa -184 -223}% +\special{pa -189 -228}\special{pa -194 -232}\special{pa -199 -237}\special{pa -204 -241}% +\special{pa -210 -246}\special{pa -215 -250}\special{pa -220 -255}\special{pa -225 -259}% +\special{fp}% +\special{pa -321 -328}\special{pa -327 -332}\special{pa -333 -336}\special{pa -339 -339}% +\special{pa -344 -343}\special{pa -350 -347}\special{pa -356 -350}\special{pa -362 -354}% +\special{pa -368 -357}\special{pa -374 -360}\special{pa -380 -364}\special{pa -386 -367}% +\special{pa -392 -370}\special{pa -399 -374}\special{pa -405 -377}\special{pa -411 -380}% +\special{pa -417 -383}\special{pa -423 -386}\special{pa -429 -389}\special{pa -436 -392}% +\special{pa -442 -395}\special{pa -448 -398}\special{pa -454 -401}\special{pa -461 -403}% +\special{pa -467 -406}\special{pa -473 -409}\special{pa -480 -412}\special{pa -486 -414}% +\special{pa -492 -417}\special{pa -499 -419}\special{pa -505 -422}\special{pa -512 -424}% +\special{pa -518 -427}\special{pa -525 -429}\special{pa -531 -432}\special{pa -538 -434}% +\special{pa -544 -436}\special{pa -551 -438}\special{pa -557 -440}\special{pa -564 -443}% +\special{pa -570 -445}\special{pa -577 -447}\special{pa -584 -449}\special{pa -590 -451}% +\special{pa -597 -452}\special{pa -604 -454}\special{pa -610 -456}\special{pa -617 -458}% +\special{pa -624 -460}\special{pa -630 -461}\special{pa -637 -463}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-1.7800,1.2900){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p012.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p012.sce new file mode 100644 index 00000000..3f517e50 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p012.sce @@ -0,0 +1,56 @@ +//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/p012.tex'; +Fnamesci='pointoncircle/p012.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.85615,0.55408]'); Assignrep('mdbw1',[-0.85615,0.55408]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.85955,0.73625]]); +pt1=Pointdata([-1.85955,0.73625]); +bw1=Bowdata([0,0],[-1.85955,0.73625],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/p012.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.86,0.55],"c","$2$"); + Drwline(bw1); + Letter([-2.05,0.81],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p012.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p012.tex new file mode 100644 index 00000000..3cc1f81a --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p012.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p012.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -732 -290}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -729 -293}\special{pa -735 -293}\special{pa -735 -287}\special{pa -729 -287}% +\special{pa -729 -293}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.8600,0.5500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -5 -5}\special{pa -10 -10}\special{pa -15 -14}\special{pa -20 -19}% +\special{pa -25 -24}\special{pa -30 -28}\special{pa -35 -33}\special{pa -41 -37}\special{pa -46 -42}% +\special{pa -51 -46}\special{pa -56 -51}\special{pa -62 -55}\special{pa -67 -60}\special{pa -72 -64}% +\special{pa -78 -68}\special{pa -83 -73}\special{pa -89 -77}\special{pa -94 -81}\special{pa -100 -85}% +\special{pa -105 -89}\special{pa -111 -93}\special{pa -116 -97}\special{pa -122 -101}% +\special{pa -128 -105}\special{pa -133 -109}\special{pa -139 -113}\special{pa -145 -117}% +\special{pa -150 -121}\special{pa -156 -125}\special{pa -162 -128}\special{pa -168 -132}% +\special{pa -174 -136}\special{pa -179 -139}\special{pa -185 -143}\special{pa -191 -147}% +\special{pa -197 -150}\special{pa -203 -154}\special{pa -209 -157}\special{pa -215 -160}% +\special{pa -221 -164}\special{pa -227 -167}\special{pa -233 -170}\special{pa -239 -173}% +\special{pa -246 -177}\special{pa -252 -180}\special{pa -258 -183}\special{pa -264 -186}% +\special{pa -270 -189}\special{pa -277 -192}\special{pa -283 -195}% +\special{fp}% +\special{pa -393 -238}\special{pa -399 -240}\special{pa -406 -243}\special{pa -412 -245}% +\special{pa -419 -247}\special{pa -426 -249}\special{pa -432 -250}\special{pa -439 -252}% +\special{pa -445 -254}\special{pa -452 -256}\special{pa -459 -258}\special{pa -465 -259}% +\special{pa -472 -261}\special{pa -479 -263}\special{pa -486 -264}\special{pa -492 -266}% +\special{pa -499 -267}\special{pa -506 -269}\special{pa -513 -270}\special{pa -519 -271}% +\special{pa -526 -273}\special{pa -533 -274}\special{pa -540 -275}\special{pa -547 -276}% +\special{pa -553 -277}\special{pa -560 -278}\special{pa -567 -279}\special{pa -574 -280}% +\special{pa -581 -281}\special{pa -588 -282}\special{pa -594 -283}\special{pa -601 -284}% +\special{pa -608 -285}\special{pa -615 -285}\special{pa -622 -286}\special{pa -629 -286}% +\special{pa -636 -287}\special{pa -642 -288}\special{pa -649 -288}\special{pa -656 -288}% +\special{pa -663 -289}\special{pa -670 -289}\special{pa -677 -289}\special{pa -684 -290}% +\special{pa -691 -290}\special{pa -698 -290}\special{pa -705 -290}\special{pa -711 -290}% +\special{pa -718 -290}\special{pa -725 -290}\special{pa -732 -290}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-2.0500,0.8100){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p013.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p013.sce new file mode 100644 index 00000000..d7d7779d --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p013.sce @@ -0,0 +1,56 @@ +//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/p013.tex'; +Fnamesci='pointoncircle/p013.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.96705,0.32376]'); Assignrep('mdbw1',[-0.96705,0.32376]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.98423,0.25067]]); +pt1=Pointdata([-1.98423,0.25067]); +bw1=Bowdata([0,0],[-1.98423,0.25067],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/p013.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.97,0.32],"c","$2$"); + Drwline(bw1); + Letter([-2.18,0.28],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p013.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p013.tex new file mode 100644 index 00000000..a43d07b6 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p013.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p013.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -781 -99}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -778 -101}\special{pa -784 -101}\special{pa -784 -96}\special{pa -778 -96}% +\special{pa -778 -101}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.9700,0.3200){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -6 -3}\special{pa -12 -7}\special{pa -18 -10}\special{pa -24 -13}% +\special{pa -30 -17}\special{pa -36 -20}\special{pa -42 -23}\special{pa -49 -26}\special{pa -55 -29}% +\special{pa -61 -32}\special{pa -67 -35}\special{pa -73 -38}\special{pa -80 -41}\special{pa -86 -44}% +\special{pa -92 -47}\special{pa -99 -50}\special{pa -105 -52}\special{pa -111 -55}% +\special{pa -118 -58}\special{pa -124 -60}\special{pa -130 -63}\special{pa -137 -65}% +\special{pa -143 -68}\special{pa -150 -70}\special{pa -156 -73}\special{pa -163 -75}% +\special{pa -169 -77}\special{pa -176 -80}\special{pa -182 -82}\special{pa -189 -84}% +\special{pa -195 -86}\special{pa -202 -88}\special{pa -209 -90}\special{pa -215 -92}% +\special{pa -222 -94}\special{pa -228 -96}\special{pa -235 -98}\special{pa -242 -100}% +\special{pa -248 -102}\special{pa -255 -104}\special{pa -262 -105}\special{pa -268 -107}% +\special{pa -275 -108}\special{pa -282 -110}\special{pa -289 -112}\special{pa -295 -113}% +\special{pa -302 -114}\special{pa -309 -116}\special{pa -316 -117}\special{pa -322 -118}% +\special{fp}% +\special{pa -439 -133}\special{pa -446 -134}\special{pa -453 -134}\special{pa -460 -134}% +\special{pa -467 -135}\special{pa -474 -135}\special{pa -481 -135}\special{pa -488 -135}% +\special{pa -495 -135}\special{pa -502 -136}\special{pa -508 -136}\special{pa -515 -136}% +\special{pa -522 -135}\special{pa -529 -135}\special{pa -536 -135}\special{pa -543 -135}% +\special{pa -550 -135}\special{pa -557 -134}\special{pa -564 -134}\special{pa -571 -134}% +\special{pa -577 -133}\special{pa -584 -133}\special{pa -591 -132}\special{pa -598 -132}% +\special{pa -605 -131}\special{pa -612 -130}\special{pa -619 -130}\special{pa -626 -129}% +\special{pa -632 -128}\special{pa -639 -127}\special{pa -646 -126}\special{pa -653 -125}% +\special{pa -660 -124}\special{pa -667 -123}\special{pa -673 -122}\special{pa -680 -121}% +\special{pa -687 -120}\special{pa -694 -119}\special{pa -701 -117}\special{pa -707 -116}% +\special{pa -714 -115}\special{pa -721 -113}\special{pa -728 -112}\special{pa -734 -110}% +\special{pa -741 -109}\special{pa -748 -107}\special{pa -754 -106}\special{pa -761 -104}% +\special{pa -768 -102}\special{pa -775 -101}\special{pa -781 -99}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-2.1800,0.2800){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p014.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p014.sce new file mode 100644 index 00000000..43771b65 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p014.sce @@ -0,0 +1,56 @@ +//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/p014.tex'; +Fnamesci='pointoncircle/p014.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('[-1.01718,0.07309]'); Assignrep('mdbw1',[-1.01718,0.07309]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.98423,-0.25067]]); +pt1=Pointdata([-1.98423,-0.25067]); +bw1=Bowdata([0,0],[-1.98423,-0.25067],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/p014.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([-1.02,0.07],"c","$2$"); + Drwline(bw1); + Letter([-2.18,-0.28],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p014.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p014.tex new file mode 100644 index 00000000..0015f410 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p014.tex @@ -0,0 +1,89 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p014.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -781 99}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -778 96}\special{pa -784 96}\special{pa -784 101}\special{pa -778 101}% +\special{pa -778 96}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-1.0200,0.0700){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -7 -2}\special{pa -13 -4}\special{pa -20 -5}\special{pa -27 -7}% +\special{pa -33 -9}\special{pa -40 -10}\special{pa -47 -12}\special{pa -54 -13}\special{pa -60 -15}% +\special{pa -67 -16}\special{pa -74 -17}\special{pa -81 -19}\special{pa -87 -20}\special{pa -94 -21}% +\special{pa -101 -22}\special{pa -108 -24}\special{pa -115 -25}\special{pa -121 -26}% +\special{pa -128 -27}\special{pa -135 -28}\special{pa -142 -29}\special{pa -149 -29}% +\special{pa -156 -30}\special{pa -163 -31}\special{pa -169 -32}\special{pa -176 -32}% +\special{pa -183 -33}\special{pa -190 -34}\special{pa -197 -34}\special{pa -204 -35}% +\special{pa -211 -35}\special{pa -218 -35}\special{pa -224 -36}\special{pa -231 -36}% +\special{pa -238 -36}\special{pa -245 -36}\special{pa -252 -37}\special{pa -259 -37}% +\special{pa -266 -37}\special{pa -273 -37}\special{pa -280 -37}\special{pa -287 -37}% +\special{pa -293 -37}\special{pa -300 -36}\special{pa -307 -36}\special{pa -314 -36}% +\special{pa -321 -36}\special{pa -328 -35}\special{pa -335 -35}\special{pa -342 -34}% +\special{fp}% +\special{pa -459 -20}\special{pa -466 -18}\special{pa -472 -17}\special{pa -479 -16}% +\special{pa -486 -14}\special{pa -493 -13}\special{pa -499 -11}\special{pa -506 -10}% +\special{pa -513 -8}\special{pa -519 -7}\special{pa -526 -5}\special{pa -533 -3}\special{pa -540 -1}% +\special{pa -546 1}\special{pa -553 2}\special{pa -559 4}\special{pa -566 6}\special{pa -573 8}% +\special{pa -579 10}\special{pa -586 12}\special{pa -592 15}\special{pa -599 17}\special{pa -605 19}% +\special{pa -612 21}\special{pa -619 24}\special{pa -625 26}\special{pa -631 28}\special{pa -638 31}% +\special{pa -644 33}\special{pa -651 36}\special{pa -657 38}\special{pa -664 41}\special{pa -670 44}% +\special{pa -676 46}\special{pa -683 49}\special{pa -689 52}\special{pa -695 55}\special{pa -702 58}% +\special{pa -708 60}\special{pa -714 63}\special{pa -720 66}\special{pa -726 69}\special{pa -733 73}% +\special{pa -739 76}\special{pa -745 79}\special{pa -751 82}\special{pa -757 85}\special{pa -763 89}% +\special{pa -769 92}\special{pa -775 95}\special{pa -781 99}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-2.1800,-0.2800){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p015.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p015.sce new file mode 100644 index 00000000..e321cba7 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p015.sce @@ -0,0 +1,56 @@ +//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/p015.tex'; +Fnamesci='pointoncircle/p015.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('[-1.0034,-0.18217]'); Assignrep('mdbw1',[-1.0034,-0.18217]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.85955,-0.73625]]); +pt1=Pointdata([-1.85955,-0.73625]); +bw1=Bowdata([0,0],[-1.85955,-0.73625],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/p015.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([-1,-0.18],"c","$2$"); + Drwline(bw1); + Letter([-2.05,-0.81],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p015.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p015.tex new file mode 100644 index 00000000..23ae7668 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p015.tex @@ -0,0 +1,90 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p015.tex 2017-8-19 10:55 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -732 290}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -729 287}\special{pa -735 287}\special{pa -735 293}\special{pa -729 293}% +\special{pa -729 287}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-1.0000,-0.1800){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -7 0}\special{pa -14 0}\special{pa -21 0}\special{pa -28 0}% +\special{pa -35 0}\special{pa -41 0}\special{pa -48 0}\special{pa -55 1}\special{pa -62 1}% +\special{pa -69 1}\special{pa -76 1}\special{pa -83 2}\special{pa -90 2}\special{pa -97 3}% +\special{pa -103 3}\special{pa -110 4}\special{pa -117 5}\special{pa -124 5}\special{pa -131 6}% +\special{pa -138 7}\special{pa -145 8}\special{pa -151 9}\special{pa -158 9}\special{pa -165 10}% +\special{pa -172 11}\special{pa -179 13}\special{pa -186 14}\special{pa -192 15}\special{pa -199 16}% +\special{pa -206 17}\special{pa -213 18}\special{pa -220 20}\special{pa -226 21}\special{pa -233 23}% +\special{pa -240 24}\special{pa -247 26}\special{pa -253 27}\special{pa -260 29}\special{pa -267 30}% +\special{pa -273 32}\special{pa -280 34}\special{pa -287 36}\special{pa -293 37}\special{pa -300 39}% +\special{pa -307 41}\special{pa -313 43}\special{pa -320 45}\special{pa -326 47}\special{pa -333 49}% +\special{pa -340 52}% +\special{fp}% +\special{pa -449 95}\special{pa -456 98}\special{pa -462 101}\special{pa -468 104}% +\special{pa -474 107}\special{pa -480 110}\special{pa -486 113}\special{pa -493 116}% +\special{pa -499 120}\special{pa -505 123}\special{pa -511 126}\special{pa -517 130}% +\special{pa -523 133}\special{pa -529 136}\special{pa -535 140}\special{pa -541 143}% +\special{pa -547 147}\special{pa -553 150}\special{pa -559 154}\special{pa -564 158}% +\special{pa -570 161}\special{pa -576 165}\special{pa -582 169}\special{pa -588 173}% +\special{pa -593 177}\special{pa -599 181}\special{pa -605 184}\special{pa -610 188}% +\special{pa -616 192}\special{pa -621 196}\special{pa -627 201}\special{pa -633 205}% +\special{pa -638 209}\special{pa -644 213}\special{pa -649 217}\special{pa -654 222}% +\special{pa -660 226}\special{pa -665 230}\special{pa -670 235}\special{pa -676 239}% +\special{pa -681 243}\special{pa -686 248}\special{pa -692 252}\special{pa -697 257}% +\special{pa -702 262}\special{pa -707 266}\special{pa -712 271}\special{pa -717 276}% +\special{pa -722 280}\special{pa -727 285}\special{pa -732 290}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-2.0500,-0.8100){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p016.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p016.sce new file mode 100644 index 00000000..8a783682 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p016.sce @@ -0,0 +1,56 @@ +//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/p016.tex'; +Fnamesci='pointoncircle/p016.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.92657,-0.42598]'); Assignrep('mdbw1',[-0.92657,-0.42598]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.61803,-1.17557]]); +pt1=Pointdata([-1.61803,-1.17557]); +bw1=Bowdata([0,0],[-1.61803,-1.17557],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/p016.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.93,-0.43],"c","$2$"); + Drwline(bw1); + Letter([-1.78,-1.29],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p016.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p016.tex new file mode 100644 index 00000000..32430ddc --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p016.tex @@ -0,0 +1,90 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p016.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -637 463}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -634 460}\special{pa -640 460}\special{pa -640 466}\special{pa -634 466}% +\special{pa -634 460}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.9300,-0.4300){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -7 2}\special{pa -13 3}\special{pa -20 5}\special{pa -27 7}% +\special{pa -33 9}\special{pa -40 10}\special{pa -47 12}\special{pa -53 14}\special{pa -60 16}% +\special{pa -67 18}\special{pa -73 20}\special{pa -80 22}\special{pa -86 25}\special{pa -93 27}% +\special{pa -99 29}\special{pa -106 31}\special{pa -112 34}\special{pa -119 36}\special{pa -125 38}% +\special{pa -132 41}\special{pa -138 43}\special{pa -145 46}\special{pa -151 49}\special{pa -157 51}% +\special{pa -164 54}\special{pa -170 57}\special{pa -176 59}\special{pa -183 62}\special{pa -189 65}% +\special{pa -195 68}\special{pa -201 71}\special{pa -208 74}\special{pa -214 77}\special{pa -220 80}% +\special{pa -226 83}\special{pa -232 86}\special{pa -239 89}\special{pa -245 93}\special{pa -251 96}% +\special{pa -257 99}\special{pa -263 102}\special{pa -269 106}\special{pa -275 109}% +\special{pa -281 113}\special{pa -287 116}\special{pa -293 120}\special{pa -299 123}% +\special{pa -304 127}\special{pa -310 131}\special{pa -316 134}% +\special{fp}% +\special{pa -412 204}\special{pa -417 208}\special{pa -422 213}\special{pa -427 217}% +\special{pa -433 222}\special{pa -438 226}\special{pa -443 231}\special{pa -448 235}% +\special{pa -453 240}\special{pa -458 245}\special{pa -463 249}\special{pa -468 254}% +\special{pa -473 259}\special{pa -478 264}\special{pa -483 268}\special{pa -488 273}% +\special{pa -493 278}\special{pa -498 283}\special{pa -503 288}\special{pa -507 293}% +\special{pa -512 298}\special{pa -517 303}\special{pa -521 308}\special{pa -526 313}% +\special{pa -531 319}\special{pa -535 324}\special{pa -540 329}\special{pa -544 334}% +\special{pa -549 340}\special{pa -553 345}\special{pa -557 350}\special{pa -562 356}% +\special{pa -566 361}\special{pa -570 366}\special{pa -575 372}\special{pa -579 377}% +\special{pa -583 383}\special{pa -587 388}\special{pa -591 394}\special{pa -595 400}% +\special{pa -599 405}\special{pa -603 411}\special{pa -607 416}\special{pa -611 422}% +\special{pa -615 428}\special{pa -619 434}\special{pa -622 439}\special{pa -626 445}% +\special{pa -630 451}\special{pa -633 457}\special{pa -637 463}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-1.7800,-1.2900){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p017.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p017.sce new file mode 100644 index 00000000..a68d6565 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p017.sce @@ -0,0 +1,56 @@ +//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/p017.tex'; +Fnamesci='pointoncircle/p017.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.79153,-0.64303]'); Assignrep('mdbw1',[-0.79153,-0.64303]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-1.27485,-1.54103]]); +pt1=Pointdata([-1.27485,-1.54103]); +bw1=Bowdata([0,0],[-1.27485,-1.54103],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/p017.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.79,-0.64],"c","$2$"); + Drwline(bw1); + Letter([-1.4,-1.7],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p017.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p017.tex new file mode 100644 index 00000000..c53d6f4a --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p017.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p017.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -502 607}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -499 604}\special{pa -505 604}\special{pa -505 609}\special{pa -499 609}% +\special{pa -499 604}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.7900,-0.6400){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -6 3}\special{pa -12 7}\special{pa -18 10}\special{pa -24 13}% +\special{pa -30 17}\special{pa -36 20}\special{pa -42 24}\special{pa -48 27}\special{pa -54 31}% +\special{pa -60 34}\special{pa -66 38}\special{pa -72 42}\special{pa -77 45}\special{pa -83 49}% +\special{pa -89 53}\special{pa -95 57}\special{pa -100 61}\special{pa -106 64}\special{pa -112 68}% +\special{pa -117 72}\special{pa -123 76}\special{pa -129 80}\special{pa -134 85}\special{pa -140 89}% +\special{pa -145 93}\special{pa -151 97}\special{pa -156 101}\special{pa -161 106}% +\special{pa -167 110}\special{pa -172 114}\special{pa -178 119}\special{pa -183 123}% +\special{pa -188 128}\special{pa -193 132}\special{pa -199 137}\special{pa -204 141}% +\special{pa -209 146}\special{pa -214 150}\special{pa -219 155}\special{pa -224 160}% +\special{pa -229 165}\special{pa -234 169}\special{pa -239 174}\special{pa -244 179}% +\special{pa -249 184}\special{pa -254 189}\special{pa -258 194}\special{pa -263 199}% +\special{pa -268 204}\special{pa -273 209}% +\special{fp}% +\special{pa -348 300}\special{pa -352 305}\special{pa -356 311}\special{pa -360 317}% +\special{pa -364 322}\special{pa -368 328}\special{pa -372 334}\special{pa -376 339}% +\special{pa -379 345}\special{pa -383 351}\special{pa -387 357}\special{pa -391 363}% +\special{pa -394 368}\special{pa -398 374}\special{pa -401 380}\special{pa -405 386}% +\special{pa -408 392}\special{pa -412 398}\special{pa -415 404}\special{pa -419 410}% +\special{pa -422 416}\special{pa -425 422}\special{pa -428 428}\special{pa -432 434}% +\special{pa -435 441}\special{pa -438 447}\special{pa -441 453}\special{pa -444 459}% +\special{pa -447 465}\special{pa -450 472}\special{pa -453 478}\special{pa -456 484}% +\special{pa -459 490}\special{pa -461 497}\special{pa -464 503}\special{pa -467 509}% +\special{pa -469 516}\special{pa -472 522}\special{pa -475 529}\special{pa -477 535}% +\special{pa -480 541}\special{pa -482 548}\special{pa -484 554}\special{pa -487 561}% +\special{pa -489 567}\special{pa -491 574}\special{pa -493 580}\special{pa -496 587}% +\special{pa -498 594}\special{pa -500 600}\special{pa -502 607}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-1.4000,-1.7000){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p018.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p018.sce new file mode 100644 index 00000000..e176e434 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p018.sce @@ -0,0 +1,56 @@ +//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/p018.tex'; +Fnamesci='pointoncircle/p018.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.60674,-0.81967]'); Assignrep('mdbw1',[-0.60674,-0.81967]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-0.85156,-1.80965]]); +pt1=Pointdata([-0.85156,-1.80965]); +bw1=Bowdata([0,0],[-0.85156,-1.80965],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/p018.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.61,-0.82],"c","$2$"); + Drwline(bw1); + Letter([-0.94,-1.99],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p018.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p018.tex new file mode 100644 index 00000000..7fcf5a47 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p018.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p018.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -335 712}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -332 710}\special{pa -338 710}\special{pa -338 715}\special{pa -332 715}% +\special{pa -332 710}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.6100,-0.8200){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -5 5}\special{pa -10 9}\special{pa -15 14}\special{pa -20 19}% +\special{pa -25 24}\special{pa -30 28}\special{pa -35 33}\special{pa -40 38}\special{pa -45 43}% +\special{pa -50 48}\special{pa -54 53}\special{pa -59 58}\special{pa -64 63}\special{pa -68 68}% +\special{pa -73 73}\special{pa -78 78}\special{pa -82 84}\special{pa -87 89}\special{pa -91 94}% +\special{pa -96 99}\special{pa -100 105}\special{pa -105 110}\special{pa -109 115}% +\special{pa -113 121}\special{pa -118 126}\special{pa -122 131}\special{pa -126 137}% +\special{pa -130 142}\special{pa -134 148}\special{pa -138 154}\special{pa -142 159}% +\special{pa -146 165}\special{pa -150 170}\special{pa -154 176}\special{pa -158 182}% +\special{pa -162 187}\special{pa -166 193}\special{pa -170 199}\special{pa -174 205}% +\special{pa -177 211}\special{pa -181 216}\special{pa -185 222}\special{pa -188 228}% +\special{pa -192 234}\special{pa -195 240}\special{pa -199 246}\special{pa -202 252}% +\special{pa -206 258}\special{pa -209 264}\special{pa -212 270}% +\special{fp}% +\special{pa -262 377}\special{pa -265 383}\special{pa -268 390}\special{pa -270 396}% +\special{pa -272 403}\special{pa -275 409}\special{pa -277 416}\special{pa -279 422}% +\special{pa -282 429}\special{pa -284 435}\special{pa -286 442}\special{pa -288 448}% +\special{pa -290 455}\special{pa -292 461}\special{pa -294 468}\special{pa -296 475}% +\special{pa -298 481}\special{pa -300 488}\special{pa -302 495}\special{pa -303 501}% +\special{pa -305 508}\special{pa -307 515}\special{pa -308 521}\special{pa -310 528}% +\special{pa -312 535}\special{pa -313 542}\special{pa -314 548}\special{pa -316 555}% +\special{pa -317 562}\special{pa -319 569}\special{pa -320 575}\special{pa -321 582}% +\special{pa -322 589}\special{pa -323 596}\special{pa -324 603}\special{pa -325 609}% +\special{pa -326 616}\special{pa -327 623}\special{pa -328 630}\special{pa -329 637}% +\special{pa -330 644}\special{pa -331 651}\special{pa -331 657}\special{pa -332 664}% +\special{pa -333 671}\special{pa -333 678}\special{pa -334 685}\special{pa -334 692}% +\special{pa -335 699}\special{pa -335 706}\special{pa -335 712}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.9400,-1.9900){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p019.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p019.sce new file mode 100644 index 00000000..5b4af69a --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p019.sce @@ -0,0 +1,56 @@ +//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/p019.tex'; +Fnamesci='pointoncircle/p019.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.38384,-0.94481]'); Assignrep('mdbw1',[-0.38384,-0.94481]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[-0.37476,-1.96457]]); +pt1=Pointdata([-0.37476,-1.96457]); +bw1=Bowdata([0,0],[-0.37476,-1.96457],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/p019.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.38,-0.94],"c","$2$"); + Drwline(bw1); + Letter([-0.41,-2.16],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p019.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p019.tex new file mode 100644 index 00000000..e417ebd0 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p019.tex @@ -0,0 +1,91 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p019.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa -148 773}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa -145 771}\special{pa -150 771}\special{pa -150 776}\special{pa -145 776}% +\special{pa -145 771}\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.3800,-0.9400){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -4 6}\special{pa -8 12}\special{pa -11 17}\special{pa -15 23}% +\special{pa -19 29}\special{pa -22 35}\special{pa -26 41}\special{pa -29 47}\special{pa -33 53}% +\special{pa -36 59}\special{pa -39 65}\special{pa -43 71}\special{pa -46 77}\special{pa -49 83}% +\special{pa -53 89}\special{pa -56 95}\special{pa -59 101}\special{pa -62 108}\special{pa -65 114}% +\special{pa -68 120}\special{pa -71 126}\special{pa -74 132}\special{pa -77 139}\special{pa -80 145}% +\special{pa -82 151}\special{pa -85 158}\special{pa -88 164}\special{pa -91 170}\special{pa -93 177}% +\special{pa -96 183}\special{pa -98 190}\special{pa -101 196}\special{pa -103 202}% +\special{pa -106 209}\special{pa -108 215}\special{pa -110 222}\special{pa -113 228}% +\special{pa -115 235}\special{pa -117 241}\special{pa -119 248}\special{pa -121 255}% +\special{pa -123 261}\special{pa -126 268}\special{pa -127 274}\special{pa -129 281}% +\special{pa -131 288}\special{pa -133 294}\special{pa -135 301}\special{pa -137 308}% +\special{pa -138 314}% +\special{fp}% +\special{pa -161 430}\special{pa -161 437}\special{pa -162 444}\special{pa -163 451}% +\special{pa -164 458}\special{pa -164 465}\special{pa -165 471}\special{pa -166 478}% +\special{pa -166 485}\special{pa -167 492}\special{pa -167 499}\special{pa -168 506}% +\special{pa -168 513}\special{pa -168 520}\special{pa -169 527}\special{pa -169 533}% +\special{pa -169 540}\special{pa -169 547}\special{pa -169 554}\special{pa -169 561}% +\special{pa -169 568}\special{pa -169 575}\special{pa -169 582}\special{pa -169 589}% +\special{pa -169 596}\special{pa -169 602}\special{pa -168 609}\special{pa -168 616}% +\special{pa -168 623}\special{pa -167 630}\special{pa -167 637}\special{pa -166 644}% +\special{pa -166 651}\special{pa -165 657}\special{pa -164 664}\special{pa -164 671}% +\special{pa -163 678}\special{pa -162 685}\special{pa -161 692}\special{pa -160 699}% +\special{pa -159 705}\special{pa -158 712}\special{pa -157 719}\special{pa -156 726}% +\special{pa -155 733}\special{pa -154 740}\special{pa -153 746}\special{pa -152 753}% +\special{pa -150 760}\special{pa -149 767}\special{pa -148 773}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.4100,-2.1600){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p020.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p020.sce new file mode 100644 index 00000000..aa167646 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p020.sce @@ -0,0 +1,56 @@ +//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/p020.tex'; +Fnamesci='pointoncircle/p020.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.13681,-1.01058]'); Assignrep('mdbw1',[-0.13681,-1.01058]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[0.12558,-1.99605]]); +pt1=Pointdata([0.12558,-1.99605]); +bw1=Bowdata([0,0],[0.12558,-1.99605],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/p020.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.14,-1.01],"c","$2$"); + Drwline(bw1); + Letter([0.14,-2.2],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p020.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p020.tex new file mode 100644 index 00000000..1ba69921 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p020.tex @@ -0,0 +1,88 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p020.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 49 786}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 52 783}\special{pa 47 783}\special{pa 47 789}\special{pa 52 789}\special{pa 52 783}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(-0.1400,-1.0100){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -2 7}\special{pa -4 13}\special{pa -7 20}\special{pa -9 26}% +\special{pa -11 33}\special{pa -13 39}\special{pa -15 46}\special{pa -17 53}\special{pa -18 59}% +\special{pa -20 66}\special{pa -22 73}\special{pa -24 79}\special{pa -25 86}\special{pa -27 93}% +\special{pa -29 99}\special{pa -30 106}\special{pa -32 113}\special{pa -33 120}\special{pa -35 126}% +\special{pa -36 133}\special{pa -37 140}\special{pa -39 147}\special{pa -40 153}\special{pa -41 160}% +\special{pa -42 167}\special{pa -43 174}\special{pa -44 181}\special{pa -45 188}\special{pa -46 194}% +\special{pa -47 201}\special{pa -48 208}\special{pa -49 215}\special{pa -50 222}\special{pa -50 229}% +\special{pa -51 235}\special{pa -52 242}\special{pa -52 249}\special{pa -53 256}\special{pa -53 263}% +\special{pa -54 270}\special{pa -54 277}\special{pa -55 284}\special{pa -55 291}\special{pa -55 297}% +\special{pa -55 304}\special{pa -56 311}\special{pa -56 318}\special{pa -56 325}\special{pa -56 332}% +\special{pa -56 339}% +\special{fp}% +\special{pa -48 457}\special{pa -48 464}\special{pa -47 470}\special{pa -46 477}\special{pa -45 484}% +\special{pa -44 491}\special{pa -43 498}\special{pa -42 504}\special{pa -40 511}\special{pa -39 518}% +\special{pa -38 525}\special{pa -37 532}\special{pa -35 538}\special{pa -34 545}\special{pa -32 552}% +\special{pa -31 559}\special{pa -29 565}\special{pa -28 572}\special{pa -26 579}\special{pa -24 585}% +\special{pa -23 592}\special{pa -21 599}\special{pa -19 605}\special{pa -17 612}\special{pa -15 619}% +\special{pa -13 625}\special{pa -11 632}\special{pa -9 639}\special{pa -7 645}\special{pa -5 652}% +\special{pa -3 658}\special{pa -1 665}\special{pa 1 671}\special{pa 4 678}\special{pa 6 684}% +\special{pa 8 691}\special{pa 11 697}\special{pa 13 704}\special{pa 16 710}\special{pa 18 717}% +\special{pa 21 723}\special{pa 24 729}\special{pa 26 736}\special{pa 29 742}\special{pa 32 748}% +\special{pa 35 755}\special{pa 38 761}\special{pa 40 767}\special{pa 43 773}\special{pa 46 780}% +\special{pa 49 786}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.1400,-2.2000){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p021.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p021.sce new file mode 100644 index 00000000..0a58ae6e --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p021.sce @@ -0,0 +1,56 @@ +//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/p021.tex'; +Fnamesci='pointoncircle/p021.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.11881,-1.01286]'); Assignrep('mdbw1',[0.11881,-1.01286]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[0.61803,-1.90211]]); +pt1=Pointdata([0.61803,-1.90211]); +bw1=Bowdata([0,0],[0.61803,-1.90211],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/p021.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.12,-1.01],"c","$2$"); + Drwline(bw1); + Letter([0.68,-2.09],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p021.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p021.tex new file mode 100644 index 00000000..80554147 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p021.tex @@ -0,0 +1,88 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p021.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 243 749}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 246 746}\special{pa 241 746}\special{pa 241 752}\special{pa 246 752}\special{pa 246 746}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.1200,-1.0100){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa -1 7}\special{pa -1 14}\special{pa -1 21}\special{pa -2 28}% +\special{pa -2 34}\special{pa -2 41}\special{pa -3 48}\special{pa -3 55}\special{pa -3 62}% +\special{pa -3 69}\special{pa -3 76}\special{pa -3 83}\special{pa -3 90}\special{pa -3 97}% +\special{pa -3 103}\special{pa -3 110}\special{pa -3 117}\special{pa -2 124}\special{pa -2 131}% +\special{pa -2 138}\special{pa -1 145}\special{pa -1 152}\special{pa 0 159}\special{pa 0 165}% +\special{pa 1 172}\special{pa 1 179}\special{pa 2 186}\special{pa 3 193}\special{pa 3 200}% +\special{pa 4 207}\special{pa 5 213}\special{pa 6 220}\special{pa 7 227}\special{pa 8 234}% +\special{pa 9 241}\special{pa 10 248}\special{pa 11 254}\special{pa 12 261}\special{pa 14 268}% +\special{pa 15 275}\special{pa 16 282}\special{pa 18 288}\special{pa 19 295}\special{pa 20 302}% +\special{pa 22 309}\special{pa 24 315}\special{pa 25 322}\special{pa 27 329}\special{pa 28 335}% +\special{pa 30 342}% +\special{fp}% +\special{pa 67 454}\special{pa 69 461}\special{pa 72 467}\special{pa 74 474}\special{pa 77 480}% +\special{pa 80 486}\special{pa 82 493}\special{pa 85 499}\special{pa 88 505}\special{pa 91 512}% +\special{pa 94 518}\special{pa 97 524}\special{pa 100 530}\special{pa 103 536}\special{pa 106 543}% +\special{pa 109 549}\special{pa 112 555}\special{pa 115 561}\special{pa 119 567}\special{pa 122 573}% +\special{pa 125 579}\special{pa 129 585}\special{pa 132 591}\special{pa 136 597}\special{pa 139 603}% +\special{pa 143 609}\special{pa 146 615}\special{pa 150 621}\special{pa 153 627}\special{pa 157 633}% +\special{pa 161 638}\special{pa 165 644}\special{pa 168 650}\special{pa 172 656}\special{pa 176 661}% +\special{pa 180 667}\special{pa 184 673}\special{pa 188 678}\special{pa 192 684}\special{pa 196 689}% +\special{pa 200 695}\special{pa 204 701}\special{pa 209 706}\special{pa 213 711}\special{pa 217 717}% +\special{pa 221 722}\special{pa 226 728}\special{pa 230 733}\special{pa 234 738}\special{pa 239 744}% +\special{pa 243 749}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.6800,-2.0900){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p022.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p022.sce new file mode 100644 index 00000000..d0bd9703 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p022.sce @@ -0,0 +1,56 @@ +//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/p022.tex'; +Fnamesci='pointoncircle/p022.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.36696,-0.95149]'); Assignrep('mdbw1',[0.36696,-0.95149]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.07165,-1.68866]]); +pt1=Pointdata([1.07165,-1.68866]); +bw1=Bowdata([0,0],[1.07165,-1.68866],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/p022.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.37,-0.95],"c","$2$"); + Drwline(bw1); + Letter([1.18,-1.86],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p022.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p022.tex new file mode 100644 index 00000000..bd69e6b8 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p022.tex @@ -0,0 +1,88 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p022.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 422 665}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 425 662}\special{pa 419 662}\special{pa 419 668}\special{pa 425 668}\special{pa 425 662}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.3700,-0.9500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 1 7}\special{pa 2 14}\special{pa 4 20}\special{pa 5 27}% +\special{pa 6 34}\special{pa 8 41}\special{pa 9 47}\special{pa 11 54}\special{pa 12 61}% +\special{pa 14 68}\special{pa 16 74}\special{pa 17 81}\special{pa 19 88}\special{pa 21 94}% +\special{pa 23 101}\special{pa 25 108}\special{pa 27 114}\special{pa 28 121}\special{pa 30 127}% +\special{pa 33 134}\special{pa 35 141}\special{pa 37 147}\special{pa 39 154}\special{pa 41 160}% +\special{pa 43 167}\special{pa 46 173}\special{pa 48 180}\special{pa 51 186}\special{pa 53 193}% +\special{pa 55 199}\special{pa 58 206}\special{pa 61 212}\special{pa 63 218}\special{pa 66 225}% +\special{pa 69 231}\special{pa 71 237}\special{pa 74 244}\special{pa 77 250}\special{pa 80 256}% +\special{pa 83 262}\special{pa 86 269}\special{pa 89 275}\special{pa 92 281}\special{pa 95 287}% +\special{pa 98 293}\special{pa 101 300}\special{pa 104 306}\special{pa 108 312}\special{pa 111 318}% +\special{pa 114 324}% +\special{fp}% +\special{pa 178 424}\special{pa 182 429}\special{pa 186 435}\special{pa 190 440}\special{pa 194 446}% +\special{pa 198 451}\special{pa 202 457}\special{pa 207 462}\special{pa 211 467}\special{pa 215 473}% +\special{pa 220 478}\special{pa 224 483}\special{pa 229 489}\special{pa 233 494}\special{pa 238 499}% +\special{pa 242 504}\special{pa 247 510}\special{pa 251 515}\special{pa 256 520}\special{pa 261 525}% +\special{pa 265 530}\special{pa 270 535}\special{pa 275 540}\special{pa 280 545}\special{pa 285 550}% +\special{pa 290 554}\special{pa 294 559}\special{pa 299 564}\special{pa 304 569}\special{pa 309 574}% +\special{pa 314 578}\special{pa 320 583}\special{pa 325 588}\special{pa 330 592}\special{pa 335 597}% +\special{pa 340 601}\special{pa 345 606}\special{pa 351 610}\special{pa 356 615}\special{pa 361 619}% +\special{pa 367 623}\special{pa 372 628}\special{pa 378 632}\special{pa 383 636}\special{pa 388 640}% +\special{pa 394 645}\special{pa 400 649}\special{pa 405 653}\special{pa 411 657}\special{pa 416 661}% +\special{pa 422 665}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.1800,-1.8600){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p023.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p023.sce new file mode 100644 index 00000000..6084fa23 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p023.sce @@ -0,0 +1,56 @@ +//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/p023.tex'; +Fnamesci='pointoncircle/p023.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.59206,-0.83034]'); Assignrep('mdbw1',[0.59206,-0.83034]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.45794,-1.36909]]); +pt1=Pointdata([1.45794,-1.36909]); +bw1=Bowdata([0,0],[1.45794,-1.36909],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/p023.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.59,-0.83],"c","$2$"); + Drwline(bw1); + Letter([1.6,-1.51],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p023.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p023.tex new file mode 100644 index 00000000..8aa2ac69 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p023.tex @@ -0,0 +1,88 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p023.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 574 539}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 577 536}\special{pa 571 536}\special{pa 571 542}\special{pa 577 542}\special{pa 577 536}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.5900,-0.8300){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 3 6}\special{pa 6 13}\special{pa 9 19}\special{pa 12 25}% +\special{pa 15 31}\special{pa 18 37}\special{pa 21 44}\special{pa 24 50}\special{pa 27 56}% +\special{pa 30 62}\special{pa 34 68}\special{pa 37 74}\special{pa 40 80}\special{pa 44 86}% +\special{pa 47 92}\special{pa 51 98}\special{pa 54 104}\special{pa 58 110}\special{pa 61 116}% +\special{pa 65 122}\special{pa 69 128}\special{pa 72 133}\special{pa 76 139}\special{pa 80 145}% +\special{pa 84 151}\special{pa 87 156}\special{pa 91 162}\special{pa 95 168}\special{pa 99 173}% +\special{pa 103 179}\special{pa 107 185}\special{pa 111 190}\special{pa 116 196}\special{pa 120 201}% +\special{pa 124 207}\special{pa 128 212}\special{pa 132 218}\special{pa 137 223}\special{pa 141 228}% +\special{pa 145 234}\special{pa 150 239}\special{pa 154 244}\special{pa 159 249}\special{pa 163 255}% +\special{pa 168 260}\special{pa 173 265}\special{pa 177 270}\special{pa 182 275}\special{pa 187 280}% +\special{pa 191 285}% +\special{fp}% +\special{pa 277 366}\special{pa 283 370}\special{pa 288 375}\special{pa 293 379}\special{pa 299 383}% +\special{pa 304 388}\special{pa 310 392}\special{pa 315 396}\special{pa 321 400}\special{pa 326 404}% +\special{pa 332 409}\special{pa 337 413}\special{pa 343 417}\special{pa 349 421}\special{pa 354 424}% +\special{pa 360 428}\special{pa 366 432}\special{pa 371 436}\special{pa 377 440}\special{pa 383 444}% +\special{pa 389 447}\special{pa 395 451}\special{pa 401 454}\special{pa 406 458}\special{pa 412 462}% +\special{pa 418 465}\special{pa 424 469}\special{pa 430 472}\special{pa 436 475}\special{pa 442 479}% +\special{pa 448 482}\special{pa 455 485}\special{pa 461 488}\special{pa 467 492}\special{pa 473 495}% +\special{pa 479 498}\special{pa 485 501}\special{pa 491 504}\special{pa 498 507}\special{pa 504 510}% +\special{pa 510 513}\special{pa 517 515}\special{pa 523 518}\special{pa 529 521}\special{pa 536 524}% +\special{pa 542 526}\special{pa 548 529}\special{pa 555 532}\special{pa 561 534}\special{pa 568 537}% +\special{pa 574 539}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.6000,-1.5100){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p024.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p024.sce new file mode 100644 index 00000000..13cccf91 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p024.sce @@ -0,0 +1,56 @@ +//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/p024.tex'; +Fnamesci='pointoncircle/p024.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.77996,-0.65702]'); Assignrep('mdbw1',[0.77996,-0.65702]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[1.75261,-0.96351]]); +pt1=Pointdata([1.75261,-0.96351]); +bw1=Bowdata([0,0],[1.75261,-0.96351],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/p024.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.78,-0.66],"c","$2$"); + Drwline(bw1); + Letter([1.93,-1.06],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p024.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p024.tex new file mode 100644 index 00000000..d99ee59f --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p024.tex @@ -0,0 +1,88 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p024.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 690 379}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 693 377}\special{pa 687 377}\special{pa 687 382}\special{pa 693 382}\special{pa 693 377}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.7800,-0.6600){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 4 5}\special{pa 9 11}\special{pa 13 16}\special{pa 18 21}% +\special{pa 22 27}\special{pa 26 32}\special{pa 31 37}\special{pa 36 42}\special{pa 40 47}% +\special{pa 45 52}\special{pa 49 58}\special{pa 54 63}\special{pa 59 68}\special{pa 64 73}% +\special{pa 69 78}\special{pa 73 82}\special{pa 78 87}\special{pa 83 92}\special{pa 88 97}% +\special{pa 93 102}\special{pa 98 107}\special{pa 103 111}\special{pa 108 116}\special{pa 113 121}% +\special{pa 118 125}\special{pa 124 130}\special{pa 129 134}\special{pa 134 139}\special{pa 139 143}% +\special{pa 145 148}\special{pa 150 152}\special{pa 155 157}\special{pa 161 161}\special{pa 166 165}% +\special{pa 171 169}\special{pa 177 174}\special{pa 182 178}\special{pa 188 182}\special{pa 193 186}% +\special{pa 199 190}\special{pa 205 194}\special{pa 210 198}\special{pa 216 202}\special{pa 222 206}% +\special{pa 227 210}\special{pa 233 214}\special{pa 239 218}\special{pa 245 221}\special{pa 250 225}% +\special{pa 256 229}% +\special{fp}% +\special{pa 360 286}\special{pa 366 289}\special{pa 372 291}\special{pa 378 294}\special{pa 385 297}% +\special{pa 391 300}\special{pa 397 303}\special{pa 404 305}\special{pa 410 308}\special{pa 416 311}% +\special{pa 423 313}\special{pa 429 316}\special{pa 436 318}\special{pa 442 321}\special{pa 449 323}% +\special{pa 455 325}\special{pa 462 328}\special{pa 468 330}\special{pa 475 332}\special{pa 481 334}% +\special{pa 488 336}\special{pa 494 339}\special{pa 501 341}\special{pa 508 343}\special{pa 514 345}% +\special{pa 521 346}\special{pa 527 348}\special{pa 534 350}\special{pa 541 352}\special{pa 548 354}% +\special{pa 554 355}\special{pa 561 357}\special{pa 568 359}\special{pa 574 360}\special{pa 581 362}% +\special{pa 588 363}\special{pa 595 364}\special{pa 601 366}\special{pa 608 367}\special{pa 615 368}% +\special{pa 622 370}\special{pa 628 371}\special{pa 635 372}\special{pa 642 373}\special{pa 649 374}% +\special{pa 656 375}\special{pa 663 376}\special{pa 669 377}\special{pa 676 378}\special{pa 683 379}% +\special{pa 690 379}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.9300,-1.0600){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file 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 new file mode 100644 index 00000000..99337104 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.sce @@ -0,0 +1,56 @@ +//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(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.tex new file mode 100644 index 00000000..fb5c827f --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p025.tex @@ -0,0 +1,88 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p025.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 763 196}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 765 193}\special{pa 760 193}\special{pa 760 199}\special{pa 765 199}\special{pa 765 193}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(0.9200,-0.4400){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 6 4}\special{pa 11 8}\special{pa 17 12}\special{pa 22 16}% +\special{pa 28 20}\special{pa 34 24}\special{pa 39 28}\special{pa 45 32}\special{pa 51 36}% +\special{pa 56 40}\special{pa 62 43}\special{pa 68 47}\special{pa 74 51}\special{pa 80 54}% +\special{pa 86 58}\special{pa 92 62}\special{pa 98 65}\special{pa 103 69}\special{pa 109 72}% +\special{pa 115 75}\special{pa 121 79}\special{pa 128 82}\special{pa 134 85}\special{pa 140 89}% +\special{pa 146 92}\special{pa 152 95}\special{pa 158 98}\special{pa 164 101}\special{pa 171 104}% +\special{pa 177 107}\special{pa 183 110}\special{pa 189 113}\special{pa 196 116}\special{pa 202 119}% +\special{pa 208 121}\special{pa 214 124}\special{pa 221 127}\special{pa 227 130}\special{pa 234 132}% +\special{pa 240 135}\special{pa 246 137}\special{pa 253 140}\special{pa 259 142}\special{pa 266 144}% +\special{pa 272 147}\special{pa 279 149}\special{pa 285 151}\special{pa 292 154}\special{pa 298 156}% +\special{pa 305 158}% +\special{fp}% +\special{pa 419 187}\special{pa 426 189}\special{pa 433 190}\special{pa 440 191}\special{pa 446 192}% +\special{pa 453 193}\special{pa 460 194}\special{pa 467 195}\special{pa 474 196}\special{pa 481 197}% +\special{pa 487 198}\special{pa 494 199}\special{pa 501 200}\special{pa 508 201}\special{pa 515 201}% +\special{pa 522 202}\special{pa 529 203}\special{pa 536 203}\special{pa 542 204}\special{pa 549 204}% +\special{pa 556 205}\special{pa 563 205}\special{pa 570 205}\special{pa 577 206}\special{pa 584 206}% +\special{pa 591 206}\special{pa 598 206}\special{pa 604 206}\special{pa 611 206}\special{pa 618 206}% +\special{pa 625 206}\special{pa 632 206}\special{pa 639 206}\special{pa 646 206}\special{pa 653 206}% +\special{pa 660 205}\special{pa 667 205}\special{pa 673 205}\special{pa 680 204}\special{pa 687 204}% +\special{pa 694 203}\special{pa 701 203}\special{pa 708 202}\special{pa 715 202}\special{pa 722 201}% +\special{pa 728 200}\special{pa 735 199}\special{pa 742 199}\special{pa 749 198}\special{pa 756 197}% +\special{pa 763 196}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.1300,-0.5500){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p026.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p026.sce new file mode 100644 index 00000000..50200087 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p026.sce @@ -0,0 +1,56 @@ +//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/p026.tex'; +Fnamesci='pointoncircle/p026.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('[1,-0.2]'); Assignrep('mdbw1',[1,-0.2]); +cr1=Circledata([[0,0],[2,0]]); +sg1=Listplot([[0,0],[2,0]]); +pt1=Pointdata([2,0]); +bw1=Bowdata([0,0],[2,0],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/p026.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([1,-0.2],"c","$2$"); + Drwline(bw1); + Letter([2.2,0],"c","$\mathrm{P}$"); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p026.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p026.tex new file mode 100644 index 00000000..89c96f2c --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/pointoncircle/p026.tex @@ -0,0 +1,88 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/pointoncircle/p026.tex 2017-8-19 10:56 +%%% figs0706animateall.sce 2017-8-19 10:55 +{\unitlength=1cm% +\begin{picture}% +( 5.00000, 5.00000)( -2.50000, -2.50000)% +\special{pn 8}% +% +\small% +\special{pa 787 0}\special{pa 781 -99}\special{pa 763 -196}\special{pa 732 -290}\special{pa 690 -379}% +\special{pa 637 -463}\special{pa 574 -539}\special{pa 502 -607}\special{pa 422 -665}% +\special{pa 335 -712}\special{pa 243 -749}\special{pa 148 -773}\special{pa 49 -786}% +\special{pa -49 -786}\special{pa -148 -773}\special{pa -243 -749}\special{pa -335 -712}% +\special{pa -422 -665}\special{pa -502 -607}\special{pa -574 -539}\special{pa -637 -463}% +\special{pa -690 -379}\special{pa -732 -290}\special{pa -763 -196}\special{pa -781 -99}% +\special{pa -787 0}\special{pa -781 99}\special{pa -763 196}\special{pa -732 290}% +\special{pa -690 379}\special{pa -637 463}\special{pa -574 539}\special{pa -502 607}% +\special{pa -422 665}\special{pa -335 712}\special{pa -243 749}\special{pa -148 773}% +\special{pa -49 786}\special{pa 49 786}\special{pa 148 773}\special{pa 243 749}\special{pa 335 712}% +\special{pa 422 665}\special{pa 502 607}\special{pa 574 539}\special{pa 637 463}\special{pa 690 379}% +\special{pa 732 290}\special{pa 763 196}\special{pa 781 99}\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$2$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-\Height}% +\put(2.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\color[cmyk]{0,1,1,0}% +\special{pa 0 0}\special{pa 787 0}% +\special{fp}% +\color[cmyk]{0,0,0,1}% +\special{pn 1}% +\special{pa 790 -3}\special{pa 785 -3}\special{pa 785 3}\special{pa 790 3}\special{pa 790 -3}% +\special{sh 1}\special{fp}% +\special{pn 8}% +\settowidth{\Width}{$2$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$2$}\settodepth{\Depth}{$2$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(1.0000,-0.2000){\hspace*{\Width}\raisebox{\Height}{$2$}}% +% +% +\special{pa 0 0}\special{pa 6 3}\special{pa 13 5}\special{pa 19 8}\special{pa 26 10}% +\special{pa 32 13}\special{pa 39 15}\special{pa 45 18}\special{pa 52 20}\special{pa 58 22}% +\special{pa 65 24}\special{pa 71 27}\special{pa 78 29}\special{pa 84 31}\special{pa 91 33}% +\special{pa 97 35}\special{pa 104 37}\special{pa 111 39}\special{pa 117 41}\special{pa 124 43}% +\special{pa 131 44}\special{pa 137 46}\special{pa 144 48}\special{pa 151 49}\special{pa 157 51}% +\special{pa 164 53}\special{pa 171 54}\special{pa 178 56}\special{pa 184 57}\special{pa 191 58}% +\special{pa 198 60}\special{pa 205 61}\special{pa 211 62}\special{pa 218 64}\special{pa 225 65}% +\special{pa 232 66}\special{pa 239 67}\special{pa 245 68}\special{pa 252 69}\special{pa 259 70}% +\special{pa 266 71}\special{pa 273 72}\special{pa 280 72}\special{pa 287 73}\special{pa 293 74}% +\special{pa 300 74}\special{pa 307 75}\special{pa 314 76}\special{pa 321 76}\special{pa 328 77}% +\special{pa 335 77}% +\special{fp}% +\special{pa 453 77}\special{pa 460 77}\special{pa 466 76}\special{pa 473 76}\special{pa 480 75}% +\special{pa 487 74}\special{pa 494 74}\special{pa 501 73}\special{pa 508 72}\special{pa 515 72}% +\special{pa 521 71}\special{pa 528 70}\special{pa 535 69}\special{pa 542 68}\special{pa 549 67}% +\special{pa 556 66}\special{pa 562 65}\special{pa 569 64}\special{pa 576 62}\special{pa 583 61}% +\special{pa 590 60}\special{pa 596 58}\special{pa 603 57}\special{pa 610 56}\special{pa 617 54}% +\special{pa 623 53}\special{pa 630 51}\special{pa 637 49}\special{pa 643 48}\special{pa 650 46}% +\special{pa 657 44}\special{pa 663 43}\special{pa 670 41}\special{pa 677 39}\special{pa 683 37}% +\special{pa 690 35}\special{pa 697 33}\special{pa 703 31}\special{pa 710 29}\special{pa 716 27}% +\special{pa 723 24}\special{pa 729 22}\special{pa 736 20}\special{pa 742 18}\special{pa 749 15}% +\special{pa 755 13}\special{pa 762 10}\special{pa 768 8}\special{pa 775 5}\special{pa 781 3}% +\special{pa 787 0}% +\special{fp}% +\settowidth{\Width}{$\mathrm{P}$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$\mathrm{P}$}\settodepth{\Depth}{$\mathrm{P}$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.2000,0.0000){\hspace*{\Width}\raisebox{\Height}{$\mathrm{P}$}}% +% +% +\special{pa -984 0}\special{pa 984 0}% +\special{fp}% +\special{pa 0 984}\special{pa 0 -984}% +\special{fp}% +\settowidth{\Width}{$x$}\setlength{\Width}{0\Width}% +\settoheight{\Height}{$x$}\settodepth{\Depth}{$x$}\setlength{\Height}{-0.5\Height}\setlength{\Depth}{0.5\Depth}\addtolength{\Height}{\Depth}% +\put(2.5500,0.0000){\hspace*{\Width}\raisebox{\Height}{$x$}}% +% +% +\settowidth{\Width}{$y$}\setlength{\Width}{-0.5\Width}% +\settoheight{\Height}{$y$}\settodepth{\Depth}{$y$}\setlength{\Height}{\Depth}% +\put(0.0000,2.5500){\hspace*{\Width}\raisebox{\Height}{$y$}}% +% +% +\settowidth{\Width}{O}\setlength{\Width}{-1\Width}% +\settoheight{\Height}{O}\settodepth{\Depth}{O}\setlength{\Height}{-\Height}% +\put(-0.0500,-0.0500){\hspace*{\Width}\raisebox{\Height}{O}}% +% +% +\end{picture}}%
\ No newline at end of file |