Changeset 20 for trunk/src/readwind_gfs.f90

Timestamp:

Dec 23, 2013, 6:23:38 PM (10 years ago)

Author:

igpis

Message:

move version 9.1.8 form branches to trunk. Contributions from HSO, saeck, pesei, NIK, RT, XKF, IP and others

File:

• trunk/src/readwind_gfs.f90 (modified) (1 diff)

trunk/src/readwind_gfs.f90

@@ -703 +703 @@
   endif
 
-
   if(iumax.ne.nuvz) stop 'READWIND: NUVZ NOT CONSISTENT'
   if(iumax.ne.nwz)    stop 'READWIND: NWZ NOT CONSISTENT'