main module testexp

use	textio

for i := 0 to 31 do
    out_string (tty, "2**")
    out_integer (tty, i)
    out_string (tty, "=")
    out_integer (tty, 2**i)
    out_record (tty)
endfor

endmodule