Ignore:
Timestamp:
Jun 25, 2021, 12:56:39 PM (3 years ago)
Author:
crisi
Message:

Remove an isotopic test that is too stringent. With this correction, the isotopic BENCH works even with isoverif

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90

    r3940 r3949  
    25752575              call iso_verif_positif(deltaD(xt_ancien(iso_eau,i,k) &
    25762576     &            /q_ancien(i,k))+400.0,'physiq 2045b')
    2577               call iso_verif_egalite_choix(d_xt_dyn(iso_hdo,i,k) &
    2578      &          /tnat(iso_hdo),d_q_dyn(i,k),'physiq 2045c',1e-7,0.4)
     2577!              call iso_verif_egalite_choix(d_xt_dyn(iso_hdo,i,k) &
     2578!     &          /tnat(iso_hdo),d_q_dyn(i,k),'physiq 2045c',1e-7,0.4)
    25792579              endif
    25802580             enddo
Note: See TracChangeset for help on using the changeset viewer.