/usr/share/paw-demos/pawex8.kumac is in paw-demos 1:2.14.04.dfsg.2-9.1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | MACRO PAWEX8 1=8
**************************************************************************
* PAW TUTORIAL EXAMPLE 8 *
* Plot a one-dimensional function and loop *
* The Macro parameter is the number of plot to draw on the picture *
* The defaults is 8 *
**************************************************************************
Exec ALLDEF
SET DMOD 1
SET XTIC 0.0001
SET YTIC 0.0001
SET Xval 100.
SET Yval 100.
OPT utit
FUN/PLOT X*SIN(X) -10 10
FUN/PLOT X*COS(X)*SIN(X) -10 10 S
A=[1]-1
LOOP:
FUN/PLOT X*SIN(X)*[A]/[1] -10 10 S
FUN/PLOT X*COS(X)*SIN(X)*[A]/[1] -10 10 S
A=[A]-1
IF [A]>0 GOTO LOOP
opt htit
RETURN
|