Changeset 13059


Ignore:
Timestamp:
2020-06-07T21:40:16+02:00 (4 months ago)
Author:
gm
Message:

grid F wrong zlevels

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2020/dev_r12527_Gurvan_ShallowWater/src/SWE/iom.F90

    r13047 r13059  
    218218          CALL iom_set_axis_attr(  "depthv", paxis = gdept_1d ) 
    219219          CALL iom_set_axis_attr(  "depthw", paxis = gdepw_1d ) 
    220           CALL iom_set_axis_attr(  "depthf", paxis = gdepw_1d ) 
     220          CALL iom_set_axis_attr(  "depthf", paxis = gdept_1d ) 
    221221 
    222222          ! ABL 
     
    241241          CALL iom_set_axis_attr(  "depthv", bounds=zw_bnds ) 
    242242          CALL iom_set_axis_attr(  "depthw", bounds=zt_bnds ) 
    243           CALL iom_set_axis_attr(  "depthf", bounds=zt_bnds ) 
     243          CALL iom_set_axis_attr(  "depthf", bounds=zw_bnds ) 
    244244 
    245245          ! ABL 
     
    13971397#if defined key_iomput 
    13981398!!an juste pour compiler xios2.0 
    1399       IF( xios_field_is_active( cdname, at_current_timestep_arg = .TRUE. ) ) THEN 
    1400          z2d(:,:) = 0._wp 
    1401          CALL xios_recv_field( cdname, z2d) 
    1402       ENDIF 
     1399!      IF( xios_field_is_active( cdname, at_current_timestep_arg = .TRUE. ) ) THEN 
     1400!         z2d(:,:) = 0._wp 
     1401!         CALL xios_recv_field( cdname, z2d) 
     1402!      ENDIF 
    14031403!!an  
    14041404#else 
Note: See TracChangeset for help on using the changeset viewer.