Added finance_function.pas.