diff options
Diffstat (limited to 'texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve')
63 files changed, 3573 insertions, 0 deletions
diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/all.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/all.sce new file mode 100644 index 00000000..1888e4b6 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/all.sce @@ -0,0 +1,942 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p001.tex'; +Fnamesci='sinecurve/p001.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-3))'),Assign('x')); +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/sinecurve/p001.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-2.63333))'),Assign('x')); +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/sinecurve/p002.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-2.26667))'),Assign('x')); +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/sinecurve/p003.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-1.9))'),Assign('x')); +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/sinecurve/p004.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-1.53333))'),Assign('x')); +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/sinecurve/p005.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-1.16667))'),Assign('x')); +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/sinecurve/p006.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-0.8))'),Assign('x')); +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/sinecurve/p007.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-0.43333))'),Assign('x')); +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/sinecurve/p008.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-0.06667))'),Assign('x')); +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/sinecurve/p009.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(0.3))'),Assign('x')); +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/sinecurve/p010.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(0.66667))'),Assign('x')); +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/sinecurve/p011.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(1.03333))'),Assign('x')); +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/sinecurve/p012.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(1.4))'),Assign('x')); +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/sinecurve/p013.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(1.76667))'),Assign('x')); +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/sinecurve/p014.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(2.13333))'),Assign('x')); +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/sinecurve/p015.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(2.5))'),Assign('x')); +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/sinecurve/p016.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(2.86667))'),Assign('x')); +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/sinecurve/p017.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(3.23333))'),Assign('x')); +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/sinecurve/p018.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(3.6))'),Assign('x')); +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/sinecurve/p019.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(3.96667))'),Assign('x')); +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/sinecurve/p020.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(4.33333))'),Assign('x')); +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/sinecurve/p021.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(4.7))'),Assign('x')); +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/sinecurve/p022.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(5.06667))'),Assign('x')); +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/sinecurve/p023.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(5.43333))'),Assign('x')); +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/sinecurve/p024.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(5.8))'),Assign('x')); +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/sinecurve/p025.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(6.16667))'),Assign('x')); +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/sinecurve/p026.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(6.53333))'),Assign('x')); +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/sinecurve/p027.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(6.9))'),Assign('x')); +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/sinecurve/p028.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(7.26667))'),Assign('x')); +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/sinecurve/p029.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(7.63333))'),Assign('x')); +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/sinecurve/p030.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(8))'),Assign('x')); +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/sinecurve/p031.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p001.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p001.sce new file mode 100644 index 00000000..cb1fe21b --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p001.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p001.tex'; +Fnamesci='sinecurve/p001.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-3))'),Assign('x')); +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/sinecurve/p001.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p001.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p001.tex new file mode 100644 index 00000000..43593231 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p001.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p001.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 0}\special{pa -1094 -86}\special{pa -1008 -168}\special{pa -921 -241}% +\special{pa -835 -303}\special{pa -748 -351}\special{pa -661 -381}\special{pa -575 -394}% +\special{pa -488 -387}\special{pa -402 -361}\special{pa -315 -318}\special{pa -228 -260}% +\special{pa -142 -189}\special{pa -55 -109}\special{pa 31 -24}\special{pa 118 62}% +\special{pa 205 145}\special{pa 291 222}\special{pa 378 287}\special{pa 465 339}\special{pa 551 375}% +\special{pa 638 392}\special{pa 724 390}\special{pa 811 370}\special{pa 898 332}\special{pa 984 278}% +\special{pa 1071 210}\special{pa 1157 132}\special{pa 1244 48}\special{pa 1331 -38}% +\special{pa 1417 -123}\special{pa 1504 -201}\special{pa 1591 -270}\special{pa 1677 -326}% +\special{pa 1764 -366}\special{pa 1850 -389}\special{pa 1937 -393}\special{pa 2024 -378}% +\special{pa 2110 -344}\special{pa 2197 -294}\special{pa 2283 -230}\special{pa 2370 -155}% +\special{pa 2457 -72}\special{pa 2543 14}\special{pa 2630 99}\special{pa 2717 180}% +\special{pa 2803 252}\special{pa 2890 312}\special{pa 2976 357}\special{pa 3063 385}% +\special{pa 3150 394}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p002.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p002.sce new file mode 100644 index 00000000..d0aa72ce --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p002.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p002.tex'; +Fnamesci='sinecurve/p002.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-2.63333))'),Assign('x')); +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/sinecurve/p002.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p002.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p002.tex new file mode 100644 index 00000000..9f89b2fd --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p002.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p002.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 141}\special{pa -1094 58}\special{pa -1008 -29}\special{pa -921 -114}% +\special{pa -835 -193}\special{pa -748 -264}\special{pa -661 -321}\special{pa -575 -363}% +\special{pa -488 -388}\special{pa -402 -393}\special{pa -315 -380}\special{pa -228 -349}% +\special{pa -142 -300}\special{pa -55 -238}\special{pa 31 -164}\special{pa 118 -81}% +\special{pa 205 5}\special{pa 291 90}\special{pa 378 172}\special{pa 465 245}\special{pa 551 306}% +\special{pa 638 353}\special{pa 724 383}\special{pa 811 394}\special{pa 898 386}\special{pa 984 359}% +\special{pa 1071 316}\special{pa 1157 257}\special{pa 1244 185}\special{pa 1331 105}% +\special{pa 1417 20}\special{pa 1504 -67}\special{pa 1591 -150}\special{pa 1677 -226}% +\special{pa 1764 -291}\special{pa 1850 -342}\special{pa 1937 -376}\special{pa 2024 -392}% +\special{pa 2110 -390}\special{pa 2197 -369}\special{pa 2283 -329}\special{pa 2370 -274}% +\special{pa 2457 -206}\special{pa 2543 -128}\special{pa 2630 -44}\special{pa 2717 43}% +\special{pa 2803 127}\special{pa 2890 205}\special{pa 2976 274}\special{pa 3063 329}% +\special{pa 3150 368}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p003.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p003.sce new file mode 100644 index 00000000..12547148 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p003.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p003.tex'; +Fnamesci='sinecurve/p003.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-2.26667))'),Assign('x')); +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/sinecurve/p003.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p003.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p003.tex new file mode 100644 index 00000000..9eefac61 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p003.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p003.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 264}\special{pa -1094 193}\special{pa -1008 114}\special{pa -921 29}% +\special{pa -835 -58}\special{pa -748 -141}\special{pa -661 -218}\special{pa -575 -284}% +\special{pa -488 -337}\special{pa -402 -373}\special{pa -315 -392}\special{pa -228 -391}% +\special{pa -142 -372}\special{pa -55 -334}\special{pa 31 -281}\special{pa 118 -214}% +\special{pa 205 -137}\special{pa 291 -53}\special{pa 378 33}\special{pa 465 118}\special{pa 551 197}% +\special{pa 638 267}\special{pa 724 324}\special{pa 811 365}\special{pa 898 388}\special{pa 984 393}% +\special{pa 1071 379}\special{pa 1157 347}\special{pa 1244 297}\special{pa 1331 234}% +\special{pa 1417 159}\special{pa 1504 77}\special{pa 1591 -9}\special{pa 1677 -95}% +\special{pa 1764 -176}\special{pa 1850 -249}\special{pa 1937 -309}\special{pa 2024 -355}% +\special{pa 2110 -384}\special{pa 2197 -394}\special{pa 2283 -385}\special{pa 2370 -357}% +\special{pa 2457 -313}\special{pa 2543 -253}\special{pa 2630 -181}\special{pa 2717 -100}% +\special{pa 2803 -15}\special{pa 2890 71}\special{pa 2976 154}\special{pa 3063 229}% +\special{pa 3150 294}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p004.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p004.sce new file mode 100644 index 00000000..60554cf1 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p004.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p004.tex'; +Fnamesci='sinecurve/p004.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-1.9))'),Assign('x')); +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/sinecurve/p004.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p004.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p004.tex new file mode 100644 index 00000000..4c10d81f --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p004.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p004.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 351}\special{pa -1094 303}\special{pa -1008 241}\special{pa -921 168}% +\special{pa -835 86}\special{pa -748 0}\special{pa -661 -86}\special{pa -575 -168}% +\special{pa -488 -241}\special{pa -402 -303}\special{pa -315 -351}\special{pa -228 -381}% +\special{pa -142 -394}\special{pa -55 -387}\special{pa 31 -361}\special{pa 118 -318}% +\special{pa 205 -260}\special{pa 291 -189}\special{pa 378 -109}\special{pa 465 -24}% +\special{pa 551 62}\special{pa 638 145}\special{pa 724 222}\special{pa 811 287}\special{pa 898 339}% +\special{pa 984 375}\special{pa 1071 392}\special{pa 1157 390}\special{pa 1244 370}% +\special{pa 1331 332}\special{pa 1417 278}\special{pa 1504 210}\special{pa 1591 132}% +\special{pa 1677 48}\special{pa 1764 -38}\special{pa 1850 -123}\special{pa 1937 -201}% +\special{pa 2024 -270}\special{pa 2110 -326}\special{pa 2197 -366}\special{pa 2283 -389}% +\special{pa 2370 -393}\special{pa 2457 -378}\special{pa 2543 -344}\special{pa 2630 -294}% +\special{pa 2717 -230}\special{pa 2803 -155}\special{pa 2890 -72}\special{pa 2976 14}% +\special{pa 3063 99}\special{pa 3150 180}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p005.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p005.sce new file mode 100644 index 00000000..a342e35e --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p005.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p005.tex'; +Fnamesci='sinecurve/p005.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-1.53333))'),Assign('x')); +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/sinecurve/p005.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p005.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p005.tex new file mode 100644 index 00000000..619a2505 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p005.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p005.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 392}\special{pa -1094 373}\special{pa -1008 337}\special{pa -921 284}% +\special{pa -835 218}\special{pa -748 141}\special{pa -661 58}\special{pa -575 -29}% +\special{pa -488 -114}\special{pa -402 -193}\special{pa -315 -264}\special{pa -228 -321}% +\special{pa -142 -363}\special{pa -55 -388}\special{pa 31 -393}\special{pa 118 -380}% +\special{pa 205 -349}\special{pa 291 -300}\special{pa 378 -238}\special{pa 465 -164}% +\special{pa 551 -81}\special{pa 638 5}\special{pa 724 90}\special{pa 811 172}\special{pa 898 245}% +\special{pa 984 306}\special{pa 1071 353}\special{pa 1157 383}\special{pa 1244 394}% +\special{pa 1331 386}\special{pa 1417 359}\special{pa 1504 316}\special{pa 1591 257}% +\special{pa 1677 185}\special{pa 1764 105}\special{pa 1850 20}\special{pa 1937 -67}% +\special{pa 2024 -150}\special{pa 2110 -226}\special{pa 2197 -291}\special{pa 2283 -342}% +\special{pa 2370 -376}\special{pa 2457 -392}\special{pa 2543 -390}\special{pa 2630 -369}% +\special{pa 2717 -329}\special{pa 2803 -274}\special{pa 2890 -206}\special{pa 2976 -128}% +\special{pa 3063 -44}\special{pa 3150 43}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p006.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p006.sce new file mode 100644 index 00000000..5dbaa7e3 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p006.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p006.tex'; +Fnamesci='sinecurve/p006.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-1.16667))'),Assign('x')); +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/sinecurve/p006.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p006.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p006.tex new file mode 100644 index 00000000..b9027832 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p006.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p006.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 380}\special{pa -1094 393}\special{pa -1008 388}\special{pa -921 363}% +\special{pa -835 321}\special{pa -748 264}\special{pa -661 193}\special{pa -575 114}% +\special{pa -488 29}\special{pa -402 -58}\special{pa -315 -141}\special{pa -228 -218}% +\special{pa -142 -284}\special{pa -55 -337}\special{pa 31 -373}\special{pa 118 -392}% +\special{pa 205 -391}\special{pa 291 -372}\special{pa 378 -334}\special{pa 465 -281}% +\special{pa 551 -214}\special{pa 638 -137}\special{pa 724 -53}\special{pa 811 33}% +\special{pa 898 118}\special{pa 984 197}\special{pa 1071 267}\special{pa 1157 324}% +\special{pa 1244 365}\special{pa 1331 388}\special{pa 1417 393}\special{pa 1504 379}% +\special{pa 1591 347}\special{pa 1677 297}\special{pa 1764 234}\special{pa 1850 159}% +\special{pa 1937 77}\special{pa 2024 -9}\special{pa 2110 -95}\special{pa 2197 -176}% +\special{pa 2283 -249}\special{pa 2370 -309}\special{pa 2457 -355}\special{pa 2543 -384}% +\special{pa 2630 -394}\special{pa 2717 -385}\special{pa 2803 -357}\special{pa 2890 -313}% +\special{pa 2976 -253}\special{pa 3063 -181}\special{pa 3150 -100}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p007.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p007.sce new file mode 100644 index 00000000..457ea9d8 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p007.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p007.tex'; +Fnamesci='sinecurve/p007.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-0.8))'),Assign('x')); +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/sinecurve/p007.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p007.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p007.tex new file mode 100644 index 00000000..a9fafae8 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p007.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p007.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 318}\special{pa -1094 361}\special{pa -1008 387}\special{pa -921 394}% +\special{pa -835 381}\special{pa -748 351}\special{pa -661 303}\special{pa -575 241}% +\special{pa -488 168}\special{pa -402 86}\special{pa -315 0}\special{pa -228 -86}% +\special{pa -142 -168}\special{pa -55 -241}\special{pa 31 -303}\special{pa 118 -351}% +\special{pa 205 -381}\special{pa 291 -394}\special{pa 378 -387}\special{pa 465 -361}% +\special{pa 551 -318}\special{pa 638 -260}\special{pa 724 -189}\special{pa 811 -109}% +\special{pa 898 -24}\special{pa 984 62}\special{pa 1071 145}\special{pa 1157 222}% +\special{pa 1244 287}\special{pa 1331 339}\special{pa 1417 375}\special{pa 1504 392}% +\special{pa 1591 390}\special{pa 1677 370}\special{pa 1764 332}\special{pa 1850 278}% +\special{pa 1937 210}\special{pa 2024 132}\special{pa 2110 48}\special{pa 2197 -38}% +\special{pa 2283 -123}\special{pa 2370 -201}\special{pa 2457 -270}\special{pa 2543 -326}% +\special{pa 2630 -366}\special{pa 2717 -389}\special{pa 2803 -393}\special{pa 2890 -378}% +\special{pa 2976 -344}\special{pa 3063 -294}\special{pa 3150 -230}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p008.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p008.sce new file mode 100644 index 00000000..945804fb --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p008.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p008.tex'; +Fnamesci='sinecurve/p008.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-0.43333))'),Assign('x')); +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/sinecurve/p008.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p008.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p008.tex new file mode 100644 index 00000000..ebd7f7f8 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p008.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p008.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 214}\special{pa -1094 281}\special{pa -1008 334}\special{pa -921 372}% +\special{pa -835 391}\special{pa -748 392}\special{pa -661 373}\special{pa -575 337}% +\special{pa -488 284}\special{pa -402 218}\special{pa -315 141}\special{pa -228 58}% +\special{pa -142 -29}\special{pa -55 -114}\special{pa 31 -193}\special{pa 118 -264}% +\special{pa 205 -321}\special{pa 291 -363}\special{pa 378 -388}\special{pa 465 -393}% +\special{pa 551 -380}\special{pa 638 -349}\special{pa 724 -300}\special{pa 811 -238}% +\special{pa 898 -164}\special{pa 984 -81}\special{pa 1071 5}\special{pa 1157 90}\special{pa 1244 172}% +\special{pa 1331 245}\special{pa 1417 306}\special{pa 1504 353}\special{pa 1591 383}% +\special{pa 1677 394}\special{pa 1764 386}\special{pa 1850 359}\special{pa 1937 316}% +\special{pa 2024 257}\special{pa 2110 185}\special{pa 2197 105}\special{pa 2283 20}% +\special{pa 2370 -67}\special{pa 2457 -150}\special{pa 2543 -226}\special{pa 2630 -291}% +\special{pa 2717 -342}\special{pa 2803 -376}\special{pa 2890 -392}\special{pa 2976 -390}% +\special{pa 3063 -369}\special{pa 3150 -329}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p009.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p009.sce new file mode 100644 index 00000000..5d235d9d --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p009.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p009.tex'; +Fnamesci='sinecurve/p009.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(-0.06667))'),Assign('x')); +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/sinecurve/p009.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p009.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p009.tex new file mode 100644 index 00000000..b4a56425 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p009.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p009.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 81}\special{pa -1094 164}\special{pa -1008 238}\special{pa -921 300}% +\special{pa -835 349}\special{pa -748 380}\special{pa -661 393}\special{pa -575 388}% +\special{pa -488 363}\special{pa -402 321}\special{pa -315 264}\special{pa -228 193}% +\special{pa -142 114}\special{pa -55 29}\special{pa 31 -58}\special{pa 118 -141}\special{pa 205 -218}% +\special{pa 291 -284}\special{pa 378 -337}\special{pa 465 -373}\special{pa 551 -392}% +\special{pa 638 -391}\special{pa 724 -372}\special{pa 811 -334}\special{pa 898 -281}% +\special{pa 984 -214}\special{pa 1071 -137}\special{pa 1157 -53}\special{pa 1244 33}% +\special{pa 1331 118}\special{pa 1417 197}\special{pa 1504 267}\special{pa 1591 324}% +\special{pa 1677 365}\special{pa 1764 388}\special{pa 1850 393}\special{pa 1937 379}% +\special{pa 2024 347}\special{pa 2110 297}\special{pa 2197 234}\special{pa 2283 159}% +\special{pa 2370 77}\special{pa 2457 -9}\special{pa 2543 -95}\special{pa 2630 -176}% +\special{pa 2717 -249}\special{pa 2803 -309}\special{pa 2890 -355}\special{pa 2976 -384}% +\special{pa 3063 -394}\special{pa 3150 -385}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p010.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p010.sce new file mode 100644 index 00000000..3724a1e7 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p010.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p010.tex'; +Fnamesci='sinecurve/p010.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(0.3))'),Assign('x')); +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/sinecurve/p010.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p010.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p010.tex new file mode 100644 index 00000000..66122274 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p010.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p010.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -62}\special{pa -1094 24}\special{pa -1008 109}\special{pa -921 189}% +\special{pa -835 260}\special{pa -748 318}\special{pa -661 361}\special{pa -575 387}% +\special{pa -488 394}\special{pa -402 381}\special{pa -315 351}\special{pa -228 303}% +\special{pa -142 241}\special{pa -55 168}\special{pa 31 86}\special{pa 118 0}\special{pa 205 -86}% +\special{pa 291 -168}\special{pa 378 -241}\special{pa 465 -303}\special{pa 551 -351}% +\special{pa 638 -381}\special{pa 724 -394}\special{pa 811 -387}\special{pa 898 -361}% +\special{pa 984 -318}\special{pa 1071 -260}\special{pa 1157 -189}\special{pa 1244 -109}% +\special{pa 1331 -24}\special{pa 1417 62}\special{pa 1504 145}\special{pa 1591 222}% +\special{pa 1677 287}\special{pa 1764 339}\special{pa 1850 375}\special{pa 1937 392}% +\special{pa 2024 390}\special{pa 2110 370}\special{pa 2197 332}\special{pa 2283 278}% +\special{pa 2370 210}\special{pa 2457 132}\special{pa 2543 48}\special{pa 2630 -38}% +\special{pa 2717 -123}\special{pa 2803 -201}\special{pa 2890 -270}\special{pa 2976 -326}% +\special{pa 3063 -366}\special{pa 3150 -389}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p011.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p011.sce new file mode 100644 index 00000000..b5bc6e0b --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p011.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p011.tex'; +Fnamesci='sinecurve/p011.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(0.66667))'),Assign('x')); +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/sinecurve/p011.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p011.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p011.tex new file mode 100644 index 00000000..9b45f720 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p011.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p011.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -197}\special{pa -1094 -118}\special{pa -1008 -33}\special{pa -921 53}% +\special{pa -835 137}\special{pa -748 214}\special{pa -661 281}\special{pa -575 334}% +\special{pa -488 372}\special{pa -402 391}\special{pa -315 392}\special{pa -228 373}% +\special{pa -142 337}\special{pa -55 284}\special{pa 31 218}\special{pa 118 141}\special{pa 205 58}% +\special{pa 291 -29}\special{pa 378 -114}\special{pa 465 -193}\special{pa 551 -264}% +\special{pa 638 -321}\special{pa 724 -363}\special{pa 811 -388}\special{pa 898 -393}% +\special{pa 984 -380}\special{pa 1071 -349}\special{pa 1157 -300}\special{pa 1244 -238}% +\special{pa 1331 -164}\special{pa 1417 -81}\special{pa 1504 5}\special{pa 1591 90}% +\special{pa 1677 172}\special{pa 1764 245}\special{pa 1850 306}\special{pa 1937 353}% +\special{pa 2024 383}\special{pa 2110 394}\special{pa 2197 386}\special{pa 2283 359}% +\special{pa 2370 316}\special{pa 2457 257}\special{pa 2543 185}\special{pa 2630 105}% +\special{pa 2717 20}\special{pa 2803 -67}\special{pa 2890 -150}\special{pa 2976 -226}% +\special{pa 3063 -291}\special{pa 3150 -342}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p012.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p012.sce new file mode 100644 index 00000000..9d1522a0 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p012.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p012.tex'; +Fnamesci='sinecurve/p012.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(1.03333))'),Assign('x')); +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/sinecurve/p012.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p012.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p012.tex new file mode 100644 index 00000000..9b71c7ca --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p012.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p012.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -306}\special{pa -1094 -245}\special{pa -1008 -172}\special{pa -921 -90}% +\special{pa -835 -5}\special{pa -748 81}\special{pa -661 164}\special{pa -575 238}% +\special{pa -488 300}\special{pa -402 349}\special{pa -315 380}\special{pa -228 393}% +\special{pa -142 388}\special{pa -55 363}\special{pa 31 321}\special{pa 118 264}\special{pa 205 193}% +\special{pa 291 114}\special{pa 378 29}\special{pa 465 -58}\special{pa 551 -141}\special{pa 638 -218}% +\special{pa 724 -284}\special{pa 811 -337}\special{pa 898 -373}\special{pa 984 -392}% +\special{pa 1071 -391}\special{pa 1157 -372}\special{pa 1244 -334}\special{pa 1331 -281}% +\special{pa 1417 -214}\special{pa 1504 -137}\special{pa 1591 -53}\special{pa 1677 33}% +\special{pa 1764 118}\special{pa 1850 197}\special{pa 1937 267}\special{pa 2024 324}% +\special{pa 2110 365}\special{pa 2197 388}\special{pa 2283 393}\special{pa 2370 379}% +\special{pa 2457 347}\special{pa 2543 297}\special{pa 2630 234}\special{pa 2717 159}% +\special{pa 2803 77}\special{pa 2890 -9}\special{pa 2976 -95}\special{pa 3063 -176}% +\special{pa 3150 -249}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p013.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p013.sce new file mode 100644 index 00000000..19eff7cd --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p013.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p013.tex'; +Fnamesci='sinecurve/p013.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(1.4))'),Assign('x')); +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/sinecurve/p013.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p013.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p013.tex new file mode 100644 index 00000000..7d78b659 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p013.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p013.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -375}\special{pa -1094 -339}\special{pa -1008 -287}\special{pa -921 -222}% +\special{pa -835 -145}\special{pa -748 -62}\special{pa -661 24}\special{pa -575 109}% +\special{pa -488 189}\special{pa -402 260}\special{pa -315 318}\special{pa -228 361}% +\special{pa -142 387}\special{pa -55 394}\special{pa 31 381}\special{pa 118 351}\special{pa 205 303}% +\special{pa 291 241}\special{pa 378 168}\special{pa 465 86}\special{pa 551 0}\special{pa 638 -86}% +\special{pa 724 -168}\special{pa 811 -241}\special{pa 898 -303}\special{pa 984 -351}% +\special{pa 1071 -381}\special{pa 1157 -394}\special{pa 1244 -387}\special{pa 1331 -361}% +\special{pa 1417 -318}\special{pa 1504 -260}\special{pa 1591 -189}\special{pa 1677 -109}% +\special{pa 1764 -24}\special{pa 1850 62}\special{pa 1937 145}\special{pa 2024 222}% +\special{pa 2110 287}\special{pa 2197 339}\special{pa 2283 375}\special{pa 2370 392}% +\special{pa 2457 390}\special{pa 2543 370}\special{pa 2630 332}\special{pa 2717 278}% +\special{pa 2803 210}\special{pa 2890 132}\special{pa 2976 48}\special{pa 3063 -38}% +\special{pa 3150 -123}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p014.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p014.sce new file mode 100644 index 00000000..fe8ca80c --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p014.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p014.tex'; +Fnamesci='sinecurve/p014.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(1.76667))'),Assign('x')); +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/sinecurve/p014.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p014.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p014.tex new file mode 100644 index 00000000..d40cb332 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p014.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p014.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -393}\special{pa -1094 -388}\special{pa -1008 -365}\special{pa -921 -324}% +\special{pa -835 -267}\special{pa -748 -197}\special{pa -661 -118}\special{pa -575 -33}% +\special{pa -488 53}\special{pa -402 137}\special{pa -315 214}\special{pa -228 281}% +\special{pa -142 334}\special{pa -55 372}\special{pa 31 391}\special{pa 118 392}\special{pa 205 373}% +\special{pa 291 337}\special{pa 378 284}\special{pa 465 218}\special{pa 551 141}\special{pa 638 58}% +\special{pa 724 -29}\special{pa 811 -114}\special{pa 898 -193}\special{pa 984 -264}% +\special{pa 1071 -321}\special{pa 1157 -363}\special{pa 1244 -388}\special{pa 1331 -393}% +\special{pa 1417 -380}\special{pa 1504 -349}\special{pa 1591 -300}\special{pa 1677 -238}% +\special{pa 1764 -164}\special{pa 1850 -81}\special{pa 1937 5}\special{pa 2024 90}% +\special{pa 2110 172}\special{pa 2197 245}\special{pa 2283 306}\special{pa 2370 353}% +\special{pa 2457 383}\special{pa 2543 394}\special{pa 2630 386}\special{pa 2717 359}% +\special{pa 2803 316}\special{pa 2890 257}\special{pa 2976 185}\special{pa 3063 105}% +\special{pa 3150 20}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p015.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p015.sce new file mode 100644 index 00000000..9e7e73ed --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p015.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p015.tex'; +Fnamesci='sinecurve/p015.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(2.13333))'),Assign('x')); +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/sinecurve/p015.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p015.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p015.tex new file mode 100644 index 00000000..81a046dd --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p015.tex @@ -0,0 +1,41 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p015.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -359}\special{pa -1094 -386}\special{pa -1008 -394}\special{pa -921 -383}% +\special{pa -835 -353}\special{pa -748 -306}\special{pa -661 -245}\special{pa -575 -172}% +\special{pa -488 -90}\special{pa -402 -5}\special{pa -315 81}\special{pa -228 164}% +\special{pa -142 238}\special{pa -55 300}\special{pa 31 349}\special{pa 118 380}\special{pa 205 393}% +\special{pa 291 388}\special{pa 378 363}\special{pa 465 321}\special{pa 551 264}\special{pa 638 193}% +\special{pa 724 114}\special{pa 811 29}\special{pa 898 -58}\special{pa 984 -141}\special{pa 1071 -218}% +\special{pa 1157 -284}\special{pa 1244 -337}\special{pa 1331 -373}\special{pa 1417 -392}% +\special{pa 1504 -391}\special{pa 1591 -372}\special{pa 1677 -334}\special{pa 1764 -281}% +\special{pa 1850 -214}\special{pa 1937 -137}\special{pa 2024 -53}\special{pa 2110 33}% +\special{pa 2197 118}\special{pa 2283 197}\special{pa 2370 267}\special{pa 2457 324}% +\special{pa 2543 365}\special{pa 2630 388}\special{pa 2717 393}\special{pa 2803 379}% +\special{pa 2890 347}\special{pa 2976 297}\special{pa 3063 234}\special{pa 3150 159}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p016.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p016.sce new file mode 100644 index 00000000..abce0882 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p016.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p016.tex'; +Fnamesci='sinecurve/p016.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(2.5))'),Assign('x')); +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/sinecurve/p016.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p016.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p016.tex new file mode 100644 index 00000000..f0b3d7cf --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p016.tex @@ -0,0 +1,41 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p016.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -278}\special{pa -1094 -332}\special{pa -1008 -370}\special{pa -921 -390}% +\special{pa -835 -392}\special{pa -748 -375}\special{pa -661 -339}\special{pa -575 -287}% +\special{pa -488 -222}\special{pa -402 -145}\special{pa -315 -62}\special{pa -228 24}% +\special{pa -142 109}\special{pa -55 189}\special{pa 31 260}\special{pa 118 318}\special{pa 205 361}% +\special{pa 291 387}\special{pa 378 394}\special{pa 465 381}\special{pa 551 351}\special{pa 638 303}% +\special{pa 724 241}\special{pa 811 168}\special{pa 898 86}\special{pa 984 0}\special{pa 1071 -86}% +\special{pa 1157 -168}\special{pa 1244 -241}\special{pa 1331 -303}\special{pa 1417 -351}% +\special{pa 1504 -381}\special{pa 1591 -394}\special{pa 1677 -387}\special{pa 1764 -361}% +\special{pa 1850 -318}\special{pa 1937 -260}\special{pa 2024 -189}\special{pa 2110 -109}% +\special{pa 2197 -24}\special{pa 2283 62}\special{pa 2370 145}\special{pa 2457 222}% +\special{pa 2543 287}\special{pa 2630 339}\special{pa 2717 375}\special{pa 2803 392}% +\special{pa 2890 390}\special{pa 2976 370}\special{pa 3063 332}\special{pa 3150 278}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p017.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p017.sce new file mode 100644 index 00000000..246aae30 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p017.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p017.tex'; +Fnamesci='sinecurve/p017.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(2.86667))'),Assign('x')); +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/sinecurve/p017.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p017.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p017.tex new file mode 100644 index 00000000..628b7398 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p017.tex @@ -0,0 +1,41 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p017.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -159}\special{pa -1094 -234}\special{pa -1008 -297}\special{pa -921 -347}% +\special{pa -835 -379}\special{pa -748 -393}\special{pa -661 -388}\special{pa -575 -365}% +\special{pa -488 -324}\special{pa -402 -267}\special{pa -315 -197}\special{pa -228 -118}% +\special{pa -142 -33}\special{pa -55 53}\special{pa 31 137}\special{pa 118 214}\special{pa 205 281}% +\special{pa 291 334}\special{pa 378 372}\special{pa 465 391}\special{pa 551 392}\special{pa 638 373}% +\special{pa 724 337}\special{pa 811 284}\special{pa 898 218}\special{pa 984 141}\special{pa 1071 58}% +\special{pa 1157 -29}\special{pa 1244 -114}\special{pa 1331 -193}\special{pa 1417 -264}% +\special{pa 1504 -321}\special{pa 1591 -363}\special{pa 1677 -388}\special{pa 1764 -393}% +\special{pa 1850 -380}\special{pa 1937 -349}\special{pa 2024 -300}\special{pa 2110 -238}% +\special{pa 2197 -164}\special{pa 2283 -81}\special{pa 2370 5}\special{pa 2457 90}% +\special{pa 2543 172}\special{pa 2630 245}\special{pa 2717 306}\special{pa 2803 353}% +\special{pa 2890 383}\special{pa 2976 394}\special{pa 3063 386}\special{pa 3150 359}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p018.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p018.sce new file mode 100644 index 00000000..f32e4164 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p018.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p018.tex'; +Fnamesci='sinecurve/p018.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(3.23333))'),Assign('x')); +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/sinecurve/p018.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p018.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p018.tex new file mode 100644 index 00000000..a5c5ca1e --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p018.tex @@ -0,0 +1,41 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p018.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -20}\special{pa -1094 -105}\special{pa -1008 -185}\special{pa -921 -257}% +\special{pa -835 -316}\special{pa -748 -359}\special{pa -661 -386}\special{pa -575 -394}% +\special{pa -488 -383}\special{pa -402 -353}\special{pa -315 -306}\special{pa -228 -245}% +\special{pa -142 -172}\special{pa -55 -90}\special{pa 31 -5}\special{pa 118 81}\special{pa 205 164}% +\special{pa 291 238}\special{pa 378 300}\special{pa 465 349}\special{pa 551 380}\special{pa 638 393}% +\special{pa 724 388}\special{pa 811 363}\special{pa 898 321}\special{pa 984 264}\special{pa 1071 193}% +\special{pa 1157 114}\special{pa 1244 29}\special{pa 1331 -58}\special{pa 1417 -141}% +\special{pa 1504 -218}\special{pa 1591 -284}\special{pa 1677 -337}\special{pa 1764 -373}% +\special{pa 1850 -392}\special{pa 1937 -391}\special{pa 2024 -372}\special{pa 2110 -334}% +\special{pa 2197 -281}\special{pa 2283 -214}\special{pa 2370 -137}\special{pa 2457 -53}% +\special{pa 2543 33}\special{pa 2630 118}\special{pa 2717 197}\special{pa 2803 267}% +\special{pa 2890 324}\special{pa 2976 365}\special{pa 3063 388}\special{pa 3150 393}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p019.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p019.sce new file mode 100644 index 00000000..fd289527 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p019.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p019.tex'; +Fnamesci='sinecurve/p019.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(3.6))'),Assign('x')); +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/sinecurve/p019.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p019.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p019.tex new file mode 100644 index 00000000..9d45b48b --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p019.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p019.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 123}\special{pa -1094 38}\special{pa -1008 -48}\special{pa -921 -132}% +\special{pa -835 -210}\special{pa -748 -278}\special{pa -661 -332}\special{pa -575 -370}% +\special{pa -488 -390}\special{pa -402 -392}\special{pa -315 -375}\special{pa -228 -339}% +\special{pa -142 -287}\special{pa -55 -222}\special{pa 31 -145}\special{pa 118 -62}% +\special{pa 205 24}\special{pa 291 109}\special{pa 378 189}\special{pa 465 260}\special{pa 551 318}% +\special{pa 638 361}\special{pa 724 387}\special{pa 811 394}\special{pa 898 381}\special{pa 984 351}% +\special{pa 1071 303}\special{pa 1157 241}\special{pa 1244 168}\special{pa 1331 86}% +\special{pa 1417 0}\special{pa 1504 -86}\special{pa 1591 -168}\special{pa 1677 -241}% +\special{pa 1764 -303}\special{pa 1850 -351}\special{pa 1937 -381}\special{pa 2024 -394}% +\special{pa 2110 -387}\special{pa 2197 -361}\special{pa 2283 -318}\special{pa 2370 -260}% +\special{pa 2457 -189}\special{pa 2543 -109}\special{pa 2630 -24}\special{pa 2717 62}% +\special{pa 2803 145}\special{pa 2890 222}\special{pa 2976 287}\special{pa 3063 339}% +\special{pa 3150 375}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p020.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p020.sce new file mode 100644 index 00000000..2521e2ec --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p020.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p020.tex'; +Fnamesci='sinecurve/p020.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(3.96667))'),Assign('x')); +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/sinecurve/p020.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p020.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p020.tex new file mode 100644 index 00000000..fcaf67fc --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p020.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p020.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 249}\special{pa -1094 176}\special{pa -1008 95}\special{pa -921 9}% +\special{pa -835 -77}\special{pa -748 -159}\special{pa -661 -234}\special{pa -575 -297}% +\special{pa -488 -347}\special{pa -402 -379}\special{pa -315 -393}\special{pa -228 -388}% +\special{pa -142 -365}\special{pa -55 -324}\special{pa 31 -267}\special{pa 118 -197}% +\special{pa 205 -118}\special{pa 291 -33}\special{pa 378 53}\special{pa 465 137}\special{pa 551 214}% +\special{pa 638 281}\special{pa 724 334}\special{pa 811 372}\special{pa 898 391}\special{pa 984 392}% +\special{pa 1071 373}\special{pa 1157 337}\special{pa 1244 284}\special{pa 1331 218}% +\special{pa 1417 141}\special{pa 1504 58}\special{pa 1591 -29}\special{pa 1677 -114}% +\special{pa 1764 -193}\special{pa 1850 -264}\special{pa 1937 -321}\special{pa 2024 -363}% +\special{pa 2110 -388}\special{pa 2197 -393}\special{pa 2283 -380}\special{pa 2370 -349}% +\special{pa 2457 -300}\special{pa 2543 -238}\special{pa 2630 -164}\special{pa 2717 -81}% +\special{pa 2803 5}\special{pa 2890 90}\special{pa 2976 172}\special{pa 3063 245}% +\special{pa 3150 306}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p021.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p021.sce new file mode 100644 index 00000000..57104e74 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p021.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p021.tex'; +Fnamesci='sinecurve/p021.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(4.33333))'),Assign('x')); +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/sinecurve/p021.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p021.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p021.tex new file mode 100644 index 00000000..c80f4fab --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p021.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p021.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 342}\special{pa -1094 291}\special{pa -1008 226}\special{pa -921 150}% +\special{pa -835 67}\special{pa -748 -20}\special{pa -661 -105}\special{pa -575 -185}% +\special{pa -488 -257}\special{pa -402 -316}\special{pa -315 -359}\special{pa -228 -386}% +\special{pa -142 -394}\special{pa -55 -383}\special{pa 31 -353}\special{pa 118 -306}% +\special{pa 205 -245}\special{pa 291 -172}\special{pa 378 -90}\special{pa 465 -5}% +\special{pa 551 81}\special{pa 638 164}\special{pa 724 238}\special{pa 811 300}\special{pa 898 349}% +\special{pa 984 380}\special{pa 1071 393}\special{pa 1157 388}\special{pa 1244 363}% +\special{pa 1331 321}\special{pa 1417 264}\special{pa 1504 193}\special{pa 1591 114}% +\special{pa 1677 29}\special{pa 1764 -58}\special{pa 1850 -141}\special{pa 1937 -218}% +\special{pa 2024 -284}\special{pa 2110 -337}\special{pa 2197 -373}\special{pa 2283 -392}% +\special{pa 2370 -391}\special{pa 2457 -372}\special{pa 2543 -334}\special{pa 2630 -281}% +\special{pa 2717 -214}\special{pa 2803 -137}\special{pa 2890 -53}\special{pa 2976 33}% +\special{pa 3063 118}\special{pa 3150 197}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p022.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p022.sce new file mode 100644 index 00000000..4098414b --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p022.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p022.tex'; +Fnamesci='sinecurve/p022.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(4.7))'),Assign('x')); +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/sinecurve/p022.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p022.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p022.tex new file mode 100644 index 00000000..0ae71a1f --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p022.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p022.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 389}\special{pa -1094 366}\special{pa -1008 326}\special{pa -921 270}% +\special{pa -835 201}\special{pa -748 123}\special{pa -661 38}\special{pa -575 -48}% +\special{pa -488 -132}\special{pa -402 -210}\special{pa -315 -278}\special{pa -228 -332}% +\special{pa -142 -370}\special{pa -55 -390}\special{pa 31 -392}\special{pa 118 -375}% +\special{pa 205 -339}\special{pa 291 -287}\special{pa 378 -222}\special{pa 465 -145}% +\special{pa 551 -62}\special{pa 638 24}\special{pa 724 109}\special{pa 811 189}\special{pa 898 260}% +\special{pa 984 318}\special{pa 1071 361}\special{pa 1157 387}\special{pa 1244 394}% +\special{pa 1331 381}\special{pa 1417 351}\special{pa 1504 303}\special{pa 1591 241}% +\special{pa 1677 168}\special{pa 1764 86}\special{pa 1850 0}\special{pa 1937 -86}% +\special{pa 2024 -168}\special{pa 2110 -241}\special{pa 2197 -303}\special{pa 2283 -351}% +\special{pa 2370 -381}\special{pa 2457 -394}\special{pa 2543 -387}\special{pa 2630 -361}% +\special{pa 2717 -318}\special{pa 2803 -260}\special{pa 2890 -189}\special{pa 2976 -109}% +\special{pa 3063 -24}\special{pa 3150 62}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p023.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p023.sce new file mode 100644 index 00000000..e1b9ba89 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p023.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p023.tex'; +Fnamesci='sinecurve/p023.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(5.06667))'),Assign('x')); +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/sinecurve/p023.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p023.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p023.tex new file mode 100644 index 00000000..e1d4825c --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p023.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p023.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 385}\special{pa -1094 394}\special{pa -1008 384}\special{pa -921 355}% +\special{pa -835 309}\special{pa -748 249}\special{pa -661 176}\special{pa -575 95}% +\special{pa -488 9}\special{pa -402 -77}\special{pa -315 -159}\special{pa -228 -234}% +\special{pa -142 -297}\special{pa -55 -347}\special{pa 31 -379}\special{pa 118 -393}% +\special{pa 205 -388}\special{pa 291 -365}\special{pa 378 -324}\special{pa 465 -267}% +\special{pa 551 -197}\special{pa 638 -118}\special{pa 724 -33}\special{pa 811 53}% +\special{pa 898 137}\special{pa 984 214}\special{pa 1071 281}\special{pa 1157 334}% +\special{pa 1244 372}\special{pa 1331 391}\special{pa 1417 392}\special{pa 1504 373}% +\special{pa 1591 337}\special{pa 1677 284}\special{pa 1764 218}\special{pa 1850 141}% +\special{pa 1937 58}\special{pa 2024 -29}\special{pa 2110 -114}\special{pa 2197 -193}% +\special{pa 2283 -264}\special{pa 2370 -321}\special{pa 2457 -363}\special{pa 2543 -388}% +\special{pa 2630 -393}\special{pa 2717 -380}\special{pa 2803 -349}\special{pa 2890 -300}% +\special{pa 2976 -238}\special{pa 3063 -164}\special{pa 3150 -81}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p024.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p024.sce new file mode 100644 index 00000000..80b67fb5 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p024.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p024.tex'; +Fnamesci='sinecurve/p024.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(5.43333))'),Assign('x')); +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/sinecurve/p024.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p024.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p024.tex new file mode 100644 index 00000000..c314a918 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p024.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p024.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 329}\special{pa -1094 369}\special{pa -1008 390}\special{pa -921 392}% +\special{pa -835 376}\special{pa -748 342}\special{pa -661 291}\special{pa -575 226}% +\special{pa -488 150}\special{pa -402 67}\special{pa -315 -20}\special{pa -228 -105}% +\special{pa -142 -185}\special{pa -55 -257}\special{pa 31 -316}\special{pa 118 -359}% +\special{pa 205 -386}\special{pa 291 -394}\special{pa 378 -383}\special{pa 465 -353}% +\special{pa 551 -306}\special{pa 638 -245}\special{pa 724 -172}\special{pa 811 -90}% +\special{pa 898 -5}\special{pa 984 81}\special{pa 1071 164}\special{pa 1157 238}\special{pa 1244 300}% +\special{pa 1331 349}\special{pa 1417 380}\special{pa 1504 393}\special{pa 1591 388}% +\special{pa 1677 363}\special{pa 1764 321}\special{pa 1850 264}\special{pa 1937 193}% +\special{pa 2024 114}\special{pa 2110 29}\special{pa 2197 -58}\special{pa 2283 -141}% +\special{pa 2370 -218}\special{pa 2457 -284}\special{pa 2543 -337}\special{pa 2630 -373}% +\special{pa 2717 -392}\special{pa 2803 -391}\special{pa 2890 -372}\special{pa 2976 -334}% +\special{pa 3063 -281}\special{pa 3150 -214}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p025.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p025.sce new file mode 100644 index 00000000..594d15e8 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p025.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p025.tex'; +Fnamesci='sinecurve/p025.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(5.8))'),Assign('x')); +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/sinecurve/p025.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p025.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p025.tex new file mode 100644 index 00000000..a614daaf --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p025.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p025.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 230}\special{pa -1094 294}\special{pa -1008 344}\special{pa -921 378}% +\special{pa -835 393}\special{pa -748 389}\special{pa -661 366}\special{pa -575 326}% +\special{pa -488 270}\special{pa -402 201}\special{pa -315 123}\special{pa -228 38}% +\special{pa -142 -48}\special{pa -55 -132}\special{pa 31 -210}\special{pa 118 -278}% +\special{pa 205 -332}\special{pa 291 -370}\special{pa 378 -390}\special{pa 465 -392}% +\special{pa 551 -375}\special{pa 638 -339}\special{pa 724 -287}\special{pa 811 -222}% +\special{pa 898 -145}\special{pa 984 -62}\special{pa 1071 24}\special{pa 1157 109}% +\special{pa 1244 189}\special{pa 1331 260}\special{pa 1417 318}\special{pa 1504 361}% +\special{pa 1591 387}\special{pa 1677 394}\special{pa 1764 381}\special{pa 1850 351}% +\special{pa 1937 303}\special{pa 2024 241}\special{pa 2110 168}\special{pa 2197 86}% +\special{pa 2283 0}\special{pa 2370 -86}\special{pa 2457 -168}\special{pa 2543 -241}% +\special{pa 2630 -303}\special{pa 2717 -351}\special{pa 2803 -381}\special{pa 2890 -394}% +\special{pa 2976 -387}\special{pa 3063 -361}\special{pa 3150 -318}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p026.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p026.sce new file mode 100644 index 00000000..cfc3e3b3 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p026.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p026.tex'; +Fnamesci='sinecurve/p026.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(6.16667))'),Assign('x')); +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/sinecurve/p026.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p026.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p026.tex new file mode 100644 index 00000000..6c9ec3c0 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p026.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p026.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 100}\special{pa -1094 181}\special{pa -1008 253}\special{pa -921 313}% +\special{pa -835 357}\special{pa -748 385}\special{pa -661 394}\special{pa -575 384}% +\special{pa -488 355}\special{pa -402 309}\special{pa -315 249}\special{pa -228 176}% +\special{pa -142 95}\special{pa -55 9}\special{pa 31 -77}\special{pa 118 -159}\special{pa 205 -234}% +\special{pa 291 -297}\special{pa 378 -347}\special{pa 465 -379}\special{pa 551 -393}% +\special{pa 638 -388}\special{pa 724 -365}\special{pa 811 -324}\special{pa 898 -267}% +\special{pa 984 -197}\special{pa 1071 -118}\special{pa 1157 -33}\special{pa 1244 53}% +\special{pa 1331 137}\special{pa 1417 214}\special{pa 1504 281}\special{pa 1591 334}% +\special{pa 1677 372}\special{pa 1764 391}\special{pa 1850 392}\special{pa 1937 373}% +\special{pa 2024 337}\special{pa 2110 284}\special{pa 2197 218}\special{pa 2283 141}% +\special{pa 2370 58}\special{pa 2457 -29}\special{pa 2543 -114}\special{pa 2630 -193}% +\special{pa 2717 -264}\special{pa 2803 -321}\special{pa 2890 -363}\special{pa 2976 -388}% +\special{pa 3063 -393}\special{pa 3150 -380}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p027.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p027.sce new file mode 100644 index 00000000..eb50e908 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p027.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p027.tex'; +Fnamesci='sinecurve/p027.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(6.53333))'),Assign('x')); +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/sinecurve/p027.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p027.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p027.tex new file mode 100644 index 00000000..bb60c80e --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p027.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p027.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -43}\special{pa -1094 44}\special{pa -1008 128}\special{pa -921 206}% +\special{pa -835 274}\special{pa -748 329}\special{pa -661 369}\special{pa -575 390}% +\special{pa -488 392}\special{pa -402 376}\special{pa -315 342}\special{pa -228 291}% +\special{pa -142 226}\special{pa -55 150}\special{pa 31 67}\special{pa 118 -20}\special{pa 205 -105}% +\special{pa 291 -185}\special{pa 378 -257}\special{pa 465 -316}\special{pa 551 -359}% +\special{pa 638 -386}\special{pa 724 -394}\special{pa 811 -383}\special{pa 898 -353}% +\special{pa 984 -306}\special{pa 1071 -245}\special{pa 1157 -172}\special{pa 1244 -90}% +\special{pa 1331 -5}\special{pa 1417 81}\special{pa 1504 164}\special{pa 1591 238}% +\special{pa 1677 300}\special{pa 1764 349}\special{pa 1850 380}\special{pa 1937 393}% +\special{pa 2024 388}\special{pa 2110 363}\special{pa 2197 321}\special{pa 2283 264}% +\special{pa 2370 193}\special{pa 2457 114}\special{pa 2543 29}\special{pa 2630 -58}% +\special{pa 2717 -141}\special{pa 2803 -218}\special{pa 2890 -284}\special{pa 2976 -337}% +\special{pa 3063 -373}\special{pa 3150 -392}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p028.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p028.sce new file mode 100644 index 00000000..852dc363 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p028.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p028.tex'; +Fnamesci='sinecurve/p028.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(6.9))'),Assign('x')); +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/sinecurve/p028.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p028.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p028.tex new file mode 100644 index 00000000..c2ea3ad3 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p028.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p028.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -180}\special{pa -1094 -99}\special{pa -1008 -14}\special{pa -921 72}% +\special{pa -835 155}\special{pa -748 230}\special{pa -661 294}\special{pa -575 344}% +\special{pa -488 378}\special{pa -402 393}\special{pa -315 389}\special{pa -228 366}% +\special{pa -142 326}\special{pa -55 270}\special{pa 31 201}\special{pa 118 123}\special{pa 205 38}% +\special{pa 291 -48}\special{pa 378 -132}\special{pa 465 -210}\special{pa 551 -278}% +\special{pa 638 -332}\special{pa 724 -370}\special{pa 811 -390}\special{pa 898 -392}% +\special{pa 984 -375}\special{pa 1071 -339}\special{pa 1157 -287}\special{pa 1244 -222}% +\special{pa 1331 -145}\special{pa 1417 -62}\special{pa 1504 24}\special{pa 1591 109}% +\special{pa 1677 189}\special{pa 1764 260}\special{pa 1850 318}\special{pa 1937 361}% +\special{pa 2024 387}\special{pa 2110 394}\special{pa 2197 381}\special{pa 2283 351}% +\special{pa 2370 303}\special{pa 2457 241}\special{pa 2543 168}\special{pa 2630 86}% +\special{pa 2717 0}\special{pa 2803 -86}\special{pa 2890 -168}\special{pa 2976 -241}% +\special{pa 3063 -303}\special{pa 3150 -351}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p029.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p029.sce new file mode 100644 index 00000000..3d8c60e0 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p029.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p029.tex'; +Fnamesci='sinecurve/p029.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(7.26667))'),Assign('x')); +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/sinecurve/p029.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p029.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p029.tex new file mode 100644 index 00000000..e5da848b --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p029.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p029.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -294}\special{pa -1094 -229}\special{pa -1008 -154}\special{pa -921 -71}% +\special{pa -835 15}\special{pa -748 100}\special{pa -661 181}\special{pa -575 253}% +\special{pa -488 313}\special{pa -402 357}\special{pa -315 385}\special{pa -228 394}% +\special{pa -142 384}\special{pa -55 355}\special{pa 31 309}\special{pa 118 249}\special{pa 205 176}% +\special{pa 291 95}\special{pa 378 9}\special{pa 465 -77}\special{pa 551 -159}\special{pa 638 -234}% +\special{pa 724 -297}\special{pa 811 -347}\special{pa 898 -379}\special{pa 984 -393}% +\special{pa 1071 -388}\special{pa 1157 -365}\special{pa 1244 -324}\special{pa 1331 -267}% +\special{pa 1417 -197}\special{pa 1504 -118}\special{pa 1591 -33}\special{pa 1677 53}% +\special{pa 1764 137}\special{pa 1850 214}\special{pa 1937 281}\special{pa 2024 334}% +\special{pa 2110 372}\special{pa 2197 391}\special{pa 2283 392}\special{pa 2370 373}% +\special{pa 2457 337}\special{pa 2543 284}\special{pa 2630 218}\special{pa 2717 141}% +\special{pa 2803 58}\special{pa 2890 -29}\special{pa 2976 -114}\special{pa 3063 -193}% +\special{pa 3150 -264}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p030.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p030.sce new file mode 100644 index 00000000..8e9095ae --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p030.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p030.tex'; +Fnamesci='sinecurve/p030.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(7.63333))'),Assign('x')); +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/sinecurve/p030.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p030.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p030.tex new file mode 100644 index 00000000..de40f068 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p030.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p030.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -368}\special{pa -1094 -329}\special{pa -1008 -274}\special{pa -921 -205}% +\special{pa -835 -127}\special{pa -748 -43}\special{pa -661 44}\special{pa -575 128}% +\special{pa -488 206}\special{pa -402 274}\special{pa -315 329}\special{pa -228 369}% +\special{pa -142 390}\special{pa -55 392}\special{pa 31 376}\special{pa 118 342}\special{pa 205 291}% +\special{pa 291 226}\special{pa 378 150}\special{pa 465 67}\special{pa 551 -20}\special{pa 638 -105}% +\special{pa 724 -185}\special{pa 811 -257}\special{pa 898 -316}\special{pa 984 -359}% +\special{pa 1071 -386}\special{pa 1157 -394}\special{pa 1244 -383}\special{pa 1331 -353}% +\special{pa 1417 -306}\special{pa 1504 -245}\special{pa 1591 -172}\special{pa 1677 -90}% +\special{pa 1764 -5}\special{pa 1850 81}\special{pa 1937 164}\special{pa 2024 238}% +\special{pa 2110 300}\special{pa 2197 349}\special{pa 2283 380}\special{pa 2370 393}% +\special{pa 2457 388}\special{pa 2543 363}\special{pa 2630 321}\special{pa 2717 264}% +\special{pa 2803 193}\special{pa 2890 114}\special{pa 2976 29}\special{pa 3063 -58}% +\special{pa 3150 -141}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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/sinecurve/p031.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p031.sce new file mode 100644 index 00000000..12cd3fcd --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p031.sce @@ -0,0 +1,43 @@ +//date time=2017/8/24 14:44:24 + +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig'); +Ketlib=lib('/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6'); +Ketinit(); +disp('KETpic '+ThisVersion()) +Fnametex='sinecurve/p031.tex'; +Fnamesci='sinecurve/p031.sce'; +Fnamescibody='figs0704parabody.sce'; +Fnameout='figs0704para.txt'; +pi=%pi; i=%i; +arccos=acos; arcsin=asin; arctan=atan; + +Setwindow([-3,8], [-1.5,1.5]); +Assignadd('pi',%pi); +Assignadd('XMIN',Xmin()); +Assignadd('XMAX',Xmax()); +Assignadd('YMIN',Ymin()); +Assignadd('YMAX',Ymax()); +A=[-3,-3]; Assignrep('A',[-3,-3]); +B=[8,-3]; Assignrep('B',[8,-3]); +C=[-2.5,-3]; Assignrep('C',[-2.5,-3]); +sgAB=Listplot([A,B]); +gr1=Plotdata(Assign('sin(x-(8))'),Assign('x')); +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/sinecurve/p031.tex','1cm'); + Fontsize('s'); + Drwline(gr1); +Closefile('1'); + +end; + +quit(); diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p031.tex b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p031.tex new file mode 100644 index 00000000..e9041ca9 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/sinecurve/p031.tex @@ -0,0 +1,42 @@ +%%% /Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig/sinecurve/p031.tex 2017-8-24 14:44 +%%% figs0704paraall.sce 2017-8-24 14:44 +{\unitlength=1cm% +\begin{picture}% +( 11.00000, 3.00000)( -3.00000, -1.50000)% +\special{pn 8}% +% +\small% +\special{pa -1181 -394}\special{pa -1094 -385}\special{pa -1008 -357}\special{pa -921 -312}% +\special{pa -835 -252}\special{pa -748 -180}\special{pa -661 -99}\special{pa -575 -14}% +\special{pa -488 72}\special{pa -402 155}\special{pa -315 230}\special{pa -228 294}% +\special{pa -142 344}\special{pa -55 378}\special{pa 31 393}\special{pa 118 389}\special{pa 205 366}% +\special{pa 291 326}\special{pa 378 270}\special{pa 465 201}\special{pa 551 123}\special{pa 638 38}% +\special{pa 724 -48}\special{pa 811 -132}\special{pa 898 -210}\special{pa 984 -278}% +\special{pa 1071 -332}\special{pa 1157 -370}\special{pa 1244 -390}\special{pa 1331 -392}% +\special{pa 1417 -375}\special{pa 1504 -339}\special{pa 1591 -287}\special{pa 1677 -222}% +\special{pa 1764 -145}\special{pa 1850 -62}\special{pa 1937 24}\special{pa 2024 109}% +\special{pa 2110 189}\special{pa 2197 260}\special{pa 2283 318}\special{pa 2370 361}% +\special{pa 2457 387}\special{pa 2543 394}\special{pa 2630 381}\special{pa 2717 351}% +\special{pa 2803 303}\special{pa 2890 241}\special{pa 2976 168}\special{pa 3063 86}% +\special{pa 3150 0}% +\special{fp}% +\special{pa -1181 0}\special{pa 3150 0}% +\special{fp}% +\special{pa 0 591}\special{pa 0 -591}% +\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(8.0500,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,1.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 |