Opened 8 years ago

Closed 8 years ago

#708 closed bug (Fixed)

Unallocated variable idefQCK in mod_ncparam.F and QUICKSAVE restart

Reported by: arango Owned by: arango
Priority: major Milestone: Release ROMS/TOMS 3.7
Component: Nonlinear Version: 3.7
Keywords: Cc:

Description (last modified by arango)

The variable idefQCK in mod_ncparam.F was unallocated. This was giving a segmentation error in output.F line 147:

forrtl: severe (408): fort: (2): Subscript #1 of the array IDEFQCK has value 1 which is greater than the upper bound of -1

Image              PC                Routine            Line        Source
oceanG             000000010E8687B4  _output_                  147  output.f90
oceanG             000000010E7DE034  _main3d_                  215  main3d.f90
oceanG             000000010D8670FD  _ocean_control_mo         178  ocean_control.f90
oceanG             000000010D865261  _MAIN__                    86  master.f90
oceanG             000000010D864D16  Unknown               Unknown  Unknown

when input parameter NDEFQCK had a nonzero value during the creation of the QUICKSAVE output NetCDF file.

Also, fixed the inquiring of existing QUICKSAVE file during restart in def_quick.F. Need to add surface variables for momentum and tracers so they can be appended to an existing QUICKSAVE file. The surface tracer variables indices need to be stored in QCK(ng)%Vid(idsurT(itrc)) instead of QCK(ng)%Tid(itrc).

Many thanks to users at NOAA for bringing this to my attention.

Change History (4)

comment:1 by arango, 8 years ago

Description: modified (diff)

comment:2 by arango, 8 years ago

Description: modified (diff)
Resolution: Fixed
Status: newclosed
Summary: Unallocated variable idefQCK in mod_ncparam.FUnallocated variable idefQCK in mod_ncparam.F and QUICKSAVE restart

comment:3 by arango, 8 years ago

Resolution: Fixed
Status: closedreopened

I missed initializing idefQCK=-1 in mod_ncparam.F for the logic of multiple QUICKSAVE files to work. Yes, the logic for output multiple files is complicated.

Version 0, edited 8 years ago by arango (next)

comment:4 by arango, 8 years ago

Resolution: Fixed
Status: reopenedclosed
Note: See TracTickets for help on using tickets.