!copyright (C) 2001 MSC-RPN COMM %%%RPNPHY%%%
real g(ntotal)
*
* ozone climatologique
real goz(ntotoz), gozon12(NLACL*NPCL,12)
*
common /radtabl/ g,goz,gozon12
#if defined(DOC)
*COMMON BLOCK /RADTABL/
* contains information read from 2 data files
* for radiation calculations
*
* G table of transmission fields for radiation
* GOZ table of ozone climatological fields
* GOZON12 table of ozone climatological fields (12 months)
#endif