<p><b>duda</b> 2009-09-04 11:07:13 -0600 (Fri, 04 Sep 2009)</p><p>Fix bug in RK4 scalar transport: provisional scalar arrays before <br>
fourth intermediate step weren't being computed correctly.<br>
<br>
M module_time_integration.F<br>
</p><hr noshade><pre><font color="gray">Modified: trunk/swmodel/src/module_time_integration.F
===================================================================
--- trunk/swmodel/src/module_time_integration.F        2009-09-03 20:52:12 UTC (rev 44)
+++ trunk/swmodel/src/module_time_integration.F        2009-09-04 17:07:13 UTC (rev 45)
@@ -196,7 +196,7 @@
block % intermediate_step(TEMP) % tracers % array(:,k,iCell) = ( &
block % time_levs(1) % state % h % array(k,iCell) * &
block % time_levs(1) % state % tracers % array(:,k,iCell) + &
- block % intermediate_step(Q3) % tracers % array(:,k,iCell) / 2.0 &
+ block % intermediate_step(Q3) % tracers % array(:,k,iCell) &
) / block % intermediate_step(TEMP) % h % array(k,iCell)
end do
end do
</font>
</pre>