mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 00:32:24 +00:00
11 lines
245 B
Modula-2
11 lines
245 B
Modula-2
MODULE IFStest;
|
|
|
|
IMPORT IFS;
|
|
|
|
BEGIN
|
|
|
|
IFS.Init (200, 50, 40, 0.0, 0.85, 0.2, -0.15, 0.0, 0.04, -0.26, 0.28, 0.0, -0.04, 0.23, 0.26, 0.16, 0.85, 0.22, 0.24, 0.0, 0.0, 0.0, 0.0, 0.0, 1.6, 1.6, 0.44, 0.01, 0.85, 0.07, 0.07);
|
|
|
|
IFS.Draw
|
|
|
|
END IFStest.
|