Changeset 4066


Ignore:
Timestamp:
Jan 27, 2022, 12:11:53 PM (3 years ago)
Author:
Laurent Fairhead
Message:

Added missing initialisation
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/physiq_mod.F90

    r4062 r4066  
    22442244          IF (nqo.eq.2) THEN
    22452245             qs_seri(i,k) = 0.
     2246             rneb_seri(i,k) = 0.
    22462247          ELSE IF (nqo.eq.3) THEN
    22472248             qs_seri(i,k) = qx(i,k,isol)
     2249             rneb_seri(i,k) = 0.
    22482250          ELSE IF (nqo.eq.4) THEN
    22492251             qs_seri(i,k) = qx(i,k,isol)
Note: See TracChangeset for help on using the changeset viewer.