#644 closed Enhancement (fixed)
Re-organisation of restart part of TOP component
Reported by: | cetlod | Owned by: | nemo |
---|---|---|---|
Priority: | low | Milestone: | |
Component: | TOP | Version: | trunk |
Severity: | Keywords: | TOP restartability | |
Cc: |
Description (last modified by cetlod)
Re-organisation of restart part in the same way than for the initialisation part :
- we split the restart routine trcrat.F90 such as each SMS model has his specific sub-part of restart : creation of PISCES/trcrst_pisces.F90, LOBSTER/trcrst_lobster.F90..., MY_TRC/trcrst_my_trc.F90
- We now have in the routine trcrst.F90:
!!! bla bla bla bla !!!
!!! bla bla bla bla !!!
! READ prognostic variables and computes diagnostic variable
DO jn = 1, jptra
CALL iom_get(numrtr,jpdom_autoglo,'TRN'ctrcnm(jn),trn(:,:,:,jn) )
END DO
DO jn = 1, jptr
CALL iom_get(numrtr, jpdom_autoglo,'TRB'ctrcnm(jn),trb(:,:,:,jn))
END DO
IF( lk_lobster ) CALL trc_rst_read_lobster( numrtr )
IF( lk_pisces ) CALL trc_rst_read_pisces ( numrtr )
IF( lk_cfc ) CALL trc_rst_read_cfc ( numrtr )
IF( lk_c14b ) CALL trc_rst_read_c14b ( numrtr )
IF( lk_my_trc ) CALL trc_rst_read_my_trc ( numrtr )
!!! bla bla bla bla !!!
!!! bla bla bla bla !!!
Commit History (0)
(No commits)
Change History (2)
comment:1 Changed 14 years ago by cetlod
- Description modified (diff)
- Resolution set to fixed
- Status changed from new to closed
comment:2 Changed 6 years ago by nemo
- Keywords restartability added; restart removed