summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketcindy/ketlib/ketpicscifiles6/Roundstr.sci
blob: d14f3b3a5a048f66c7efbd54cf01d4df4e569b01 (plain)
1
2
3
4
5
6
7
//  10.11.04

function Out=Roundstr(X,Ni,Nf)
  Na=Ni+1+Nf;
  Fmt='%'+string(Na)+'.'+string(Nf)+'f';
  Out=sprintf(Fmt,X);
endfunction;