From eba6e303eaf72d59d988a248c6da6f6e436543cf Mon Sep 17 00:00:00 2001
From: Walter Bender <walter@walter-laptop.(none)>
Date: Sat, 29 Aug 2009 15:32:58 +0000
Subject: converting samples to json

---
(limited to 'samples/squares.ta')

diff --git a/samples/squares.ta b/samples/squares.ta
index e8e86f0..39b9608 100644
--- a/samples/squares.ta
+++ b/samples/squares.ta
@@ -1,123 +1 @@
-(lp0
-(I0
-S'clean'
-p1
-I261
-I118
-(lp2
-NaI1
-atp3
-a(I1
-S'repeat'
-p4
-I261
-I157
-(lp5
-I0
-aI2
-aI3
-aNatp6
-a(I2
-(S'number'
-p7
-I36
-tp8
-I347
-I166
-(lp9
-I1
-aNatp10
-a(I3
-g4
-I356
-I206
-(lp11
-I1
-aI4
-aI5
-aI9
-atp12
-a(I4
-(g7
-I4
-tp13
-I442
-I215
-(lp14
-I3
-aNatp15
-a(I5
-S'forward'
-p16
-I451
-I255
-(lp17
-I3
-aI6
-aI7
-atp18
-a(I6
-(g7
-S'300'
-p19
-tp20
-I525
-I264
-(lp21
-I5
-aNatp22
-a(I7
-S'right'
-p23
-I451
-I294
-(lp24
-I5
-aI8
-aNatp25
-a(I8
-(g7
-I90
-tp26
-I525
-I303
-(lp27
-I7
-aNatp28
-a(I9
-S'vspace'
-p29
-I356
-I296
-(lp30
-I3
-aI10
-atp31
-a(I10
-g23
-I356
-I365
-(lp32
-I9
-aI11
-aNatp33
-a(I11
-(g7
-I10
-tp34
-I430
-I374
-(lp35
-I10
-aNatp36
-a(I-1
-S'turtle'
-p37
-F-2.8421709430404007e-13
-F-1.0587086762825493e-12
-F0.0
-I0
-I50
-I5
-tp38
-a.
\ No newline at end of file
+[[0, "clean", 261, 118, [null, 1]], [1, "repeat", 261, 157, [0, 2, 3, null]], [2, ["number", 36], 347, 166, [1, null]], [3, "repeat", 356, 206, [1, 4, 5, 9]], [4, ["number", 4], 442, 215, [3, null]], [5, "forward", 451, 255, [3, 6, 7]], [6, ["number", "300"], 525, 264, [5, null]], [7, "right", 451, 294, [5, 8, null]], [8, ["number", 90], 525, 303, [7, null]], [9, "vspace", 356, 296, [3, 10]], [10, "right", 356, 365, [9, 11, null]], [11, ["number", 10], 430, 374, [10, null]], [-1, "turtle", -2.8421709430404007e-13, -1.0587086762825493e-12, 0.0, 0, 50, 5]]
\ No newline at end of file
--
cgit v0.9.1