Changes between Initial Version and Version 2 of Ticket #510
- Timestamp:
- 05/04/11 17:41:35 (14 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
Ticket #510
- Property Resolution → Fixed
- Property Status new → closed
-
Ticket #510 – Description
initial v2 1 If I run the model using a NRREC value different than 0, the subroutine def_his()always expects an existing NetCDF history and it results in:1 If I run the model using a '''NRREC''' value different than 0, the subroutine '''def_his()''' always expects an existing NetCDF history and it results in: 2 2 3 3 {{{ … … 9 9 }}} 10 10 11 The problem seems due to the missing initialization of the parameter idefHIS in Modules/mod_ncparam.F. Please, note that in releases prior to 553 this parameter was initialized to -1.11 The problem seems due to the missing initialization of the parameter '''idefHIS''' in '''Modules/mod_ncparam.F'''. Please, note that in releases prior to '''553''' this parameter was initialized to '''-1'''. 12 12 13 Looking at Nonlinear/output.F the following lines of code are never executed due to the limiting condition over idefHIS(which is never assigned, hence it's always 0):13 Looking at Nonlinear/output.F the following lines of code are never executed due to the limiting condition over '''idefHIS''' (which is never assigned, hence it's always 0): 14 14 15 15 {{{ … … 22 22 }}} 23 23 24 In the same subroutine the following if/then construct results in the assignment of NewFile which will be always .FALSE. whenever NRRECis not equal to 0:24 In the same subroutine the following if/then construct results in the assignment of '''!NewFile''' which will be always '''.FALSE.''' whenever '''NRREC''' is not equal to 0: 25 25 26 26 {{{ … … 44 44 99 END IF 45 45 }}} 46 As a workaround I re-introduced the initialization of at least the following two parameters inside Modules/mod_ncparam.F:46 As a workaround I re-introduced the initialization of at least the following two parameters inside '''Modules/mod_ncparam.F''': 47 47 48 48 {{{ … … 53 53 }}} 54 54 55 This lets the first aforementioned block of code ( output.F: line 77) to correctly set the idefHIS(ng) parameter and in the subsequent if/then construct the NewFile parameter is permitted to be .TRUE.55 This lets the first aforementioned block of code ('''output.F''': line 77) to correctly set the '''idefHIS(ng)''' parameter and in the subsequent if/then construct the '''!NewFile''' parameter is permitted to be '''.TRUE.''' 56 56 57 57 Thank you,