TABLE OF CONTENTS
MLT_RSS/zonal.f90 [ Programs ]
NAME
module zonal
PURPOSE
psuedoclass that defines and manipulates zonal means of MSU/AMSU data
DESCRIPTION
psuedoclass that defines and manipulates zonal means of MSU/AMSU data Components the pseudoclass defines a zonal average type type zonal_ave_rec type (date_str) :: begin_date type (date_str) :: end_date type(ave),dimension(NUM_ZONES,NUM_FOVS,NUM_NODES,NUM_SURFACES+1) :: dat end type zonal_ave_rec explanation of the grid type flag: ROUTINES zero_zonal_ave_rec(z) fills zonal average record z with initial values. put_in_zone(x,lon,lat,date,zone,fov,node,surf,z) adds a single observation to a zonal average record z
INPUTS
lon longitude of observation lat latitude of observation date date of observation, in data_str form fov field of view node ascending or descending z zonal average record to add to
OUTPUTS
zone zonal index of choosen zone surf surface type (land or ocean) of location z updated zonal average record put_scan_in_zone(scan,ok,z,chan,corr_level) adds a single MSU scan to a zonal average record
INPUTS
scan MSU scan structure ok array of fov quality flags z zonal average record to add to chan msu_channel corr_level msu correction level
OUTPUTS
z updated zonal average record put_scan_in_zone_xswath(scan,ok,z,chan,corr_level) adds a single cross-swath difference to a zonal average. deprecated. adds a single MSU scan to a zonal average record
INPUTS
scan MSU scan structure ok array of fov quality flags z zonal average record to add to chan msu_channel corr_level msu correction level
OUTPUTS
z updated zonal average record update_zonal_ave_rec(z) updates a zonal average record -- i.e computed averages from totals so they are consistent
INPUTS
z zonal average record to add to
OUTPUTS
z updated zonal average record write_zonal_ave_rec(z,lu,full,error) writes a zonal average record in standard binary form.
INPUTS
z zonal average record to write lu logical unit to write to full set to true to write "full" set of data
OUTPUTS
error error flag -- if non zero, write was not successful write_zonal_ave_rec_direct(pentad,offset,z,lu,error) writes a zonal average record in standard binary form to fortran direct access file.
INPUTS
pentad pentad number to write data to. offset beginning pentad number in file z zonal average record to write lu logical unit to write to
OUTPUTS
error error flag -- if non zero, write was not successful
AUTHOR
Carl Mears, Remote Sensing Systems
COPYRIGHT
THIS SOFTWARE AND ITS DOCUMENTATION ARE CONSIDERED TO BE IN THE PUBLIC DOMAIN AND THUS ARE AVAILABLE FOR UNRESTRICTED PUBLIC USE. THEY ARE FURNISHED "AS IS." THE AUTHORS, THE UNITED STATES GOVERNMENT, ITS INSTRUMENTALITIES, OFFICERS, EMPLOYEES, AND AGENTS MAKE NO WARRANTY, EXPRESS OR IMPLIED, AS TO THE USEFULNESS OF THE SOFTWARE AND DOCUMENTATION FOR ANY PURPOSE. THEY ASSUME NO RESPONSIBILITY (1) FOR THE USE OF THE SOFTWARE AND DOCUMENTATION! OR (2) TO PROVIDE TECHNICAL SUPPORT TO USERS.
HISTORY
9/21/2012 Initial Version prepared for NCDC
USAGE
use zonal