<p><b>dwj07@fsu.edu</b> 2011-10-05 15:12:32 -0600 (Wed, 05 Oct 2011)</p><p><br>
        -- BRANCH COMMIT --<br>
<br>
        Extending the digits in calls.<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/performance/src/framework/module_timer.F
===================================================================
--- branches/ocean_projects/performance/src/framework/module_timer.F        2011-10-04 19:14:07 UTC (rev 1054)
+++ branches/ocean_projects/performance/src/framework/module_timer.F        2011-10-05 21:12:32 UTC (rev 1055)
@@ -225,7 +225,7 @@
               percent = timer_ptr%total_time/total_ptr%total_time
             endif
 
-            write(*,'(i2, 1x, a35, f15.5, i7, 3f15.5, f8.2)') timer_ptr%levels, tname(1:timer_ptr%levels)//timer_ptr%timer_name, timer_ptr%total_time, timer_ptr%calls, timer_ptr%min_time, timer_ptr%max_time, timer_ptr%avg_time, percent
+            write(*,'(i2, 1x, a35, f15.5, i10, 3f15.5, f8.2)') timer_ptr%levels, tname(1:timer_ptr%levels)//timer_ptr%timer_name, timer_ptr%total_time, timer_ptr%calls, timer_ptr%min_time, timer_ptr%max_time, timer_ptr%avg_time, percent
             return
           endif
 
@@ -245,8 +245,8 @@
             stop
           end if
 
-          write(*,'(3x, a10, 24x, a15, a10, a10, a15, a15, a15)') 'timer_name', 'total', 'calls', 'min', 'max', 'avg', 'percent'
-          write(*,'(i2, 1x, a35, f15.5, i7, 3f15.5)') total%levels, total%timer_name, total%total_time, total%calls, total%min_time, total%max_time, total%avg_time, percent
+          write(*,'(3x, a10, 24x, a15, a10, a13, a15, a15, a15)') 'timer_name', 'total', 'calls', 'min', 'max', 'avg', 'percent'
+          write(*,'(i2, 1x, a35, f15.5, i10, 3f15.5)') total%levels, total%timer_name, total%total_time, total%calls, total%min_time, total%max_time, total%avg_time, percent
 
           current =&gt; all_timers
 

</font>
</pre>