amip_interp.F90 File Reference

Go to the source code of this file.

Data Types
type	amip_interp_mod::date_type
interface	amip_interp_mod::assignment(=)
interface	amip_interp_mod::operator(==)
interface	amip_interp_mod::operator(/=)
interface	amip_interp_mod::operator(>)
interface	amip_interp_mod::amip_interp_new
type	amip_interp_mod::amip_interp_type

Modules
module	amip_interp_mod

Functions/Subroutines
subroutine, public	amip_interp_mod::get_amip_sst (Time, Interp, sst, err_msg, lon_model, lat_model)
subroutine, public	amip_interp_mod::get_amip_ice (Time, Interp, ice, err_msg)
type(amip_interp_type) function	amip_interp_mod::amip_interp_new_1d (lon, lat, mask, use_climo, use_annual, interp_method)
type(amip_interp_type) function	amip_interp_mod::amip_interp_new_2d (lon, lat, mask, use_climo, use_annual, interp_method)
subroutine, public	amip_interp_mod::amip_interp_init ()
subroutine, public	amip_interp_mod::amip_interp_del (Interp)
subroutine	amip_interp_mod::set_sst_grid_edges_amip1
subroutine	amip_interp_mod::set_sst_grid_edges_oi
subroutine	amip_interp_mod::set_sst_grid_edges_daily (mobs_sst, nobs_sst)
subroutine	amip_interp_mod::a2a_bilinear (nx, ny, dat1, n1, n2, dat2)
subroutine	amip_interp_mod::get_sst_grid_size (nlon, nlat)
subroutine	amip_interp_mod::get_sst_grid_boundary (blon, blat, mask)
subroutine	amip_interp_mod::read_record (type, Date, Adate, dat)
subroutine	amip_interp_mod::clip_data (type, dat)
logical function	amip_interp_mod::date_equals (Left, Right)
logical function	amip_interp_mod::date_not_equals (Left, Right)
logical function	amip_interp_mod::date_gt (Left, Right)
subroutine	amip_interp_mod::print_dates (Time, Date1, Udate1, Date2, Udate2, fmonth)
subroutine	amip_interp_mod::zonal_sst (Time, ice, sst)
subroutine	amip_interp_mod::amip_interp_type_eq (amip_interp_out, amip_interp_in)

Variables
integer, public	amip_interp_mod::i_sst = 1200
integer, public	amip_interp_mod::j_sst = 600
real, parameter	amip_interp_mod::big_number = 1.E30
logical, public	amip_interp_mod::forecast_mode = .false.
real, dimension(:,:), allocatable, public	amip_interp_mod::sst_ncep
real, dimension(:,:), allocatable, public	amip_interp_mod::sst_anom
real, dimension(:,:), allocatable	amip_interp_mod::temp1
real, dimension(:,:), allocatable	amip_interp_mod::temp2
real, dimension(:,:), allocatable	amip_interp_mod::tempamip
integer	amip_interp_mod::mobs
integer	amip_interp_mod::nobs
real, dimension(:), allocatable	amip_interp_mod::lon_bnd
real, dimension(:), allocatable	amip_interp_mod::lat_bnd
integer, parameter	amip_interp_mod::maxc = 128
integer	amip_interp_mod::unit
character(len=maxc)	amip_interp_mod::file_name_sst
character(len=maxc)	amip_interp_mod::file_name_ice
type(date_type)	amip_interp_mod::curr_date = date_type( -99, -99, -99 )
type(date_type)	amip_interp_mod::date_end = date_type( -99, -99, -99 )
real	amip_interp_mod::tice_crit_k
integer(i2_kind)	amip_interp_mod::ice_crit
logical	amip_interp_mod::module_is_initialized = .false.
character(len=24)	amip_interp_mod::data_set = 'amip1'
character(len=16)	amip_interp_mod::date_out_of_range = 'fail'
real	amip_interp_mod::tice_crit = -1.80
integer	amip_interp_mod::verbose = 0
logical	amip_interp_mod::use_zonal = .false.
real	amip_interp_mod::teq = 305.
real	amip_interp_mod::tdif = 50.
real	amip_interp_mod::tann = 20.
real	amip_interp_mod::tlag = 0.875
integer, dimension(3)	amip_interp_mod::amip_date =(/-1,-1,-1/)
real	amip_interp_mod::sst_pert = 0.
character(len=6)	amip_interp_mod::sst_pert_type = 'fixed'
logical	amip_interp_mod::do_sst_pert = .false.
logical	amip_interp_mod::use_daily = .false.
logical, public	amip_interp_mod::use_ncep_sst = .false.
logical	amip_interp_mod::no_anom_sst = .true.
logical	amip_interp_mod::use_ncep_ice = .false.
logical	amip_interp_mod::interp_oi_sst = .false.