Oasis3 4.0.2
|
Functions/Subroutines | |
subroutine | grid_init (m_method, rst_type, n_srch_bins, src_size, dst_size, src_dims, dst_dims, src_rank, dst_rank, ncrn_src, ncrn_dst, src_mask, dst_mask, src_name, dst_name, src_lat, src_lon, dst_lat, dst_lon, src_corner_lat, src_corner_lon, dst_corner_lat, dst_corner_lon) |
subroutine | free_grids |
Variables | |
integer(kind=int_kind), save | grid1_size |
integer(kind=int_kind), save | grid2_size |
integer(kind=int_kind), save | grid1_rank |
integer(kind=int_kind), save | grid2_rank |
integer(kind=int_kind), save | grid1_corners |
integer(kind=int_kind), save | grid2_corners |
integer(kind=int_kind), dimension(:), allocatable, save | grid1_dims |
integer(kind=int_kind), dimension(:), allocatable, save | grid2_dims |
character(char_len), save | grid1_name |
character(char_len), save | grid2_name |
character(char_len), save | grid1_units |
character(char_len), save | grid2_units |
real(kind=dbl_kind), parameter | deg2rad = pi/180. |
logical(kind=log_kind), dimension(:), allocatable, save | grid1_mask |
logical(kind=log_kind), dimension(:), allocatable, save | grid2_mask |
real(kind=dbl_kind), dimension(:), allocatable, save | grid1_center_lat |
real(kind=dbl_kind), dimension(:), allocatable, save | grid1_center_lon |
real(kind=dbl_kind), dimension(:), allocatable, save | grid2_center_lat |
real(kind=dbl_kind), dimension(:), allocatable, save | grid2_center_lon |
real(kind=dbl_kind), dimension(:), allocatable, save | grid1_area |
real(kind=dbl_kind), dimension(:), allocatable, save | grid2_area |
real(kind=dbl_kind), dimension(:), allocatable, save | grid1_area_in |
real(kind=dbl_kind), dimension(:), allocatable, save | grid2_area_in |
real(kind=dbl_kind), dimension(:), allocatable, save | grid1_frac |
real(kind=dbl_kind), dimension(:), allocatable, save | grid2_frac |
real(kind=dbl_kind), dimension(:,:), allocatable, save | grid1_corner_lat |
real(kind=dbl_kind), dimension(:,:), allocatable, save | grid1_corner_lon |
real(kind=dbl_kind), dimension(:,:), allocatable, save | grid2_corner_lat |
real(kind=dbl_kind), dimension(:,:), allocatable, save | grid2_corner_lon |
logical(kind=log_kind), save | luse_grid_centers |
logical(kind=log_kind), save | luse_grid1_area |
logical(kind=log_kind), save | luse_grid2_area |
real(kind=dbl_kind), dimension(:,:), allocatable, save | grid1_bound_box |
real(kind=dbl_kind), dimension(:,:), allocatable, save | grid2_bound_box |
character(char_len), save | restrict_type |
integer(kind=int_kind), save | num_srch_bins |
integer(kind=int_kind), save | num_srch_red |
integer(kind=int_kind), dimension(:,:), allocatable, save | bin_addr1 |
integer(kind=int_kind), dimension(:,:), allocatable, save | bin_addr2 |
integer(kind=int_kind), dimension(:,:), allocatable, save | bin_addr1_r |
real(kind=dbl_kind), dimension(:,:), allocatable, save | bin_lats |
real(kind=dbl_kind), dimension(:,:), allocatable, save | bin_lons |
real(kind=dbl_kind), dimension(:,:), allocatable, save | bin_lats_r |
real(kind=dbl_kind), dimension(:,:), allocatable, save | bin_lons_r |
subroutine grids::free_grids | ( | ) |
Definition at line 749 of file grids.f.
References bin_addr1, bin_addr1_r, bin_addr2, bin_lats, bin_lats_r, bin_lons, bin_lons_r, grid1_area, grid1_bound_box, grid1_center_lat, grid1_center_lon, grid1_corner_lat, grid1_corner_lon, grid1_dims, grid1_frac, grid1_mask, grid2_area, grid2_bound_box, grid2_center_lat, grid2_center_lon, grid2_corner_lat, grid2_corner_lon, grid2_dims, grid2_frac, grid2_mask, luse_grid_centers, mod_printing::nlogprt, not, and mod_unit::nulou.
subroutine grids::grid_init | ( | character*8,intent(in) | m_method, |
character*8,intent(in) | rst_type, | ||
integer (kind=int_kind),intent(in) | n_srch_bins, | ||
integer (kind=int_kind),intent(in) | src_size, | ||
integer (kind=int_kind),intent(in) | dst_size, | ||
integer (kind=int_kind),dimension(src_rank),intent(in) | src_dims, | ||
integer (kind=int_kind),dimension(dst_rank),intent(in) | dst_dims, | ||
integer (kind=int_kind),intent(in) | src_rank, | ||
integer (kind=int_kind),intent(in) | dst_rank, | ||
integer (kind=int_kind),intent(in) | ncrn_src, | ||
integer (kind=int_kind),intent(in) | ncrn_dst, | ||
integer (kind=int_kind),dimension(src_size),intent(in) | src_mask, | ||
integer (kind=int_kind),dimension(dst_size),intent(in) | dst_mask, | ||
character*8,intent(in) | src_name, | ||
character*8,intent(in) | dst_name, | ||
real (kind=real_kind),dimension(src_size),intent(in) | src_lat, | ||
real (kind=real_kind),dimension(src_size),intent(in) | src_lon, | ||
real (kind=real_kind),dimension(dst_size),intent(in) | dst_lat, | ||
real (kind=real_kind),dimension(dst_size),intent(in) | dst_lon, | ||
real (kind=real_kind),dimension(ncrn_src,src_size),intent(in) | src_corner_lat, | ||
real (kind=real_kind),dimension(ncrn_src,src_size),intent(in) | src_corner_lon, | ||
real (kind=real_kind),dimension(ncrn_dst,dst_size),intent(in) | dst_corner_lat, | ||
real (kind=real_kind),dimension(ncrn_dst,dst_size),intent(in) | dst_corner_lon | ||
) |
Definition at line 164 of file grids.f.
References bin_addr1, bin_addr1_r, bin_addr2, bin_lats, bin_lats_r, bin_lons, bin_lons_r, deg2rad, grid1_area, grid1_bound_box, grid1_center_lat, grid1_center_lon, grid1_corner_lat, grid1_corner_lon, grid1_corners, grid1_dims, grid1_frac, grid1_mask, grid1_name, grid1_rank, grid1_size, grid1_units, grid2_area, grid2_bound_box, grid2_center_lat, grid2_center_lon, grid2_corner_lat, grid2_corner_lon, grid2_corners, grid2_dims, grid2_frac, grid2_mask, grid2_name, grid2_rank, grid2_size, grid2_units, i, j, luse_grid_centers, max, n, mod_printing::nlogprt, not, mod_unit::nulou, num_srch_bins, num_srch_red, and restrict_type.
Referenced by vector::calc_remap_matrix().
integer (kind=int_kind),dimension(:,:),allocatable,save grids::bin_addr1 |
Definition at line 145 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::remap_bicub(), remap_bilinear::remap_bilin(), and remap_gaussian_weight::remap_gauswgt().
integer (kind=int_kind),dimension(:,:),allocatable,save grids::bin_addr1_r |
Definition at line 148 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic_reduced::grid_search_16_points(), remap_bilinear_reduced::grid_search_bilin_rd(), and remap_bicubic_reduced::remap_bicub_reduced().
integer (kind=int_kind),dimension(:,:),allocatable,save grids::bin_addr2 |
Definition at line 145 of file grids.f.
Referenced by free_grids(), grid_init(), and remap_gaussian_weight::remap_gauswgt().
real(kind=dbl_kind),dimension(:,:),allocatable,save grids::bin_lats |
Definition at line 151 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::grid_search_bicub(), remap_bilinear::grid_search_bilin(), and remap_gaussian_weight::grid_search_nbrg().
real(kind=dbl_kind),dimension(:,:),allocatable,save grids::bin_lats_r |
Definition at line 154 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic_reduced::grid_search_16_points(), and remap_bilinear_reduced::grid_search_bilin_rd().
real(kind=dbl_kind),dimension(:,:),allocatable,save grids::bin_lons |
Definition at line 151 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::grid_search_bicub(), remap_bilinear::grid_search_bilin(), and remap_gaussian_weight::grid_search_nbrg().
real(kind=dbl_kind),dimension(:,:),allocatable,save grids::bin_lons_r |
Definition at line 154 of file grids.f.
Referenced by free_grids(), and grid_init().
real (kind=dbl_kind),parameter grids::deg2rad = pi/180. |
Definition at line 92 of file grids.f.
Referenced by grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid1_area |
Definition at line 105 of file grids.f.
Referenced by free_grids(), grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid1_area_in |
Definition at line 105 of file grids.f.
Referenced by remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:,:),allocatable,save grids::grid1_bound_box |
Definition at line 128 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::remap_bicub(), and remap_bilinear::remap_bilin().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid1_center_lat |
Definition at line 105 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic_reduced::grid_search_16_points(), remap_bicubic::remap_bicub(), remap_bicubic_reduced::remap_bicub_reduced(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid1_center_lon |
Definition at line 105 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic_reduced::grid_search_16_points(), remap_bicubic::remap_bicub(), remap_bicubic_reduced::remap_bicub_reduced(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:,:),allocatable,save grids::grid1_corner_lat |
Definition at line 117 of file grids.f.
Referenced by free_grids(), grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:,:),allocatable,save grids::grid1_corner_lon |
Definition at line 117 of file grids.f.
Referenced by free_grids(), grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
integer (kind=int_kind),save grids::grid1_corners |
Definition at line 76 of file grids.f.
Referenced by grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
integer (kind=int_kind),dimension(:),allocatable,save grids::grid1_dims |
Definition at line 82 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::remap_bicub(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid1_frac |
Definition at line 105 of file grids.f.
Referenced by free_grids(), grid_init(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
logical (kind=log_kind),dimension(:),allocatable,save grids::grid1_mask |
Definition at line 101 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic_reduced::grid_search_16_points(), remap_bicubic::grid_search_bicub(), remap_bilinear::grid_search_bilin(), remap_bilinear_reduced::grid_search_bilin_rd(), remap_bicubic::remap_bicub(), remap_bicubic_reduced::remap_bicub_reduced(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
character(char_len),save grids::grid1_name |
Definition at line 85 of file grids.f.
Referenced by grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
integer (kind=int_kind),save grids::grid1_rank |
Definition at line 76 of file grids.f.
Referenced by grid_init(), remap_bicubic::remap_bicub(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
integer (kind=int_kind),save grids::grid1_size |
Definition at line 76 of file grids.f.
Referenced by grid_init(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
character (char_len),save grids::grid1_units |
Definition at line 88 of file grids.f.
Referenced by grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid2_area |
Definition at line 105 of file grids.f.
Referenced by free_grids(), grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid2_area_in |
Definition at line 105 of file grids.f.
Referenced by remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:,:),allocatable,save grids::grid2_bound_box |
Definition at line 128 of file grids.f.
Referenced by free_grids(), and grid_init().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid2_center_lat |
Definition at line 105 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::remap_bicub(), remap_bicubic_reduced::remap_bicub_reduced(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid2_center_lon |
Definition at line 105 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::remap_bicub(), remap_bicubic_reduced::remap_bicub_reduced(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:,:),allocatable,save grids::grid2_corner_lat |
Definition at line 117 of file grids.f.
Referenced by free_grids(), grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:,:),allocatable,save grids::grid2_corner_lon |
Definition at line 117 of file grids.f.
Referenced by free_grids(), grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
integer (kind=int_kind),save grids::grid2_corners |
Definition at line 76 of file grids.f.
Referenced by grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
integer (kind=int_kind),dimension(:),allocatable,save grids::grid2_dims |
Definition at line 82 of file grids.f.
Referenced by free_grids(), grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
real (kind=dbl_kind),dimension(:),allocatable,save grids::grid2_frac |
Definition at line 105 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::remap_bicub(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
logical (kind=log_kind),dimension(:),allocatable,save grids::grid2_mask |
Definition at line 101 of file grids.f.
Referenced by free_grids(), grid_init(), remap_bicubic::remap_bicub(), remap_bicubic_reduced::remap_bicub_reduced(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
character(char_len),save grids::grid2_name |
Definition at line 85 of file grids.f.
Referenced by grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
integer (kind=int_kind),save grids::grid2_rank |
Definition at line 76 of file grids.f.
Referenced by grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
integer (kind=int_kind),save grids::grid2_size |
Definition at line 76 of file grids.f.
Referenced by grid_init(), remap_bicubic::remap_bicub(), remap_bicubic_reduced::remap_bicub_reduced(), remap_bilinear::remap_bilin(), remap_bilinear_reduced::remap_bilin_reduced(), remap_gaussian_weight::remap_gauswgt(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
character (char_len),save grids::grid2_units |
Definition at line 88 of file grids.f.
Referenced by grid_init(), remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
logical (kind=log_kind),save grids::luse_grid1_area |
Definition at line 123 of file grids.f.
Referenced by remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
logical (kind=log_kind),save grids::luse_grid2_area |
Definition at line 123 of file grids.f.
Referenced by remap_write::write_remap_csm(), and remap_write::write_remap_scrip().
logical (kind=log_kind),save grids::luse_grid_centers |
Definition at line 123 of file grids.f.
Referenced by free_grids(), grid_init(), and remap_write::write_remap_scrip().
integer (kind=int_kind),save grids::num_srch_bins |
Definition at line 141 of file grids.f.
Referenced by grid_init(), remap_bicubic::grid_search_bicub(), remap_bilinear::grid_search_bilin(), and remap_gaussian_weight::grid_search_nbrg().
integer (kind=int_kind),save grids::num_srch_red |
Definition at line 141 of file grids.f.
Referenced by grid_init(), remap_bicubic_reduced::grid_search_16_points(), remap_bilinear_reduced::grid_search_bilin_rd(), and remap_bicubic_reduced::remap_bicub_reduced().
character (char_len),save grids::restrict_type |
Definition at line 138 of file grids.f.
Referenced by grid_init(), and remap_gaussian_weight::grid_search_nbrg().