Source position: iom.pas line 41
procedure iomwrm(
var out: text;
var a: ArbFloat;
m: ArbInt;
n: ArbInt;
rwidth: ArbInt;
form: ArbInt
);