samples/square.ta


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68

(lp0
(I0
S'repeat'
p1
I853
I277
(lp2
NaI1
aI2
aNatp3
a(I1
(S'number'
p4
I4
tp5
I939
I286
(lp6
I0
aNatp7
a(I2
S'forward'
p8
I948
I326
(lp9
I0
aI3
aI4
atp10
a(I3
(g4
I200
tp11
I1022
I335
(lp12
I2
aNatp13
a(I4
S'right'
p14
I948
I365
(lp15
I2
aI5
aNatp16
a(I5
(g4
I90
tp17
I1022
I374
(lp18
I4
aNatp19
a(I-1
S'turtle'
p20
F2.8421709430404007e-14
F-3.6738190614671318e-14
F0.0
I0
I50
I5
tp21
a.