diff options
author | Norbert Preining <norbert@preining.info> | 2017-09-04 09:45:51 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2017-09-04 09:45:51 +0900 |
commit | 138f77fe71e43adc24ecb030d73df81cc5c4eb7e (patch) | |
tree | cd2d906c634149bbecd2f4bad3d540c16b23befa /texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/figs0706animateall.sce | |
parent | 37bfdbee2c91bab6f0abd54503a0b9c669c9109e (diff) |
add ketpic
Diffstat (limited to 'texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/figs0706animateall.sce')
-rw-r--r-- | texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/figs0706animateall.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/figs0706animateall.sce b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/figs0706animateall.sce new file mode 100644 index 00000000..686cd696 --- /dev/null +++ b/texmf-dist/doc/support/ketpic/ketsample/samples/s07slides/fig/figs0706animateall.sce @@ -0,0 +1,13 @@ +cd('/Users/takatoosetsuo/ketcindy/ketsample/samples/s07slides/fig');// +Ketlib=lib("/Users/takatoosetsuo/ketcindy/ketlib/ketpicscifiles6");// +Ketinit();// +Setwindow([(-2.5),(2.5)],[(-2.5),(2.5)]); +pi=%pi;//// +fL=["pointoncircle/p001.sce","pointoncircle/p002.sce","pointoncircle/p003.sce","pointoncircle/p004.sce","pointoncircle/p005.sce","pointoncircle/p006.sce","pointoncircle/p007.sce","pointoncircle/p008.sce","pointoncircle/p009.sce","pointoncircle/p010.sce","pointoncircle/p011.sce","pointoncircle/p012.sce","pointoncircle/p013.sce","pointoncircle/p014.sce","pointoncircle/p015.sce","pointoncircle/p016.sce","pointoncircle/p017.sce","pointoncircle/p018.sce","pointoncircle/p019.sce","pointoncircle/p020.sce","pointoncircle/p021.sce","pointoncircle/p022.sce","pointoncircle/p023.sce","pointoncircle/p024.sce","pointoncircle/p025.sce","pointoncircle/p026.sce"]// +Dt=mgetl(fL(1));// +Dt=Dt(1:(size(Dt,1)-1),:)// +for I=2:size(fL,2),Tmp=mgetl(fL(I));N=size(Tmp,1)-1;Tmp1=Tmp(13:N,:);Dt=[Dt;Tmp1],end// +mputl(Dt,'pointoncircle/all.sce')// +exec('pointoncircle/all.sce',-1)// +mputl('||||','resultS.txt')// +quit()// |