Index: openacs-4/packages/accounts-finance/tcl/modeling-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/accounts-finance/tcl/modeling-procs.tcl,v
diff -u -r1.23 -r1.24
--- openacs-4/packages/accounts-finance/tcl/modeling-procs.tcl	6 Sep 2010 11:01:41 -0000	1.23
+++ openacs-4/packages/accounts-finance/tcl/modeling-procs.tcl	14 Nov 2014 18:20:17 -0000	1.24
@@ -7,6 +7,10 @@
 
 namespace eval acc_fin {}
 
+# add double( ) to any variable that needs 17 digit precision
+# see http://wiki.tcl.tk/1650 which recommends going all the way: set ::tcl_precision 17
+# but that is not in the context of a server.
+
 ad_proc -private acc_fin::qaf_id_new {
 } {
     returns a unique id from qaf_id_sequence