Changeset 14017 for NEMO/branches/2020/dev_r13648_ASINTER-04_laurent_bulk_ice/src/ABL

Timestamp:

2020-12-02T16:32:24+01:00 (3 years ago)

Author:

laurent

Message:

Keep up with trunk revision 13999

Location:

NEMO/branches/2020/dev_r13648_ASINTER-04_laurent_bulk_ice/src/ABL

Files:

• ablmod.F90 (modified) (1 diff)
• sbcabl.F90 (modified) (1 diff)

NEMO/branches/2020/dev_r13648_ASINTER-04_laurent_bulk_ice/src/ABL/ablmod.F90

@@ -140 +140 @@
 
       zrough(:,:) = z0_from_Cd( ght_abl(2), pCd_du(:,:) / MAX( pwndm(:,:), 0.5_wp ) ) ! #LB: z0_from_Cd is define in sbc_phy.F90...
-         
+
       !
       !                            !<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

NEMO/branches/2020/dev_r13648_ASINTER-04_laurent_bulk_ice/src/ABL/sbcabl.F90

@@ -378 +378 @@
             &            sf(jp_prec)%fnow(:,:,1) , sf(jp_snow)%fnow(:,:,1),   &
             &            tsk_m, zsen, zlat, zevp                                )
-   
+
          CALL abl_rst_opn( kt )                       ! Open abl restart file (if necessary)
          IF( lrst_abl ) CALL abl_rst_write( kt )      ! -- abl restart file