Source position: _crw_funmin.pas line 598
procedure ScaleFun(
var Source: Double;
var Dest: Double;
var f: Double;
Inverse: Boolean
);