Source position: inv.pas line 35
procedure invgpd(
n: ArbInt;
rwidth: ArbInt;
var ai: ArbFloat;
var term: ArbInt
);