offer op1s
edit poneb01s,op1s
i<itrimp_ornponeas>
ta/%inc/
d1i<itrimp_hostcodes>
a'
d1i<itrimp_tform2s>
m/%constlonglongreal/
e
imp op1s,.null
offer op1s,ecsc64