$SPAD/src/input e01saf.input

The Axiom Team December 3, 2016

Abstract

Contents

2

1 License

— license —

--Copyright The Numerical Algorithms Group Limited 1994.

———-

— * —

\getchunk{license}
)clear all
showArrayValues true
showScalarValues true
m:=30
x:Matrix SF:=
 [[11.16 ,12.85 ,19.85 ,19.72 ,15.91 , 0.00 ,20.87 ,_
    3.45 ,14.26 ,17.43 ,22.80  ,7.58 ,25.00 , 0.00 ,_
    9.66 , 5.22 ,17.25 ,25.00 ,12.13 ,22.23 ,11.52 ,_
   15.20 , 7.54 ,17.32 , 2.14 , 0.51 ,22.69 , 5.47 ,21.67 ,3.31 ]]
y:Matrix SF:=
 [[1.24 ,3.06 ,10.72 ,1.39 ,7.74 ,20.00 ,20.00 ,12.78 ,_
   17.87 ,3.46 ,12.39 ,1.98 ,11.87 ,0.00 ,20.00 ,14.66 ,_
   19.57 ,3.87 ,10.79 ,6.21 ,8.53 ,0.0 ,10.69 ,13.78 ,_
   15.03 ,8.37 ,19.63 ,17.13 ,14.36 ,0.33 ]]
f:Matrix SF:=
 [[22.15 ,22.11 ,7.97 ,16.83 ,15.30 ,34.60 ,5.74 ,41.24 ,_
   10.74 ,18.60 ,5.47 ,29.87 ,4.40 ,58.20 ,4.73 ,40.36 ,_
    6.43 ,8.74 ,13.71 ,10.25 ,15.74 ,21.60 ,19.31 ,12.11 ,_
    53.10 ,49.43 ,3.25 ,28.63 ,5.52 ,44.08 ]]
result:=resa:=e01saf(m,x,y,f,-1)
px:=7.71
py:=3.45
resb:=e01sbf(m,x,y,f,resa."triang",resa."grads",px,py,-1)
resb."pf"

———-

References^{[1] nothing}

4