summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketcindy/ketlib/ketpic2escifiles6/Dividetable.sci
blob: 36531da2eae9da303003775d70b74016306d7ef0 (plain)
1
2
3
4
5
6
7
8
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;