* FUNCTION/FUN2 ID UFUNC NCX XMIN XMAX NCY YMIN YMAX [ CHOPT ] zone 2 2 1 FUN2 10 ABS(SIN(X)/X)*(COS(Y)*Y) 40 -6 6 40 -6 6 contour 10 40 0 hi/de 10 fun2 10 x*sin(x)*y*sin(y) 40 -10. 10. 40 -10. 10. CONT h/pl 10 surf4