Changeset 3161


Ignore:
Timestamp:
Jan 22, 2018, 4:06:43 PM (6 years ago)
Author:
jyg
Message:

test conv call every step if dtcon > threshold

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/physiq_mod.F90

    r3154 r3161  
    26812681          !  every time step
    26822682          cvpas = cvpas_0
     2683          DO k=1,k_upper_cv
     2684             DO i=1,klon
     2685               IF (d_t_con(i,k) > 6.721 .AND. d_t_con(i,k) < 6.722 .AND.&
     2686                   d_q_con(i,k) > -.0002171 .AND. d_q_con(i,k) < -.0002170) THEN
     2687                     dtcon_multistep_max = 3.
     2688                     dqcon_multistep_max = 0.02
     2689               ENDIF
     2690             ENDDO
     2691          ENDDO
     2692!
    26832693          DO k=1,k_upper_cv
    26842694             DO i=1,klon
Note: See TracChangeset for help on using the changeset viewer.