new
prep gen_mailte,mailte#imp,x,g,clean
dimp11 mailte#imp
link11 /mailte
mailte#rel
.stack 2400
.streams 1
.stackseg 6
.name mail
.end
mailte
c mailte#abs,mailtey
destroy mailte#abs