// Should print AB include "chrout.60p" vector routine trashes a, z, n print define printa routine trashes a, z, n { ld a, 65 call chrout } define printb routine trashes a, z, n { ld a, 66 call chrout } define main routine trashes print, a, z, n { copy printa, print call print copy printb, print call print }