Changes between Initial Version and Version 3 of Ticket #2073
- Timestamp:
- 2018-04-04T11:45:25+02:00 (6 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
Ticket #2073 – Description
initial v3 7 7 in trcsms_cfc.F90, an out-of-bounds occurs when trying to read and write the cumulative fluxes in the restart 8 8 9 == Recommendation 9 10 10 == Recommendation11 11 the loop below 12 {{{ 12 13 {{{#!f 13 14 DO jn = jp_cfc0, jp_cfc1 14 15 CALL iom_rstput( kt, nitrst, numrtw, 'qint_'//ctrcnm(jn), qint_cfc(:,:,jn) ) … … 18 19 should be 19 20 20 {{{ 21 {{{#!f 21 22 jl = 0 22 23 DO jn = jp_cfc0, jp_cfc1 … … 24 25 CALL iom_get( numrtr, jpdom_autoglo, 'qint_'//ctrcnm(jn), qint_cfc(:,:,jl) ) 25 26 END DO 26 27 27 }}} 28 28 ...