Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/samples/el/tree.ta
blob: 660ddcdad6be250e3e4fbe24f726831f66fed462 (plain)
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
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
(lp0
(I0
S'division'
p1
I82
I93
(lp2
NaNatp3
a(I1
S'hat1'
p4
I510
I28
(lp5
NaI2
atp6
a(I2
S'pendown'
p7
I522
I78
(lp8
I1
aI3
atp9
a(I3
S'if'
p10
I522
I117
(lp11
I2
aI4
aI7
aI9
atp12
a(I4
S'greater'
p13
I602
I127
(lp14
I3
aI5
aI6
aNatp15
a(I5
S'box1'
p16
I634
I136
(lp17
I4
aNatp18
a(I6
(S'number'
p19
S'10'
p20
tp21
I783
I136
(lp22
I4
aNatp23
a(I7
S'hspace'
p24
I617
I182
(lp25
I3
aI8
atp26
a(I8
g24
I708
I181
(lp27
I7
aI36
atp28
a(I9
S'storeinbox2'
p29
I522
I232
(lp30
I3
aI10
aI12
atp31
a(I10
S'random'
p32
I596
I230
(lp33
I9
aI11
aI61
aNatp34
a(I11
(g19
S'0'
p35
tp36
I624
I249
(lp37
I10
aNatp38
a(I12
g10
I522
I286
(lp39
I9
aI13
aI15
aNatp40
a(I13
S'equal'
p41
I602
I296
(lp42
I12
aI14
aI58
aNatp43
a(I14
S'box2'
p44
I634
I305
(lp45
I13
aNatp46
a(I15
S'penup'
p47
I617
I360
(lp48
I12
aI16
atp49
a(I16
S'forward'
p50
I617
I399
(lp51
I15
aI17
aI20
atp52
a(I17
g16
I691
I408
(lp53
I16
aI18
atp54
a(I18
g1
I784
I400
(lp55
I17
aI19
atp56
a(I19
(g19
S'2'
p57
tp58
I823
I408
(lp59
I18
aNatp60
a(I20
S'setcolor'
p61
I617
I438
(lp62
I16
aI21
aI22
atp63
a(I21
(g19
S'40'
p64
tp65
I691
I455
(lp66
I20
aNatp67
a(I22
S'setpensize'
p68
I617
I492
(lp69
I20
aI23
aI24
atp70
a(I23
(g19
S'20'
p71
tp72
I691
I509
(lp73
I22
aNatp74
a(I24
g50
I617
I546
(lp75
I22
aI25
aI26
atp76
a(I25
(g19
S'1'
p77
tp78
I691
I555
(lp79
I24
aNatp80
a(I26
g7
I617
I585
(lp81
I24
aI27
atp82
a(I27
S'back'
p83
I617
I624
(lp84
I26
aI28
aI29
atp85
a(I28
(g19
g77
tp86
I691
I633
(lp87
I27
aNatp88
a(I29
g61
I617
I663
(lp89
I27
aI30
aI31
atp90
a(I30
(g19
S'10'
p91
tp92
I691
I680
(lp93
I29
aNatp94
a(I31
g68
I617
I717
(lp95
I29
aI32
aI33
atp96
a(I32
(g19
S'5'
p97
tp98
I691
I734
(lp99
I31
aNatp100
a(I33
g47
I617
I771
(lp101
I31
aI34
atp102
a(I34
g83
I617
I810
(lp103
I33
aI35
aNatp104
a(I35
g16
I691
I819
(lp105
I34
aI59
atp106
a(I36
g24
I799
I180
(lp107
I8
aI37
atp108
a(I37
g50
I890
I188
(lp109
I36
aI38
aI39
atp110
a(I38
g16
I964
I197
(lp111
I37
aNatp112
a(I39
S'storeinbox1'
p113
I890
I227
(lp114
I37
aI40
aI43
atp115
a(I40
g16
I964
I244
(lp116
I39
aI41
atp117
a(I41
g1
I1057
I236
(lp118
I40
aI42
atp119
a(I42
(g19
S'1.5'
p120
tp121
I1096
I244
(lp122
I41
aNatp123
a(I43
S'right'
p124
I890
I281
(lp125
I39
aI44
aI45
atp126
a(I44
(g19
S'30'
p127
tp128
I964
I290
(lp129
I43
aNatp130
a(I45
S'stack1'
p131
I890
I320
(lp132
I43
aI46
atp133
a(I46
S'left'
p134
I890
I359
(lp135
I45
aI47
aI48
atp136
a(I47
(g19
S'60'
p137
tp138
I964
I368
(lp139
I46
aNatp140
a(I48
g131
I890
I398
(lp141
I46
aI49
atp142
a(I49
g124
I890
I437
(lp143
I48
aI50
aI51
atp144
a(I50
(g19
S'30'
p145
tp146
I964
I446
(lp147
I49
aNatp148
a(I51
g113
I890
I476
(lp149
I49
aI52
aI55
atp150
a(I52
g16
I964
I493
(lp151
I51
aI53
atp152
a(I53
S'product'
p153
I1057
I485
(lp154
I52
aI54
atp155
a(I54
(g19
S'1.5'
p156
tp157
I1096
I493
(lp158
I53
aNatp159
a(I55
g47
I890
I530
(lp160
I51
aI56
atp161
a(I56
g83
I890
I569
(lp162
I55
aI57
aNatp163
a(I57
g16
I964
I578
(lp164
I56
aNatp165
a(I58
(g19
g35
tp166
I783
I305
(lp167
I13
aNatp168
a(I59
g1
I784
I811
(lp169
I35
aI60
atp170
a(I60
(g19
g57
tp171
I823
I819
(lp172
I59
aNatp173
a(I61
(g19
g57
tp174
I746
I249
(lp175
I10
aNatp176
a(I62
S'clean'
p177
I297
I88
(lp178
NaI63
atp179
a(I63
S'setxy'
p180
I297
I127
(lp181
I62
aI64
aI65
aI66
atp182
a(I64
(g19
g35
tp183
I371
I136
(lp184
I63
aNatp185
a(I65
(g19
S'-400'
p186
tp187
I371
I173
(lp188
I63
aNatp189
a(I66
g113
I297
I203
(lp190
I63
aI67
aI68
atp191
a(I67
(g19
S'300'
p192
tp193
I371
I220
(lp194
I66
aNatp195
a(I68
g61
I297
I257
(lp196
I66
aI69
aI70
atp197
a(I69
(g19
S'10'
p198
tp199
I371
I274
(lp200
I68
aNatp201
a(I70
g131
I297
I311
(lp202
I68
aNatp203
a(I-1
S'turtle'
p204
F-8.5265128291212022e-14
F-400.0
F0.0
F10.0
I50
F5.0
tp205
a.