Initialization of the history files occurs in several routines. Namelist variables associated with the history file controls are initialized in routine preset and read into the model in data. If a restart run is being conducted, existing history files that are not full (contain less than MFILT time samples) are opened and repositioned in routine restrt. Routine intht is the main driver routine that initializes new history files and determines the contents and size of the history buffer. This routine first calls bldfld to build the Master Field List (see Table 2.13) and fldlst to construct the history buffer using the Master Field List and the values of the namelist variables EXCLUDE, PRIMARY and AUXF. inthed then initializes the variables in the history file header common to all history files and intht dynamically allocates memory for the in-core history buffer or opens the SSD file necessary for the out-of-core history buffer. If any history buffer restart files exist (as may happen in a restart run) then splitg is called to read its contents into the in-core history buffer or the out-of-core SSD file. Finally, rgnhbf initializes the history buffer regeneration files (if needed).
Writing of the history fields to the buffer and writing of the history buffer contents to a history file, occurs from within the time integration loop of stepon. History fields are accumulated in the history buffer every timestep. However, as described in Sec. 2.2, a time sample is only written to the disk history file as directed by namelist variable NHTFRQ. The model sets logical variable hstwr to true if it is time to write a time sample to a given history file. Of the subroutines called by stepon, only scan1bc, scan1ac, and wrapup directly interact with the history buffer or files. Routine wrapup closes any full history files and archives them to the NCAR Mass Storage System if applicable.
Several common blocks are associated with the history files. These
common blocks are defined in the following header files:
comhst.h, comhed.h, commss.h,
comlun.h and comloc.h.
Questions on these pages can be sent to... erik@ucar.edu .
Search page