(a3:define-set (0 0)
(a3:call-sub 0)
) ;; end of define-set 
(a3:define-sub (0 0)
(a3:eval-noeffect (a3:assign-word 1503 3)
)
(a3:eval-noeffect (a3:assign-word 1504 0)
)
(a3:eval-noeffect (a3:assign-word 0 0)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 100)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 0)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 101)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 1)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 102)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 1)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 103)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 1)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 104)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 1)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 105)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 1)
)
(a3:eval-noeffect (a3:assign-word 1 4)
)
(a3:eval-noeffect (a3:assign-word 2 106)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 2)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 110)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 2)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 111)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 2)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 112)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 2)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 113)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 3)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 115)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 3)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 116)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 3)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 117)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 3)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 118)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 3)
)
(a3:eval-noeffect (a3:assign-word 1 4)
)
(a3:eval-noeffect (a3:assign-word 2 119)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 4)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 120)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 4)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 121)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 4)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 122)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 4)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 123)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 4)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 120)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 4)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 121)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 4)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 122)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 4)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 123)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 5)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 130)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 5)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 131)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 5)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 132)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 5)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 133)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 5)
)
(a3:eval-noeffect (a3:assign-word 1 4)
)
(a3:eval-noeffect (a3:assign-word 2 134)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 6)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 140)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 6)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 141)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 6)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 142)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 6)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 143)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 6)
)
(a3:eval-noeffect (a3:assign-word 1 4)
)
(a3:eval-noeffect (a3:assign-word 2 144)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 7)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 150)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 7)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 151)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 7)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 152)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 7)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 153)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 7)
)
(a3:eval-noeffect (a3:assign-word 1 4)
)
(a3:eval-noeffect (a3:assign-word 2 154)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 7)
)
(a3:eval-noeffect (a3:assign-word 1 5)
)
(a3:eval-noeffect (a3:assign-word 2 155)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 7)
)
(a3:eval-noeffect (a3:assign-word 1 6)
)
(a3:eval-noeffect (a3:assign-word 2 156)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 8)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 160)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 8)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 161)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 8)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 162)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 8)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 163)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 8)
)
(a3:eval-noeffect (a3:assign-word 1 4)
)
(a3:eval-noeffect (a3:assign-word 2 164)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 8)
)
(a3:eval-noeffect (a3:assign-word 1 5)
)
(a3:eval-noeffect (a3:assign-word 2 165)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 8)
)
(a3:eval-noeffect (a3:assign-word 1 6)
)
(a3:eval-noeffect (a3:assign-word 2 166)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 9)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 170)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 9)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 171)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 9)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 172)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 9)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 173)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 10)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 180)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 10)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 181)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 10)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 182)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 11)
)
(a3:eval-noeffect (a3:assign-word 1 0)
)
(a3:eval-noeffect (a3:assign-word 2 190)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 11)
)
(a3:eval-noeffect (a3:assign-word 1 1)
)
(a3:eval-noeffect (a3:assign-word 2 191)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 11)
)
(a3:eval-noeffect (a3:assign-word 1 2)
)
(a3:eval-noeffect (a3:assign-word 2 192)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
(a3:eval-noeffect (a3:assign-word 0 11)
)
(a3:eval-noeffect (a3:assign-word 1 3)
)
(a3:eval-noeffect (a3:assign-word 2 193)
)
(a3:eval-noeffect (a3:assign-word 3 0)
)
(a3:call-sub 1)
) ;; end of define-sub 
(a3:define-sub (1 4)
(a3:eval-noeffect (a3:assign-local 0 0))
(a3:eval-noeffect (a3:assign-local 1 0))
(a3:eval-noeffect (a3:assign-local 2 0))
(a3:eval-noeffect (a3:assign-local 3 0))
(a3:eval-noeffect (a3:assign-local 0 (a3:idref-word 0))
)
(a3:eval-noeffect (a3:assign-local 1 (a3:idref-word 1))
)
(a3:eval-noeffect (a3:assign-local 2 (a3:idref-word 2))
)
(a3:eval (a3:bop-great-equal? (a3:idref-local 0) (a3:idref-word 1502)))
(a3:ifnot 2)
;; begin then-clause 
(a3:eval-noeffect (a3:assign-word 1502 (a3:bop-add (a3:idref-local 0) 1))
)
;; end then-clause 
(a3:label 2)
;; end of if statement 
(a3:eval (a3:bop-great? (a3:idref-local 1) (a3:idref-word (a3:bop-add 1511 (a3:bop-mul (a3:idref-local 0) (a3:idref-word 1503))))))
(a3:ifnot 3)
;; begin then-clause 
(a3:eval-noeffect (a3:assign-word (a3:bop-add 1511 (a3:bop-mul (a3:idref-local 0) (a3:idref-word 1503))) (a3:idref-local 1))
)
;; end then-clause 
(a3:label 3)
;; end of if statement 
(a3:call-user-func 4130 1 (a3:idref-local 2))
(a3:eval (a3:idref-reflag))
(a3:ifnot 4)
;; begin then-clause 
(a3:eval-noeffect (a3:assign-word (a3:bop-add 1512 (a3:bop-mul (a3:idref-local 0) (a3:idref-word 1503))) 1)
)
;; end then-clause 
(a3:label 4)
;; end of if statement 
(a3:eval-noeffect (a3:assign-word (a3:bop-add 2200 (a3:bop-mul (a3:idref-word 1504) 4)) (a3:idref-local 0))
)
(a3:eval-noeffect (a3:assign-word (a3:bop-add 2201 (a3:bop-mul (a3:idref-word 1504) 4)) (a3:idref-local 1))
)
(a3:eval-noeffect (a3:assign-word (a3:bop-add 2202 (a3:bop-mul (a3:idref-word 1504) 4)) (a3:idref-local 2))
)
(a3:eval-noeffect (a3:pre-incr-word 1504)
)
) ;; end of define-sub 
