| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public, | allocatable | :: | idx_obs_nc(:) | |||
| integer, | public, | allocatable | :: | x_idx_obs_nc(:) | |||
| integer, | public, | allocatable | :: | y_idx_obs_nc(:) | |||
| integer, | public, | allocatable | :: | z_idx_obs_nc(:) | |||
| integer, | public, | allocatable | :: | var_id_obs_nc(:,:) | |||
| real, | public, | allocatable | :: | x_idx_interp_d_obs_nc(:) | |||
| real, | public, | allocatable | :: | y_idx_interp_d_obs_nc(:) | |||
| integer(kind=c_int), | public, | allocatable, target | :: | idx_obs_pf(:) | |||
| integer(kind=c_int), | public, | allocatable, target | :: | x_idx_obs_pf(:) | |||
| integer(kind=c_int), | public, | allocatable, target | :: | y_idx_obs_pf(:) | |||
| integer(kind=c_int), | public, | allocatable, target | :: | z_idx_obs_pf(:) | |||
| integer(kind=c_int), | public, | allocatable, target | :: | ind_obs_pf(:) | |||
| type(c_ptr), | public, | bind(C,name="0") | :: | ptr_tidx_obs | |||
| type(c_ptr), | public, | bind(C,name="0") | :: | ptr_xidx_obs | |||
| type(c_ptr), | public, | bind(C,name="0") | :: | ptr_yidx_obs | |||
| type(c_ptr), | public, | bind(C,name="0") | :: | ptr_zidx_obs | |||
| type(c_ptr), | public, | bind(C,name="0") | :: | ptr_ind_obs | |||
| real, | public, | allocatable | :: | clmobs_lon(:) | |||
| real, | public, | allocatable | :: | clmobs_lat(:) | |||
| integer, | public, | allocatable | :: | clmobs_layer(:) | |||
| real, | public, | allocatable | :: | clmobs_dr(:) | |||
| real, | public, | allocatable | :: | clm_obs(:) | |||
| real, | public, | allocatable | :: | clm_obserr(:) | |||
| real, | public, | allocatable | :: | pressure_obs(:) | |||
| real, | public, | allocatable | :: | pressure_obserr(:) | |||
| integer, | public | :: | multierr | = | 0 | ||
| integer, | public | :: | dim_nx | ||||
| integer, | public | :: | dim_ny | ||||
| real, | public, | allocatable | :: | dampfac_state_time_dependent_in(:) | |||
| real, | public, | allocatable | :: | dampfac_param_time_dependent_in(:) |
Read NetCDF observation file
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | current_observation_filename |
Name of observation file |
Read observation index arrays for C-code
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(out) | :: | no_obs |
Number of observations |
Deallocation of observation arrays
Deallocation of observation index arrays
Return number of observations from file
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | fn |
Filename of the observation file |
||
| integer, | intent(out) | :: | nn |
number of observations in |
Return data assimilation interval from file
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | fn |
Filename of the observation file |
||
| real, | intent(out) | :: | aa |
new da_interval (number of time steps until next assimilation time step) |
Error handling for netCDF commands
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | status |
netCDF command status |