{************************************************}
{                                                }
{   Turbo Pascal for Windows                     }
{   Demo DLL interface unit                      }
{   Copyright (c) 1991 by Borland International  }
{                                                }
{************************************************}

unit Math;

interface

function Power(X, Y: Real): Real;
function Payments(Period, Interest, Term, Principal: Real): Real;
function Principals(Payment, Period, Interest, Term: Real): Real;
procedure WriteError(Window: Word; ErrorMessage: PChar);

implementation

function Power;         external 'MathDll' index 1;
function Payments;      external 'MathDll' index 2;
function Principals;    external 'MathDll' index 3;
procedure WriteError;   external 'MathDll' index 4;

end.