- Timestamp:
- 2020-03-23T18:21:59+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r12563_ASINTER-06_ABL_improvement/src/ABL/ablrst.F90
r11945 r12588 117 117 CALL iom_rstput( iter, nitrst, numraw, 'avm_abl', avm_abl(:,:,: ) ) 118 118 CALL iom_rstput( iter, nitrst, numraw, 'avt_abl', avt_abl(:,:,: ) ) 119 CALL iom_rstput( iter, nitrst, numraw, 'mxl_abl', mxl_abl(:,:,: ) )120 119 CALL iom_rstput( iter, nitrst, numraw, 'pblh', pblh(:,: ) ) 121 120 ! … … 172 171 CALL iom_get( numrar, jpdom_autoglo, 'avm_abl', avm_abl(:,:,: ) ) 173 172 CALL iom_get( numrar, jpdom_autoglo, 'avt_abl', avt_abl(:,:,: ) ) 174 CALL iom_get( numrar, jpdom_autoglo, 'mxl_abl', mxl_abl(:,:,: ) )175 173 CALL iom_get( numrar, jpdom_autoglo, 'pblh', pblh(:,: ) ) 176 174 CALL iom_delay_rst( 'READ', 'ABL', numrar ) ! read only abl delayed global communication variables
Note: See TracChangeset
for help on using the changeset viewer.