Author: miguel_tremblay
Date: Fri Sep 16 15:11:23 2016
New Revision: 399
URL: http://svn.gna.org/viewcvs/metro?rev=399&view=rev
Log:
Typo corrected. See bug #25066:
https://gna.org/bugs/index.php?25066
Modified:
metro/trunk/src/model/grille.f
Modified: metro/trunk/src/model/grille.f
URL:
http://svn.gna.org/viewcvs/metro/metro/trunk/src/model/grille.f?rev=399&r1=398&r2=399&view=diff
==============================================================================
--- metro/trunk/src/model/grille.f (original)
+++ metro/trunk/src/model/grille.f Fri Sep 16 15:11:23 2016
@@ -166,7 +166,7 @@
iref = int( ZONES(NZONE) / DY )
DO j=1,iref
* Grid of the flux layers
- dpFluxDepth = j * DY
+ dpFluxDepth(j) = j * DY
* Grid of temperature layers
dpTemperatureDepth(j) = ( real(j)-0.5 ) * DY
* Derivate on the flux layers
_______________________________________________
Metro-commits mailing list
Metro-commits@gna.org
https://mail.gna.org/listinfo/metro-commits
