summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Calcfun.sci
blob: 30c646a68fb159462df5e829854ac60f672a39df (plain)
1
2
3
4
5
6
7
8
9
// 08.05.30

function PL=Calcfun(Siki,Namae,Atai)
  execstr(Namae+'=Atai');
  Tmp='XY='+Siki;
  execstr(Tmp);
  PL=[Atai(:,1),XY(:,2)];  
endfunction