Changeset 5667 for LMDZ6/trunk/libf
- Timestamp:
- May 21, 2025, 11:04:16 AM (2 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/radlwsw_m.F90
r5666 r5667 680 680 ! 681 681 test_iflag_rrtm: IF (iflag_rrtm == 0) THEN ! remettre 0 juste pour tester l'ancien rayt via rrtm 682 ! 682 ! {{{ 683 683 !--- Mise a zero des tableaux output du rayonnement LW-AR4 ---------- 684 684 DO k = 1, kflev+1 … … 801 801 ENDDO 802 802 ENDDO 803 ! 803 ! }}} 804 804 ELSE IF (iflag_rrtm == 1) then test_iflag_rrtm 805 805 #ifdef CPP_RRTM
Note: See TracChangeset
for help on using the changeset viewer.