Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/samples/squares.ta
diff options
context:
space:
mode:
Diffstat (limited to 'samples/squares.ta')
-rwxr-xr-xsamples/squares.ta161
1 files changed, 85 insertions, 76 deletions
diff --git a/samples/squares.ta b/samples/squares.ta
index 4886245..e8e86f0 100755
--- a/samples/squares.ta
+++ b/samples/squares.ta
@@ -1,114 +1,123 @@
(lp0
(I0
-S'repeat'
+S'clean'
p1
-I765
-I94
+I261
+I118
(lp2
NaI1
-aI2
-aNatp3
+atp3
a(I1
-(S'number'
+S'repeat'
p4
-I36
-tp5
-I851
-I103
-(lp6
-I0
-aNatp7
-a(I2
-g1
-I860
-I143
-(lp8
+I261
+I157
+(lp5
I0
+aI2
aI3
-aI4
-aI8
-atp9
+aNatp6
+a(I2
+(S'number'
+p7
+I36
+tp8
+I347
+I166
+(lp9
+I1
+aNatp10
a(I3
-(g4
-I4
-tp10
-I946
-I152
+g4
+I356
+I206
(lp11
-I2
-aNatp12
+I1
+aI4
+aI5
+aI9
+atp12
a(I4
-S'forward'
-p13
-I955
-I192
+(g7
+I4
+tp13
+I442
+I215
(lp14
-I2
-aI5
-aI6
-atp15
+I3
+aNatp15
a(I5
-(g4
-S'300'
+S'forward'
p16
-tp17
-I1029
-I201
-(lp18
-I4
-aNatp19
+I451
+I255
+(lp17
+I3
+aI6
+aI7
+atp18
a(I6
-S'right'
-p20
-I955
-I231
+(g7
+S'300'
+p19
+tp20
+I525
+I264
(lp21
-I4
-aI7
+I5
aNatp22
a(I7
-(g4
-I90
-tp23
-I1029
-I240
+S'right'
+p23
+I451
+I294
(lp24
-I6
+I5
+aI8
aNatp25
a(I8
-S'vspace'
-p26
-I860
-I233
+(g7
+I90
+tp26
+I525
+I303
(lp27
-I2
-aI9
-atp28
+I7
+aNatp28
a(I9
-g20
-I860
-I302
-(lp29
-I8
+S'vspace'
+p29
+I356
+I296
+(lp30
+I3
aI10
-aNatp30
+atp31
a(I10
-(g4
-I10
-tp31
-I934
-I311
+g23
+I356
+I365
(lp32
I9
+aI11
aNatp33
+a(I11
+(g7
+I10
+tp34
+I430
+I374
+(lp35
+I10
+aNatp36
a(I-1
S'turtle'
-p34
+p37
F-2.8421709430404007e-13
F-1.0587086762825493e-12
F0.0
I0
I50
I5
-tp35
+tp38
a. \ No newline at end of file