#lang reader "lang.rkt"
cpy 41 a
inc a
inc a
dec a
jnz a 2
dec a