Changeset 2664 for trunk/LMDZ.GENERIC/libf/phystd/inifis_mod.F90

Timestamp:

Apr 21, 2022, 9:21:48 AM (3 years ago)

Author:

aslmd

Message:

Adds an abort in inifis to avoid using wrong cpp_mugaz_mode options in 1d

File:

• trunk/LMDZ.GENERIC/libf/phystd/inifis_mod.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/inifis_mod.F90

@@ -1030 +1030 @@
         write(*,*)'    !!!!! Be aware that having different values for cpp and mugaz in the dynamics and physics'
         write(*,*)'    in 3D can result in very pathological behavior. You have been warned !!!!!'
+      else if ((cpp_mugaz_mode == 0).and.(is_master).and.(ngrid==1)) then
+        ! for this specific 1D error we will remove run.def before aborting JL22
+        call system("rm -rf run.def")
+        call abort_physic(rname,"cpp_mugaz_mode must be >= 1 in 1d",1)
      endif