Changeset 776 for trunk/LMDZ.COMMON/libf/dyn3dpar/exner_hyb.F

Timestamp:

Sep 7, 2012, 2:49:58 PM (12 years ago)

Author:

emillour

Message:

Common dynamics: updates to keep up with LMDZ5 Earth (rev 1649)
See file "DOC/chantiers/commit_importants.log" for details.
EM

File:

• trunk/LMDZ.COMMON/libf/dyn3dpar/exner_hyb.F (modified) (1 diff)

trunk/LMDZ.COMMON/libf/dyn3dpar/exner_hyb.F

@@ -56 +56 @@
       ! Sanity check
       if (firstcall) then
-        ! check that vertical discretization is compatible
-        ! with this routine
-        if (disvert_type.ne.1) then
-          call abort_gcm(modname,
-     &     "this routine should only be called if disvert_type==1",42)
-        endif
-        
         ! sanity checks for Shallow Water case (1 vertical layer)
         if (llm.eq.1) then