diff options
Diffstat (limited to 'texmf-dist/scripts/ketpic/ketlib/ketpic2escifiles6/Dividetable.sci')
-rw-r--r-- | texmf-dist/scripts/ketpic/ketlib/ketpic2escifiles6/Dividetable.sci | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/texmf-dist/scripts/ketpic/ketlib/ketpic2escifiles6/Dividetable.sci b/texmf-dist/scripts/ketpic/ketlib/ketpic2escifiles6/Dividetable.sci new file mode 100644 index 00000000..36531da2 --- /dev/null +++ b/texmf-dist/scripts/ketpic/ketlib/ketpic2escifiles6/Dividetable.sci @@ -0,0 +1,9 @@ +// 13.05.03 + +function Out=Dividetable(Tb) + G=Tb(1); + Gw=G(1); + Gt=Mixsub(Tb(2),G); + Gy=Mixsub(Tb(3),G); + Out=list(Gw,Gt,Gy) +endfunction; |