// Should print A
include "chrout.60p"
define main routine
inputs a
trashes a, z, n
{
ld a, 65
call chrout
}