RP>Also pascal doesn't have a Log base 10 function either. Here are a
couple RP>simple functions that I have written.
RP>function log(number : real):real;
RP>begin
RP> log:=ln(number) / ln(10);
RP>end;
RP>function power( Man : Real; Pwr : Real ) : Real;
RP>begin
RP> Power := Exp( Ln( Man ) * Pwr );
RP>end;
RP>Use them in good health.
Both of these are available in Delphi 2.0.
---
* QMPro 1.52 * "The universe is NOT so badly designed!" - Picard to Q
--- WILDMAIL!/WC v4.12
---------------
* Origin: GC-BBS! (1:226/810.0)
|