Index: openacs-4/packages/accounts-finance/tcl/test/finance-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/accounts-finance/tcl/test/finance-test-procs.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/accounts-finance/tcl/test/finance-test-procs.tcl 21 May 2010 23:36:33 -0000 1.3 +++ openacs-4/packages/accounts-finance/tcl/test/finance-test-procs.tcl 22 May 2010 00:17:17 -0000 1.4 @@ -21,6 +21,6 @@ aa_equals "Check FV simple interest" [acc_fin::fvsimple $cashflow3 $reinvest_rate] "7600.0" aa_equals "Check NPV" [acc_fin::npv $cashflow1 $discount_rate] "0.000550114657813" aa_equals "Check IRR" [acc_fin::irr $cashflow1] $discount_rate - aa_equals "Check MIRR" [acc_fin::mirr $cashflow1 $finance_rate $reinvest_rate] "0.1791" + aa_equals "Check MIRR" [acc_fin::mirr $cashflow1 $finance_rate $reinvest_rate] "0.179085686035" } }