1
#N canvas 163 334 444 177 10;
2
#X text 364 147 j#|@2002;
3
#X obj 386 127 SMLib-help;
5
#X floatatom 66 81 5 0 0 0 - - -;
6
#X text 78 134 default argument is 1;
7
#X text 10 6 vpow computes y(i)=x(i)^a;
9
#X text 79 117 a zero becomes one;
11
#X msg 15 33 0.01 0.5 1 1.5 2 2.5 3 3.5 0;
12
#X text 27 56 if (x(i)<=0) then y(i)=-1000;