- Timestamp:
- 2020-04-11T15:38:38+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r12558_HPC-08_epico_Extra_Halo/src/OCE/ICB/icbrst.F90
r12472 r12738 123 123 124 124 ! Gridded variables 125 CALL iom_get( ncid, jpdom_auto glo, 'calving' , src_calving )126 CALL iom_get( ncid, jpdom_auto glo, 'calving_hflx', src_calving_hflx )127 CALL iom_get( ncid, jpdom_auto glo, 'stored_heat' , berg_grid%stored_heat )128 CALL iom_get( ncid, jpdom_auto glo_xy, 'stored_ice' , berg_grid%stored_ice, kstart=(/1,1,1/), kcount=(/1,1,nclasses/) )125 CALL iom_get( ncid, jpdom_auto, 'calving' , src_calving ) 126 CALL iom_get( ncid, jpdom_auto, 'calving_hflx', src_calving_hflx ) 127 CALL iom_get( ncid, jpdom_auto, 'stored_heat' , berg_grid%stored_heat ) 128 CALL iom_get( ncid, jpdom_auto_xy, 'stored_ice' , berg_grid%stored_ice, kstart=(/1,1,1/), kcount=(/1,1,nclasses/) ) 129 129 130 130 CALL iom_get( ncid, jpdom_unknown, 'kount' , zdata(:) )
Note: See TracChangeset
for help on using the changeset viewer.