Ignore:
Timestamp:
Mar 25, 2016, 3:48:06 PM (9 years ago)
Author:
fhourdin
Message:

Correction d'un bug de non initialisation d'un tableau qui faisait
planter le modèle en haute résolution sur 8 thread. Bug identifié
par Yann Meurdesoif.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/trunk/libf/phylmd/cv3p_mixing.F90

    r2397 r2478  
    130130        Qent(i, k, j) = rr(i, j)
    131131        uent(i, k, j) = u(i, j)
    132         vent(i, k, j) = v(i, j)
     132        vent(i, k, j) = v(i, j) 
    133133        elij(i, k, j) = 0.0
    134134        hent(i, k, j) = 0.0
     
    143143  Sij(1:ncum, 1:nd, 1:nd) = 0.0
    144144!AC!
     145!ym
     146  Sigij(1:ncum, 1:nd, 1:nd) = 0.0
     147!ym
    145148
    146149!jyg!  DO k = 1, ntra
Note: See TracChangeset for help on using the changeset viewer.