Source position: eigh2.pas line 36
procedure balback(
var pd: ArbFloat;
n: ArbInt;
m1: ArbInt;
m2: ArbInt;
k1: ArbInt;
k2: ArbInt;
var pdx: ArbFloat;
rwidth: ArbInt
);