Contact: | Jeff Anderson |
Reviewers: | |
Revision: | $Revision: 1.2 $ |
Release Name: | $Name: pre_hawaii $ |
Change Date: | $Date: 2004/12/22 20:48:13 $ |
Change history: | see CVS log |
types_mod utilities_mod obs_kind_mod location_mod time_manager_mod assim_model_mod
type obs_def_type private type(location_type) :: location type(obs_kind_type) :: kind type(time_type) :: time real(r8) :: error_variance end type obs_def_type
Models all that is known about an observation except for actual values. Includes a location, kind, time and error variance.
Component | Description |
---|---|
location | Location of the observation. |
kind | The kind of the observation. |
time | Time of the observation. |
error_variance | Error variance of the observation. |
type(obs_def_type), intent(out) :: obs_def type(location_type), intent(in) :: location type(obs_kind_type), intent(in) :: kind type(time_type), intent(in) :: time real(r8), intent(in) :: error_variance
Creates an obs_def type with location, kind, time and error_variance specified.
obs_def | The obs_def that is created |
location | Location for this obs_def |
kind | Observation kind for obs_def |
time | Time for obs_def |
error_variance | Error variance of this observation |
type(location_type), intent(out) :: get_obs_def_location type(obs_def_type), intent(in) :: obs_def
Returns the location from an obs_def.
get_obs_def_location | Returns location from an obs_def |
obs_def | An obs_def |
type(obs_kind_type) :: get_obs_def_kind type(obs_def_type), intent(in) :: obs_def
Returns obs_kind from an obs_def.
get_obs_def_kind | Returns the obs_kind from an obs_def |
obs_def | An obs_def |
type(time_type) :: get_obs_def_time type(obs_def_type), intent(in) :: obs_def
Returns time from an obs_def.
get_obs_def_time | Returns time from an obs_def |
obs_def | An obs_def |
real(r8) :: get_obs_def_error_variance type(obs_def_type), intent(in) :: obs_def
Returns error variance from an obs_def.
get_obs_def_error_variance | Error variance from an obs_def |
obs_def | An obs_def |
type(obs_def_type), intent(inout) :: obs_def type(location_type), intent(in) :: location
Set the location in an obs_def.
obs_def | An obs_def |
location | A location |
type(obs_def_type), intent(inout) :: obs_def type(obs_kind_type), intent(in) :: kind
Set the kind of observation in an observation definition.
obs_def | An obs_def |
kind | An obs_kind |
type(obs_def_type), intent(inout) :: obs_def type(time_type), intent(in) :: time
Sets time for an obs_def.
obs_def | An obs_def |
time | Time to set |
type(obs_def_type), intent(inout) :: obs_def real(r8), intent(in) :: error_variance
Set error variance for an obs_def.
obs_def | An obs_def |
error_variance | Error variance |
type(obs_def_type), intent(inout) :: obs_def
Creates an obs_def via input from standard in.
obs_def | An obs_def |
integer, intent(in) :: ifile type(obs_def_type), intent(in) :: obs_def character(len=*), optional, intent(in) :: fform
Writes an obs_def to file open on channel ifile. Uses format specified in fform or FORMATTED if fform is not present.
ifile | File unit open to output file |
obs_def | Observation definition to be written |
fform | File format specifier: FORMATTED or UNFORMATTED; default FORMATTED |
integer, intent(in) :: ifile type(obs_def_type), intent(inout) :: obs_def character(len=*), optional, intent(in) :: fform
Reads an obs_def from file open on channel ifile. Uses format specified in fform or FORMATTED if fform is not present.
ifile | File unit open to output file |
obs_def | Observation definition to be read |
fform | File format specifier: FORMATTED or UNFORMATTED; default FORMATTED |
type(location_type), intent(in) :: rad_loc real(r8), intent(in) :: rgate real(r8), intent(in) :: raz real(r8), intent(in) :: elev_rad real(r8), intent(in) :: ae real(r8), dimension(3), intent(in) :: dir real(r8), intent(in) :: var type(obs_def_type), intent(inout) :: obs_def
Creates a radar observation obs_def: currently not fully supported.
rad_loc | Location of radar |
rgate | ??? |
raz | Radar azimuth? |
elev_rad | Radar elevation? |
ae | ??? |
dir | Direction of beam?? |
var | Error variance?? |
obs_def | Obs_def being created |
type(obs_def_type), intent(inout) :: obs_def
Releases all storage associated with an obs_def and its subcomponents.
obs_def | An obs_def to be released. |
type(obs_def_type), intent(out) :: obs_def1 type(obs_def_type), intent(in) :: obs_def2
Copies obs_def2 to obs_def1, overloaded with assignment (=).
obs_def1 | obs_def to be copied into |
obs_def2 | obs_def to be copied from |
Routine | Message | Comment |
---|---|---|
read_obs_def | Expected location header "obdef" in input file | The format of the input file is not consistent. |