SUBROUTINE INIBAL

 -----------------------------------------------------------------
 What it does
 ============

 -----------------------------------------------------------------
 Structure of Routine
 ====================

• define variables
• Set default values and override as desired through NAMELIST input
• Make TMEAN dimensionless - TMEAN(L)=TMEAN(L)/CT
• Read zonally averaged state from NAMELIST WVORT or TMPSP.
• IF (KBAL.EQ.0) RETURN
• IF(.NOT.LTBAL) THEN
  • Set values required in BALANC. - if problems call ABORT and may call MATINV
• ELSE
  • Set values required in TBAL - may call MATINV

 -----------------------------------------------------------------
 Program calls
 ====================

Called by	Calls
INISTR (summ)	ABORT MATINV

 -----------------------------------------------------------------

Return to IGCM home page