Changeset 4049 for LMDZ6/trunk/libf/dynphy_lonlat

Timestamp:

Dec 17, 2021, 3:54:12 PM (3 years ago)

Author:

Laurent Fairhead

Message:

Typo in modification

File:

• LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0dyn_netcdf.F90 (modified) (1 diff)

LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0dyn_netcdf.F90

@@ -147 +147 @@
 #ifndef INCA
   DO iq=1,nqtot; IF(strLower(tracers(iq)%name)=="o3") EXIT; END DO
-  IF(i/=nqtot+1) THEN
+  IF(iq/=nqtot+1) THEN
     CALL regr_lat_time_coefoz
     CALL press_coefoz