Public Member Functions | |
| subroutine | psmile_def_grid (grid_id, grid_name, comp_id, grid_valid_shape, grid_type, ierror) |
| subroutine | psmile_def_partition (grid_id, nbr_blocks, partition_array, extent_array, ierror) |
| subroutine | psmile_reducedgrid_map (grid_id, nbr_latitudes, nbr_points_per_lat, ierror) |
| subroutine | psmile_set_corners_3d_double (grid_id, nbr_corners, corners_actual_shape, corners_1st_array, corners_2nd_array, corners_3rd_array, ierror) |
| subroutine | psmile_set_corners_3d_real (grid_id, nbr_corners, corners_actual_shape, corners_1st_array, corners_2nd_array, corners_3rd_array, ierror) |
| subroutine | psmile_set_mask (mask_id, grid_id, mask_actual_shape, mask_array, new_mask, ierror) |
| subroutine | psmile_set_points_gridless (point_id, point_name, grid_id, new_points, ierror) |
| subroutine | psmile_set_points_3d_double (method_id, point_name, grid_id, points_actual_shape, points_1st_array, points_2nd_array, points_3rd_array, new_points, ierror) |
| subroutine | psmile_set_points_3d_real (method_id, point_name, grid_id, points_actual_shape, points_1st_array, points_2nd_array, points_3rd_array, new_points, ierror) |
| subroutine | psmile_def_var (var_id, var_name, grid_id, point_id, mask_id, var_nodims, var_actual_shape, var_type, ierror) |
| subroutine | psmile_redirstdout (charbuf, lenstr, parallel, my_pe, npes, ierror) |
| integer, dimension(ndim_3d) | psmile_transform_index_1d_to_3d (index_1d, array_shape) |
| integer | psmile_transform_index_3d_to_1d (index_3d, array_shape) |
| subroutine | psmile_check_action (var_id, task_id, precise, julian_day, julian_dayb, julian_sec, julian_secb, action) |
| subroutine | psmile_deallocate (ierror) |
| subroutine | psmile_deallocate_methods (ierror) |
| subroutine | psmile_deallocate_fields (ierror) |
| subroutine | psmile_deallocate_masks (ierror) |
| subroutine | psmile_find_corr_field (comp_info, search, var_id, ierror) |
| subroutine | psmile_free_comp_handle (comp_id, ierror) |
| subroutine | psmile_free_field_handle (field_id, ierror) |
| subroutine | psmile_free_grid_handle (grid_id, ierror) |
| subroutine | psmile_free_mask_handle (mask_id, grid_id, ierror) |
| subroutine | psmile_free_method_handle (method_id, ierror) |
| subroutine | psmile_get_comp_handle (comp_id, comp_name, ierror) |
| subroutine | psmile_get_exch_index (var_id, task_id, request, index, ierror) |
| subroutine | psmile_get_info_index (method_id, request, index, ierror) |
| subroutine | psmile_get_epio_handle (comp_id, grid_id, method_id, mask_id, interpolation, msg_intersections, trans_out, trans_in, tgt_epio_pe, cpl_id, epio_id, trs_rank, ierror) |
| subroutine | psmile_get_field_handle (field_id, ierror) |
| subroutine | psmile_get_grid_handle (grid_id, ierror) |
| subroutine | PSMILe_Get_userdef_handle (userdef_id, ierror) |
| subroutine | psmile_get_halo_indices (comp_id, grid_id_list, ierror) |
| subroutine | psmile_get_halo_points (comp_id, ierror) |
| subroutine | psmile_get_mask_handle (mask_id, ierror) |
| subroutine | psmile_get_method_handle (grid_id, method_id, ierror) |
| subroutine | psmile_get_next_field (comp_info, search, field_list, n_vars, n_vars_ret, var_id, ierror) |
| subroutine | psmile_print_comp_info (cinfos, n_comps, string) |
| subroutine | psmile_print_field_info (field_id) |
| subroutine | psmile_print_grid_info (grid_id) |
| subroutine | psmile_print_method_info (method_id) |
| subroutine | psmile_print_send_info (method_id, incloc, message) |
| subroutine | psmile_store_send_info (var_id, id_trans_out, dir_index, cpl_index, appl_index, ierror) |
| subroutine | psmile_init_datatypes (ierror) |
| subroutine | psmile_init_mpi2 (intercomm, ierror) |
| subroutine | psmile_init_mpi1 (ierror) |
| subroutine | psmile_def_datatypes (ierror) |
| subroutine | psmile_def_mpi_comm (ierror) |
| subroutine | psmile_def_mpi_compcomm (ierror) |
| subroutine | psmile_spawn_child_appl (intracomm, intercomm, ierror) |
| subroutine | psmile_control_grids (ierror) |
| subroutine | psmile_get_true_mask_entries (mask_array, mask_shape, inter, n_true, ierror) |
| subroutine | psmile_is_mask_defined (mask_array, mask_shape, inter, nparts, defined, ierror) |
| subroutine | psmile_do_masks_match (mask1_array, mask1_shape, mask2_array, mask2_shape, inter, nparts, match, ierror) |
| subroutine | psmile_add_points_found (grid_id, search, extra_search, indices_returned, found, n_send, len_nsend, index_found, n_found, neighbors_3d, nloc, num_neigh, grid_valid_shape, use_how, ierror) |
| subroutine | psmile_enddef_action (search, index, status, ierror) |
| subroutine | psmile_enddef_action_cell (msg_locations, ierror) |
| subroutine | psmile_enddef_action_extra (msg_extra, sender, ierror) |
| subroutine | psmile_enddef_action_loc (msg_locations, ierror) |
| subroutine | psmile_enddef_action_sel (sender, ierror) |
| subroutine | psmile_enddef_appl (tag, my_icomp0_coll_comps, n_active, ierror) |
| subroutine | psmile_enddef_appl_miss (global_ids, comp_min, comp_max, b_comps, n_active, tag, ierror) |
| subroutine | psmile_enddef_comp (comp_id, global_comp_id, Number_of_Grids, comp_info, ierror) |
| subroutine | psmile_enddef_comp_grid (comp_id, n_grids, ierror) |
| subroutine | psmile_enddef_comp_periodic (comp_id, grid_ids, n_total, ierror) |
| subroutine | psmile_field2grid (ierror) |
| subroutine | psmile_find_intersect (comp_info, global_index, num_intersect_per_grid, num_dummy_intersect_per_grid, ninter, nmyint, nnull, tag, ierror) |
| subroutine | psmile_gauss_setup (grid_id, ierror) |
| subroutine | psmile_gauss_get_neighbours (grid_id, ierror) |
| subroutine | psmile_get_face_ind_21d (search, extra_search, send_info, len_cpl, send_mask, nreq, srcloc_ind, n_send, ierror) |
| subroutine | psmile_get_face_ind_3d (search, extra_search, send_info, len_cpl, send_mask, nreq, srcloc_ind, n_send, ierror) |
| subroutine | psmile_get_face_ind_reg (search, extra_search, send_info, len_cpl, send_mask, nreq, srcloc_ind, n_send, ierror) |
| subroutine | psmile_get_faces_virtual_ind (search, extra_search, send_info, len_cpl, send_mask, nreq, virtual_ind, n_send, ierror) |
| subroutine | psmile_get_intersect (ninter, nmyint, nnull, num_intersect_per_grid, num_dummy_intersect_per_grid, tag, ierror) |
| subroutine | psmile_get_locations_3d (msg_locations, ierror) |
| subroutine | psmile_hash_extra (search, locs, hash, nlocs, mask_array, mask_shape, mask_available, grid_valid_shape, ierror) |
| subroutine | psmile_locations_alloc (send_info, ierror) |
| subroutine | psmile_locations_dealloc (send_info, ierror) |
| subroutine | psmile_locations_direct (control, global, search, method_id, dir_index, ierror) |
| subroutine | psmile_locations_gauss2 (found, loc, range, control, search, method_id, dir_index, cpl_index, len_cpl, ierror) |
| subroutine | psmile_locations_irreg2 (found, loc, range, control, search, method_id, msk_required, virtual_cell, virtual_cell_required, dir_index, cpl_index, len_cpl, ierror) |
| subroutine | psmile_locations_3d_mask (search, inter, shift, method_id, dir_index, ierror) |
| subroutine | psmile_locations_3d (found, loc, range, control, search, method_id, msk_required, virtual_cell, virtual_cell_required, dir_index, cpl_index, len_cpl, ierror) |
| subroutine | psmile_locations_3d_reg (found, loc, range, control, search, method_id, dir_index, cpl_index, len_cpl, ierror) |
| subroutine | psmile_neigh_extra_points (search, extra_search, mask_array, mask_shape, mask_available, use_how, grid_valid_shape, neighbors_3d, nloc, n_corners, len_cpl, ierror) |
| subroutine | psmile_neigh_extra_search_clean (search, extra_search, ierror) |
| subroutine | psmile_neigh_extra_search_init (search, grid_id, extra_search, ierror) |
| subroutine | psmile_neigh_global_gauss2 (grid_id, mask_array, mask_shape, mask_available, use_how, grid_valid_shape, neighbors_3d, nloc, n_corners, search_required, ierror) |
| subroutine | psmile_neigh_global_points (search, extra_search, mask_array, mask_shape, mask_available, use_how, grid_id, grid_valid_shape, neighbors_3d, nloc, n_corners, len_cpl, ierror) |
| subroutine | psmile_recv_req_mask (sender, tag, search, recv_req, recv_mask, new_search, ierror) |
| subroutine | psmile_recv_req_subgrid (msg_intersections, sender, tag, search, recv_req, new_search, ierror) |
| subroutine | psmile_remove_intersect (inter, idl, idg, npart, local_extent_info, global_extent_info, ierror) |
| subroutine | psmile_remove_intersect_int (inter, id1, id2, npart, ierror) |
| subroutine | psmile_return_locations_3d (msg_intersections, sender, method_id, dir_index, cpl_index, n_vars, n_vars_ret, ierror) |
| subroutine | psmile_search_donor_cells (search, tol, ierror) |
| subroutine | psmile_search_donor_extra (search_global, tol, ierror) |
| subroutine | psmile_search_donor_extra_off (comp_info, search, var_id, tol, ierror) |
| subroutine | psmile_search_donor_extra_nn (comp_info, search, var_id, tol, ierror) |
| subroutine | psmile_search_donor_gridless (comp_info, search, field_list, n_vars, grid_id, method_id, var_id, ierror) |
| subroutine | psmile_send_req_mask (msg_intersections, dest, tag, ierror) |
| subroutine | psmile_send_req_subgrid (msg_intersections, dest, tag, ierror) |
| subroutine | psmile_transform_gauss2 (search_data, glen, map_shape, map, locations, found, glocations, gfound, cell_based_switch, nlev, grid_valid_shape, ierror) |
| subroutine | psmile_trans_loc2glob_3d (grid_id, ibuf, len_item, nloc, ierror) |
| subroutine | psmile_trans_loc2glob_gauss2 (grid_id, ibuf, len_item, nloc, ierror) |
| subroutine | psmile_tricu_3d_extra_off (comp_info, search, mask_array, mask_shape, mask_available, ibuf, len_item, n_send, num_neigh, grid_valid_shape, cyclic, ierror) |
| subroutine | psmile_trili_3d_extra_off (comp_info, search, grid_id, mask_array, mask_shape, mask_available, ibuf, len_item, n_send, num_neigh, ierror) |
| subroutine | psmile_mg_cells_gauss2 (grid_id, search_grid_type, found, loc, loc_fnd_shape, control, ierror) |
| subroutine | psmile_mg_found_loc_to_3d (search, nlev, source_grid_type, found, locations, len, virtual_cell, virtual_cell_required, found_3d, locations_3d, virtual_3d, ierror) |
| subroutine | psmile_mg_search (comp_info, grid_id, search_data, requires_conserv_remap, found, locations, len, tol, ierror) |
| subroutine | psmile_store_dest_locs_21d (found, range, control, foundz, send_info, nloc, opt, nprev, nadd, ierror) |
| subroutine | psmile_store_dest_locs_3d (found, loc, range, control, send_info, nloc, opt, nprev, nadd, ierror) |
| subroutine | psmile_store_dest_locs_3d_msk (mask_array, mask_shape, inter, send_info, nloc, nprev, nadd, ierror) |
| subroutine | psmile_store_dest_locs_3d_reg (found, loc, range, control, send_info, nloc, opt, nprev, nadd, ierror) |
| subroutine | psmile_store_mask_locs_3d (ipart, range, control, found, send_info, nprev, ncpl, ierror) |
| subroutine | psmile_store_source_locs_1d (found, loc, ibeg, len, send_info, nloc, opt, ialloc, ipart, nprev, nadd, ierror) |
| subroutine | psmile_store_source_locs_2d (found, loc, ibeg, len, send_info, nloc, opt, ialloc, ipart, nprev, nadd, ierror) |
| subroutine | psmile_store_source_locs_3d (found, loc, ibeg, len, send_info, nloc, opt, nprev, nadd, ierror) |
| subroutine | psmile_store_source_locs_3d_msk (mask_array, mask_shape, inter, send_info, nloc, nprev, nadd, ierror) |
| subroutine | psmile_store_source_locs_3d_reg (found, loc, range, control, send_info, nloc, opt, nprev, nadd, ierror) |
| subroutine | psmile_store_source_virt_3d (found, virtual_cell, ibeg, len, send_info, nloc, opt, ialloc, ipart, nprev, ierror) |
| subroutine | psmile_send_destinations (method_id, cpl_index, dir_index, sender, tag, ierror) |
| subroutine | psmile_mg_clean (ierror) |
| subroutine | psmile_mg_setup (grid_id, range, tol, ierror) |
| subroutine | psmile_mg_first_level (grid_id, range, mg_info, tol, simplified_grid, ierror) |
| Logical | PSMILe_to_be_coupled (comp_id1, comp_id2) |
| subroutine | psmile_mg_coars_level (grid_id, mg_info_fine, mg_info_coarse, icoarse, ierror) |
| subroutine | psmile_mg_get_cyclic (grid_id, range, tol, ierror) |
| subroutine | psmile_get_act_comps (a_comps, nd_acomps, n_act, ierror) |
| subroutine | psmile_get_grid_extent (grid_id, extent, ierror) |
| subroutine | psmile_sel_grid_range (grid_id, dinter, inter, ierror) |
| subroutine | psmile_compact_locations (grid_id, search, ndim, found, ierror) |
| subroutine | psmile_compact_neighbors_3d (neighbors_3d, nloc, num_neigh, grid_valid_shape, extra_search, send_info, neighbors, ierror) |
| subroutine | psmile_move0_neighbors (neighbors, nloc, num_neigh, ierror) |
| subroutine | psmile_quicksort (a, n) |
| subroutine | psmile_quicksort_index (a, n, t) |
| subroutine | psmile_type_create_subarray (ndims, array_of_sizes, array_of_subsizes, array_of_starts, oldtype, newtype, ierror) |
| subroutine | psmile_bsend_init (ftypes, flengths, number_of_ftypes, ierror) |
| subroutine | psmile_copy_subarray_3d_int (dest_vector, size, iarray, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, sub, ierror) |
| subroutine | psmile_ext_compact_list_log2int (send_info, extra_search, array, shape, grid_valid_shape, dest_vector, dest_size, ierror) |
| subroutine | psmile_ext_compact_list_3d_int (send_info, array, shape, grid_valid_shape, dest_vector, dest_size, ierror) |
| subroutine | psmile_extract_indices_3d_int (array, shape, dstijk, ncpl, dest_vector, ierror) |
| subroutine | psmile_get_field_int (field_id, data_array, len, nbr_fields, ierror) |
| subroutine | psmile_get_irr_field_int (data_array, data_shape, nbr_fields, dstijk, npoints, dstars, nars, nloc, source, tag, comm, ierror) |
| subroutine | psmile_put_compact_list_3d_int (source_list, dstijk, nloc, array, shape, nbr_fields, ierror) |
| subroutine | psmile_put_field_int (field_id, task_id, data_array, len, nbr_fields, ierror) |
| subroutine | psmile_put_field_gauss2_int (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_field_21d_int (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_field_3d_int (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_irr_field_int (data_array, data_shape, nbr_fields, srcloc, npoints, srcars, nars, nloc, dest, tag, comm, ierror) |
| subroutine | psmile_copy_subarray_2d_log (dest_vector, size, darray, idlow, idhigh, jdlow, jdhigh, ibeg, iend, jbeg, jend, ierror) |
| subroutine | psmile_copy_subarray_3d_log (dest_vector, size, iarray, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, sub, ierror) |
| subroutine | psmile_add_nn_found_real (search, extra_search, index_sent, found, n_send, index_found, distance, n_found, nb_extra, selected, sel_info, nrecv, ierror) |
| subroutine | psmile_bbcells_1d_real (array, shape, range, corners, corner_shape, nbr_corners, chmin, chmax, levdim, ierror) |
| subroutine | psmile_bbcells_2d_real (coords, coords_shape, sub_range, corner_shape, chmin, chmax, midp, levdim, period, ierror) |
| subroutine | psmile_bbcells_virt_2d_real (method_id, coords1, coords2, coords_shape, coords_range, corners1, corners2, corner_shape, nbr_corners, chmin1_corner, chmin2_corner, chmax1_corner, chmax2_corner, levdim_corner, chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, period, bmaski, bmaskj, ierror) |
| subroutine | psmile_bbcells_3d_real (method_id, array, shape, range, corners, corner_shape, nbr_corners, chmin, chmax, midp, levdim, cyclic, period, ierror) |
| subroutine | psmile_bbcells_gauss2_real (array_x, array_y, shape, range, nbr_lats, points_per_lat, corners_y, corner_shape, nbr_corners, chmin_x, chmax_x, midp_x, chmin_y, chmax_y, midp_y, nbrs, levdim, ierror) |
| subroutine | psmile_bbcells_pole_dble (coords_shape, coords_x, coords_y, corner_shape, sub_range, chmin_x, chmax_x, chmin_y, chmax_y, midp_x, midp_y, pole_array, period, ierror) |
| subroutine | psmile_bbcells_pole_real (coords_shape, coords_x, coords_y, corner_shape, sub_range, chmin_x, chmax_x, chmin_y, chmax_y, midp_x, midp_y, pole_array, period, ierror) |
| subroutine | psmile_celltest_real (grid_id, range, sense, ierror) |
| subroutine | psmile_ccompact_gauss2_real (send_info, grid_valid_shape, shape, nb_corners, array_x, array_y, array_z, extra_search, dest_size, nbr_cells_tot, source_cell_index, neighcells, dest_x, dest_y, dest_z, ierror) |
| subroutine | psmile_ccompact_irreg2_real (send_info, grid_valid_shape, shape, nb_corners, array_x, array_y, array_z, extra_search, dest_size, nbr_cells_tot, source_cell_index, neighcells, dest_x, dest_y, dest_z, ierror) |
| subroutine | psmile_ccompact_3d_reg_real (send_info, grid_valid_shape, shape, nb_corners, array_x, array_y, array_z, extra_search, dest_size, nbr_cells_tot, source_cell_index, neighcells, dest_x, dest_y, dest_z, ierror) |
| subroutine | psmile_control_cell_2d_real (grid_id, ic, nc, icdim1, list, j, k, coords1, coords2, shape, corners1, corners2, corner_shape, nbr_corners, tol, fnd, ierror) |
| subroutine | psmile_ext_compact_irreg2_real (send_info, array, shape, grid_valid_shape, dest_vector, dest_size, ierror) |
| subroutine | psmile_ext_compact_list_3d_real (send_info, array, shape, grid_valid_shape, dest_vector, dest_size, ierror) |
| subroutine | psmile_put_compact_list_3d_real (source_list, dstijk, nloc, array, shape, nbr_fields, ierror) |
| subroutine | psmile_extract_indices_2d_real (array, shape, dstijk, ncpl, dest_vector, ierror) |
| subroutine | psmile_extract_indices_3d_real (array, shape, dstijk, ncpl, dest_vector, ierror) |
| subroutine | psmile_extent_subgrid_1d_real (array, idlow, idhigh, nbr_corners, ibeg, iend, extent, ierror) |
| subroutine | psmile_extent_subgrid_2d_real (array, idlow, idhigh, jdlow, jdhigh, nbr_corners, ibeg, iend, jbeg, jend, extent, ierror) |
| subroutine | psmile_extent_subgrid_3d_real (array, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, nbr_corners, grid_shape, extent, ierror) |
| subroutine | psmile_gauss_setup_real (grid_id, counts, displs, ierror) |
| subroutine | psmile_generate_1d_3d_real (vector1, vector2, vector3, shape, dest_array, dest_shape, grid_valid_shape, ierror) |
| subroutine | psmile_get_cyclic_dir_3d_real (chmin, chmin2, chmin3, chmax, chmax2, chmax3, levdim, corners, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, len_cyclic, rtol, index, cyclic, ierror) |
| subroutine | psmile_get_faces_3d_real (search, extra_search, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, neighbors_3d, nloc, num_neigh, faces, n_faces, nreq, ierror) |
| subroutine | psmile_get_faces_3d_reg_real (search, extra_search, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, neighbors_3d, nloc, num_neigh, faces, n_faces, nreq, ierror) |
| subroutine | psmile_get_faces_gauss2_real (search, extra_search, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, neighbors_3d, nloc, num_neigh, faces, nreq, ierror) |
| subroutine | psmile_get_faces_irreg2_real (search, extra_search, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, neighbors_3d, nloc, num_neigh, faces, n_faces, nreq, ierror) |
| subroutine | psmile_get_grid_extent_real (grid_id, extent, ierror) |
| subroutine | psmile_global_search_nnx_real (comp_info, search, var_id, tgt_coords_x, tgt_coords_y, tgt_coords_z, neighbors_3d, nloc, num_neigh, nb_extra, extra_search, send_index, ierror) |
| subroutine | psmile_global_search_real (comp_info, control, len_cpl, var_id, grid_valid_shape, search, tgt_coords, neighbors_3d, nloc, num_neigh, extra_search, interpolation_methods, interpolation_search, n_intmethods, send_index, mask_available, use_mask, use_how, grid_type, ierror) |
| subroutine | psmile_global_search_cell_real (grid_id, var_id, comp_info, send_info, search, extra_search, ncpl, nbr_cells, n_intmethods, interpolation_methods, interpolation_search, ierror) |
| subroutine | psmile_return_extra_off_real (comp_info, search, var_id, found, distance, nd_dist, nb_extra, ierror) |
| subroutine | psmile_sel_grid_range_real (grid_id, dinter, inter, ierror) |
| subroutine | psmile_range_subgrid_1d_real (array, idlow, idhigh, nbr_corners, ibeg, iend, extent, inter, ierror) |
| subroutine | psmile_range_subgrid_2d_real (array1, array2, idlow, idhigh, jdlow, jdhigh, nbr_corners, ibeg, iend, jbeg, jend, extent, inter, ierror) |
| subroutine | psmile_range_subgrid_3d_real (array1, array2, array3, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, nbr_corners, grid_shape, rinter, inter, ierror) |
| subroutine | psmile_mg_ctrl_subgrid_1d_real (array, corner_shape, nbr_corners, range, chmin, chmax, levdim, period, grid_id, ind, ierror) |
| subroutine | psmile_mg_ctrl_subgrid_2d_real (array, corner_shape, nbr_corners, range, chmin, chmax, levdim, period, grid_id, ind, ierror) |
| subroutine | psmile_mg_ctrl_subgrid_3d_real (array, corner_shape, nbr_corners, range, chmin, chmax, levdim, period, grid_id, ind, ierror) |
| subroutine | psmile_mg_first_level_real (grid_id, range, mg_info, tol, simplified_grid, ierror) |
| subroutine | psmile_mg_first_subgrid_1d_real (array, idlow, idhigh, nbr_corners, range, chmin, chmax, midp, levdim, ierror) |
| subroutine | psmile_mg_first_subgrid_2d_real (array, idlow, idhigh, jdlow, jdhigh, nbr_corners, range, chmin, chmax, midp, levdim1, levdim2, ierror) |
| subroutine | psmile_mg_first_subgrid_3d_real (array, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, nbr_corners, range, chmin, chmax, midp, levdim1, levdim2, levdim3, ierror) |
| subroutine | psmile_mg_coars_level_real (grid_id, mg_info_fine, mg_info_coarse, icoarse, ierror) |
| subroutine | psmile_mg_coars_subgrid_3d_real (chfmin, chfmax, midfp, levdim1_fine, levdim2_fine, levdim3_fine, chcmin, chcmax, midcp, levdim1, levdim2, levdim3, icoarse, ierror) |
| subroutine | psmile_mg_get_cyclic_real (grid_id, range, tol, ierror) |
| subroutine | psmile_neigh_extra_search_real (search, extra_search, nb_extra, ierror) |
| subroutine | psmile_send_req_coords_real (msg_intersections, dest, tag, ierror) |
| subroutine | psmile_send_req_corners_real (msg_intersections, dest, tag, ierror) |
| subroutine | psmile_recv_req_coords_real (sender, tag, search, recv_req, recv_mask, new_search, ierror) |
| subroutine | psmile_recv_req_corners_real (sender, tag, search, recv_req, recv_mask, new_search, ierror) |
| subroutine | psmile_mg_search_1d_real (grid_id, idim, found, locations, coords, len, tol, ierror) |
| subroutine | psmile_mg_search_2d_real (grid_id, found, locations, len, search_data, ipart, tol, ierror) |
| subroutine | psmile_mg_search_3d_real (comp_info, found, locations, len, search_data, grid_id, tol, ierror) |
| subroutine | psmile_search_donor_irreg3_real (comp_info, found, locations, len, search, field_list, n_vars, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_3d_reg_real (comp_info, found, locations, len, search, field_list, n_vars, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_gauss2_real (comp_info, found, locations, len, search, field_list, n_vars, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_irreg2_real (comp_info, found, locations, len, search, field_list, n_vars, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_nnx_real (comp_info, search, var_id, coords1, coords2, coords3, distance, nfound, locations, n_send, nb_extra, tol, ierror) |
| subroutine | psmile_search_nn_3d_real (sin_search, cos_search, z_search, distance, nfound, locations, n_send, x_coords, y_coords, z_coords, coords_shape, sin_values, cos_values, grid_valid_shape, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_search_nn_3d_reg_real (sin_search, cos_search, z_search, distance, nfound, locations, n_send, x_coords, y_coords, z_coords, coords_shape, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_search_nn_irreg2_real (sin_search, cos_search, z_search, distance, nfound, locations, n_send, x_coords, y_coords, z_coords, coords_shape, sin_values, cos_values, grid_valid_shape, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_select_nn_found (search, extra_search, send_info, selected, sel_info, nrecv, nb_extra, neighbors_3d, nloc, num_neigh, grid_valid_shape, ierror) |
| subroutine | psmile_store_faces_3d_real (indices_req, required, nreq, tgt_coords1, tgt_coords2, tgt_coords3, ncpl, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, send_mask, srcloc_ind, ibuf, len_item, ndibuf, ipia, buf, len_rtem, ndrbuf, ipa, ierror) |
| subroutine | psmile_store_faces_3d_reg_real (indices_req, required, nreq, tgt_coords1, tgt_coords2, tgt_coords3, ncpl, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, send_mask, srcloc_ind, ibuf, len_item, ndibuf, ipia, buf, len_rtem, ndrbuf, ipa, ierror) |
| subroutine | psmile_store_faces_gauss2_real (indices_req, required, nreq, tgt_coords1, tgt_coords2, tgt_coords3, ncpl, corners1, corners2, corners3, corner_shape, nbr_corners, grid_id, grid_valid_shape, send_mask, srcloc_ind, virtual_ind, virtual_cell_available, ibuf, len_item, ndibuf, ipia, buf, len_rtem, ndrbuf, ipa, ierror) |
| subroutine | psmile_store_faces_irreg2_real (indices_req, required, nreq, tgt_coords1, tgt_coords2, tgt_coords3, ncpl, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, send_mask, srcloc_ind, ibuf, len_item, ndibuf, ipia, buf, len_rtem, ndrbuf, ipa, ierror) |
| subroutine | psmile_trf_lonlat_1d_real (x_coords, y_coords, coords_shape, grid_valid_shape, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, ierror) |
| subroutine | psmile_trf_lonlat_2d_real (x_coords, y_coords, coords_shape, grid_valid_shape, sin_values, cos_values, ierror) |
| subroutine | psmile_trf_lonlat_3d_real (x_coords, y_coords, coords_shape, grid_valid_shape, sin_values, cos_values, ierror) |
| subroutine | psmile_info_coords_3d_reg_real (x_coords, y_coords, z_coords, coords_shape, grid_valid_shape, sinvec, cosvec, ierror) |
| subroutine | psmile_info_coords_irreg2_real (x_coords, y_coords, z_coords, coords_shape, grid_valid_shape, sinvec, cosvec, ierror) |
| subroutine | psmile_info_trf_coords_3d_real (x_coords, y_coords, z_coords, coords_shape, grid_valid_shape, sinvec, cosvec, ierror) |
| subroutine | psmile_info_trs_locs_3d_real (comp_info, coords, shape, control, len_cpl, var_id, grid_valid_shape, search, method_id, send_index, ierror) |
| subroutine | psmile_info_trs_loc_3d_reg_real (comp_info, coords, shape, control, len_cpl, var_id, grid_valid_shape, search, method_id, send_index, ierror) |
| subroutine | psmile_info_trs_loc_irreg2_real (comp_info, coords, shape, control, len_cpl, var_id, grid_valid_shape, search, method_id, send_index, ierror) |
| subroutine | psmile_info_trs_loc_gauss2_real (comp_info, coords, shape, control, len_cpl, var_id, grid_valid_shape, search, method_id, send_index, ierror) |
| subroutine | psmile_neigh_cells_3d_real (use_how, grid_shape, interpolation_mode, cyclic, corner_shape_3d, nbr_corners, corner_x, corner_y, corner_z, search, control, tgt_cell, tgt_corners, npoints, srclocs, msklocs, ncpl, num_neigh, nbr_cells, ierror) |
| subroutine | psmile_neigh_cells_3d_reg_real (grid_valid_shape, interpolation_mode, cyclic, grid_id, search, corners, npoints, srclocs, ncpl, nbr_cells, ierror) |
| subroutine | psmile_neigh_cells_irreg2_real (use_how, grid_shape, interpolation_mode, cyclic, corner_shape_3d, nbr_corners, corner_x, corner_y, search, control, tgt_cell, tgt_corners, npoints, srclocs, msklocs, ncpl, num_neigh, nbr_cells, ierror) |
| subroutine | psmile_neigh_near_irr2_3d_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, srcloc, nloc, nprev, nsearch, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_near_3d_irr2_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_near_3d_irr3_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srcloc, nsearch, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_irr2_3d_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, srcloc, nloc, nprev, nsearch, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_near_3d_reg_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srclocs, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_3d_irr2_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_3d_irr3_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srcloc, nsearch, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_3d_reg_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srclocs, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_near_irreg2_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_irreg2_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_sub_irr_real (grid_id, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, neighbors_3d, num_neigh, nloc, extra_search, ijk, sin_search, cos_search, z_search, jbeg, jend, width, ierror) |
| subroutine | psmile_neigh_nearx_sub_reg_real (grid_id, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, neighbors_3d, num_neigh, nloc, extra_search, ijk, sin_search, cos_search, z_search, jbeg, jend, width, ierror) |
| subroutine | psmile_neigh_nearest_3d_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, srcloc, nloc, nprev, nsearch, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearestx_3d_real (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, srcloc, nloc, nprev, nsearch, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_tricu_3d (grid_valid_shape, interp_mode, cyclic, srcloc, nloc, neighbors_3d, num_neigh, ierror) |
| subroutine | psmile_neigh_tricu_3d_reg (grid_valid_shape, interp_mode, cyclic, srclocs, nlocs, nloc, nprev, neighbors_3d, num_neigh, ierror) |
| subroutine | psmile_neigh_tricu_gauss2 (grid_id, grid_valid_shape, interp_mode, srcloc, virtual_cell, nloc, virtual_cell_available, neighbors_3d, num_neigh, neigh_bascule, ierror) |
| subroutine | psmile_neigh_tricu_gauss2_irreg (grid_id, grid_valid_shape, interp_mode, srcloc, srclocz, virtual_cell, nlocs, nloc, nprev, virtual_cell_available, neighbors_3d, num_neigh, neigh_bascule, ierror) |
| subroutine | psmile_neigh_tricu_irreg2 (grid_valid_shape, interp_mode, cyclic, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, ierror) |
| subroutine | psmile_neigh_trili_3d (grid_valid_shape, interp_mode, cyclic, srcloc, nloc, neighbors_3d, num_neigh, ierror) |
| subroutine | psmile_neigh_trili_3d_reg (grid_valid_shape, interp_mode, cyclic, srclocs, nlocs, nloc, nprev, neighbors_3d, num_neigh, ierror) |
| subroutine | psmile_neigh_trili_gauss2 (grid_id, grid_valid_shape, interp_mode, srcloc, virtual_cell, nloc, virtual_cell_available, neighbors_3d, num_neigh, ierror) |
| subroutine | psmile_neigh_trili_gauss2_irreg (grid_id, grid_valid_shape, interp_mode, srcloc, srclocz, virtual_cell, nlocs, nloc, nprev, virtual_cell_available, neighbors_3d, num_neigh, ierror) |
| subroutine | psmile_neigh_trili_irreg2 (grid_valid_shape, interp_mode, cyclic, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, ierror) |
| subroutine | psmile_mg_coarse_1d_real (lev, chmin, chmax, found, locations, coords, ibeg, iend) |
| subroutine | psmile_mg_coarse_2d_real (lev, chmin, chmax, found, locations, coords1, coords2, ibeg, iend) |
| subroutine | psmile_mg_coarse_3d_real (lev, chmin, chmax, found, locations, coords1, coords2, coords3, ibeg, iend) |
| subroutine | psmile_mg_next_level_1d_real (grid_id, idim, lev, nlev, chmin, chmax, midp, levdim, found, loc, coords, ibeg, iend, ijkinc, ijkcoa, ierror) |
| subroutine | psmile_mg_next_level_2d_real (grid_id, lev, nlev, chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, found, loc, range, coords1, coords2, shape, control, ijkinc, ijkcoa, ierror) |
| subroutine | psmile_mg_next_level_3d_real (grid_id, lev, nlev, chmin1, chmin2, chmin3, chmax1, chmax2, chmax3, midp1, midp2, midp3, levdim, found, loc, range, coords1, coords2, coords3, shape, control, ijkinc, ijkcoa, ierror) |
| subroutine | psmile_mg_prev_levels_1d_real (grid_id, idim, lev, nlev, lstijk, xyz, found, newijk) |
| subroutine | psmile_mg_prev_levels_2d_real (grid_id, lev, nlev, lstijk, xyz, found, newijk, nc) |
| subroutine | psmile_mg_prev_levels_3d_real (grid_id, lev, nlev, lstijk, xyz, found, newijk) |
| subroutine | psmile_mg_cells_1d_real (nlev, found, loc, range, search_grid_type, corners1, search_dim, shape, control, grid_valid_shape, cyclic, chmin, chmax, tol, ierror) |
| subroutine | psmile_mg_cells_2d_real (grid_id, search_grid_type, found, loc, loc_fnd_shape, tgt_corners_x, tgt_corners_y, tgt_corner_shape, control, grid_valid_shape, ipart, src_corner_shape, nbr_corners, src_corners_x, src_corners_y, chmin1, chmax1, chmin2, chmax2, tol, ierror) |
| subroutine | psmile_mg_control_cell_1d_real (chmin, chmax, midp, levdim, ijk, xyz, nold, all, wide, found, newijk) |
| subroutine | psmile_mg_control_cell_2d_real (chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, ijk, xyz, nold, ignore, wide, found, newijk) |
| subroutine | psmile_mg_control_cell_3d_real (chmin1, chmin2, chmin3, chmax1, chmax2, chmax3, midp1, midp2, midp3, levdim, ijk, xyz, nold, all, wide, found, newijk) |
| subroutine | psmile_mg_final_2d_real (grid_id, nlev, chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, found, loc, range, coords1, coords2, shape, control, corners1, corners2, corner_shape, nbr_corners, tol, ierror) |
| subroutine | psmile_mg_final_3d_real (comp_info, nlev, found, loc, range, coords1, coords2, coords3, shape, control, grid_id, x_coords, y_coords, z_coords, coords_shape, nbr_corners, ijk0, tol, ierror) |
| subroutine | psmile_mg_final_gauss2_real (grid_id, found, locations, fnd_loc_range, tgt_coords_x, tgt_coords_y, tgt_coords_shape, search_range, src_corners_x, src_corners_y, src_corner_shape, nbr_corners, ierror) |
| subroutine | psmile_mg_final_prev_2d_real (grid_id, nlev, lstijk, xyz, found, newijk, nc, corners1, corners2, corner_shape, nbr_corners, tol, ierror) |
| subroutine | psmile_mg_method_1d_real (comp_info, nlev, found, loc, range, coords1, shape, control, method_id, x_coords, coords_shape, grid_valid_shape, cyclic, chmin, chmax, tol, ierror) |
| subroutine | psmile_mg_method_2d_real (comp_info, nlev, found, loc, range, coords1, coords2, search_shape, control, x_coords, y_coords, coords_shape, grid_valid_shape, cyclic, period, chmin1, chmin2, chmax1, chmax2, tol, ierror) |
| subroutine | psmile_mg_method_3d_real (comp_info, nlev, found, loc, range, coords1, coords2, coords3, shape, control, method_id, x_coords, y_coords, z_coords, coords_shape, grid_valid_shape, cyclic, chmin1, chmin2, chmin3, chmax1, chmax2, chmax3, midp1, midp2, midp3, tol, ierror) |
| subroutine | psmile_mg_method_gauss2_real (method_id, search_range, tgt_shape, tgt_coords_x, tgt_coords_y, loc_fnd_shape, found, loc, virtual_cell, ierror) |
| subroutine | psmile_mg_method_irreg2_real (comp_info, found, locations, search, array, shape_2d, range_2d, control_2d, shape_1d, range_1d, control_1d, m_arrays, m_levdim, grid_id, method_id, tol, ierror) |
| subroutine | psmile_mg_srch_nneigh_reg_real (grid_id, nn_srch, arrays, search_mode, nref_3d, grid_valid_shape, neighbors_3d, nloc, num_neigh, sin_search, cos_search, z_search, dist_real, dim1, indices, jbeg, jend, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_mg_srch_nneigh_irr_real (grid_id, arrays, search_mode, nref_3d, sin_values, cos_values, grid_valid_shape, z_coords, coords_shape, neighbors_3d, nloc, num_neigh, sin_search, cos_search, z_search, dist_dble, dim1, indices, jbeg, jend, mask_ind, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_print_3d_coord_real (x, y, z, shape, ind, nloc, message) |
| subroutine | psmile_print_3d_reg_coord_real (x, y, z, shape, ind, nloc, message) |
| subroutine | psmile_print_irreg2_coord_real (x, y, z, shape, ind, nloc, message) |
| subroutine | psmile_put_field_real (field_id, task_id, data_array, len, nbr_fields, ierror) |
| subroutine | psmile_put_field_gauss2_real (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_field_21d_real (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_field_3d_real (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_irr_field_real (data_array, data_shape, nbr_fields, srcloc, npoints, srcars, nars, nloc, dest, tag, comm, ierror) |
| subroutine | psmile_get_field_real (field_id, data_array, len, nbr_fields, ierror) |
| subroutine | psmile_get_irr_field_real (data_array, data_shape, nbr_fields, dstijk, npoints, dstars, nars, nloc, source, tag, comm, ierror) |
| subroutine | psmile_copy_subarray_2d_real (dest_vector, size, darray, idlow, idhigh, jdlow, jdhigh, ibeg, iend, jbeg, jend, ierror) |
| subroutine | psmile_copy_subarray_3d_real (dest_vector, size, darray, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, sub, ierror) |
| subroutine | psmile_add_nn_found_dble (search, extra_search, index_sent, found, n_send, index_found, distance, n_found, nb_extra, selected, sel_info, nrecv, ierror) |
| subroutine | psmile_bbcells_1d_dble (array, shape, range, corners, corner_shape, nbr_corners, chmin, chmax, levdim, ierror) |
| subroutine | psmile_bbcells_2d_dble (coords, coords_shape, sub_range, corner_shape, chmin, chmax, midp, levdim, period, ierror) |
| subroutine | psmile_bbcells_virt_2d_dble (method_id, coords1, coords2, coords_shape, coords_range, corners1, corners2, corner_shape, nbr_corners, chmin1_corner, chmin2_corner, chmax1_corner, chmax2_corner, levdim_corner, chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, period, bmaski, bmaskj, ierror) |
| subroutine | psmile_bbcells_3d_dble (method_id, array, shape, range, corners, corner_shape, nbr_corners, chmin, chmax, midp, levdim, cyclic, period, ierror) |
| subroutine | psmile_bbcells_gauss2_dble (array_x, array_y, shape, range, nbr_lats, points_per_lat, corners_y, corner_shape, nbr_corners, chmin_x, chmax_x, midp_x, chmin_y, chmax_y, midp_y, nbrs, levdim, ierror) |
| subroutine | psmile_celltest_dble (grid_id, range, sense, ierror) |
| subroutine | psmile_ccompact_gauss2_dble (send_info, grid_valid_shape, shape, nb_corners, array_x, array_y, array_z, extra_search, dest_size, nbr_cells_tot, source_cell_index, neighcells, dest_x, dest_y, dest_z, ierror) |
| subroutine | psmile_ccompact_irreg2_dble (send_info, grid_valid_shape, shape, nb_corners, array_x, array_y, array_z, extra_search, dest_size, nbr_cells_tot, source_cell_index, neighcells, dest_x, dest_y, dest_z, ierror) |
| subroutine | psmile_ccompact_3d_reg_dble (send_info, grid_valid_shape, shape, nb_corners, array_x, array_y, array_z, extra_search, dest_size, nbr_cells_tot, source_cell_index, neighcells, dest_x, dest_y, dest_z, ierror) |
| subroutine | psmile_control_cell_2d_dble (grid_id, ic, nc, icdim1, list, j, k, coords1, coords2, shape, corners1, corners2, corner_shape, nbr_corners, tol, fnd, ierror) |
| subroutine | psmile_ext_compact_irreg2_dble (send_info, array, shape, grid_valid_shape, dest_vector, dest_size, ierror) |
| subroutine | psmile_ext_compact_list_3d_dble (send_info, array, shape, grid_valid_shape, dest_vector, dest_size, ierror) |
| subroutine | psmile_put_compact_list_3d_dble (source_list, dstijk, nloc, array, shape, nbr_fields, ierror) |
| subroutine | psmile_extract_indices_2d_dble (array, shape, dstijk, ncpl, dest_vector, ierror) |
| subroutine | psmile_extract_indices_3d_dble (array, shape, dstijk, ncpl, dest_vector, ierror) |
| subroutine | psmile_gauss_setup_dble (grid_id, counts, displs, ierror) |
| subroutine | psmile_extent_subgrid_1d_dble (array, idlow, idhigh, nbr_corners, ibeg, iend, extent, ierror) |
| subroutine | psmile_extent_subgrid_2d_dble (array, idlow, idhigh, jdlow, jdhigh, nbr_corners, ibeg, iend, jbeg, jend, extent, ierror) |
| subroutine | psmile_extent_subgrid_3d_dble (array, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, nbr_corners, grid_shape, extent, ierror) |
| subroutine | psmile_generate_1d_3d_dble (vector1, vector2, vector3, shape, dest_array, dest_shape, grid_valid_shape, ierror) |
| subroutine | psmile_get_cyclic_dir_3d_dble (chmin, chmin2, chmin3, chmax, chmax2, chmax3, levdim, corners, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, len_cyclic, rtol, index, cyclic, ierror) |
| subroutine | psmile_get_faces_3d_dble (search, extra_search, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, neighbors_3d, nloc, num_neigh, faces, n_faces, nreq, ierror) |
| subroutine | psmile_get_faces_3d_reg_dble (search, extra_search, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, neighbors_3d, nloc, num_neigh, faces, n_faces, nreq, ierror) |
| subroutine | psmile_get_faces_gauss2_dble (search, extra_search, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, neighbors_3d, nloc, num_neigh, faces, nreq, ierror) |
| subroutine | psmile_get_faces_irreg2_dble (search, extra_search, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, neighbors_3d, nloc, num_neigh, faces, n_faces, nreq, ierror) |
| subroutine | psmile_get_grid_extent_dble (grid_id, extent, ierror) |
| subroutine | psmile_global_search_dble (comp_info, control, len_cpl, var_id, grid_valid_shape, search, tgt_coords, neighbors_3d, nloc, num_neigh, extra_search, interpolation_methods, interpolation_search, n_intmethods, send_index, mask_available, use_mask, use_how, grid_type, ierror) |
| subroutine | psmile_global_search_cell_dble (grid_id, var_id, comp_info, send_info, search, extra_search, ncpl, nbr_cells, n_intmethods, interpolation_methods, interpolation_search, ierror) |
| subroutine | psmile_global_search_nnx_dble (comp_info, search, var_id, tgt_coords_x, tgt_coords_y, tgt_coords_z, neighbors_3d, nloc, num_neigh, nb_extra, extra_search, send_index, ierror) |
| subroutine | psmile_return_extra_off_dble (comp_info, search, var_id, found, distance, nd_dist, nb_extra, ierror) |
| subroutine | psmile_sel_grid_range_dble (grid_id, dinter, inter, ierror) |
| subroutine | psmile_range_subgrid_1d_dble (array, idlow, idhigh, nbr_corners, ibeg, iend, extent, inter, ierror) |
| subroutine | psmile_range_subgrid_2d_dble (array1, array2, idlow, idhigh, jdlow, jdhigh, nbr_corners, ibeg, iend, jbeg, jend, extent, inter, ierror) |
| subroutine | psmile_range_subgrid_3d_dble (array1, array2, array3, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, nbr_corners, grid_shape, rinter, inter, ierror) |
| subroutine | psmile_mg_ctrl_subgrid_1d_dble (array, corner_shape, nbr_corners, range, chmin, chmax, levdim, period, grid_id, ind, ierror) |
| subroutine | psmile_mg_ctrl_subgrid_2d_dble (array, corner_shape, nbr_corners, range, chmin, chmax, levdim, period, grid_id, ind, ierror) |
| subroutine | psmile_mg_ctrl_subgrid_3d_dble (array, corner_shape, nbr_corners, range, chmin, chmax, levdim, period, grid_id, ind, ierror) |
| subroutine | psmile_mg_first_level_dble (grid_id, range, mg_info, tol, simplified_grid, ierror) |
| subroutine | psmile_mg_first_subgrid_1d_dble (array, idlow, idhigh, nbr_corners, range, chmin, chmax, midp, levdim, ierror) |
| subroutine | psmile_mg_first_subgrid_2d_dble (array, idlow, idhigh, jdlow, jdhigh, nbr_corners, range, chmin, chmax, midp, levdim1, levdim2, ierror) |
| subroutine | psmile_mg_first_subgrid_3d_dble (array, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, nbr_corners, range, chmin, chmax, midp, levdim1, levdim2, levdim3, ierror) |
| subroutine | psmile_mg_coars_level_dble (grid_id, mg_info_fine, mg_info_coarse, icoarse, ierror) |
| subroutine | psmile_mg_coars_subgrid_3d_dble (chfmin, chfmax, midfp, levdim1_fine, levdim2_fine, levdim3_fine, chcmin, chcmax, midcp, levdim1, levdim2, levdim3, icoarse, ierror) |
| subroutine | psmile_mg_get_cyclic_dble (grid_id, range, tol, ierror) |
| subroutine | psmile_neigh_extra_search_dble (search, extra_search, nb_extra, ierror) |
| subroutine | psmile_send_req_coords_dble (msg_intersections, dest, tag, ierror) |
| subroutine | psmile_send_req_corners_dble (msg_intersections, dest, tag, ierror) |
| subroutine | psmile_recv_req_coords_dble (sender, tag, search, recv_req, recv_mask, new_search, ierror) |
| subroutine | psmile_recv_req_corners_dble (sender, tag, search, recv_req, recv_mask, new_search, ierror) |
| subroutine | psmile_mg_search_1d_dble (grid_id, idim, found, locations, coords, len, tol, ierror) |
| subroutine | psmile_mg_search_2d_dble (grid_id, found, locations, len, search_data, ipart, tol, ierror) |
| subroutine | psmile_mg_search_3d_dble (comp_info, found, locations, len, search_data, grid_id, tol, ierror) |
| subroutine | psmile_search_donor_irreg3_dble (comp_info, found, locations, len, search, field_list, n_vars, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_3d_reg_dble (comp_info, found, locations, len, search, field_list, n_vars, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_gauss2_dble (comp_info, found, locations, len, search, field_list, n_vars, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_irreg2_dble (comp_info, found, locations, len, search, field_list, n_vars, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_nnx_dble (comp_info, search, var_id, coords1, coords2, coords3, distance, nfound, locations, n_send, nb_extra, tol, ierror) |
| subroutine | psmile_search_nn_3d_dble (sin_search, cos_search, z_search, distance, nfound, locations, n_send, x_coords, y_coords, z_coords, coords_shape, sin_values, cos_values, grid_valid_shape, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_search_nn_3d_reg_dble (sin_search, cos_search, z_search, distance, nfound, locations, n_send, x_coords, y_coords, z_coords, coords_shape, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_search_nn_irreg2_dble (sin_search, cos_search, z_search, distance, nfound, locations, n_send, x_coords, y_coords, z_coords, coords_shape, sin_values, cos_values, grid_valid_shape, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_store_faces_3d_dble (indices_req, required, nreq, tgt_coords1, tgt_coords2, tgt_coords3, ncpl, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, send_mask, srcloc_ind, ibuf, len_item, ndibuf, ipia, buf, len_rtem, ndrbuf, ipa, ierror) |
| subroutine | psmile_store_faces_3d_reg_dble (indices_req, required, nreq, tgt_coords1, tgt_coords2, tgt_coords3, ncpl, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, send_mask, srcloc_ind, ibuf, len_item, ndibuf, ipia, buf, len_rtem, ndrbuf, ipa, ierror) |
| subroutine | psmile_store_faces_gauss2_dble (indices_req, required, nreq, tgt_coords1, tgt_coords2, tgt_coords3, ncpl, corners1, corners2, corners3, corner_shape, nbr_corners, grid_id, grid_valid_shape, send_mask, srcloc_ind, virtual_ind, virtual_cell_available, ibuf, len_item, ndibuf, ipia, buf, len_rtem, ndrbuf, ipa, ierror) |
| subroutine | psmile_store_faces_irreg2_dble (indices_req, required, nreq, tgt_coords1, tgt_coords2, tgt_coords3, ncpl, corners1, corners2, corners3, corner_shape, nbr_corners, grid_valid_shape, send_mask, srcloc_ind, ibuf, len_item, ndibuf, ipia, buf, len_rtem, ndrbuf, ipa, ierror) |
| subroutine | psmile_trf_lonlat_1d_dble (x_coords, y_coords, coords_shape, grid_valid_shape, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, ierror) |
| subroutine | psmile_trf_lonlat_2d_dble (x_coords, y_coords, coords_shape, grid_valid_shape, sin_values, cos_values, ierror) |
| subroutine | psmile_trf_lonlat_3d_dble (x_coords, y_coords, coords_shape, grid_valid_shape, sin_values, cos_values, ierror) |
| subroutine | psmile_info_coords_irreg2_dble (x_coords, y_coords, z_coords, coords_shape, grid_valid_shape, sinvec, cosvec, ierror) |
| subroutine | psmile_info_coords_3d_reg_dble (x_coords, y_coords, z_coords, coords_shape, grid_valid_shape, sinvec, cosvec, ierror) |
| subroutine | psmile_info_trf_coords_3d_dble (x_coords, y_coords, z_coords, coords_shape, grid_valid_shape, sinvec, cosvec, ierror) |
| subroutine | psmile_info_trs_locs_3d_dble (comp_info, coords, shape, control, len_cpl, var_id, grid_valid_shape, search, method_id, send_index, ierror) |
| subroutine | psmile_info_trs_loc_3d_reg_dble (comp_info, coords, shape, control, len_cpl, var_id, grid_valid_shape, search, method_id, send_index, ierror) |
| subroutine | psmile_info_trs_loc_irreg2_dble (comp_info, coords, shape, control, len_cpl, var_id, grid_valid_shape, search, method_id, send_index, ierror) |
| subroutine | psmile_info_trs_loc_gauss2_dble (comp_info, coords, shape, control, len_cpl, var_id, grid_valid_shape, search, method_id, send_index, ierror) |
| subroutine | psmile_neigh_near_irreg2_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_irreg2_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_cells_3d_dble (use_how, grid_shape, interpolation_mode, cyclic, corner_shape_3d, nbr_corners, corner_x, corner_y, corner_z, search, control, tgt_cell, tgt_corners, npoints, srclocs, msklocs, ncpl, num_neigh, nbr_cells, ierror) |
| subroutine | psmile_neigh_cells_3d_reg_dble (grid_valid_shape, interpolation_mode, cyclic, grid_id, search, corners, npoints, srclocs, ncpl, nbr_cells, ierror) |
| subroutine | psmile_neigh_cells_irreg2_dble (use_how, grid_shape, interpolation_mode, cyclic, corner_shape_3d, nbr_corners, corner_x, corner_y, search, control, tgt_cell, tgt_corners, npoints, srclocs, msklocs, ncpl, num_neigh, nbr_cells, ierror) |
| subroutine | psmile_neigh_near_irr2_3d_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, srcloc, nloc, nprev, nsearch, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_irr2_3d_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, srcloc, nloc, nprev, nsearch, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_near_3d_irr2_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_near_3d_irr3_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srcloc, nsearch, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_near_3d_reg_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srclocs, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_3d_irr2_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srcloc, srclocz, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_3d_irr3_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srcloc, nsearch, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_3d_reg_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, srclocs, nlocs, nloc, nprev, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearx_sub_irr_dble (grid_id, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, neighbors_3d, num_neigh, nloc, extra_search, ijk, sin_search, cos_search, z_search, jbeg, jend, width, ierror) |
| subroutine | psmile_neigh_nearx_sub_reg_dble (grid_id, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values_lon, cos_values_lon, sin_values_lat, cos_values_lat, grid_valid_shape, search_mode, neighbors_3d, num_neigh, nloc, extra_search, ijk, sin_search, cos_search, z_search, jbeg, jend, width, ierror) |
| subroutine | psmile_neigh_nearest_3d_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, srcloc, nloc, nprev, nsearch, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_neigh_nearestx_3d_dble (grid_id, coords1, coords2, coords3, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, srcloc, nloc, nprev, nsearch, neighbors_3d, num_neigh, extra_search, ierror) |
| subroutine | psmile_mg_coarse_1d_dble (lev, chmin, chmax, found, locations, coords, ibeg, iend) |
| subroutine | psmile_mg_coarse_2d_dble (lev, chmin, chmax, found, locations, coords1, coords2, ibeg, iend) |
| subroutine | psmile_mg_coarse_3d_dble (lev, chmin, chmax, found, locations, coords1, coords2, coords3, ibeg, iend) |
| subroutine | psmile_mg_next_level_1d_dble (grid_id, idim, lev, nlev, chmin, chmax, midp, levdim, found, loc, coords, ibeg, iend, ijkinc, ijkcoa, ierror) |
| subroutine | psmile_mg_next_level_2d_dble (grid_id, lev, nlev, chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, found, loc, range, coords1, coords2, shape, control, ijkinc, ijkcoa, ierror) |
| subroutine | psmile_mg_next_level_3d_dble (grid_id, lev, nlev, chmin1, chmin2, chmin3, chmax1, chmax2, chmax3, midp1, midp2, midp3, levdim, found, loc, range, coords1, coords2, coords3, shape, control, ijkinc, ijkcoa, ierror) |
| subroutine | psmile_mg_prev_levels_1d_dble (grid_id, idim, lev, nlev, lstijk, xyz, found, newijk) |
| subroutine | psmile_mg_prev_levels_2d_dble (grid_id, lev, nlev, lstijk, xyz, found, newijk, nc) |
| subroutine | psmile_mg_prev_levels_3d_dble (grid_id, lev, nlev, lstijk, xyz, found, newijk) |
| subroutine | psmile_mg_cells_1d_dble (nlev, found, loc, range, search_grid_type, corners1, search_dim, shape, control, grid_valid_shape, cyclic, chmin, chmax, tol, ierror) |
| subroutine | psmile_mg_cells_2d_dble (grid_id, search_grid_type, found, loc, loc_fnd_shape, tgt_src_corners_x, tgt_src_corners_y, src_corner_shape, control, grid_valid_shape, ipart, corner_shape, nbr_corners, src_corners_x, src_corners_y, chmin1, chmax1, chmin2, chmax2, tol, ierror) |
| subroutine | psmile_mg_control_cell_1d_dble (chmin, chmax, midp, levdim, ijk, xyz, nold, all, wide, found, newijk) |
| subroutine | psmile_mg_control_cell_2d_dble (chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, ijk, xyz, nold, ignore, wide, found, newijk) |
| subroutine | psmile_mg_control_cell_3d_dble (chmin1, chmin2, chmin3, chmax1, chmax2, chmax3, midp1, midp2, midp3, levdim, ijk, xyz, nold, all, wide, found, newijk) |
| subroutine | psmile_mg_final_2d_dble (grid_id, nlev, chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, found, loc, range, coords1, coords2, shape, control, corners1, corners2, corner_shape, nbr_corners, tol, ierror) |
| subroutine | psmile_mg_final_3d_dble (comp_info, nlev, found, loc, range, coords1, coords2, coords3, shape, control, grid_id, x_coords, y_coords, z_coords, coords_shape, nbr_corners, ijk0, tol, ierror) |
| subroutine | psmile_mg_final_gauss2_dble (grid_id, found, locations, fnd_loc_range, tgt_coords_x, tgt_coords_y, tgt_coords_shape, search_range, src_corners_x, src_corners_y, src_corner_shape, nbr_corners, ierror) |
| subroutine | psmile_mg_final_prev_2d_dble (grid_id, nlev, lstijk, xyz, found, newijk, nc, corners1, corners2, corner_shape, nbr_corners, tol, ierror) |
| subroutine | psmile_mg_method_1d_dble (comp_info, nlev, found, loc, range, coords1, shape, control, method_id, x_coords, coords_shape, grid_valid_shape, cyclic, chmin, chmax, tol, ierror) |
| subroutine | psmile_mg_method_2d_dble (comp_info, nlev, found, loc, range, coords1, coords2, search_shape, control, x_coords, y_coords, coords_shape, grid_valid_shape, cyclic, period, chmin1, chmin2, chmax1, chmax2, tol, ierror) |
| subroutine | psmile_mg_method_3d_dble (comp_info, nlev, found, loc, range, coords1, coords2, coords3, shape, control, method_id, x_coords, y_coords, z_coords, coords_shape, grid_valid_shape, cyclic, chmin1, chmin2, chmin3, chmax1, chmax2, chmax3, midp1, midp2, midp3, tol, ierror) |
| subroutine | psmile_mg_method_gauss2_dble (method_id, search_range, tgt_shape, tgt_coords_x, tgt_coords_y, loc_fnd_shape, found, loc, virtual_cell, ierror) |
| subroutine | psmile_mg_method_irreg2_dble (comp_info, found, locations, search, array, shape_2d, range_2d, control_2d, shape_1d, range_1d, control_1d, m_arrays, m_levdim, grid_id, method_id, tol, ierror) |
| subroutine | psmile_mg_srch_nneigh_reg_dble (grid_id, nn_srch, arrays, search_mode, nref_3d, grid_valid_shape, neighbors_3d, nloc, num_neigh, sin_search, cos_search, z_search, dist_dble, dim1, indices, jbeg, jend, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_mg_srch_nneigh_irr_dble (grid_id, arrays, search_mode, nref_3d, sin_values, cos_values, grid_valid_shape, z_coords, coords_shape, neighbors_3d, nloc, num_neigh, sin_search, cos_search, z_search, dist_dble, dim1, indices, jbeg, jend, mask_ind, mask_array, mask_shape, mask_available, tol, ierror) |
| subroutine | psmile_print_3d_coord_dble (x, y, z, shape, ind, nloc, message) |
| subroutine | psmile_print_3d_reg_coord_dble (x, y, z, shape, ind, nloc, message) |
| subroutine | psmile_print_irreg2_coord_dble (x, y, z, shape, ind, nloc, message) |
| subroutine | psmile_put_field_dble (field_id, task_id, data_array, len, nbr_fields, ierror) |
| subroutine | psmile_put_field_gauss2_dble (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_field_21d_dble (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_field_3d_dble (data_array, data_shape, nbr_fields, srcloc, nparts, nloc, npoints, dest, tag, comm, ierror) |
| subroutine | psmile_put_irr_field_dble (data_array, data_shape, nbr_fields, srcloc, npoints, srcars, nars, nloc, dest, tag, comm, ierror) |
| subroutine | psmile_get_field_dble (field_id, data_array, len, nbr_fields, ierror) |
| subroutine | psmile_get_irr_field_dble (data_array, data_shape, nbr_fields, dstijk, npoints, dstars, nars, nloc, source, tag, comm, ierror) |
| subroutine | psmile_copy_subarray_3d_double (dest_vector, size, darray, idlow, idhigh, jdlow, jdhigh, kdlow, kdhigh, sub, ierror) |
| subroutine | psmile_copy_subarray_2d_double (dest_vector, size, darray, idlow, idhigh, jdlow, jdhigh, ibeg, iend, jbeg, jend, ierror) |
| subroutine | psmile_tricu_gauss2_extra (search, grid_id, mask_array, mask_shape, mask_available, ibuf, len_item, n_send, num_neigh, ierror) |
| subroutine | psmile_trili_gauss2_extra (search, grid_id, mask_array, mask_shape, mask_available, ibuf, len_item, n_send, num_neigh, ierror) |
| subroutine | psmile_global_sum_compute_dble (data, data_size, nbr_fields, comm, global_sum, ierror) |
| subroutine | psmile_global_sum_compute_int (data, data_size, nbr_fields, comm, global_sum, ierror) |
| subroutine | psmile_global_sum_send_dble (data, nbr_fields, rank, ierror) |
| subroutine | psmile_global_sum_send_int (data, nbr_fields, rank, ierror) |
| subroutine | psmile_global_sum_recv_dble (data, nbr_fields, rank, ierror) |
| subroutine | psmile_global_sum_recv_int (data, nbr_fields, rank, ierror) |
| subroutine | psmile_ddadd_mpi_callback (dda, ddb, len, itype) |
| subroutine | psmile_trs_inform (ida_args, id_trs_rank, id_err) |
| subroutine | psmile_trs_set_src_epio3d_dble (id_epio_id, id_trans_rank, id_src_epio_size, id_nbr_corner, dda_src_epio_lat, dda_src_epio_lon, dda_src_epio_z, id_src_mask, ida_src_epio_mask, id_err) |
| subroutine | psmile_trs_set_src_epio3d_real (id_epio_id, id_trans_rank, id_src_epio_size, id_nbr_corner, rda_src_epio_lat, rda_src_epio_lon, rda_src_epio_z, id_src_mask, ida_src_epio_mask, id_err) |
| subroutine | psmile_trs_set_tgt_epio3d_dble (id_epio_id, id_trans_rank, id_tgt_epio_size, id_nbr_corner, dda_tgt_epio_lat, dda_tgt_epio_lon, dda_tgt_epio_z, id_tgt_mask, ida_tgt_epio_mask, id_err) |
| subroutine | psmile_trs_set_tgt_epio3d_real (id_epio_id, id_trans_rank, id_tgt_epio_size, id_nbr_corner, rda_tgt_epio_lat, rda_tgt_epio_lon, rda_tgt_epio_z, id_tgt_mask, ida_tgt_epio_mask, id_err) |
| subroutine | psmile_trs_set_triple_links (id_trans_out_id, id_trans_in_id, id_epio_id, id_trans_rank, id_err) |
| subroutine | psmile_trs_put_int (id_transient_out_id, id_epio_id, id_trans_rank, id_epio_field_size, ida_field, id_nbr_fields, id_err) |
| subroutine | psmile_trs_put_real (id_transient_out_id, id_epio_id, id_trans_rank, id_epio_field_size, rda_field, id_nbr_fields, id_err) |
| subroutine | psmile_trs_put_dble (id_transient_out_id, id_epio_id, id_trans_rank, id_epio_field_size, dda_field, id_nbr_fields, id_err) |
| subroutine | psmile_trs_get_int (id_transient_in_id, id_epio_id, id_trans_rank, id_epio_field_size, ida_field, id_nbr_fields, id_err) |
| subroutine | psmile_trs_get_real (id_transient_in_id, id_epio_id, id_trans_rank, id_epio_field_size, rda_field, id_nbr_fields, id_err) |
| subroutine | psmile_trs_get_dble (id_transient_in_id, id_epio_id, id_trans_rank, id_epio_field_size, dda_field, id_nbr_fields, id_err) |
| subroutine | psmile_trs_give_neighbors3d (id_epio_id, id_trans_rank, id_epio_tgt_size, id_nb_neighbors, ida_neighbor_indices, id_err) |
| subroutine | psmile_trs_give_neighbors_gauss (id_epio_id, id_trans_rank, id_epio_tgt_size, id_nb_neighbors, ida_neighbor_indices, ida_neighbor_bascule, id_err) |
| subroutine | psmile_trs_give_neighcells3d (id_epio_id, id_trans_rank, id_epio_tgt_size, ida_nbsrccells_pertgtpt, id_source_size, id_nb_corners, ida_source_cell_index, ida_corner_index, id_grid_type, id_err) |
| subroutine | psmile_trs_trili_srch_neigh3d (ila_grid1_dims, il_grid1_size, ila_grid1_mask, ila_grid1_center_lon, ila_grid1_center_lat, ila_grid1_center_z, ila_grid2_dims, il_grid2_size, ila_grid2_mask, ila_grid2_center_lon, ila_grid2_center_lat, ila_grid2_center_z, il_num_srch_bin, il_restrict_type, ila_neighbors, il_err) |
| subroutine | psmile_trs_finalize (id_trans_rank, id_err) |
| subroutine | psmile_io_derive_pelist (id_comm_appl, id_comp_id, comp_info, pelist, ierror) |
| subroutine | psmile_io_init (ierror) |
| subroutine | psmile_io_init_comp (id_comp_id, ierror) |
| subroutine | psmile_io_init_pelist (id_comp_id, comp_info, ierror) |
| subroutine | psmile_io_init_cf (ierror) |
| subroutine | psmile_io_finalize (ierror) |
| subroutine | psmile_io_close (ierror) |
| subroutine | psmile_def_domains (ierror) |
| subroutine | psmile_def_metadata (id_varid, ierror) |
| subroutine | psmile_enddef_metadata (ierror) |
| subroutine | psmile_open_files (ierror) |
| subroutine | psmile_open_file_byid (varid, taskid, date, ierror) |
| subroutine | psmile_check_restart (id_varid, id_taskid, id_info, ierror) |
| subroutine | psmile_close_files (ierror) |
| subroutine | psmile_io_cleanup (ierror) |
| subroutine | psmile_close_file_byid (varid, taskid, ierror) |
| subroutine | psmile_check_file_size (varids, size, flag, ierror) |
| subroutine | psmile_io_scandir (basename, file_list, len_of_list, no_of_files, ierror) |
| subroutine | psmile_io_scandir_no_of_files (basename, no_of_files, ierror) |
| subroutine | psmile_write_meta_byid (id_varid, id_taskid, ierror) |
| subroutine | psmile_write_meta (ierror) |
| subroutine | psmile_read_byid_dble (id_varid, id_taskid, rd_a, ju_day, ju_sec, ju_dayb, ju_secb, timeop, ierror) |
| subroutine | psmile_read_byid_real (id_varid, id_taskid, rd_a, ju_day, ju_sec, ju_dayb, ju_secb, timeop, ierror) |
| subroutine | psmile_read_byid_int (id_varid, id_taskid, rd_a, ju_day, ju_sec, ju_dayb, ju_secb, timeop, ierror) |
| subroutine | psmile_multi_reduce_int (task, shape_in, data_in, shape_out, data_out, mask, ierror) |
| subroutine | psmile_multi_reduce_real (task, shape_in, data_in, shape_out, data_out, mask, ierror) |
| subroutine | psmile_multi_reduce_dble (task, shape_in, data_in, shape_out, data_out, mask, ierror) |
| subroutine | psmile_loc_trans_int (task, nbr_fields, len_in, data_in, len_out, data_out, field_id) |
| subroutine | psmile_loc_trans_real (task, nbr_fields, len_in, data_in, len_out, data_out, field_id) |
| subroutine | psmile_loc_trans_dble (task, nbr_fields, len_in, data_in, len_out, data_out, field_id) |
| subroutine | psmile_get_initial_date (initial_date, ierror) |
| subroutine | psmile_set_userdef (var_id, side, chan_id, ierror) |
| subroutine | psmile_pack_field_info (field_info, buffer, num_field_info) |
| subroutine | psmile_unpack_field_info (field_info, buffer, num_field_info) |
| subroutine | psmile_init_enddef_msg_inters (msg_intersections) |
| subroutine | psmile_pack_msg_intersections (msg_intersections, buffer) |
| subroutine | psmile_unpack_msg_intersections (msg_intersections, buffer) |
| subroutine | psmile_copy_msg_intersections (msg_intersections_to, msg_intersections_from) |
| subroutine | psmile_init_enddef_msg_locs (msg_locations) |
| subroutine | psmile_pack_msg_locations (msg_locations, buffer) |
| subroutine | psmile_unpack_msg_locations (msg_locations, buffer) |
| subroutine | psmile_init_enddef_msg_extra (msg_extra) |
| subroutine | psmile_pack_msg_extra (msg_extra, buffer) |
| subroutine | psmile_unpack_msg_extra (msg_extra, buffer) |
Definition at line 1051 of file psmile.F90.
| subroutine PSMILe::interface::psmile_add_nn_found_dble | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,dimension (n_send),intent(in) | index_sent, | |||
| Integer,dimension (n_send),intent(in) | found, | |||
| Integer,intent(in) | n_send, | |||
| Integer,dimension (n_found),intent(in) | index_found, | |||
| Double Precision,dimension (n_found),intent(in) | distance, | |||
| Integer,intent(in) | n_found, | |||
| Integer,intent(in) | nb_extra, | |||
| Integer,dimension (2, extra_search%n_extra),intent(inout) | selected, | |||
| Type (Select_search_info),dimension (nrecv),intent(inout) | sel_info, | |||
| Integer,intent(inout) | nrecv, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6073 of file psmile.F90.
| subroutine PSMILe::interface::psmile_add_nn_found_real | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,dimension (n_send),intent(in) | index_sent, | |||
| Integer,dimension (n_send),intent(in) | found, | |||
| Integer,intent(in) | n_send, | |||
| Integer,dimension (n_found),intent(in) | index_found, | |||
| Real,dimension (n_found),intent(in) | distance, | |||
| Integer,intent(in) | n_found, | |||
| Integer,intent(in) | nb_extra, | |||
| Integer,dimension (2, extra_search%n_extra),intent(inout) | selected, | |||
| Type (Select_search_info),dimension (nrecv),intent(inout) | sel_info, | |||
| Integer,intent(inout) | nrecv, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2664 of file psmile.F90.
| subroutine PSMILe::interface::psmile_add_points_found | ( | Integer,intent(in) | grid_id, | |
| Type (Enddef_search),intent(inout) | search, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,dimension (n_send),intent(in) | indices_returned, | |||
| Integer,dimension (n_send),intent(inout) | found, | |||
| Integer,intent(in) | n_send, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_nsend, | |||
| Integer,dimension (n_found),intent(in) | index_found, | |||
| Integer,intent(in) | n_found, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | use_how, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1480 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_1d_dble | ( | Double Precision,dimension (shape(1),intent(in) | array, | |
| Integer,dimension(2),intent(in) | shape, | |||
| Integer,dimension(2),intent(out) | range, | |||
| Double Precision,dimension (corner_shape(1),intent(in) | corners, | |||
| Integer,dimension(2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Double Precision,dimension (range(1),intent(out) | chmin, | |||
| Double Precision,dimension (range(1),intent(out) | chmax, | |||
| Integer,intent(in) | levdim, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6092 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_1d_real | ( | Real,dimension (shape(1),intent(in) | array, | |
| Integer,dimension(2),intent(in) | shape, | |||
| Integer,dimension(2),intent(out) | range, | |||
| Real,dimension (corner_shape(1),intent(in) | corners, | |||
| Integer,dimension(2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Real,dimension (range(1),intent(out) | chmin, | |||
| Real,dimension (range(1),intent(out) | chmax, | |||
| Integer,intent(in) | levdim, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2683 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_2d_dble | ( | Double Precision,dimension(coords_shape(1,1),intent(in) | coords, | |
| Integer,dimension(2,2),intent(in) | coords_shape, | |||
| Integer,dimension(2,2),intent(out) | sub_range, | |||
| Integer,dimension (2, ndim_2d),intent(in) | corner_shape, | |||
| Double Precision,dimension (sub_range(1,1),intent(out) | chmin, | |||
| Double Precision,dimension (sub_range(1,1),intent(out) | chmax, | |||
| Double Precision,dimension (sub_range(1,1),intent(out) | midp, | |||
| Integer,dimension (ndim_2d),intent(in) | levdim, | |||
| Double Precision,intent(in) | period, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6107 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_2d_real | ( | Real,dimension(coords_shape(1,1),intent(in) | coords, | |
| Integer,dimension(2,2),intent(in) | coords_shape, | |||
| Integer,dimension(2,2),intent(out) | sub_range, | |||
| Integer,dimension (2, ndim_2d),intent(in) | corner_shape, | |||
| Real,dimension (sub_range(1,1),intent(out) | chmin, | |||
| Real,dimension (sub_range(1,1),intent(out) | chmax, | |||
| Real,dimension (sub_range(1,1),intent(out) | midp, | |||
| Integer,dimension (ndim_2d),intent(in) | levdim, | |||
| Real,intent(in) | period, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2698 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_3d_dble | ( | Integer,intent(in) | method_id, | |
| Double Precision,dimension(shape(1,1),intent(in) | array, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,dimension(2,3),intent(out) | range, | |||
| Double Precision,dimension (corner_shape(1,1),intent(in) | corners, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Double Precision,dimension (range(1,1),intent(out) | chmin, | |||
| Double Precision,dimension (range(1,1),intent(out) | chmax, | |||
| Double Precision,dimension (range(1,1),intent(out) | midp, | |||
| Integer,dimension (ndim_3d),intent(in) | levdim, | |||
| Logical,intent(in) | cyclic, | |||
| Double Precision,intent(in) | period, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6199 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_3d_real | ( | Integer,intent(in) | method_id, | |
| Real,dimension(shape(1,1),intent(in) | array, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,dimension(2,3),intent(out) | range, | |||
| Real,dimension (corner_shape(1,1),intent(in) | corners, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Real,dimension (range(1,1),intent(out) | chmin, | |||
| Real,dimension (range(1,1),intent(out) | chmax, | |||
| Real,dimension (range(1,1),intent(out) | midp, | |||
| Integer,dimension (ndim_3d),intent(in) | levdim, | |||
| Logical,intent(in) | cyclic, | |||
| Real,intent(in) | period, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2790 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_gauss2_dble | ( | Double Precision,dimension(shape(1),intent(in) | array_x, | |
| Double Precision,dimension(shape(1),intent(in) | array_y, | |||
| Integer,dimension(2),intent(in) | shape, | |||
| Integer,dimension(1),intent(out) | range, | |||
| Integer,intent(in) | nbr_lats, | |||
| Integer,dimension(nbr_lats,1),intent(in) | points_per_lat, | |||
| Double Precision,dimension (corner_shape(1),intent(in) | corners_y, | |||
| Integer,dimension(2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Double Precision,dimension (range(1),intent(out) | chmin_x, | |||
| Double Precision,dimension (range(1),intent(out) | chmax_x, | |||
| Double Precision,dimension (range(1),intent(out) | midp_x, | |||
| Double Precision,dimension (range(1),intent(out) | chmin_y, | |||
| Double Precision,dimension (range(1),intent(out) | chmax_y, | |||
| Double Precision,dimension (range(1),intent(out) | midp_y, | |||
| Integer,dimension (range(2),intent(out) | nbrs, | |||
| Integer,dimension(1),intent(in) | levdim, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6233 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_gauss2_real | ( | Real,dimension(shape(1),intent(in) | array_x, | |
| Real,dimension(shape(1),intent(in) | array_y, | |||
| Integer,dimension(2),intent(in) | shape, | |||
| Integer,dimension(1),intent(out) | range, | |||
| Integer,intent(in) | nbr_lats, | |||
| Integer,dimension(nbr_lats,1),intent(in) | points_per_lat, | |||
| Real,dimension (corner_shape(1),intent(in) | corners_y, | |||
| Integer,dimension(2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Real,dimension (range(1),intent(out) | chmin_x, | |||
| Real,dimension (range(1),intent(out) | chmax_x, | |||
| Real,dimension (range(1),intent(out) | midp_x, | |||
| Real,dimension (range(1),intent(out) | chmin_y, | |||
| Real,dimension (range(1),intent(out) | chmax_y, | |||
| Real,dimension (range(1),intent(out) | midp_y, | |||
| Integer,dimension (range(2),intent(out) | nbrs, | |||
| Integer,dimension(1),intent(in) | levdim, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2824 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_pole_dble | ( | integer,dimension(2,2),intent(in) | coords_shape, | |
| double precision,dimension(coords_shape(1,1),intent(in) | coords_x, | |||
| double precision,dimension(coords_shape(1,1),intent(in) | coords_y, | |||
| integer,dimension (2, ndim_3d),intent(in) | corner_shape, | |||
| integer,dimension(2,2),intent(inout) | sub_range, | |||
| double precision,dimension (sub_range(1,1),intent(inout) | chmin_x, | |||
| double precision,dimension (sub_range(1,1),intent(inout) | chmax_x, | |||
| double precision,dimension (sub_range(1,1),intent(inout) | chmin_y, | |||
| double precision,dimension (sub_range(1,1),intent(inout) | chmax_y, | |||
| double precision,dimension(sub_range(1,1),intent(inout) | midp_x, | |||
| double precision,dimension(sub_range(1,1),intent(inout) | midp_y, | |||
| integer,dimension(:),intent(in) | pole_array, | |||
| double precision,intent(in) | period, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 2853 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_pole_real | ( | integer,dimension(2,2),intent(in) | coords_shape, | |
| real,dimension(coords_shape(1,1),intent(in) | coords_x, | |||
| real,dimension(coords_shape(1,1),intent(in) | coords_y, | |||
| integer,dimension (2, ndim_3d),intent(in) | corner_shape, | |||
| integer,dimension(2,2),intent(inout) | sub_range, | |||
| real,dimension (sub_range(1,1),intent(inout) | chmin_x, | |||
| real,dimension (sub_range(1,1),intent(inout) | chmax_x, | |||
| real,dimension (sub_range(1,1),intent(inout) | chmin_y, | |||
| real,dimension (sub_range(1,1),intent(inout) | chmax_y, | |||
| real,dimension(sub_range(1,1),intent(inout) | midp_x, | |||
| real,dimension(sub_range(1,1),intent(inout) | midp_y, | |||
| integer,dimension(:),intent(in) | pole_array, | |||
| real,intent(in) | period, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 2885 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_virt_2d_dble | ( | Integer,intent(in) | method_id, | |
| Double Precision,dimension(coords_shape(1,1),intent(inout) | coords1, | |||
| Double Precision,dimension(coords_shape(1,1),intent(inout) | coords2, | |||
| Integer,dimension(2,2),intent(inout) | coords_shape, | |||
| Integer,dimension(2,2),intent(out) | coords_range, | |||
| Double Precision,dimension (corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension (corner_shape(1,1),intent(in) | corners2, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Double Precision,dimension (levdim_corner(1,1),intent(in) | chmin1_corner, | |||
| Double Precision,dimension (levdim_corner(1,1),intent(in) | chmin2_corner, | |||
| Double Precision,dimension (levdim_corner(1,1),intent(in) | chmax1_corner, | |||
| Double Precision,dimension (levdim_corner(1,1),intent(in) | chmax2_corner, | |||
| Integer,dimension(2,2),intent(in) | levdim_corner, | |||
| Double Precision,dimension (coords_range(1,1),intent(inout) | chmin1, | |||
| Double Precision,dimension (coords_range(1,1),intent(inout) | chmin2, | |||
| Double Precision,dimension (coords_range(1,1),intent(inout) | chmax1, | |||
| Double Precision,dimension (coords_range(1,1),intent(inout) | chmax2, | |||
| Double Precision,dimension (coords_range(1,1),intent(inout) | midp1, | |||
| Double Precision,dimension (coords_range(1,1),intent(inout) | midp2, | |||
| Integer,dimension (ndim_2d),intent(in) | levdim, | |||
| Double Precision,intent(in) | period, | |||
| Integer,dimension (coords_range(1,1),intent(out) | bmaski, | |||
| Integer,dimension (coords_range(1,2),intent(out) | bmaskj, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6133 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bbcells_virt_2d_real | ( | Integer,intent(in) | method_id, | |
| Real,dimension(coords_shape(1,1),intent(inout) | coords1, | |||
| Real,dimension(coords_shape(1,1),intent(inout) | coords2, | |||
| Integer,dimension(2,2),intent(inout) | coords_shape, | |||
| Integer,dimension(2,2),intent(out) | coords_range, | |||
| Real,dimension (corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension (corner_shape(1,1),intent(in) | corners2, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Real,dimension (levdim_corner(1,1),intent(in) | chmin1_corner, | |||
| Real,dimension (levdim_corner(1,1),intent(in) | chmin2_corner, | |||
| Real,dimension (levdim_corner(1,1),intent(in) | chmax1_corner, | |||
| Real,dimension (levdim_corner(1,1),intent(in) | chmax2_corner, | |||
| Integer,dimension(2,2),intent(in) | levdim_corner, | |||
| Real,dimension (coords_range(1,1),intent(inout) | chmin1, | |||
| Real,dimension (coords_range(1,1),intent(inout) | chmin2, | |||
| Real,dimension (coords_range(1,1),intent(inout) | chmax1, | |||
| Real,dimension (coords_range(1,1),intent(inout) | chmax2, | |||
| Real,dimension (coords_range(1,1),intent(inout) | midp1, | |||
| Real,dimension (coords_range(1,1),intent(inout) | midp2, | |||
| Integer,dimension (ndim_2d),intent(in) | levdim, | |||
| Real,intent(in) | period, | |||
| Integer,dimension (coords_range(1,1),intent(out) | bmaski, | |||
| Integer,dimension (coords_range(1,2),intent(out) | bmaskj, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2724 of file psmile.F90.
| subroutine PSMILe::interface::psmile_bsend_init | ( | Integer,dimension (number_of_ftypes),intent(in) | ftypes, | |
| Integer,dimension (number_of_ftypes),intent(in) | flengths, | |||
| Integer,intent(in) | number_of_ftypes, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2458 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ccompact_3d_reg_dble | ( | Type (Send_information),intent(inout) | send_info, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,intent(in) | nb_corners, | |||
| Double Precision,dimension ( shape(1,1),intent(in) | array_x, | |||
| Double Precision,dimension ( shape(1,2),intent(in) | array_y, | |||
| Double Precision,dimension ( shape(1,3),intent(in) | array_z, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(in) | nbr_cells_tot, | |||
| Integer,dimension (nbr_cells_tot),intent(inout) | source_cell_index, | |||
| Integer,dimension (nbr_cells_tot, nb_corners),intent(inout) | neighcells, | |||
| Double Precision,dimension (dest_size),intent(out) | dest_x, | |||
| Double Precision,dimension (dest_size),intent(out) | dest_y, | |||
| Double Precision,dimension (dest_size),intent(out) | dest_z, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6331 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ccompact_3d_reg_real | ( | Type (Send_information),intent(inout) | send_info, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,intent(in) | nb_corners, | |||
| Real,dimension ( shape(1,1),intent(in) | array_x, | |||
| Real,dimension ( shape(1,2),intent(in) | array_y, | |||
| Real,dimension ( shape(1,3),intent(in) | array_z, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(in) | nbr_cells_tot, | |||
| Integer,dimension (nbr_cells_tot),intent(inout) | source_cell_index, | |||
| Integer,dimension (nbr_cells_tot, nb_corners),intent(inout) | neighcells, | |||
| Real,dimension (dest_size),intent(out) | dest_x, | |||
| Real,dimension (dest_size),intent(out) | dest_y, | |||
| Real,dimension (dest_size),intent(out) | dest_z, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2986 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ccompact_gauss2_dble | ( | Type (Send_information),intent(inout) | send_info, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,intent(in) | nb_corners, | |||
| Double Precision,dimension ( shape(1,1),intent(in) | array_x, | |||
| Double Precision,dimension ( shape(1,1),intent(in) | array_y, | |||
| Double Precision,dimension ( shape(1,3),intent(in) | array_z, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(in) | nbr_cells_tot, | |||
| Integer,dimension (nbr_cells_tot),intent(inout) | source_cell_index, | |||
| Integer,dimension (nbr_cells_tot, nb_corners),intent(inout) | neighcells, | |||
| Double Precision,dimension (2*dest_size),intent(out) | dest_x, | |||
| Double Precision,dimension (2*dest_size),intent(out) | dest_y, | |||
| Double Precision,dimension (2*dest_size),intent(out) | dest_z, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6270 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ccompact_gauss2_real | ( | Type (Send_information),intent(inout) | send_info, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,intent(in) | nb_corners, | |||
| Real,dimension ( shape(1,1),intent(in) | array_x, | |||
| Real,dimension ( shape(1,1),intent(in) | array_y, | |||
| Real,dimension ( shape(1,3),intent(in) | array_z, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(in) | nbr_cells_tot, | |||
| Integer,dimension (nbr_cells_tot),intent(inout) | source_cell_index, | |||
| Integer,dimension (nbr_cells_tot, nb_corners),intent(inout) | neighcells, | |||
| Real,dimension (2*dest_size),intent(out) | dest_x, | |||
| Real,dimension (2*dest_size),intent(out) | dest_y, | |||
| Real,dimension (2*dest_size),intent(out) | dest_z, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2925 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ccompact_irreg2_dble | ( | Type (Send_information),intent(inout) | send_info, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,intent(in) | nb_corners, | |||
| Double Precision,dimension ( shape(1,1),intent(in) | array_x, | |||
| Double Precision,dimension ( shape(1,1),intent(in) | array_y, | |||
| Double Precision,dimension ( shape(1,3),intent(in) | array_z, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(in) | nbr_cells_tot, | |||
| Integer,dimension (nbr_cells_tot),intent(inout) | source_cell_index, | |||
| Integer,dimension(nbr_cells_tot, nb_corners),intent(inout) | neighcells, | |||
| Double Precision,dimension (dest_size),intent(out) | dest_x, | |||
| Double Precision,dimension (dest_size),intent(out) | dest_y, | |||
| Double Precision,dimension (dest_size),intent(out) | dest_z, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6299 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ccompact_irreg2_real | ( | Type (Send_information),intent(inout) | send_info, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,intent(in) | nb_corners, | |||
| Real,dimension ( shape(1,1),intent(in) | array_x, | |||
| Real,dimension ( shape(1,1),intent(in) | array_y, | |||
| Real,dimension ( shape(1,3),intent(in) | array_z, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(in) | nbr_cells_tot, | |||
| Integer,dimension (nbr_cells_tot),intent(inout) | source_cell_index, | |||
| Integer,dimension(nbr_cells_tot, nb_corners),intent(inout) | neighcells, | |||
| Real,dimension (dest_size),intent(out) | dest_x, | |||
| Real,dimension (dest_size),intent(out) | dest_y, | |||
| Real,dimension (dest_size),intent(out) | dest_z, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2954 of file psmile.F90.
| subroutine PSMILe::interface::psmile_celltest_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension(2,ndim_2d),intent(in) | range, | |||
| Integer,intent(out) | sense, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6262 of file psmile.F90.
| subroutine PSMILe::interface::psmile_celltest_real | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension(2,ndim_2d),intent(in) | range, | |||
| Integer,intent(out) | sense, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2917 of file psmile.F90.
| subroutine PSMILe::interface::psmile_check_action | ( | Integer,intent(in) | var_id, | |
| Integer,intent(in) | task_id, | |||
| Logical,intent(in) | precise, | |||
| Double Precision,intent(in) | julian_day, | |||
| Double Precision,dimension(2),intent(in) | julian_dayb, | |||
| Double Precision,intent(in) | julian_sec, | |||
| Double Precision,dimension(2),intent(in) | julian_secb, | |||
| Logical,dimension(3),intent(out) | action | |||
| ) |
Definition at line 1199 of file psmile.F90.
| subroutine PSMILe::interface::psmile_check_file_size | ( | Integer,dimension(:),intent(in) | varids, | |
| Integer,intent(in) | size, | |||
| Logical,intent(out) | flag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9683 of file psmile.F90.
| subroutine PSMILe::interface::psmile_check_restart | ( | Integer,intent(in) | id_varid, | |
| Integer,intent(in) | id_taskid, | |||
| Integer,intent(out) | id_info, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9663 of file psmile.F90.
| subroutine PSMILe::interface::psmile_close_file_byid | ( | Integer,intent(in) | varid, | |
| Integer,intent(in) | taskid, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9678 of file psmile.F90.
| subroutine PSMILe::interface::psmile_close_files | ( | Integer,intent(out) | ierror | ) |
Definition at line 9670 of file psmile.F90.
| subroutine PSMILe::interface::psmile_compact_locations | ( | Integer,intent(in) | grid_id, | |
| Type (Enddef_search),intent(in) | search, | |||
| Integer,intent(in) | ndim, | |||
| Type (integer_vector),dimension (search%search_data%npart, ndim),intent(inout) | found, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2402 of file psmile.F90.
| subroutine PSMILe::interface::psmile_compact_neighbors_3d | ( | Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type(Extra_search_info),intent(in) | extra_search, | |||
| Type (Send_information),intent(inout) | send_info, | |||
| Integer,dimension (nloc, num_neigh),intent(out) | neighbors, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2412 of file psmile.F90.
| subroutine PSMILe::interface::psmile_control_cell_2d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (icdim1, ndim_2d),intent(in) | ic, | |||
| Integer,intent(in) | nc, | |||
| Integer,intent(in) | icdim1, | |||
| Integer,dimension (nc),intent(in) | list, | |||
| Integer,intent(in) | j, | |||
| Integer,intent(in) | k, | |||
| Double Precision,dimension (shape(1,1),intent(in) | coords1, | |||
| Double Precision,dimension (shape(1,1),intent(in) | coords2, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Double Precision,intent(in) | tol, | |||
| Logical,dimension (nc),intent(out) | fnd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6360 of file psmile.F90.
| subroutine PSMILe::interface::psmile_control_cell_2d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (icdim1, ndim_2d),intent(in) | ic, | |||
| Integer,intent(in) | nc, | |||
| Integer,intent(in) | icdim1, | |||
| Integer,dimension (nc),intent(in) | list, | |||
| Integer,intent(in) | j, | |||
| Integer,intent(in) | k, | |||
| Real,dimension (shape(1,1),intent(in) | coords1, | |||
| Real,dimension (shape(1,1),intent(in) | coords2, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Real,intent(in) | tol, | |||
| Logical,dimension (nc),intent(out) | fnd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3015 of file psmile.F90.
| subroutine PSMILe::interface::psmile_control_grids | ( | Integer,intent(out) | ierror | ) |
Definition at line 1427 of file psmile.F90.
| subroutine PSMILe::interface::psmile_copy_msg_intersections | ( | type (enddef_msg_intersections),intent(out) | msg_intersections_to, | |
| type (enddef_msg_intersections),intent(in) | msg_intersections_from | |||
| ) |
Definition at line 9942 of file psmile.F90.
| subroutine PSMILe::interface::psmile_copy_subarray_2d_double | ( | Double Precision,dimension (size),intent(out) | dest_vector, | |
| Integer(kind=int64),intent(in) | size, | |||
| Double Precision,dimension (idlow:idhigh, jdlow:jdhigh),intent(in) | darray, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9184 of file psmile.F90.
| subroutine PSMILe::interface::psmile_copy_subarray_2d_log | ( | Logical,dimension (size),intent(out) | dest_vector, | |
| Integer(kind=int64),intent(in) | size, | |||
| Logical,dimension (idlow:idhigh, jdlow:jdhigh),intent(in) | darray, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2633 of file psmile.F90.
| subroutine PSMILe::interface::psmile_copy_subarray_2d_real | ( | Real,dimension (size),intent(out) | dest_vector, | |
| Integer(kind=int64),intent(in) | size, | |||
| Real,dimension (idlow:idhigh, jdlow:jdhigh),intent(in) | darray, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6042 of file psmile.F90.
| subroutine PSMILe::interface::psmile_copy_subarray_3d_double | ( | Double Precision,dimension (size),intent(out) | dest_vector, | |
| Integer(kind=int64),intent(in) | size, | |||
| Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh),intent(in) | darray, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,dimension (2, ndim_3d),intent(in) | sub, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9169 of file psmile.F90.
| subroutine PSMILe::interface::psmile_copy_subarray_3d_int | ( | Integer,dimension (size),intent(out) | dest_vector, | |
| Integer(kind=int64),intent(in) | size, | |||
| Integer,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh),intent(in) | iarray, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,dimension (2, ndim_3d),intent(in) | sub, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2471 of file psmile.F90.
| subroutine PSMILe::interface::psmile_copy_subarray_3d_log | ( | Logical,dimension (size),intent(out) | dest_vector, | |
| Integer(kind=int64),intent(in) | size, | |||
| Logical,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh),intent(in) | iarray, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,dimension (2, ndim_3d),intent(in) | sub, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2645 of file psmile.F90.
| subroutine PSMILe::interface::psmile_copy_subarray_3d_real | ( | Real,dimension (size),intent(out) | dest_vector, | |
| Integer(kind=int64),intent(in) | size, | |||
| Real,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh),intent(in) | darray, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,dimension (2, ndim_3d),intent(in) | sub, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6054 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ddadd_mpi_callback | ( | dda | , | |
| ddb | , | |||
| integer,intent(in) | len, | |||
| integer,intent(in) | itype | |||
| ) |
Definition at line 9289 of file psmile.F90.
| subroutine PSMILe::interface::psmile_deallocate | ( | Integer,intent(out) | ierror | ) |
Definition at line 1227 of file psmile.F90.
| subroutine PSMILe::interface::psmile_deallocate_fields | ( | Integer,intent(out) | ierror | ) |
Definition at line 1235 of file psmile.F90.
| subroutine PSMILe::interface::psmile_deallocate_masks | ( | Integer,intent(out) | ierror | ) |
Definition at line 1239 of file psmile.F90.
| subroutine PSMILe::interface::psmile_deallocate_methods | ( | Integer,intent(out) | ierror | ) |
Definition at line 1231 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_datatypes | ( | Integer,intent(out) | ierror | ) |
Definition at line 1407 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_domains | ( | Integer,intent(out) | ierror | ) |
Definition at line 9639 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_grid | ( | integer,intent(out) | grid_id, | |
| character(len=*),intent(in) | grid_name, | |||
| integer,intent(in) | comp_id, | |||
| integer,dimension (1:2,*),intent(in) | grid_valid_shape, | |||
| integer,intent(in) | grid_type, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1053 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_metadata | ( | Integer,intent(in) | id_varid, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9643 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_mpi_comm | ( | Integer,intent(out) | ierror | ) |
Definition at line 1411 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_mpi_compcomm | ( | Integer,intent(out) | ierror | ) |
Definition at line 1415 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_partition | ( | integer,intent(in) | grid_id, | |
| integer,intent(in) | nbr_blocks, | |||
| integer,dimension(1:nbr_blocks,*),intent(in) | partition_array, | |||
| integer,dimension(1:nbr_blocks,*),intent(in) | extent_array, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1064 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_var | ( | integer,intent(out) | var_id, | |
| character (len=*),intent(in) | var_name, | |||
| integer,intent(in) | grid_id, | |||
| integer,intent(in) | point_id, | |||
| integer,intent(in) | mask_id, | |||
| integer,dimension(2),intent(in) | var_nodims, | |||
| integer,dimension(1:2,1:var_nodims(1),intent(in) | var_actual_shape, | |||
| integer,intent(in) | var_type, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1150 of file psmile.F90.
| subroutine PSMILe::interface::psmile_do_masks_match | ( | Logical,dimension ( mask1_shape(1,1),intent(in) | mask1_array, | |
| Integer,dimension(2,3),intent(in) | mask1_shape, | |||
| Logical,dimension ( mask2_shape(1,1),intent(in) | mask2_array, | |||
| Integer,dimension(2,3),intent(in) | mask2_shape, | |||
| Integer,dimension (2, ndim_3d, nparts),intent(in) | inter, | |||
| Integer,intent(in) | nparts, | |||
| Logical,intent(out) | match, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1458 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_action | ( | Type (Enddef_search),intent(inout) | search, | |
| Integer,intent(in) | index, | |||
| Integer,dimension (mpi_status_size),intent(in) | status, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1504 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_action_cell | ( | Type (enddef_msg_locations),intent(in) | msg_locations, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1512 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_action_extra | ( | Type (enddef_msg_extra),intent(in) | msg_extra, | |
| Integer,intent(in) | sender, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1519 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_action_loc | ( | Type (enddef_msg_locations),intent(in) | msg_locations, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1527 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_action_sel | ( | Integer,intent(in) | sender, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1534 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_appl | ( | Integer,intent(in) | tag, | |
| Integer,intent(out) | my_icomp0_coll_comps, | |||
| Integer,intent(out) | n_active, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1539 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_appl_miss | ( | Integer,dimension (comp_min:comp_max),intent(in) | global_ids, | |
| Integer,intent(in) | comp_min, | |||
| Integer,intent(in) | comp_max, | |||
| Type (Enddef_comp),dimension (n_active),intent(out) | b_comps, | |||
| Integer,intent(in) | n_active, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1547 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_comp | ( | Integer,intent(in) | comp_id, | |
| Integer,intent(in) | global_comp_id, | |||
| Integer,intent(in) | Number_of_Grids, | |||
| Type (Enddef_comp),intent(out) | comp_info, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1557 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_comp_grid | ( | Integer,intent(in) | comp_id, | |
| Integer,intent(out) | n_grids, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1565 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_comp_periodic | ( | Integer,intent(in) | comp_id, | |
| Integer,dimension (n_total),intent(in) | grid_ids, | |||
| Integer,intent(in) | n_total, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1570 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_metadata | ( | Integer,intent(out) | ierror | ) |
Definition at line 9648 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ext_compact_irreg2_dble | ( | Type(Send_information),intent(inout) | send_info, | |
| Double Precision,dimension (*),intent(in) | array, | |||
| Integer,dimension (2, ndim_2d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Double Precision,dimension (dest_size),intent(out) | dest_vector, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6390 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ext_compact_irreg2_real | ( | Type(Send_information),intent(inout) | send_info, | |
| Real,dimension (*),intent(in) | array, | |||
| Integer,dimension (2, ndim_2d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Real,dimension (dest_size),intent(out) | dest_vector, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3045 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ext_compact_list_3d_dble | ( | Type(Send_information),intent(in) | send_info, | |
| Double Precision,dimension (*),intent(in) | array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Double Precision,dimension (dest_size),intent(out) | dest_vector, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6403 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ext_compact_list_3d_int | ( | Type(Send_information),intent(in) | send_info, | |
| Integer,dimension (*),intent(in) | array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (dest_size),intent(out) | dest_vector, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2502 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ext_compact_list_3d_real | ( | Type(Send_information),intent(in) | send_info, | |
| Real,dimension (*),intent(in) | array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Real,dimension (dest_size),intent(out) | dest_vector, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3058 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ext_compact_list_log2int | ( | Type(Send_information),intent(in) | send_info, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Logical,dimension (*),intent(in) | array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (dest_size),intent(out) | dest_vector, | |||
| Integer,intent(in) | dest_size, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2488 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extent_subgrid_1d_dble | ( | Double Precision,dimension (idlow:idhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Double Precision,dimension (2),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6460 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extent_subgrid_1d_real | ( | Real,dimension (idlow:idhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Real,dimension (2),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3107 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extent_subgrid_2d_dble | ( | Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Double Precision,dimension (2),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6471 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extent_subgrid_2d_real | ( | Real,dimension (idlow:idhigh, jdlow:jdhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Real,dimension (2),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3118 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extent_subgrid_3d_dble | ( | Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
| Double Precision,dimension (2),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6484 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extent_subgrid_3d_real | ( | Real,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
| Real,dimension (2),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3131 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extract_indices_2d_dble | ( | Double Precision,dimension (*),intent(in) | array, | |
| Integer,dimension (2, ndim_2d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, ncpl),intent(in) | dstijk, | |||
| Integer,intent(in) | ncpl, | |||
| Double Precision,dimension (ncpl),intent(out) | dest_vector, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6428 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extract_indices_2d_real | ( | Real,dimension (*),intent(in) | array, | |
| Integer,dimension (2, ndim_2d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, ncpl),intent(in) | dstijk, | |||
| Integer,intent(in) | ncpl, | |||
| Real,dimension (ncpl),intent(out) | dest_vector, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3083 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extract_indices_3d_dble | ( | Double Precision,dimension (*),intent(in) | array, | |
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, ncpl),intent(in) | dstijk, | |||
| Integer,intent(in) | ncpl, | |||
| Double Precision,dimension (ncpl),intent(out) | dest_vector, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6440 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extract_indices_3d_int | ( | Integer,dimension (*),intent(in) | array, | |
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, ncpl),intent(in) | dstijk, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,dimension (ncpl),intent(out) | dest_vector, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2515 of file psmile.F90.
| subroutine PSMILe::interface::psmile_extract_indices_3d_real | ( | Real,dimension (*),intent(in) | array, | |
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, ncpl),intent(in) | dstijk, | |||
| Integer,intent(in) | ncpl, | |||
| Real,dimension (ncpl),intent(out) | dest_vector, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3095 of file psmile.F90.
| subroutine PSMILe::interface::psmile_field2grid | ( | Integer,intent(out) | ierror | ) |
Definition at line 1577 of file psmile.F90.
| subroutine PSMILe::interface::psmile_find_corr_field | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_search),intent(in) | search, | |||
| Integer,intent(out) | var_id, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1243 of file psmile.F90.
| subroutine PSMILe::interface::psmile_find_intersect | ( | Type (Enddef_comp),intent(inout) | comp_info, | |
| Integer,intent(in) | global_index, | |||
| Integer,dimension(:),intent(inout) | num_intersect_per_grid, | |||
| Integer,dimension(:),intent(inout) | num_dummy_intersect_per_grid, | |||
| Integer,intent(inout) | ninter, | |||
| Integer,intent(inout) | nmyint, | |||
| Integer,intent(inout) | nnull, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1581 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_comp_handle | ( | Integer,intent(in) | comp_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1253 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_field_handle | ( | Integer,intent(in) | field_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1258 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_grid_handle | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1263 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_mask_handle | ( | Integer,intent(in) | mask_id, | |
| Integer,intent(out) | grid_id, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1268 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_method_handle | ( | Integer,intent(in) | method_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1274 of file psmile.F90.
| subroutine PSMILe::interface::psmile_gauss_get_neighbours | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1598 of file psmile.F90.
| subroutine PSMILe::interface::psmile_gauss_setup | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1593 of file psmile.F90.
| subroutine PSMILe::interface::psmile_gauss_setup_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (*),intent(in) | counts, | |||
| Integer,dimension (*),intent(in) | displs, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6452 of file psmile.F90.
| subroutine PSMILe::interface::psmile_gauss_setup_real | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (*),intent(in) | counts, | |||
| Integer,dimension (*),intent(in) | displs, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3146 of file psmile.F90.
| subroutine PSMILe::interface::psmile_generate_1d_3d_dble | ( | Double Precision,dimension (*),intent(in) | vector1, | |
| Double Precision,dimension (*),intent(in) | vector2, | |||
| Double Precision,dimension (*),intent(in) | vector3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Double Precision,dimension ( dest_shape(1,1),intent(out) | dest_array, | |||
| Integer,dimension(2,3),intent(out) | dest_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6500 of file psmile.F90.
| subroutine PSMILe::interface::psmile_generate_1d_3d_real | ( | Real,dimension (*),intent(in) | vector1, | |
| Real,dimension (*),intent(in) | vector2, | |||
| Real,dimension (*),intent(in) | vector3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Real,dimension ( dest_shape(1,1),intent(out) | dest_array, | |||
| Integer,dimension(2,3),intent(out) | dest_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3153 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_act_comps | ( | Integer,dimension (nd_acomps, *),intent(out) | a_comps, | |
| Integer,intent(in) | nd_acomps, | |||
| Integer,intent(out) | n_act, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2375 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_comp_handle | ( | Integer,intent(out) | comp_id, | |
| Character (len=*),intent(in) | comp_name, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1279 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_cyclic_dir_3d_dble | ( | Double Precision,dimension (*),intent(in) | chmin, | |
| Double Precision,dimension (*),intent(in) | chmin2, | |||
| Double Precision,dimension (*),intent(in) | chmin3, | |||
| Double Precision,dimension (*),intent(in) | chmax, | |||
| Double Precision,dimension (*),intent(in) | chmax2, | |||
| Double Precision,dimension (*),intent(in) | chmax3, | |||
| Integer,dimension (ndim_3d),intent(in) | levdim, | |||
| Double Precision,dimension (*),intent(in) | corners, | |||
| Double Precision,dimension (*),intent(in) | corners2, | |||
| Double Precision,dimension (*),intent(in) | corners3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Double Precision,intent(in) | len_cyclic, | |||
| Double Precision,intent(in) | rtol, | |||
| Integer,intent(in) | index, | |||
| Logical,intent(out) | cyclic, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6519 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_cyclic_dir_3d_real | ( | Real,dimension (*),intent(in) | chmin, | |
| Real,dimension (*),intent(in) | chmin2, | |||
| Real,dimension (*),intent(in) | chmin3, | |||
| Real,dimension (*),intent(in) | chmax, | |||
| Real,dimension (*),intent(in) | chmax2, | |||
| Real,dimension (*),intent(in) | chmax3, | |||
| Integer,dimension (ndim_3d),intent(in) | levdim, | |||
| Real,dimension (*),intent(in) | corners, | |||
| Real,dimension (*),intent(in) | corners2, | |||
| Real,dimension (*),intent(in) | corners3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Real,intent(in) | len_cyclic, | |||
| Real,intent(in) | rtol, | |||
| Integer,intent(in) | index, | |||
| Logical,intent(out) | cyclic, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3172 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_epio_handle | ( | Integer,intent(in) | comp_id, | |
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(in) | mask_id, | |||
| Integer,dimension(ndim_3d),intent(in) | interpolation, | |||
| Type (enddef_msg_intersections),intent(in) | msg_intersections, | |||
| Integer,intent(in) | trans_out, | |||
| Integer,intent(in) | trans_in, | |||
| Integer,intent(in) | tgt_epio_pe, | |||
| Integer,intent(out) | cpl_id, | |||
| Integer,intent(out) | epio_id, | |||
| Integer,intent(out) | trs_rank, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1294 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_exch_index | ( | Integer,intent(in) | var_id, | |
| Integer,intent(in) | task_id, | |||
| Integer,intent(in) | request, | |||
| Integer,intent(out) | index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1284 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_face_ind_21d | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Type (Send_information),intent(in) | send_info, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,intent(in) | nreq, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | srcloc_ind, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1603 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_face_ind_3d | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Type (Send_information),intent(in) | send_info, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,intent(in) | nreq, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | srcloc_ind, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1619 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_face_ind_reg | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Type (Send_information),intent(in) | send_info, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,intent(in) | nreq, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | srcloc_ind, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1635 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_3d_dble | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Double Precision,dimension (2, ndim_3d, nreq),intent(out) | faces, | |||
| Integer,dimension (nreq),intent(out) | n_faces, | |||
| Integer,intent(in) | nreq, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6547 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_3d_real | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Real,dimension (2, ndim_3d, nreq),intent(out) | faces, | |||
| Integer,dimension (nreq),intent(out) | n_faces, | |||
| Integer,intent(in) | nreq, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3200 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_3d_reg_dble | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,2),intent(in) | corners2, | |||
| Double Precision,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Double Precision,dimension (2, ndim_3d, nreq),intent(out) | faces, | |||
| Integer,dimension (nreq),intent(out) | n_faces, | |||
| Integer,intent(in) | nreq, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6580 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_3d_reg_real | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,2),intent(in) | corners2, | |||
| Real,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Real,dimension (2, ndim_3d, nreq),intent(out) | faces, | |||
| Integer,dimension (nreq),intent(out) | n_faces, | |||
| Integer,intent(in) | nreq, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3233 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_gauss2_dble | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Double Precision,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Double Precision,dimension (2, ndim_3d, nreq),intent(out) | faces, | |||
| Integer,intent(in) | nreq, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6607 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_gauss2_real | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Real,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Real,dimension (2, ndim_3d, nreq),intent(out) | faces, | |||
| Integer,intent(in) | nreq, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3260 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_irreg2_dble | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Double Precision,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Double Precision,dimension (2, ndim_3d, nreq),intent(out) | faces, | |||
| Integer,dimension (nreq),intent(out) | n_faces, | |||
| Integer,intent(in) | nreq, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6634 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_irreg2_real | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Real,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(in) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Real,dimension (2, ndim_3d, nreq),intent(out) | faces, | |||
| Integer,dimension (nreq),intent(out) | n_faces, | |||
| Integer,intent(in) | nreq, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3287 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_faces_virtual_ind | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Type (Send_information),intent(in) | send_info, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,intent(in) | nreq, | |||
| Integer,dimension (n_send),intent(out) | virtual_ind, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1652 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_field_dble | ( | Integer,intent(in) | field_id, | |
| Double Precision,dimension(*),intent(inout) | data_array, | |||
| Integer,intent(in) | len, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9144 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_field_handle | ( | Integer,intent(out) | field_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1315 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_field_int | ( | Integer,intent(in) | field_id, | |
| Integer,dimension(*),intent(inout) | data_array, | |||
| Integer,intent(in) | len, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2527 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_field_real | ( | Integer,intent(in) | field_id, | |
| Real,dimension(*),intent(inout) | data_array, | |||
| Integer,intent(in) | len, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6017 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_grid_extent | ( | Integer,intent(in) | grid_id, | |
| Real (PSMILe_float_kind),dimension (2, ndim_3d),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2383 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_grid_extent_dble | ( | Integer,intent(in) | grid_id, | |
| Real (PSMILe_float_kind),dimension (2, ndim_3d),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6663 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_grid_extent_real | ( | Integer,intent(in) | grid_id, | |
| Real (PSMILe_float_kind),dimension (2, ndim_3d),intent(out) | extent, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3316 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_grid_handle | ( | Integer,intent(out) | grid_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1319 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_halo_indices | ( | Integer,intent(in) | comp_id, | |
| Integer,dimension(number_of_grids_allocated),intent(in) | grid_id_list, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1327 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_halo_points | ( | Integer,intent(in) | comp_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1334 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_info_index | ( | Integer,intent(in) | method_id, | |
| Integer,intent(in) | request, | |||
| Integer,intent(out) | index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1289 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_initial_date | ( | Type(PRISM_Time_struct),intent(out) | initial_date, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9891 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_intersect | ( | Integer,intent(in) | ninter, | |
| Integer,intent(in) | nmyint, | |||
| Integer,intent(in) | nnull, | |||
| Integer,dimension(:),intent(in) | num_intersect_per_grid, | |||
| Integer,dimension(:),intent(in) | num_dummy_intersect_per_grid, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1670 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_irr_field_dble | ( | Double Precision,dimension (*),intent(inout) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,dimension (ndim_3d, npoints),intent(in) | dstijk, | |||
| Integer,intent(in) | npoints, | |||
| Integer,dimension (2, ndim_3d, nars),intent(in) | dstars, | |||
| Integer,intent(in) | nars, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | source, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9153 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_irr_field_int | ( | Integer,dimension (*),intent(inout) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,dimension (ndim_3d, npoints),intent(in) | dstijk, | |||
| Integer,intent(in) | npoints, | |||
| Integer,dimension (2, ndim_3d, nars),intent(in) | dstars, | |||
| Integer,intent(in) | nars, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | source, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2536 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_irr_field_real | ( | Real,dimension (*),intent(inout) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,dimension (ndim_3d, npoints),intent(in) | dstijk, | |||
| Integer,intent(in) | npoints, | |||
| Integer,dimension (2, ndim_3d, nars),intent(in) | dstars, | |||
| Integer,intent(in) | nars, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | source, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6026 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_locations_3d | ( | Type (enddef_msg_locations),intent(in) | msg_locations, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1682 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_mask_handle | ( | Integer,intent(out) | mask_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1339 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_method_handle | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(out) | method_id, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1343 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_next_field | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_search),intent(inout) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(inout) | n_vars_ret, | |||
| Integer,intent(out) | var_id, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1348 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_true_mask_entries | ( | Logical,dimension ( mask_shape(1,1),intent(in) | mask_array, | |
| Integer,dimension(2,3),intent(in) | mask_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | inter, | |||
| Integer,intent(out) | n_true, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1433 of file psmile.F90.
| subroutine PSMILe::interface::PSMILe_Get_userdef_handle | ( | Integer,intent(out) | userdef_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1323 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_search_cell_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | var_id, | |||
| Type (Enddef_comp),intent(in) | comp_info, | |||
| Type (Send_information),intent(inout) | send_info, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,dimension(ncpl),intent(inout) | nbr_cells, | |||
| Integer,intent(in) | n_intmethods, | |||
| Integer,dimension (n_intmethods),intent(in) | interpolation_methods, | |||
| Logical,dimension (n_intmethods),intent(in) | interpolation_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6702 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_search_cell_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | var_id, | |||
| Type (Enddef_comp),intent(in) | comp_info, | |||
| Type (Send_information),intent(inout) | send_info, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,dimension(ncpl),intent(inout) | nbr_cells, | |||
| Integer,intent(in) | n_intmethods, | |||
| Integer,dimension (n_intmethods),intent(in) | interpolation_methods, | |||
| Logical,dimension (n_intmethods),intent(in) | interpolation_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3377 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_search_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Type (dble_vector),dimension (ndim_3d),intent(in) | tgt_coords, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,dimension (n_intmethods),intent(in) | interpolation_methods, | |||
| Logical,dimension (n_intmethods),intent(in) | interpolation_search, | |||
| Integer,intent(in) | n_intmethods, | |||
| Integer,intent(in) | send_index, | |||
| Logical,intent(in) | mask_available, | |||
| Logical,intent(in) | use_mask, | |||
| Integer,intent(in) | use_how, | |||
| Integer,intent(in) | grid_type, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6670 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_search_nnx_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | var_id, | |||
| Double Precision,dimension (nloc),intent(in) | tgt_coords_x, | |||
| Double Precision,dimension (nloc),intent(in) | tgt_coords_y, | |||
| Double Precision,dimension (nloc),intent(in) | tgt_coords_z, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(in) | nb_extra, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6722 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_search_nnx_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | var_id, | |||
| Real,dimension (nloc),intent(in) | tgt_coords_x, | |||
| Real,dimension (nloc),intent(in) | tgt_coords_y, | |||
| Real,dimension (nloc),intent(in) | tgt_coords_z, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(in) | nb_extra, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3323 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_search_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Type (real_vector),dimension (ndim_3d),intent(in) | tgt_coords, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,dimension (n_intmethods),intent(in) | interpolation_methods, | |||
| Logical,dimension (n_intmethods),intent(in) | interpolation_search, | |||
| Integer,intent(in) | n_intmethods, | |||
| Integer,intent(in) | send_index, | |||
| Logical,intent(in) | mask_available, | |||
| Logical,intent(in) | use_mask, | |||
| Integer,intent(in) | use_how, | |||
| Integer,intent(in) | grid_type, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3345 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_sum_compute_dble | ( | data | , | |
| integer,intent(in) | data_size, | |||
| integer,intent(in) | nbr_fields, | |||
| integer,intent(in) | comm, | |||
| global_sum | , | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 9232 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_sum_compute_int | ( | integer,dimension(data_size, nbr_fields),intent(in) | data, | |
| integer,intent(in) | data_size, | |||
| integer,intent(in) | nbr_fields, | |||
| integer,intent(in) | comm, | |||
| integer,dimension(nbr_fields),intent(out) | global_sum, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 9245 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_sum_recv_dble | ( | data | , | |
| integer,intent(in) | nbr_fields, | |||
| integer,intent(in) | rank, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 9272 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_sum_recv_int | ( | integer,dimension(nbr_fields),intent(out) | data, | |
| integer,intent(in) | nbr_fields, | |||
| integer,intent(in) | rank, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 9280 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_sum_send_dble | ( | data | , | |
| integer,intent(in) | nbr_fields, | |||
| integer,intent(in) | rank, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 9255 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_sum_send_int | ( | integer,dimension(nbr_fields),intent(in) | data, | |
| integer,intent(in) | nbr_fields, | |||
| integer,intent(in) | rank, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 9263 of file psmile.F90.
| subroutine PSMILe::interface::psmile_hash_extra | ( | Type (Enddef_global_search),intent(inout) | search, | |
| Integer,dimension (ndim_3d, nlocs),intent(in) | locs, | |||
| Integer,dimension (nlocs),intent(out) | hash, | |||
| Integer,intent(in) | nlocs, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1689 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_coords_3d_reg_dble | ( | Double Precision,dimension(*),intent(in) | x_coords, | |
| Double Precision,dimension(*),intent(in) | y_coords, | |||
| Double Precision,dimension(*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (dble_vector),dimension (ndim_2d) | sinvec, | |||
| Type (dble_vector),dimension (ndim_2d) | cosvec, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7589 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_coords_3d_reg_real | ( | Real,dimension(*),intent(in) | x_coords, | |
| Real,dimension(*),intent(in) | y_coords, | |||
| Real,dimension(*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (real_vector),dimension (ndim_2d) | sinvec, | |||
| Type (real_vector),dimension (ndim_2d) | cosvec, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4257 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_coords_irreg2_dble | ( | Double Precision,dimension(*),intent(in) | x_coords, | |
| Double Precision,dimension(*),intent(in) | y_coords, | |||
| Double Precision,dimension(*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (dble_vector) | sinvec, | |||
| Type (dble_vector) | cosvec, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7571 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_coords_irreg2_real | ( | Real,dimension(*),intent(in) | x_coords, | |
| Real,dimension(*),intent(in) | y_coords, | |||
| Real,dimension(*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (real_vector) | sinvec, | |||
| Type (real_vector) | cosvec, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4275 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trf_coords_3d_dble | ( | Double Precision,dimension(*),intent(in) | x_coords, | |
| Double Precision,dimension(*),intent(in) | y_coords, | |||
| Double Precision,dimension(*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (dble_vector) | sinvec, | |||
| Type (dble_vector) | cosvec, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7607 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trf_coords_3d_real | ( | Real,dimension(*),intent(in) | x_coords, | |
| Real,dimension(*),intent(in) | y_coords, | |||
| Real,dimension(*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (real_vector) | sinvec, | |||
| Type (real_vector) | cosvec, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4293 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trs_loc_3d_reg_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (dble_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(inout) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(inout) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7646 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trs_loc_3d_reg_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (real_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(inout) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(inout) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4332 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trs_loc_gauss2_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (dble_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(inout) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(inout) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7688 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trs_loc_gauss2_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (real_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(inout) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(inout) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4374 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trs_loc_irreg2_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (dble_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(inout) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(inout) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7667 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trs_loc_irreg2_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (real_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(inout) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(inout) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4353 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trs_locs_3d_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (dble_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(inout) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7625 of file psmile.F90.
| subroutine PSMILe::interface::psmile_info_trs_locs_3d_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (real_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(inout) | send_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4311 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_datatypes | ( | Integer,intent(out) | ierror | ) |
Definition at line 1394 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_enddef_msg_extra | ( | type (enddef_msg_extra),intent(out) | msg_extra | ) |
Definition at line 9971 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_enddef_msg_inters | ( | type (enddef_msg_intersections),intent(out) | msg_intersections | ) |
Definition at line 9922 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_enddef_msg_locs | ( | type (enddef_msg_locations),intent(out) | msg_locations | ) |
Definition at line 9950 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_mpi1 | ( | Integer,intent(out) | ierror | ) |
Definition at line 1403 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_mpi2 | ( | Integer,intent(inout) | intercomm, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1398 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_cleanup | ( | Integer,intent(out) | ierror | ) |
Definition at line 9674 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_close | ( | Integer,intent(out) | ierror | ) |
Definition at line 9635 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_derive_pelist | ( | Integer,intent(in) | id_comm_appl, | |
| Integer,intent(in) | id_comp_id, | |||
| Type (Enddef_comp),intent(in) | comp_info, | |||
| Integer,dimension(*),intent(out) | pelist, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9598 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_finalize | ( | Integer,intent(out) | ierror | ) |
Definition at line 9631 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_init | ( | Integer,intent(out) | ierror | ) |
Definition at line 9609 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_init_cf | ( | Integer,intent(out) | ierror | ) |
Definition at line 9627 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_init_comp | ( | Integer,intent(in) | id_comp_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9613 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_init_pelist | ( | Integer,intent(in) | id_comp_id, | |
| Type (Enddef_comp),intent(in) | comp_info, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9618 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_scandir | ( | Character(len=*),intent(in) | basename, | |
| Character(len=*),dimension(*),intent(out) | file_list, | |||
| Integer,intent(in) | len_of_list, | |||
| Integer,intent(out) | no_of_files, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9690 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_scandir_no_of_files | ( | Character(len=*),intent(in) | basename, | |
| Integer,intent(out) | no_of_files, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9698 of file psmile.F90.
| subroutine PSMILe::interface::psmile_is_mask_defined | ( | Logical,dimension ( mask_shape(1,1),intent(in) | mask_array, | |
| Integer,dimension(2,3),intent(in) | mask_shape, | |||
| Integer,dimension (2, ndim_3d, nparts),intent(in) | inter, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(out) | defined, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1445 of file psmile.F90.
| subroutine PSMILe::interface::psmile_loc_trans_dble | ( | Integer,intent(in) | task, | |
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(in) | len_in, | |||
| Double Precision,dimension(len_in,nbr_fields),intent(in) | data_in, | |||
| Integer,intent(in) | len_out, | |||
| Double Precision,dimension(len_out,nbr_fields),intent(inout) | data_out, | |||
| Integer,intent(in),optional | field_id | |||
| ) |
Definition at line 9878 of file psmile.F90.
| subroutine PSMILe::interface::psmile_loc_trans_int | ( | Integer,intent(in) | task, | |
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(in) | len_in, | |||
| Integer,dimension(len_in,nbr_fields),intent(in) | data_in, | |||
| Integer,intent(in) | len_out, | |||
| Integer,dimension(len_out,nbr_fields),intent(inout) | data_out, | |||
| Integer,intent(in),optional | field_id | |||
| ) |
Definition at line 9852 of file psmile.F90.
| subroutine PSMILe::interface::psmile_loc_trans_real | ( | Integer,intent(in) | task, | |
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(in) | len_in, | |||
| Real,dimension(len_in,nbr_fields),intent(in) | data_in, | |||
| Integer,intent(in) | len_out, | |||
| Real,dimension(len_out,nbr_fields),intent(inout) | data_out, | |||
| Integer,intent(in),optional | field_id | |||
| ) |
Definition at line 9865 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_3d | ( | Type (integer_vector),dimension (search%search_data%npart) | found, | |
| Type (integer_vector),dimension (search%search_data%npart) | loc, | |||
| Integer,dimension (2, ndim_3d, *),intent(in) | range, | |||
| Integer,dimension (2, ndim_3d, *),intent(in) | control, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Logical,intent(in) | msk_required, | |||
| Type (integer_vector),dimension (search%search_data%npart) | virtual_cell, | |||
| Logical,intent(in) | virtual_cell_required, | |||
| Integer,intent(out) | dir_index, | |||
| Integer,intent(out) | cpl_index, | |||
| Integer,dimension (search%search_data%npart),intent(out) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1780 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_3d_mask | ( | Type (Enddef_search),intent(inout) | search, | |
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | inter, | |||
| Integer,dimension (ndim_3d),intent(in) | shift, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(out) | dir_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1769 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_3d_reg | ( | Type (integer_vector),dimension (search%search_data%npart, ndim_3d) | found, | |
| Type (integer_vector),dimension (search%search_data%npart, ndim_3d) | loc, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | range, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(out) | dir_index, | |||
| Integer,intent(out) | cpl_index, | |||
| Integer,dimension (search%search_data%npart),intent(out) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1799 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_alloc | ( | Type(Send_information),intent(inout) | send_info, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1709 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_dealloc | ( | Type(Send_information),intent(inout) | send_info, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1716 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_direct | ( | Integer,dimension (2, ndim_3d, *),intent(in) | control, | |
| Integer,dimension (2, ndim_3d, *),intent(in) | global, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(out) | dir_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1723 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_gauss2 | ( | Type (integer_vector),dimension (search%search_data%npart, 2) | found, | |
| Type (integer_vector),dimension (search%search_data%npart, 2) | loc, | |||
| Integer,dimension (2, ndim_2d, search%search_data%npart),intent(in) | range, | |||
| Integer,dimension (2, ndim_2d, search%search_data%npart),intent(in) | control, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(out) | dir_index, | |||
| Integer,intent(out) | cpl_index, | |||
| Integer,dimension (search%search_data%npart),intent(out) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1734 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_irreg2 | ( | Type (integer_vector),dimension (search%search_data%npart, 2) | found, | |
| Type (integer_vector),dimension (search%search_data%npart, 2) | loc, | |||
| Integer,dimension (2, ndim_2d, search%search_data%npart),intent(in) | range, | |||
| Integer,dimension (2, ndim_2d, search%search_data%npart),intent(in) | control, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,intent(in) | method_id, | |||
| Logical,intent(in) | msk_required, | |||
| Type (integer_vector),dimension (search%search_data%npart) | virtual_cell, | |||
| Logical,intent(in) | virtual_cell_required, | |||
| Integer,intent(out) | dir_index, | |||
| Integer,intent(out) | cpl_index, | |||
| Integer,dimension (search%search_data%npart),intent(out) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1749 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_cells_1d_dble | ( | Integer,intent(in) | nlev, | |
| Integer,dimension (range(1,1),intent(inout) | found, | |||
| Integer,dimension (range(1,1),intent(inout) | loc, | |||
| Integer,dimension(2,3),intent(inout) | range, | |||
| Integer,intent(in) | search_grid_type, | |||
| Double Precision,dimension (shape(1,1),intent(in) | corners1, | |||
| Integer,intent(in) | search_dim, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,dimension(2),intent(in) | grid_valid_shape, | |||
| Logical,intent(in) | cyclic, | |||
| Double Precision,dimension (grid_valid_shape(1),intent(in) | chmin, | |||
| Double Precision,dimension (grid_valid_shape(1),intent(in) | chmax, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8490 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_cells_1d_real | ( | Integer,intent(in) | nlev, | |
| Integer,dimension (range(1,1),intent(inout) | found, | |||
| Integer,dimension (range(1,1),intent(inout) | loc, | |||
| Integer,dimension(2,3),intent(inout) | range, | |||
| Integer,intent(in) | search_grid_type, | |||
| Real,dimension (shape(1,1),intent(in) | corners1, | |||
| Integer,intent(in) | search_dim, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,dimension(2),intent(in) | grid_valid_shape, | |||
| Logical,intent(in) | cyclic, | |||
| Real,dimension (grid_valid_shape(1),intent(in) | chmin, | |||
| Real,dimension (grid_valid_shape(1),intent(in) | chmax, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5363 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_cells_2d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | search_grid_type, | |||
| Integer,dimension (loc_fnd_shape(1,1),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, loc_fnd_shape(1,1),intent(inout) | loc, | |||
| Integer,dimension(2,3),intent(inout) | loc_fnd_shape, | |||
| Double Precision,dimension ( src_corner_shape(1,1),intent(in) | tgt_src_corners_x, | |||
| Double Precision,dimension ( src_corner_shape(1,1),intent(in) | tgt_src_corners_y, | |||
| Integer,dimension(2,3),intent(in) | src_corner_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,dimension(2,2),intent(inout) | grid_valid_shape, | |||
| Integer,intent(in) | ipart, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Double Precision,dimension ( corner_shape (1,1),intent(in) | src_corners_x, | |||
| Double Precision,dimension ( corner_shape (1,1),intent(in) | src_corners_y, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(inout) | chmin1, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(inout) | chmax1, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(inout) | chmin2, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(inout) | chmax2, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8522 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_cells_2d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | search_grid_type, | |||
| Integer,dimension (loc_fnd_shape(1,1),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, loc_fnd_shape(1,1),intent(inout) | loc, | |||
| Integer,dimension(2,3),intent(inout) | loc_fnd_shape, | |||
| Real,dimension ( tgt_corner_shape(1,1),intent(in) | tgt_corners_x, | |||
| Real,dimension ( tgt_corner_shape(1,1),intent(in) | tgt_corners_y, | |||
| Integer,dimension(2,3),intent(in) | tgt_corner_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,dimension(2,2),intent(inout) | grid_valid_shape, | |||
| Integer,intent(in) | ipart, | |||
| Integer,dimension(2,2),intent(in) | src_corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Real,dimension ( src_corner_shape (1,1),intent(in) | src_corners_x, | |||
| Real,dimension ( src_corner_shape (1,1),intent(in) | src_corners_y, | |||
| Real,dimension (grid_valid_shape(1,1),intent(inout) | chmin1, | |||
| Real,dimension (grid_valid_shape(1,1),intent(inout) | chmax1, | |||
| Real,dimension (grid_valid_shape(1,1),intent(inout) | chmin2, | |||
| Real,dimension (grid_valid_shape(1,1),intent(inout) | chmax2, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5395 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_cells_gauss2 | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | search_grid_type, | |||
| Integer,dimension ( loc_fnd_shape(1,1),intent(inout) | found, | |||
| Integer,dimension ( loc_fnd_shape(1,1),intent(inout) | loc, | |||
| Integer,dimension(2,3),intent(inout) | loc_fnd_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2107 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_clean | ( | Integer,intent(out) | ierror | ) |
Definition at line 2324 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coars_level | ( | Integer,intent(in) | grid_id, | |
| Type (Enddef_mg),intent(in) | mg_info_fine, | |||
| Type (Enddef_mg),intent(inout) | mg_info_coarse, | |||
| Integer,dimension (ndim_3d),intent(in) | icoarse, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2351 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coars_level_dble | ( | Integer,intent(in) | grid_id, | |
| Type (Enddef_mg),intent(in) | mg_info_fine, | |||
| Type (Enddef_mg),intent(inout) | mg_info_coarse, | |||
| Integer,dimension (ndim_3d),intent(in) | icoarse, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6943 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coars_level_real | ( | Integer,intent(in) | grid_id, | |
| Type (Enddef_mg),intent(in) | mg_info_fine, | |||
| Type (Enddef_mg),intent(inout) | mg_info_coarse, | |||
| Integer,dimension (ndim_3d),intent(in) | icoarse, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3599 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coars_subgrid_3d_dble | ( | Double Precision,dimension (0:levdim1_fine, 0:levdim2_fine, 0:levdim3_fine),intent(in) | chfmin, | |
| Double Precision,dimension (0:levdim1_fine, 0:levdim2_fine, 0:levdim3_fine),intent(in) | chfmax, | |||
| Double Precision,dimension (0:levdim1_fine, 0:levdim2_fine, 0:levdim3_fine),intent(in) | midfp, | |||
| Integer,intent(in) | levdim1_fine, | |||
| Integer,intent(in) | levdim2_fine, | |||
| Integer,intent(in) | levdim3_fine, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | chcmin, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | chcmax, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | midcp, | |||
| Integer,intent(in) | levdim1, | |||
| Integer,intent(in) | levdim2, | |||
| Integer,intent(in) | levdim3, | |||
| Integer,dimension (ndim_3d),intent(in) | icoarse, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6954 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coars_subgrid_3d_real | ( | Real,dimension (0:levdim1_fine, 0:levdim2_fine, 0:levdim3_fine),intent(in) | chfmin, | |
| Real,dimension (0:levdim1_fine, 0:levdim2_fine, 0:levdim3_fine),intent(in) | chfmax, | |||
| Real,dimension (0:levdim1_fine, 0:levdim2_fine, 0:levdim3_fine),intent(in) | midfp, | |||
| Integer,intent(in) | levdim1_fine, | |||
| Integer,intent(in) | levdim2_fine, | |||
| Integer,intent(in) | levdim3_fine, | |||
| Real,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | chcmin, | |||
| Real,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | chcmax, | |||
| Real,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | midcp, | |||
| Integer,intent(in) | levdim1, | |||
| Integer,intent(in) | levdim2, | |||
| Integer,intent(in) | levdim3, | |||
| Integer,dimension (ndim_3d),intent(in) | icoarse, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3610 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coarse_1d_dble | ( | Integer,intent(in) | lev, | |
| Double Precision,dimension (0:0),intent(in) | chmin, | |||
| Double Precision,dimension (0:0),intent(in) | chmax, | |||
| Integer,dimension (iend),intent(inout) | found, | |||
| Integer,dimension (iend),intent(inout) | locations, | |||
| Double Precision,dimension (iend),intent(in) | coords, | |||
| Integer,intent(inout) | ibeg, | |||
| Integer,intent(inout) | iend | |||
| ) |
Definition at line 8339 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coarse_1d_real | ( | Integer,intent(in) | lev, | |
| Real,dimension (0:0),intent(in) | chmin, | |||
| Real,dimension (0:0),intent(in) | chmax, | |||
| Integer,dimension (iend),intent(inout) | found, | |||
| Integer,dimension (iend),intent(inout) | locations, | |||
| Real,dimension (iend),intent(in) | coords, | |||
| Integer,intent(inout) | ibeg, | |||
| Integer,intent(inout) | iend | |||
| ) |
Definition at line 5212 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coarse_2d_dble | ( | Integer,intent(in) | lev, | |
| Type (dble_vector),dimension (ndim_2d),intent(in) | chmin, | |||
| Type (dble_vector),dimension (ndim_2d),intent(in) | chmax, | |||
| Integer,dimension (iend),intent(inout) | found, | |||
| Integer,dimension (iend),intent(inout) | locations, | |||
| Double Precision,dimension (iend),intent(in) | coords1, | |||
| Double Precision,dimension (iend),intent(in) | coords2, | |||
| Integer,intent(inout) | ibeg, | |||
| Integer,intent(inout) | iend | |||
| ) |
Definition at line 8350 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coarse_2d_real | ( | Integer,intent(in) | lev, | |
| Type (real_vector),dimension (ndim_2d),intent(in) | chmin, | |||
| Type (real_vector),dimension (ndim_2d),intent(in) | chmax, | |||
| Integer,dimension (iend),intent(inout) | found, | |||
| Integer,dimension (iend),intent(inout) | locations, | |||
| Real,dimension (iend),intent(in) | coords1, | |||
| Real,dimension (iend),intent(in) | coords2, | |||
| Integer,intent(inout) | ibeg, | |||
| Integer,intent(inout) | iend | |||
| ) |
Definition at line 5223 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coarse_3d_dble | ( | Integer,intent(in) | lev, | |
| Type (dble_vector),dimension (ndim_3d),intent(in) | chmin, | |||
| Type (dble_vector),dimension (ndim_3d),intent(in) | chmax, | |||
| Integer,dimension (iend),intent(inout) | found, | |||
| Integer,dimension (iend),intent(inout) | locations, | |||
| Double Precision,dimension (iend),intent(in) | coords1, | |||
| Double Precision,dimension (iend),intent(in) | coords2, | |||
| Double Precision,dimension (iend),intent(in) | coords3, | |||
| Integer,intent(inout) | ibeg, | |||
| Integer,intent(inout) | iend | |||
| ) |
Definition at line 8364 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_coarse_3d_real | ( | Integer,intent(in) | lev, | |
| Type (real_vector),dimension (ndim_3d),intent(in) | chmin, | |||
| Type (real_vector),dimension (ndim_3d),intent(in) | chmax, | |||
| Integer,dimension (iend),intent(inout) | found, | |||
| Integer,dimension (iend),intent(inout) | locations, | |||
| Real,dimension (iend),intent(in) | coords1, | |||
| Real,dimension (iend),intent(in) | coords2, | |||
| Real,dimension (iend),intent(in) | coords3, | |||
| Integer,intent(inout) | ibeg, | |||
| Integer,intent(inout) | iend | |||
| ) |
Definition at line 5237 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_control_cell_1d_dble | ( | Double Precision,dimension (0:levdim),intent(in) | chmin, | |
| Double Precision,dimension (0:levdim),intent(in) | chmax, | |||
| Double Precision,dimension (0:levdim),intent(in) | midp, | |||
| Integer,intent(in) | levdim, | |||
| Integer,intent(in) | ijk, | |||
| Double Precision,intent(in) | xyz, | |||
| Integer,intent(in) | nold, | |||
| Logical,intent(in) | all, | |||
| Logical,intent(in) | wide, | |||
| Integer,intent(out) | found, | |||
| Integer,intent(out) | newijk | |||
| ) |
Definition at line 8586 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_control_cell_1d_real | ( | Real,dimension (0:levdim),intent(in) | chmin, | |
| Real,dimension (0:levdim),intent(in) | chmax, | |||
| Real,dimension (0:levdim),intent(in) | midp, | |||
| Integer,intent(in) | levdim, | |||
| Integer,intent(in) | ijk, | |||
| Real,intent(in) | xyz, | |||
| Integer,intent(in) | nold, | |||
| Logical,intent(in) | all, | |||
| Logical,intent(in) | wide, | |||
| Integer,intent(out) | found, | |||
| Integer,intent(out) | newijk | |||
| ) |
Definition at line 5457 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_control_cell_2d_dble | ( | Double Precision,dimension (*),intent(in) | chmin1, | |
| Double Precision,dimension (*),intent(in) | chmin2, | |||
| Double Precision,dimension (*),intent(in) | chmax1, | |||
| Double Precision,dimension (*),intent(in) | chmax2, | |||
| Double Precision,dimension (*),intent(in) | midp1, | |||
| Double Precision,dimension (*),intent(in) | midp2, | |||
| Integer,dimension (ndim_2d),intent(in) | levdim, | |||
| Integer,dimension(ndim_2d),intent(in) | ijk, | |||
| Double Precision,dimension(ndim_2d),intent(in) | xyz, | |||
| Integer,intent(in) | nold, | |||
| Integer,dimension(ndim_2d),intent(in) | ignore, | |||
| Logical,intent(in) | wide, | |||
| Integer,intent(out) | found, | |||
| Integer,dimension(ndim_2d),intent(out) | newijk | |||
| ) |
Definition at line 8601 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_control_cell_2d_real | ( | Real,dimension (*),intent(in) | chmin1, | |
| Real,dimension (*),intent(in) | chmin2, | |||
| Real,dimension (*),intent(in) | chmax1, | |||
| Real,dimension (*),intent(in) | chmax2, | |||
| Real,dimension (*),intent(in) | midp1, | |||
| Real,dimension (*),intent(in) | midp2, | |||
| Integer,dimension (ndim_2d),intent(in) | levdim, | |||
| Integer,dimension(ndim_2d),intent(in) | ijk, | |||
| Real,dimension(ndim_2d),intent(in) | xyz, | |||
| Integer,intent(in) | nold, | |||
| Integer,dimension(ndim_2d),intent(in) | ignore, | |||
| Logical,intent(in) | wide, | |||
| Integer,intent(out) | found, | |||
| Integer,dimension(ndim_2d),intent(out) | newijk | |||
| ) |
Definition at line 5472 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_control_cell_3d_dble | ( | Double Precision,dimension (*),intent(in) | chmin1, | |
| Double Precision,dimension (*),intent(in) | chmin2, | |||
| Double Precision,dimension (*),intent(in) | chmin3, | |||
| Double Precision,dimension (*),intent(in) | chmax1, | |||
| Double Precision,dimension (*),intent(in) | chmax2, | |||
| Double Precision,dimension (*),intent(in) | chmax3, | |||
| Double Precision,dimension (*),intent(in) | midp1, | |||
| Double Precision,dimension (*),intent(in) | midp2, | |||
| Double Precision,dimension (*),intent(in) | midp3, | |||
| Integer,dimension (ndim_3d),intent(in) | levdim, | |||
| Integer,dimension(ndim_3d),intent(in) | ijk, | |||
| Double Precision,dimension(ndim_3d),intent(in) | xyz, | |||
| Integer,intent(in) | nold, | |||
| Logical,intent(in) | all, | |||
| Logical,intent(in) | wide, | |||
| Integer,intent(out) | found, | |||
| Integer,dimension(ndim_3d),intent(out) | newijk | |||
| ) |
Definition at line 8620 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_control_cell_3d_real | ( | Real,dimension (*),intent(in) | chmin1, | |
| Real,dimension (*),intent(in) | chmin2, | |||
| Real,dimension (*),intent(in) | chmin3, | |||
| Real,dimension (*),intent(in) | chmax1, | |||
| Real,dimension (*),intent(in) | chmax2, | |||
| Real,dimension (*),intent(in) | chmax3, | |||
| Real,dimension (*),intent(in) | midp1, | |||
| Real,dimension (*),intent(in) | midp2, | |||
| Real,dimension (*),intent(in) | midp3, | |||
| Integer,dimension (ndim_3d),intent(in) | levdim, | |||
| Integer,dimension(ndim_3d),intent(in) | ijk, | |||
| Real,dimension(ndim_3d),intent(in) | xyz, | |||
| Integer,intent(in) | nold, | |||
| Logical,intent(in) | all, | |||
| Logical,intent(in) | wide, | |||
| Integer,intent(out) | found, | |||
| Integer,dimension(ndim_3d),intent(out) | newijk | |||
| ) |
Definition at line 5491 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_ctrl_subgrid_1d_dble | ( | Double Precision,dimension ( corner_shape(1),intent(in) | array, | |
| Integer,dimension(2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2),intent(in) | range, | |||
| Double Precision,dimension (0:levdim),intent(in) | chmin, | |||
| Double Precision,dimension (0:levdim),intent(in) | chmax, | |||
| Integer,intent(in) | levdim, | |||
| Double Precision,intent(in) | period, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | ind, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6816 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_ctrl_subgrid_1d_real | ( | Real,dimension(corner_shape(1),intent(in) | array, | |
| Integer,dimension(2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2),intent(in) | range, | |||
| Real,dimension (0:levdim),intent(in) | chmin, | |||
| Real,dimension (0:levdim),intent(in) | chmax, | |||
| Integer,intent(in) | levdim, | |||
| Real,intent(in) | period, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | ind, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3470 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_ctrl_subgrid_2d_dble | ( | Double Precision,dimension(corner_shape(1,1),intent(in) | array, | |
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, 2),intent(in) | range, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | chmin, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | chmax, | |||
| Integer,dimension(2),intent(in) | levdim, | |||
| Double Precision,intent(in) | period, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | ind, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6833 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_ctrl_subgrid_2d_real | ( | Real,dimension(corner_shape(1,1),intent(in) | array, | |
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, 2),intent(in) | range, | |||
| Real,dimension (0:levdim(1),intent(in) | chmin, | |||
| Real,dimension (0:levdim(1),intent(in) | chmax, | |||
| Integer,dimension(2),intent(in) | levdim, | |||
| Real,intent(in) | period, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | ind, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3489 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_ctrl_subgrid_3d_dble | ( | Double Precision,dimension(corner_shape(1,1),intent(in) | array, | |
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | chmin, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | chmax, | |||
| Integer,dimension(3),intent(in) | levdim, | |||
| Double Precision,intent(in) | period, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | ind, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6854 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_ctrl_subgrid_3d_real | ( | Real,dimension(corner_shape(1,1),intent(in) | array, | |
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,dimension (0:levdim(1),intent(in) | chmin, | |||
| Real,dimension (0:levdim(1),intent(in) | chmax, | |||
| Integer,dimension(3),intent(in) | levdim, | |||
| Real,intent(in) | period, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | ind, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3510 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_final_2d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | nlev, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | chmin1, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | chmin2, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | chmax1, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | chmax2, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | midp1, | |||
| Double Precision,dimension (0:levdim(1),intent(in) | midp2, | |||
| Integer,dimension(2),intent(in) | levdim, | |||
| Integer,dimension (range(1,1),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, range(1,1),intent(inout) | loc, | |||
| Integer,dimension(2,3),intent(inout) | range, | |||
| Double Precision,dimension (shape(1,1),intent(in) | coords1, | |||
| Double Precision,dimension (shape(1,1),intent(in) | coords2, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8638 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_final_2d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | nlev, | |||
| Real,dimension (0:levdim(1),intent(in) | chmin1, | |||
| Real,dimension (0:levdim(1),intent(in) | chmin2, | |||
| Real,dimension (0:levdim(1),intent(in) | chmax1, | |||
| Real,dimension (0:levdim(1),intent(in) | chmax2, | |||
| Real,dimension (0:levdim(1),intent(in) | midp1, | |||
| Real,dimension (0:levdim(1),intent(in) | midp2, | |||
| Integer,dimension(2),intent(in) | levdim, | |||
| Integer,dimension (range(1,1),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, range(1,1),intent(inout) | loc, | |||
| Integer,dimension(2,3),intent(inout) | range, | |||
| Real,dimension (shape(1,1),intent(in) | coords1, | |||
| Real,dimension (shape(1,1),intent(in) | coords2, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5509 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_final_3d_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (ndim_3d, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(inout) | control, | |||
| Integer,intent(in) | grid_id, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (ndim_3d),intent(in) | ijk0, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8689 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_final_3d_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (ndim_3d, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(inout) | control, | |||
| Integer,intent(in) | grid_id, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (ndim_3d),intent(in) | ijk0, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5560 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_final_gauss2_dble | ( | integer,intent(in) | grid_id, | |
| integer,dimension (fnd_loc_range(1,1),intent(inout) | found, | |||
| integer,dimension (fnd_loc_range(1,1),intent(inout) | locations, | |||
| integer,dimension(2,3),intent(inout) | fnd_loc_range, | |||
| double precision,dimension (tgt_coords_shape(1,1),intent(in) | tgt_coords_x, | |||
| double precision,dimension (tgt_coords_shape(1,1),intent(in) | tgt_coords_y, | |||
| integer,dimension(2,3),intent(in) | tgt_coords_shape, | |||
| integer,dimension (2, ndim_3d),intent(in) | search_range, | |||
| double precision,dimension ( src_corner_shape(1,1),intent(in) | src_corners_x, | |||
| double precision,dimension ( src_corner_shape(1,1),intent(in) | src_corners_y, | |||
| integer,dimension(2,1),intent(in) | src_corner_shape, | |||
| integer,intent(in) | nbr_corners, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 8722 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_final_gauss2_real | ( | integer,intent(in) | grid_id, | |
| integer,dimension (fnd_loc_range(1,1),intent(inout) | found, | |||
| integer,dimension (fnd_loc_range(1,1),intent(inout) | locations, | |||
| integer,dimension(2,3),intent(inout) | fnd_loc_range, | |||
| real,dimension (tgt_coords_shape(1,1),intent(in) | tgt_coords_x, | |||
| real,dimension (tgt_coords_shape(1,1),intent(in) | tgt_coords_y, | |||
| integer,dimension(2,3),intent(in) | tgt_coords_shape, | |||
| integer,dimension (2, ndim_3d),intent(in) | search_range, | |||
| real,dimension ( src_corner_shape(1,1),intent(in) | src_corners_x, | |||
| real,dimension ( src_corner_shape(1,1),intent(in) | src_corners_y, | |||
| integer,dimension(2,1),intent(in) | src_corner_shape, | |||
| integer,intent(in) | nbr_corners, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 5592 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_final_prev_2d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (ndim_2d, nc),intent(in) | lstijk, | |||
| Double Precision,dimension (ndim_2d, nc),intent(in) | xyz, | |||
| Integer,dimension (nc),intent(out) | found, | |||
| Integer,dimension (ndim_2d, nc),intent(out) | newijk, | |||
| Integer,intent(in) | nc, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8757 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_final_prev_2d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (ndim_2d, nc),intent(in) | lstijk, | |||
| Real,dimension (ndim_2d, nc),intent(in) | xyz, | |||
| Integer,dimension (nc),intent(out) | found, | |||
| Integer,dimension (ndim_2d, nc),intent(out) | newijk, | |||
| Integer,intent(in) | nc, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Integer,dimension(2,2),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5627 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_level | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Type (Enddef_mg),intent(inout) | mg_info, | |||
| Real (PSMILe_float_kind),intent(in) | tol, | |||
| Logical,intent(in) | simplified_grid, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2336 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_level_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Type (Enddef_mg),intent(inout) | mg_info, | |||
| Real (PSMILe_float_kind),intent(in) | tol, | |||
| Logical,intent(in) | simplified_grid, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6880 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_level_real | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Type (Enddef_mg),intent(inout) | mg_info, | |||
| Real (PSMILe_float_kind),intent(in) | tol, | |||
| Logical,intent(in) | simplified_grid, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3537 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_subgrid_1d_dble | ( | Double Precision,dimension (idlow:idhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2),intent(in) | range, | |||
| Double Precision,dimension (0:levdim),intent(out) | chmin, | |||
| Double Precision,dimension (0:levdim),intent(out) | chmax, | |||
| Double Precision,dimension (0:levdim),intent(out) | midp, | |||
| Integer,intent(in) | levdim, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6891 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_subgrid_1d_real | ( | Real,dimension (idlow:idhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2),intent(in) | range, | |||
| Real,dimension (0:levdim),intent(out) | chmin, | |||
| Real,dimension (0:levdim),intent(out) | chmax, | |||
| Real,dimension (0:levdim),intent(out) | midp, | |||
| Integer,intent(in) | levdim, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3548 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_subgrid_2d_dble | ( | Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, 2),intent(in) | range, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2),intent(out) | chmin, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2),intent(out) | chmax, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2),intent(out) | midp, | |||
| Integer,intent(in) | levdim1, | |||
| Integer,intent(in) | levdim2, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6906 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_subgrid_2d_real | ( | Real,dimension (idlow:idhigh, jdlow:jdhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, 2),intent(in) | range, | |||
| Real,dimension (0:levdim1, 0:levdim2),intent(out) | chmin, | |||
| Real,dimension (0:levdim1, 0:levdim2),intent(out) | chmax, | |||
| Real,dimension (0:levdim1, 0:levdim2),intent(out) | midp, | |||
| Integer,intent(in) | levdim1, | |||
| Integer,intent(in) | levdim2, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3563 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_subgrid_3d_dble | ( | Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | chmin, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | chmax, | |||
| Double Precision,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | midp, | |||
| Integer,intent(in) | levdim1, | |||
| Integer,intent(in) | levdim2, | |||
| Integer,intent(in) | levdim3, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6923 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_first_subgrid_3d_real | ( | Real,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | chmin, | |||
| Real,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | chmax, | |||
| Real,dimension (0:levdim1, 0:levdim2, 0:levdim3),intent(out) | midp, | |||
| Integer,intent(in) | levdim1, | |||
| Integer,intent(in) | levdim2, | |||
| Integer,intent(in) | levdim3, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3580 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_found_loc_to_3d | ( | Type (Enddef_search),intent(in) | search, | |
| Integer,intent(in) | nlev, | |||
| Integer,intent(in) | source_grid_type, | |||
| Type (integer_vector),dimension (search%search_data%npart, ndim_3d),intent(in) | found, | |||
| Type (integer_vector),dimension (search%search_data%npart, ndim_3d),intent(in) | locations, | |||
| Integer,dimension (search%search_data%npart, *),intent(in) | len, | |||
| Type (integer_vector),dimension (search%search_data%npart),intent(in) | virtual_cell, | |||
| Logical,intent(in) | virtual_cell_required, | |||
| Type (integer_vector),dimension (search%search_data%npart),intent(out) | found_3d, | |||
| Type (integer_vector),dimension (search%search_data%npart),intent(out) | locations_3d, | |||
| Type (integer_vector),dimension (search%search_data%npart),intent(out) | virtual_3d, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2124 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_get_cyclic | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2363 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_get_cyclic_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6982 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_get_cyclic_real | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3638 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_1d_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (*),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,intent(in) | method_id, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Integer,dimension (2),intent(in) | coords_shape, | |||
| Integer,dimension (2),intent(in) | grid_valid_shape, | |||
| Logical,intent(in) | cyclic, | |||
| Double Precision,dimension (*),intent(in) | chmin, | |||
| Double Precision,dimension (*),intent(in) | chmax, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8782 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_1d_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (*),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,dimension (*),intent(in) | coords1, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,intent(in) | method_id, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Integer,dimension (2),intent(in) | coords_shape, | |||
| Integer,dimension (2),intent(in) | grid_valid_shape, | |||
| Logical,intent(in) | cyclic, | |||
| Real,dimension (*),intent(in) | chmin, | |||
| Real,dimension (*),intent(in) | chmax, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5652 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_2d_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Integer,dimension (2, ndim_3d),intent(in) | search_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Integer,dimension (2, ndim_2d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_2d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (ndim_2d),intent(in) | cyclic, | |||
| Double Precision,dimension (ndim_2d),intent(in) | period, | |||
| Double Precision,dimension (*),intent(in) | chmin1, | |||
| Double Precision,dimension (*),intent(in) | chmin2, | |||
| Double Precision,dimension (*),intent(in) | chmax1, | |||
| Double Precision,dimension (*),intent(in) | chmax2, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8813 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_2d_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Integer,dimension (2, ndim_3d),intent(in) | search_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Integer,dimension (2, ndim_2d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_2d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (ndim_2d),intent(in) | cyclic, | |||
| Real,dimension (ndim_2d),intent(in) | period, | |||
| Real,dimension (*),intent(in) | chmin1, | |||
| Real,dimension (*),intent(in) | chmin2, | |||
| Real,dimension (*),intent(in) | chmax1, | |||
| Real,dimension (*),intent(in) | chmax2, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5683 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_3d_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (ndim_3d, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,intent(in) | method_id, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Double Precision,dimension (*),intent(in) | chmin1, | |||
| Double Precision,dimension (*),intent(in) | chmin2, | |||
| Double Precision,dimension (*),intent(in) | chmin3, | |||
| Double Precision,dimension (*),intent(in) | chmax1, | |||
| Double Precision,dimension (*),intent(in) | chmax2, | |||
| Double Precision,dimension (*),intent(in) | chmax3, | |||
| Double Precision,dimension (*),intent(in) | midp1, | |||
| Double Precision,dimension (*),intent(in) | midp2, | |||
| Double Precision,dimension (*),intent(in) | midp3, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8844 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_3d_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | nlev, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (ndim_3d, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,intent(in) | method_id, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Real,dimension (*),intent(in) | chmin1, | |||
| Real,dimension (*),intent(in) | chmin2, | |||
| Real,dimension (*),intent(in) | chmin3, | |||
| Real,dimension (*),intent(in) | chmax1, | |||
| Real,dimension (*),intent(in) | chmax2, | |||
| Real,dimension (*),intent(in) | chmax3, | |||
| Real,dimension (*),intent(in) | midp1, | |||
| Real,dimension (*),intent(in) | midp2, | |||
| Real,dimension (*),intent(in) | midp3, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5713 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_gauss2_dble | ( | Integer,intent(in) | method_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | search_range, | |||
| Integer,dimension(2,3),intent(in) | tgt_shape, | |||
| Double Precision,dimension (tgt_shape(1,1),intent(in) | tgt_coords_x, | |||
| Double Precision,dimension (tgt_shape(1,1),intent(in) | tgt_coords_y, | |||
| Integer,dimension(2,3),intent(out) | loc_fnd_shape, | |||
| Integer,dimension (loc_fnd_shape(1,1),intent(inout) | found, | |||
| Integer,dimension (loc_fnd_shape(1,1),intent(inout) | loc, | |||
| Integer,dimension (loc_fnd_shape(1,1),intent(out) | virtual_cell, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8883 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_gauss2_real | ( | Integer,intent(in) | method_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | search_range, | |||
| Integer,dimension(2,3),intent(in) | tgt_shape, | |||
| Real,dimension (tgt_shape(1,1),intent(in) | tgt_coords_x, | |||
| Real,dimension (tgt_shape(1,1),intent(in) | tgt_coords_y, | |||
| Integer,dimension(2,3),intent(out) | loc_fnd_shape, | |||
| Integer,dimension (loc_fnd_shape(1,1),intent(inout) | found, | |||
| Integer,dimension (loc_fnd_shape(1,1),intent(inout) | loc, | |||
| Integer,dimension (loc_fnd_shape(1,1),intent(out) | virtual_cell, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5752 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_irreg2_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%search_data%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%search_data%npart, 2) | locations, | |||
| Type (Enddef_search) | search, | |||
| Type (dble_vector),dimension ( ndim_3d, search%search_data%npart),intent(in) | array, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape_2d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | range_2d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control_2d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape_1d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | range_1d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control_1d, | |||
| Type (Enddef_mg_double) | m_arrays, | |||
| Integer,dimension (ndim_3d),intent(in) | m_levdim, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | method_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8913 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_irreg2_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%search_data%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%search_data%npart, 2) | locations, | |||
| Type (Enddef_search) | search, | |||
| Type (real_vector),dimension ( ndim_3d, search%search_data%npart),intent(in) | array, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape_2d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | range_2d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control_2d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | shape_1d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | range_1d, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control_1d, | |||
| Type (Enddef_mg_real) | m_arrays, | |||
| Integer,dimension (ndim_3d),intent(in) | m_levdim, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | method_id, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5782 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_next_level_1d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | idim, | |||
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Double Precision,dimension (0:levdim),intent(in) | chmin, | |||
| Double Precision,dimension (0:levdim),intent(in) | chmax, | |||
| Double Precision,dimension (0:levdim),intent(in) | midp, | |||
| Integer,intent(in) | levdim, | |||
| Integer,dimension (iend),intent(inout) | found, | |||
| Integer,dimension (iend),intent(inout) | loc, | |||
| Double Precision,dimension (iend),intent(in) | coords, | |||
| Integer,intent(inout) | ibeg, | |||
| Integer,intent(inout) | iend, | |||
| Integer,intent(in) | ijkinc, | |||
| Integer,intent(in) | ijkcoa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8379 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_next_level_1d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | idim, | |||
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Real,dimension (0:levdim),intent(in) | chmin, | |||
| Real,dimension (0:levdim),intent(in) | chmax, | |||
| Real,dimension (0:levdim),intent(in) | midp, | |||
| Integer,intent(in) | levdim, | |||
| Integer,dimension (iend),intent(inout) | found, | |||
| Integer,dimension (iend),intent(inout) | loc, | |||
| Real,dimension (iend),intent(in) | coords, | |||
| Integer,intent(inout) | ibeg, | |||
| Integer,intent(inout) | iend, | |||
| Integer,intent(in) | ijkinc, | |||
| Integer,intent(in) | ijkcoa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5252 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_next_level_2d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Double Precision,dimension (*),intent(in) | chmin1, | |||
| Double Precision,dimension (*),intent(in) | chmin2, | |||
| Double Precision,dimension (*),intent(in) | chmax1, | |||
| Double Precision,dimension (*),intent(in) | chmax2, | |||
| Double Precision,dimension (*),intent(in) | midp1, | |||
| Double Precision,dimension (*),intent(in) | midp2, | |||
| Integer,dimension (ndim_2d),intent(in) | levdim, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (2, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(inout) | control, | |||
| Integer,dimension(ndim_3d),intent(in) | ijkinc, | |||
| Integer,dimension(ndim_2d),intent(in) | ijkcoa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8399 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_next_level_2d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Real,dimension (*),intent(in) | chmin1, | |||
| Real,dimension (*),intent(in) | chmin2, | |||
| Real,dimension (*),intent(in) | chmax1, | |||
| Real,dimension (*),intent(in) | chmax2, | |||
| Real,dimension (*),intent(in) | midp1, | |||
| Real,dimension (*),intent(in) | midp2, | |||
| Integer,dimension (ndim_2d),intent(in) | levdim, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (2, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(inout) | control, | |||
| Integer,dimension(ndim_3d),intent(in) | ijkinc, | |||
| Integer,dimension(ndim_2d),intent(in) | ijkcoa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5272 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_next_level_3d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Double Precision,dimension (*),intent(in) | chmin1, | |||
| Double Precision,dimension (*),intent(in) | chmin2, | |||
| Double Precision,dimension (*),intent(in) | chmin3, | |||
| Double Precision,dimension (*),intent(in) | chmax1, | |||
| Double Precision,dimension (*),intent(in) | chmax2, | |||
| Double Precision,dimension (*),intent(in) | chmax3, | |||
| Double Precision,dimension (*),intent(in) | midp1, | |||
| Double Precision,dimension (*),intent(in) | midp2, | |||
| Double Precision,dimension (*),intent(in) | midp3, | |||
| Integer,dimension (ndim_3d),intent(in) | levdim, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (ndim_3d, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(inout) | control, | |||
| Integer,dimension(ndim_3d),intent(in) | ijkinc, | |||
| Integer,dimension(ndim_3d),intent(in) | ijkcoa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8427 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_next_level_3d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Real,dimension (*),intent(in) | chmin1, | |||
| Real,dimension (*),intent(in) | chmin2, | |||
| Real,dimension (*),intent(in) | chmin3, | |||
| Real,dimension (*),intent(in) | chmax1, | |||
| Real,dimension (*),intent(in) | chmax2, | |||
| Real,dimension (*),intent(in) | chmax3, | |||
| Real,dimension (*),intent(in) | midp1, | |||
| Real,dimension (*),intent(in) | midp2, | |||
| Real,dimension (*),intent(in) | midp3, | |||
| Integer,dimension (ndim_3d),intent(in) | levdim, | |||
| Integer,dimension (*),intent(inout) | found, | |||
| Integer,dimension (ndim_3d, *),intent(inout) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(inout) | control, | |||
| Integer,dimension(ndim_3d),intent(in) | ijkinc, | |||
| Integer,dimension(ndim_3d),intent(in) | ijkcoa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5300 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_prev_levels_1d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | idim, | |||
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Integer,intent(in) | lstijk, | |||
| Double Precision,intent(in) | xyz, | |||
| Integer,intent(out) | found, | |||
| Integer,intent(out) | newijk | |||
| ) |
Definition at line 8456 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_prev_levels_1d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | idim, | |||
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Integer,intent(in) | lstijk, | |||
| Real,intent(in) | xyz, | |||
| Integer,intent(out) | found, | |||
| Integer,intent(out) | newijk | |||
| ) |
Definition at line 5329 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_prev_levels_2d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Integer,dimension (ndim_2d, nc),intent(in) | lstijk, | |||
| Double Precision,dimension (ndim_2d, nc),intent(in) | xyz, | |||
| Integer,dimension (nc),intent(out) | found, | |||
| Integer,dimension (ndim_2d, nc),intent(out) | newijk, | |||
| Integer,intent(in) | nc | |||
| ) |
Definition at line 8468 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_prev_levels_2d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Integer,dimension (ndim_2d, nc),intent(in) | lstijk, | |||
| Real,dimension (ndim_2d, nc),intent(in) | xyz, | |||
| Integer,dimension (nc),intent(out) | found, | |||
| Integer,dimension (ndim_2d, nc),intent(out) | newijk, | |||
| Integer,intent(in) | nc | |||
| ) |
Definition at line 5341 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_prev_levels_3d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Integer,dimension (ndim_3d),intent(in) | lstijk, | |||
| Double Precision,dimension (ndim_3d),intent(in) | xyz, | |||
| Integer,intent(out) | found, | |||
| Integer,dimension (ndim_3d),intent(out) | newijk | |||
| ) |
Definition at line 8479 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_prev_levels_3d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Integer,dimension (ndim_3d),intent(in) | lstijk, | |||
| Real,dimension (ndim_3d),intent(in) | xyz, | |||
| Integer,intent(out) | found, | |||
| Integer,dimension (ndim_3d),intent(out) | newijk | |||
| ) |
Definition at line 5352 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_search | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,intent(in) | grid_id, | |||
| Type (Enddef_search_data),intent(inout) | search_data, | |||
| Logical,intent(in) | requires_conserv_remap, | |||
| Type (integer_vector),dimension (search_data%npart, ndim_3d),intent(out) | found, | |||
| Type (integer_vector),dimension (search_data%npart, ndim_3d),intent(out) | locations, | |||
| Integer,dimension (search_data%npart, ndim_3d),intent(out) | len, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2145 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_search_1d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | idim, | |||
| Integer,dimension (len),intent(inout) | found, | |||
| Integer,dimension (len),intent(inout) | locations, | |||
| Double Precision,dimension (len),intent(in) | coords, | |||
| Integer,intent(in) | len, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7043 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_search_1d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | idim, | |||
| Integer,dimension (len),intent(inout) | found, | |||
| Integer,dimension (len),intent(inout) | locations, | |||
| Real,dimension (len),intent(in) | coords, | |||
| Integer,intent(in) | len, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3699 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_search_2d_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (len),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, len),intent(inout) | locations, | |||
| Integer,intent(in) | len, | |||
| Type (Enddef_search_data) | search_data, | |||
| Integer,intent(in) | ipart, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7058 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_search_2d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (len),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, len),intent(inout) | locations, | |||
| Integer,intent(in) | len, | |||
| Type (Enddef_search_data) | search_data, | |||
| Integer,intent(in) | ipart, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3714 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_search_3d_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (*),intent(inout) | found, | |||
| Type (integer_vector),dimension (*),intent(inout) | locations, | |||
| Integer,dimension (*),intent(in) | len, | |||
| Type (Enddef_search_data) | search_data, | |||
| Integer,intent(in) | grid_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7074 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_search_3d_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (*),intent(inout) | found, | |||
| Type (integer_vector),dimension (*),intent(inout) | locations, | |||
| Integer,dimension (*),intent(in) | len, | |||
| Type (Enddef_search_data) | search_data, | |||
| Integer,intent(in) | grid_id, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3730 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_setup | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2328 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_srch_nneigh_irr_dble | ( | Integer,intent(in) | grid_id, | |
| Type (Extra_search_dble) | arrays, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,intent(in) | nref_3d, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(in) | sin_values, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(in) | cos_values, | |||
| Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
| Double Precision,dimension (coords_shape(1,3),intent(in) | z_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(inout) | num_neigh, | |||
| Double Precision,dimension (jbeg:jend, 2),intent(in) | sin_search, | |||
| Double Precision,dimension (jbeg:jend, 2),intent(in) | cos_search, | |||
| Double Precision,dimension (jbeg:jend),intent(in) | z_search, | |||
| Double Precision,dimension (dim1(1),intent(inout) | dist_dble, | |||
| Integer,dimension(2),intent(inout) | dim1, | |||
| Integer,dimension (:),intent(in) | indices, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Logical,dimension (jbeg:jend),intent(in) | mask_ind, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8977 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_srch_nneigh_irr_real | ( | Integer,intent(in) | grid_id, | |
| Type (Extra_search_real) | arrays, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,intent(in) | nref_3d, | |||
| Real,dimension (grid_valid_shape(1,1),intent(in) | sin_values, | |||
| Real,dimension (grid_valid_shape(1,1),intent(in) | cos_values, | |||
| Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
| Real,dimension(coords_shape(1,3),intent(in) | z_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(inout) | num_neigh, | |||
| Real,dimension (jbeg:jend, 2),intent(in) | sin_search, | |||
| Real,dimension (jbeg:jend, 2),intent(in) | cos_search, | |||
| Real,dimension (jbeg:jend),intent(in) | z_search, | |||
| Real,dimension (dim1(1),intent(inout) | dist_dble, | |||
| Integer,dimension(2),intent(inout) | dim1, | |||
| Integer,dimension (:),intent(in) | indices, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Logical,dimension (jbeg:jend),intent(in) | mask_ind, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5846 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_srch_nneigh_reg_dble | ( | Integer,intent(in) | grid_id, | |
| Type (Extra_search_nn),intent(in) | nn_srch, | |||
| Type (Extra_search_dble) | arrays, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,intent(in) | nref_3d, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(inout) | num_neigh, | |||
| Double Precision,dimension (jbeg:jend, 2),intent(in) | sin_search, | |||
| Double Precision,dimension (jbeg:jend, 2),intent(in) | cos_search, | |||
| Double Precision,dimension (jbeg:jend),intent(in) | z_search, | |||
| Double Precision,dimension (dim1(1),intent(inout) | dist_dble, | |||
| Integer,dimension(2),intent(inout) | dim1, | |||
| Integer,dimension (:),intent(in) | indices, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8940 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_srch_nneigh_reg_real | ( | Integer,intent(in) | grid_id, | |
| Type (Extra_search_nn),intent(in) | nn_srch, | |||
| Type (Extra_search_real) | arrays, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,intent(in) | nref_3d, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(inout) | num_neigh, | |||
| Real,dimension (jbeg:jend, 2),intent(in) | sin_search, | |||
| Real,dimension (jbeg:jend, 2),intent(in) | cos_search, | |||
| Real,dimension (jbeg:jend),intent(in) | z_search, | |||
| Real,dimension (dim1(1),intent(inout) | dist_real, | |||
| Integer,dimension(2),intent(inout) | dim1, | |||
| Integer,dimension (:),intent(in) | indices, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5809 of file psmile.F90.
| subroutine PSMILe::interface::psmile_move0_neighbors | ( | Integer,dimension (nloc, num_neigh),intent(inout) | neighbors, | |
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2426 of file psmile.F90.
| subroutine PSMILe::interface::psmile_multi_reduce_dble | ( | Integer,intent(in) | task, | |
| Integer,dimension (2,5),intent(in) | shape_in, | |||
| Double Precision,dimension ( shape_in(1,1),intent(in) | data_in, | |||
| Integer,dimension (2,6),intent(out) | shape_out, | |||
| Double Precision,dimension ( shape_out(1,1),intent(out) | data_out, | |||
| Logical,dimension ( shape_in(1,1),intent(in) | mask, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9826 of file psmile.F90.
| subroutine PSMILe::interface::psmile_multi_reduce_int | ( | Integer,intent(in) | task, | |
| Integer,dimension (2,5),intent(in) | shape_in, | |||
| Integer,dimension ( shape_in(1,1),intent(in) | data_in, | |||
| Integer,dimension (2,6),intent(out) | shape_out, | |||
| Integer,dimension ( shape_out(1,1),intent(out) | data_out, | |||
| Logical,dimension ( shape_in(1,1),intent(in) | mask, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9774 of file psmile.F90.
| subroutine PSMILe::interface::psmile_multi_reduce_real | ( | Integer,intent(in) | task, | |
| Integer,dimension (2,5),intent(in) | shape_in, | |||
| Real,dimension ( shape_in(1,1),intent(in) | data_in, | |||
| Integer,dimension (2,6),intent(out) | shape_out, | |||
| Real,dimension ( shape_out(1,1),intent(out) | data_out, | |||
| Logical,dimension ( shape_in(1,1),intent(in) | mask, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9800 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_cells_3d_dble | ( | Integer,dimension(3),intent(in) | use_how, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
| Integer,intent(in) | interpolation_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,dimension(2,3,3),intent(in) | corner_shape_3d, | |||
| Integer,dimension(3),intent(in) | nbr_corners, | |||
| Double Precision,dimension (corner_shape_3d (1,1,1),intent(in) | corner_x, | |||
| Double Precision,dimension (corner_shape_3d (1,1,2),intent(in) | corner_y, | |||
| Double Precision,dimension (corner_shape_3d (1,1,3),intent(in) | corner_z, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Type (dble_vector),dimension(ndim_3d),intent(inout) | tgt_cell, | |||
| Integer,dimension(ndim_3d),intent(in) | tgt_corners, | |||
| Integer,intent(in) | npoints, | |||
| Integer,dimension (ndim_3d, npoints),intent(in) | srclocs, | |||
| Logical,dimension (npoints),intent(in) | msklocs, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7783 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_cells_3d_real | ( | Integer,dimension(3),intent(in) | use_how, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
| Integer,intent(in) | interpolation_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,dimension(2,3,3),intent(in) | corner_shape_3d, | |||
| Integer,dimension(3),intent(in) | nbr_corners, | |||
| Real,dimension (corner_shape_3d (1,1,1),intent(in) | corner_x, | |||
| Real,dimension (corner_shape_3d (1,1,2),intent(in) | corner_y, | |||
| Real,dimension (corner_shape_3d (1,1,3),intent(in) | corner_z, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Type (real_vector),dimension(ndim_3d),intent(inout) | tgt_cell, | |||
| Integer,dimension(ndim_3d),intent(in) | tgt_corners, | |||
| Integer,intent(in) | npoints, | |||
| Integer,dimension (ndim_3d, npoints),intent(in) | srclocs, | |||
| Logical,dimension (npoints),intent(in) | msklocs, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4393 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_cells_3d_reg_dble | ( | Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |
| Integer,intent(in) | interpolation_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,intent(in) | grid_id, | |||
| Type (Enddef_search),intent(in) | search, | |||
| Type (dble_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | corners, | |||
| Integer,dimension (ndim_3d, search%search_data%npart),intent(in) | npoints, | |||
| Type (integer_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | srclocs, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7826 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_cells_3d_reg_real | ( | Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |
| Integer,intent(in) | interpolation_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,intent(in) | grid_id, | |||
| Type (Enddef_search),intent(in) | search, | |||
| Type (real_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | corners, | |||
| Integer,dimension (ndim_3d, search%search_data%npart),intent(in) | npoints, | |||
| Type (integer_vector),dimension (ndim_3d, search%search_data%npart),intent(in) | srclocs, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4436 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_cells_irreg2_dble | ( | Integer,dimension(3),intent(in) | use_how, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
| Integer,intent(in) | interpolation_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,dimension(2,2,2),intent(in) | corner_shape_3d, | |||
| Integer,dimension(2),intent(in) | nbr_corners, | |||
| Double Precision,dimension (corner_shape_3d (1,1,1),intent(in) | corner_x, | |||
| Double Precision,dimension (corner_shape_3d (1,1,2),intent(in) | corner_y, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Type (dble_vector),dimension(ndim_3d),intent(inout) | tgt_cell, | |||
| Integer,intent(in) | tgt_corners, | |||
| Integer,dimension (ndim_2d, search%search_data%npart),intent(in) | npoints, | |||
| Type (integer_vector),dimension (2,search%search_data%npart),intent(in) | srclocs, | |||
| Type (logical_vector),dimension (2,search%search_data%npart),intent(in) | msklocs, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7847 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_cells_irreg2_real | ( | Integer,dimension(3),intent(in) | use_how, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
| Integer,intent(in) | interpolation_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,dimension(2,2,2),intent(in) | corner_shape_3d, | |||
| Integer,dimension(2),intent(in) | nbr_corners, | |||
| Real,dimension (corner_shape_3d (1,1,1),intent(in) | corner_x, | |||
| Real,dimension (corner_shape_3d (1,1,2),intent(in) | corner_y, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
| Type (real_vector),dimension(ndim_3d),intent(inout) | tgt_cell, | |||
| Integer,intent(in) | tgt_corners, | |||
| Integer,dimension (ndim_2d, search%search_data%npart),intent(in) | npoints, | |||
| Type (integer_vector),dimension (2,search%search_data%npart),intent(in) | srclocs, | |||
| Type (logical_vector),dimension (2,search%search_data%npart),intent(in) | msklocs, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4457 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_extra_points | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Integer,dimension(3),intent(in) | use_how, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, n_corners),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | n_corners, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1814 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_extra_search_clean | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1835 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_extra_search_dble | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | nb_extra, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6992 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_extra_search_init | ( | Type (Enddef_search),intent(in) | search, | |
| Integer,intent(in) | grid_id, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1843 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_extra_search_real | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,intent(in) | nb_extra, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3648 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_global_gauss2 | ( | Integer,intent(in) | grid_id, | |
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Integer,intent(in) | use_how, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, n_corners),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | n_corners, | |||
| Integer,dimension (nloc),intent(inout) | search_required, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1853 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_global_points | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Integer,intent(in) | use_how, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc, n_corners),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | n_corners, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1872 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_3d_irr2_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lon, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lon, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lat, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7952 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_3d_irr2_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values_lon, | |||
| Real,dimension (*),intent(in) | cos_values_lon, | |||
| Real,dimension (*),intent(in) | sin_values_lat, | |||
| Real,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4527 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_3d_irr3_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lon, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lon, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lat, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7993 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_3d_irr3_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values_lon, | |||
| Real,dimension (*),intent(in) | cos_values_lon, | |||
| Real,dimension (*),intent(in) | sin_values_lat, | |||
| Real,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4567 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_3d_reg_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lon, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lon, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lat, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Type (integer_vector),dimension (ndim_3d),intent(in) | srclocs, | |||
| Integer,dimension (ndim_3d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8033 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_3d_reg_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values_lon, | |||
| Real,dimension (*),intent(in) | cos_values_lon, | |||
| Real,dimension (*),intent(in) | sin_values_lat, | |||
| Real,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Type (integer_vector),dimension (ndim_3d),intent(in) | srclocs, | |||
| Integer,dimension (ndim_3d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4643 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_irr2_3d_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (nloc),intent(in) | coords1, | |||
| Double Precision,dimension (nloc),intent(in) | coords2, | |||
| Double Precision,dimension (nloc),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values, | |||
| Double Precision,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7882 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_irr2_3d_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (nloc),intent(in) | coords1, | |||
| Real,dimension (nloc),intent(in) | coords2, | |||
| Real,dimension (nloc),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values, | |||
| Real,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4492 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_irreg2_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (nloc),intent(in) | coords1, | |||
| Double Precision,dimension (nloc),intent(in) | coords2, | |||
| Double Precision,dimension (nloc),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values, | |||
| Double Precision,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_2d, nloc),intent(in) | srcloc, | |||
| Integer,dimension (nloc),intent(in) | srclocz, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7707 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_near_irreg2_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (nlocs(1),intent(in) | coords1, | |||
| Real,dimension (nlocs(1),intent(in) | coords2, | |||
| Real,dimension (nlocs(1),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values, | |||
| Real,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension(2),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4800 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearest_3d_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (nloc),intent(in) | coords1, | |||
| Double Precision,dimension (nloc),intent(in) | coords2, | |||
| Double Precision,dimension (nloc),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values, | |||
| Double Precision,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8269 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearest_3d_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (nloc),intent(in) | coords1, | |||
| Real,dimension (nloc),intent(in) | coords2, | |||
| Real,dimension (nloc),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values, | |||
| Real,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4955 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearestx_3d_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (nloc),intent(in) | coords1, | |||
| Double Precision,dimension (nloc),intent(in) | coords2, | |||
| Double Precision,dimension (nloc),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values, | |||
| Double Precision,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8304 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearestx_3d_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (nloc),intent(in) | coords1, | |||
| Real,dimension (nloc),intent(in) | coords2, | |||
| Real,dimension (nloc),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values, | |||
| Real,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4990 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_3d_irr2_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lon, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lon, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lat, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8072 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_3d_irr2_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values_lon, | |||
| Real,dimension (*),intent(in) | cos_values_lon, | |||
| Real,dimension (*),intent(in) | sin_values_lat, | |||
| Real,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4682 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_3d_irr3_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lon, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lon, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lat, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8112 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_3d_irr3_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values_lon, | |||
| Real,dimension (*),intent(in) | cos_values_lon, | |||
| Real,dimension (*),intent(in) | sin_values_lat, | |||
| Real,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4722 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_3d_reg_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (*),intent(in) | coords1, | |||
| Double Precision,dimension (*),intent(in) | coords2, | |||
| Double Precision,dimension (*),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lon, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lon, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lat, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Type (integer_vector),dimension (ndim_3d),intent(in) | srclocs, | |||
| Integer,dimension (ndim_3d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8151 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_3d_reg_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (*),intent(in) | coords1, | |||
| Real,dimension (*),intent(in) | coords2, | |||
| Real,dimension (*),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values_lon, | |||
| Real,dimension (*),intent(in) | cos_values_lon, | |||
| Real,dimension (*),intent(in) | sin_values_lat, | |||
| Real,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Type (integer_vector),dimension (ndim_3d),intent(in) | srclocs, | |||
| Integer,dimension (ndim_3d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4761 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_irr2_3d_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (nloc),intent(in) | coords1, | |||
| Double Precision,dimension (nloc),intent(in) | coords2, | |||
| Double Precision,dimension (nloc),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values, | |||
| Double Precision,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7917 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_irr2_3d_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (nloc),intent(in) | coords1, | |||
| Real,dimension (nloc),intent(in) | coords2, | |||
| Real,dimension (nloc),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values, | |||
| Real,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | nsearch, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4607 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_irreg2_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (nlocs(1),intent(in) | coords1, | |||
| Double Precision,dimension (nlocs(1),intent(in) | coords2, | |||
| Double Precision,dimension (nlocs(1),intent(in) | coords3, | |||
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values, | |||
| Double Precision,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension(2),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7745 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_irreg2_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (nlocs(1),intent(in) | coords1, | |||
| Real,dimension (nlocs(1),intent(in) | coords2, | |||
| Real,dimension (nlocs(1),intent(in) | coords3, | |||
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values, | |||
| Real,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension(2),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Type (Extra_search_info) | extra_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4838 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_sub_irr_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values, | |||
| Double Precision,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(in) | nloc, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,dimension (ndim_3d, jbeg:jend),intent(in) | ijk, | |||
| Double Precision,dimension (jbeg:jend, 2),intent(in) | sin_search, | |||
| Double Precision,dimension (jbeg:jend, 2),intent(in) | cos_search, | |||
| Double Precision,dimension (jbeg:jend),intent(in) | z_search, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Integer,dimension (ndim_3d),intent(in) | width, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8190 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_sub_irr_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values, | |||
| Real,dimension (*),intent(in) | cos_values, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(in) | nloc, | |||
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Integer,dimension (ndim_3d, jbeg:jend),intent(in) | ijk, | |||
| Real,dimension (jbeg:jend, 2),intent(in) | sin_search, | |||
| Real,dimension (jbeg:jend, 2),intent(in) | cos_search, | |||
| Real,dimension (jbeg:jend),intent(in) | z_search, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Integer,dimension (ndim_3d),intent(in) | width, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4876 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_sub_reg_dble | ( | Integer,intent(in) | grid_id, | |
| Double Precision,dimension (*),intent(in) | x_coords, | |||
| Double Precision,dimension (*),intent(in) | y_coords, | |||
| Double Precision,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lon, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lon, | |||
| Double Precision,dimension (*),intent(in) | sin_values_lat, | |||
| Double Precision,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(in) | nloc, | |||
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Integer,dimension (ndim_3d, jbeg:jend),intent(in) | ijk, | |||
| Double Precision,dimension (jbeg:jend, 2),intent(in) | sin_search, | |||
| Double Precision,dimension (jbeg:jend, 2),intent(in) | cos_search, | |||
| Double Precision,dimension (jbeg:jend),intent(in) | z_search, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Integer,dimension (ndim_3d),intent(in) | width, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 8228 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_nearx_sub_reg_real | ( | Integer,intent(in) | grid_id, | |
| Real,dimension (*),intent(in) | x_coords, | |||
| Real,dimension (*),intent(in) | y_coords, | |||
| Real,dimension (*),intent(in) | z_coords, | |||
| Integer,dimension (2, ndim_3d),intent(in) | coords_shape, | |||
| Logical,dimension (*),intent(in) | mask_array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,dimension (*),intent(in) | sin_values_lon, | |||
| Real,dimension (*),intent(in) | cos_values_lon, | |||
| Real,dimension (*),intent(in) | sin_values_lat, | |||
| Real,dimension (*),intent(in) | cos_values_lat, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | search_mode, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(in) | nloc, | |||
| Type (Extra_search_info),intent(in) | extra_search, | |||
| Integer,dimension (ndim_3d, jbeg:jend),intent(in) | ijk, | |||
| Real,dimension (jbeg:jend, 2),intent(in) | sin_search, | |||
| Real,dimension (jbeg:jend, 2),intent(in) | cos_search, | |||
| Real,dimension (jbeg:jend),intent(in) | z_search, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Integer,dimension (ndim_3d),intent(in) | width, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4914 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_tricu_3d | ( | Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |
| Integer,intent(in) | interp_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5025 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_tricu_3d_reg | ( | Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |
| Integer,intent(in) | interp_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Type (integer_vector),dimension (ndim_3d),intent(in) | srclocs, | |||
| Integer,dimension (ndim_3d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5041 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_tricu_gauss2 | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | interp_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,dimension (nloc),intent(in) | virtual_cell, | |||
| Integer,intent(in) | nloc, | |||
| Logical,intent(in) | virtual_cell_available, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension(nloc),intent(out) | neigh_bascule, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5059 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_tricu_gauss2_irreg | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | interp_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension (nlocs(1),intent(in) | virtual_cell, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Logical,intent(in) | virtual_cell_available, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension(nloc),intent(out) | neigh_bascule, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5078 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_tricu_irreg2 | ( | Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |
| Integer,intent(in) | interp_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5100 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_trili_3d | ( | Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |
| Integer,intent(in) | interp_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5119 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_trili_3d_reg | ( | Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |
| Integer,intent(in) | interp_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Type (integer_vector),dimension (ndim_3d),intent(in) | srclocs, | |||
| Integer,dimension (ndim_3d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5136 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_trili_gauss2 | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | interp_mode, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | srcloc, | |||
| Integer,dimension (nloc),intent(in) | virtual_cell, | |||
| Integer,intent(in) | nloc, | |||
| Logical,intent(in) | virtual_cell_available, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5154 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_trili_gauss2_irreg | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(in) | interp_mode, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension (nlocs(1),intent(in) | virtual_cell, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Logical,intent(in) | virtual_cell_available, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5172 of file psmile.F90.
| subroutine PSMILe::interface::psmile_neigh_trili_irreg2 | ( | Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |
| Integer,intent(in) | interp_mode, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,dimension (ndim_2d, nlocs(1),intent(in) | srcloc, | |||
| Integer,dimension (nlocs(2),intent(in) | srclocz, | |||
| Integer,dimension (ndim_2d),intent(in) | nlocs, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5193 of file psmile.F90.
| subroutine PSMILe::interface::psmile_open_file_byid | ( | Integer,intent(in) | varid, | |
| Integer,intent(in) | taskid, | |||
| Type(PRISM_Time_Struct),intent(in) | date, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9656 of file psmile.F90.
| subroutine PSMILe::interface::psmile_open_files | ( | Integer,intent(out) | ierror | ) |
Definition at line 9652 of file psmile.F90.
| subroutine PSMILe::interface::psmile_pack_field_info | ( | type (enddef_field_info),dimension(num_field_info),intent(in) | field_info, | |
| integer,dimension(nd_field_list, num_field_info),intent(out) | buffer, | |||
| integer,intent(in) | num_field_info | |||
| ) |
Definition at line 9906 of file psmile.F90.
| subroutine PSMILe::interface::psmile_pack_msg_extra | ( | type (enddef_msg_extra),intent(in) | msg_extra, | |
| integer,dimension(msg_extra_size),intent(out) | buffer | |||
| ) |
Definition at line 9977 of file psmile.F90.
| subroutine PSMILe::interface::psmile_pack_msg_intersections | ( | type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| integer,dimension(nd_msgint),intent(inout) | buffer | |||
| ) |
Definition at line 9928 of file psmile.F90.
| subroutine PSMILe::interface::psmile_pack_msg_locations | ( | type (enddef_msg_locations),intent(in) | msg_locations, | |
| integer,dimension(msgloc_size),intent(out) | buffer | |||
| ) |
Definition at line 9957 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_3d_coord_dble | ( | Double Precision,dimension (*),intent(in) | x, | |
| Double Precision,dimension (*),intent(in) | y, | |||
| Double Precision,dimension (*),intent(in) | z, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | ind, | |||
| Integer,intent(in) | nloc, | |||
| Character (len=*),intent(in) | message | |||
| ) |
Definition at line 9026 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_3d_coord_real | ( | Real,dimension (*),intent(in) | x, | |
| Real,dimension (*),intent(in) | y, | |||
| Real,dimension (*),intent(in) | z, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | ind, | |||
| Integer,intent(in) | nloc, | |||
| Character (len=*),intent(in) | message | |||
| ) |
Definition at line 5899 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_3d_reg_coord_dble | ( | Double Precision,dimension (*),intent(in) | x, | |
| Double Precision,dimension (*),intent(in) | y, | |||
| Double Precision,dimension (*),intent(in) | z, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | ind, | |||
| Integer,intent(in) | nloc, | |||
| Character (len=*),intent(in) | message | |||
| ) |
Definition at line 9037 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_3d_reg_coord_real | ( | Real,dimension (*),intent(in) | x, | |
| Real,dimension (*),intent(in) | y, | |||
| Real,dimension (*),intent(in) | z, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | ind, | |||
| Integer,intent(in) | nloc, | |||
| Character (len=*),intent(in) | message | |||
| ) |
Definition at line 5910 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_comp_info | ( | Type (enddef_comp),dimension (n_comps),intent(in) | cinfos, | |
| Integer,intent(in) | n_comps, | |||
| Character(len=*),intent(in) | string | |||
| ) |
Definition at line 1360 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_field_info | ( | Integer,intent(in) | field_id | ) |
Definition at line 1368 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_grid_info | ( | Integer,intent(in) | grid_id | ) |
Definition at line 1372 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_irreg2_coord_dble | ( | Double Precision,dimension (*),intent(in) | x, | |
| Double Precision,dimension (*),intent(in) | y, | |||
| Double Precision,dimension (*),intent(in) | z, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | ind, | |||
| Integer,intent(in) | nloc, | |||
| Character (len=*),intent(in) | message | |||
| ) |
Definition at line 9048 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_irreg2_coord_real | ( | Real,dimension (*),intent(in) | x, | |
| Real,dimension (*),intent(in) | y, | |||
| Real,dimension (*),intent(in) | z, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,dimension (ndim_3d, nloc),intent(in) | ind, | |||
| Integer,intent(in) | nloc, | |||
| Character (len=*),intent(in) | message | |||
| ) |
Definition at line 5921 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_method_info | ( | Integer,intent(in) | method_id | ) |
Definition at line 1376 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_send_info | ( | Integer,intent(in) | method_id, | |
| Integer,intent(in) | incloc, | |||
| Character (len=*),intent(in) | message | |||
| ) |
Definition at line 1380 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_compact_list_3d_dble | ( | Double Precision,dimension (nloc, nbr_fields),intent(in) | source_list, | |
| Integer,dimension (ndim_3d, nbr_fields),intent(in) | dstijk, | |||
| Integer,intent(in) | nloc, | |||
| Double Precision,dimension (*),intent(inout) | array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6416 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_compact_list_3d_int | ( | Integer,dimension (nloc, nbr_fields),intent(in) | source_list, | |
| Integer,dimension (ndim_3d, nbr_fields),intent(in) | dstijk, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (*),intent(inout) | array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2550 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_compact_list_3d_real | ( | Real,dimension (nloc, nbr_fields),intent(in) | source_list, | |
| Integer,dimension (ndim_3d, nbr_fields),intent(in) | dstijk, | |||
| Integer,intent(in) | nloc, | |||
| Real,dimension (*),intent(inout) | array, | |||
| Integer,dimension (2, ndim_3d),intent(in) | shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3071 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_21d_dble | ( | Double Precision,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (2, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (2, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9102 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_21d_int | ( | Integer,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (2, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (2, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2586 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_21d_real | ( | Real,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (ndim_3d, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (ndim_3d, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5975 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_3d_dble | ( | Double Precision,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (ndim_3d, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (ndim_3d, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9116 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_3d_int | ( | Integer,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (ndim_3d, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (ndim_3d, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2600 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_3d_real | ( | Real,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (ndim_3d, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (ndim_3d, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5989 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_dble | ( | Integer,intent(in) | field_id, | |
| Integer,intent(in) | task_id, | |||
| Double Precision,dimension(*),intent(in) | data_array, | |||
| Integer,intent(in) | len, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9078 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_gauss2_dble | ( | Double Precision,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (2, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (2, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9088 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_gauss2_int | ( | Integer,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (2, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (2, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2572 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_gauss2_real | ( | Real,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Type (integer_vector),dimension (2, nparts),intent(in) | srcloc, | |||
| Integer,intent(in) | nparts, | |||
| Integer,intent(in) | nloc, | |||
| Integer,dimension (2, nparts),intent(in) | npoints, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5961 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_int | ( | Integer,intent(in) | field_id, | |
| Integer,intent(in) | task_id, | |||
| Integer,dimension(*),intent(in) | data_array, | |||
| Integer,intent(in) | len, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2562 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_field_real | ( | Integer,intent(in) | field_id, | |
| Integer,intent(in) | task_id, | |||
| Real,dimension(*),intent(in) | data_array, | |||
| Integer,intent(in) | len, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 5951 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_irr_field_dble | ( | Double Precision,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,dimension (ndim_3d, npoints),intent(in) | srcloc, | |||
| Integer,intent(in) | npoints, | |||
| Integer,dimension (2, ndim_3d, nars),intent(in) | srcars, | |||
| Integer,intent(in) | nars, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9130 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_irr_field_int | ( | Integer,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,dimension (ndim_3d, npoints),intent(in) | srcloc, | |||
| Integer,intent(in) | npoints, | |||
| Integer,dimension (2, ndim_3d, nars),intent(in) | srcars, | |||
| Integer,intent(in) | nars, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2614 of file psmile.F90.
| subroutine PSMILe::interface::psmile_put_irr_field_real | ( | Real,dimension (*),intent(in) | data_array, | |
| Integer,dimension (2, ndim_3d),intent(in) | data_shape, | |||
| Integer,intent(in) | nbr_fields, | |||
| Integer,dimension (ndim_3d, npoints),intent(in) | srcloc, | |||
| Integer,intent(in) | npoints, | |||
| Integer,dimension (2, ndim_3d, nars),intent(in) | srcars, | |||
| Integer,intent(in) | nars, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(in) | comm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6003 of file psmile.F90.
| subroutine PSMILe::interface::psmile_quicksort | ( | Integer,dimension(n),intent(inout) | a, | |
| Integer,intent(in) | n | |||
| ) |
Definition at line 2434 of file psmile.F90.
| subroutine PSMILe::interface::psmile_quicksort_index | ( | Integer,dimension(n),intent(inout) | a, | |
| Integer,intent(in) | n, | |||
| Integer,dimension(n),intent(inout) | t | |||
| ) |
Definition at line 2439 of file psmile.F90.
| subroutine PSMILe::interface::psmile_range_subgrid_1d_dble | ( | Double Precision,dimension (idlow:idhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Double Precision,dimension (2),intent(in) | extent, | |||
| Integer,dimension (2),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6766 of file psmile.F90.
| subroutine PSMILe::interface::psmile_range_subgrid_1d_real | ( | Real,dimension (idlow:idhigh, nbr_corners),intent(in) | array, | |
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Real,dimension (2),intent(in) | extent, | |||
| Integer,dimension (2),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3420 of file psmile.F90.
| subroutine PSMILe::interface::psmile_range_subgrid_2d_dble | ( | Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, nbr_corners),intent(in) | array1, | |
| Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, nbr_corners),intent(in) | array2, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Double Precision,dimension (2,2),intent(in) | extent, | |||
| Integer,dimension (2,2),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6778 of file psmile.F90.
| subroutine PSMILe::interface::psmile_range_subgrid_2d_real | ( | Real,dimension(idlow:idhigh, jdlow:jdhigh, nbr_corners),intent(in) | array1, | |
| Real,dimension(idlow:idhigh, jdlow:jdhigh, nbr_corners),intent(in) | array2, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | iend, | |||
| Integer,intent(in) | jbeg, | |||
| Integer,intent(in) | jend, | |||
| Real,dimension (2,2),intent(in) | extent, | |||
| Integer,dimension (2,2),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3432 of file psmile.F90.
| subroutine PSMILe::interface::psmile_range_subgrid_3d_dble | ( | Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array1, | |
| Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array2, | |||
| Double Precision,dimension (idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array3, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
| Double Precision,dimension (2, ndim_3d),intent(in) | rinter, | |||
| Integer,dimension (2, ndim_3d),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6796 of file psmile.F90.
| subroutine PSMILe::interface::psmile_range_subgrid_3d_real | ( | Real,dimension(idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array1, | |
| Real,dimension(idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array2, | |||
| Real,dimension(idlow:idhigh, jdlow:jdhigh, kdlow:kdhigh, nbr_corners),intent(in) | array3, | |||
| Integer,intent(in) | idlow, | |||
| Integer,intent(in) | idhigh, | |||
| Integer,intent(in) | jdlow, | |||
| Integer,intent(in) | jdhigh, | |||
| Integer,intent(in) | kdlow, | |||
| Integer,intent(in) | kdhigh, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
| Real,dimension (2, ndim_3d),intent(in) | rinter, | |||
| Integer,dimension (2, ndim_3d),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3449 of file psmile.F90.
| subroutine PSMILe::interface::psmile_read_byid_dble | ( | Integer,intent(in) | id_varid, | |
| Integer,intent(in) | id_taskid, | |||
| Double Precision,dimension(*),intent(inout) | rd_a, | |||
| Double Precision,intent(in) | ju_day, | |||
| Double Precision,intent(in) | ju_sec, | |||
| Double Precision,dimension(2),intent(in) | ju_dayb, | |||
| Double Precision,dimension(2),intent(in) | ju_secb, | |||
| Logical,intent(out) | timeop, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9740 of file psmile.F90.
| subroutine PSMILe::interface::psmile_read_byid_int | ( | Integer,intent(in) | id_varid, | |
| Integer,intent(in) | id_taskid, | |||
| Integer,dimension(*),intent(inout) | rd_a, | |||
| Double Precision,intent(in) | ju_day, | |||
| Double Precision,intent(in) | ju_sec, | |||
| Double Precision,dimension(2),intent(in) | ju_dayb, | |||
| Double Precision,dimension(2),intent(in) | ju_secb, | |||
| Logical,intent(out) | timeop, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9760 of file psmile.F90.
| subroutine PSMILe::interface::psmile_read_byid_real | ( | Integer,intent(in) | id_varid, | |
| Integer,intent(in) | id_taskid, | |||
| Real,dimension(*),intent(inout) | rd_a, | |||
| Double Precision,intent(in) | ju_day, | |||
| Double Precision,intent(in) | ju_sec, | |||
| Double Precision,dimension(2),intent(in) | ju_dayb, | |||
| Double Precision,dimension(2),intent(in) | ju_secb, | |||
| Logical,intent(out) | timeop, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9750 of file psmile.F90.
| subroutine PSMILe::interface::psmile_recv_req_coords_dble | ( | Integer,intent(in) | sender, | |
| Integer,intent(in) | tag, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (ndim_3d+2, *),intent(out) | recv_req, | |||
| Logical,intent(in) | recv_mask, | |||
| Logical,intent(in) | new_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7020 of file psmile.F90.
| subroutine PSMILe::interface::psmile_recv_req_coords_real | ( | Integer,intent(in) | sender, | |
| Integer,intent(in) | tag, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (ndim_3d+2, *),intent(out) | recv_req, | |||
| Logical,intent(in) | recv_mask, | |||
| Logical,intent(in) | new_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3677 of file psmile.F90.
| subroutine PSMILe::interface::psmile_recv_req_corners_dble | ( | Integer,intent(in) | sender, | |
| Integer,intent(in) | tag, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (ndim_3d+2, *),intent(out) | recv_req, | |||
| Logical,intent(in) | recv_mask, | |||
| Logical,intent(in) | new_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7031 of file psmile.F90.
| subroutine PSMILe::interface::psmile_recv_req_corners_real | ( | Integer,intent(in) | sender, | |
| Integer,intent(in) | tag, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (ndim_3d+2, *),intent(out) | recv_req, | |||
| Logical,intent(in) | recv_mask, | |||
| Logical,intent(in) | new_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3687 of file psmile.F90.
| subroutine PSMILe::interface::psmile_recv_req_mask | ( | Integer,intent(in) | sender, | |
| Integer,intent(in) | tag, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (ndim_3d+1, *),intent(out) | recv_req, | |||
| Logical,intent(in) | recv_mask, | |||
| Logical,intent(in) | new_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1894 of file psmile.F90.
| subroutine PSMILe::interface::psmile_recv_req_subgrid | ( | Type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| Integer,intent(in) | sender, | |||
| Integer,intent(in) | tag, | |||
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (ndim_3d+2, *),intent(inout) | recv_req, | |||
| Logical,intent(in) | new_search, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1906 of file psmile.F90.
| subroutine PSMILe::interface::psmile_redirstdout | ( | Integer,dimension (*),intent(in) | charbuf, | |
| Integer,intent(in) | lenstr, | |||
| Integer,intent(in) | parallel, | |||
| Integer,intent(in) | my_pe, | |||
| Integer,intent(in) | npes, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1168 of file psmile.F90.
| subroutine PSMILe::interface::psmile_reducedgrid_map | ( | integer,intent(in) | grid_id, | |
| integer,intent(in) | nbr_latitudes, | |||
| integer,dimension(nbr_latitudes),intent(in) | nbr_points_per_lat, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1073 of file psmile.F90.
| subroutine PSMILe::interface::psmile_remove_intersect | ( | Real (PSMILe_float_kind),dimension (2, ndim_3d, npart),intent(inout) | inter, | |
| Integer,dimension (npart),intent(inout) | idl, | |||
| Integer,dimension (npart),intent(inout) | idg, | |||
| Integer,intent(inout) | npart, | |||
| Type (Enddef_extent_info),dimension (*),intent(in) | local_extent_info, | |||
| Type (Enddef_extent_info),dimension (*),intent(in) | global_extent_info, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1919 of file psmile.F90.
| subroutine PSMILe::interface::psmile_remove_intersect_int | ( | Integer,dimension (2, ndim_3d, npart),intent(inout) | inter, | |
| Integer,dimension (npart),intent(inout) | id1, | |||
| Integer,dimension (npart),intent(inout) | id2, | |||
| Integer,intent(inout) | npart, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1930 of file psmile.F90.
| subroutine PSMILe::interface::psmile_return_extra_off_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_global_search),intent(inout) | search, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (nd_dist),intent(in) | found, | |||
| Double Precision,dimension (nd_dist, nb_extra),intent(in) | distance, | |||
| Integer,intent(in) | nd_dist, | |||
| Integer,intent(in) | nb_extra, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6744 of file psmile.F90.
| subroutine PSMILe::interface::psmile_return_extra_off_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_global_search),intent(inout) | search, | |||
| Integer,intent(in) | var_id, | |||
| Integer,dimension (nd_dist),intent(in) | found, | |||
| Real,dimension (nd_dist, nb_extra),intent(in) | distance, | |||
| Integer,intent(in) | nd_dist, | |||
| Integer,intent(in) | nb_extra, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3397 of file psmile.F90.
| subroutine PSMILe::interface::psmile_return_locations_3d | ( | Type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| Integer,intent(in) | sender, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(in) | dir_index, | |||
| Integer,intent(in) | cpl_index, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | n_vars_ret, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1938 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_3d_reg_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (ndim_3d, *),intent(inout) | found, | |||
| Type (integer_vector),dimension (ndim_3d, *),intent(inout) | locations, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7109 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_3d_reg_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (ndim_3d, *),intent(inout) | found, | |||
| Type (integer_vector),dimension (ndim_3d, *),intent(inout) | locations, | |||
| Integer,dimension (search%search_data%npart),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3765 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_cells | ( | Type (Enddef_search),intent(inout) | search, | |
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1952 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_extra | ( | Type (Enddef_global_search),intent(inout) | search_global, | |
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1960 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_extra_nn | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_global_search),intent(inout) | search, | |||
| Integer,intent(in) | var_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1980 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_extra_off | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_global_search),intent(inout) | search, | |||
| Integer,intent(in) | var_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1968 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_gauss2_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%search_data%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%search_data%npart, 2) | locations, | |||
| Integer,dimension (search%search_data%npart, 2),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7129 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_gauss2_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%search_data%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%search_data%npart, 2) | locations, | |||
| Integer,dimension (search%search_data%npart, 2),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3785 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_gridless | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_search),intent(inout) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1991 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_irreg2_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%search_data%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%search_data%npart, 2) | locations, | |||
| Integer,dimension (search%search_data%npart, 2),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7149 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_irreg2_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%search_data%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%search_data%npart, 2) | locations, | |||
| Integer,dimension (search%search_data%npart, 2),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3805 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_irreg3_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (*),intent(inout) | found, | |||
| Type (integer_vector),dimension (*),intent(inout) | locations, | |||
| Integer,dimension (*),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7089 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_irreg3_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (*),intent(inout) | found, | |||
| Type (integer_vector),dimension (*),intent(inout) | locations, | |||
| Integer,dimension (*),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Type (Enddef_field_info),dimension (n_vars),intent(in) | field_list, | |||
| Integer,intent(in) | n_vars, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(inout) | method_id, | |||
| Integer,intent(inout) | var_id, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3745 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_nnx_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_global_search),intent(inout) | search, | |||
| Integer,intent(in) | var_id, | |||
| Double Precision,dimension (n_send),intent(in) | coords1, | |||
| Double Precision,dimension (n_send),intent(in) | coords2, | |||
| Double Precision,dimension (n_send),intent(in) | coords3, | |||
| Double Precision,dimension (n_send),intent(inout) | distance, | |||
| Integer,dimension (n_send),intent(inout) | nfound, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | locations, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(in) | nb_extra, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7168 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_nnx_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_global_search),intent(inout) | search, | |||
| Integer,intent(in) | var_id, | |||
| Real,dimension (n_send),intent(in) | coords1, | |||
| Real,dimension (n_send),intent(in) | coords2, | |||
| Real,dimension (n_send),intent(in) | coords3, | |||
| Real,dimension (n_send),intent(inout) | distance, | |||
| Integer,dimension (n_send),intent(inout) | nfound, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | locations, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(in) | nb_extra, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3824 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_nn_3d_dble | ( | Double Precision,dimension (n_send, 2),intent(in) | sin_search, | |
| Double Precision,dimension (n_send, 2),intent(in) | cos_search, | |||
| Double Precision,dimension (n_send),intent(in) | z_search, | |||
| Double Precision,dimension (n_send),intent(inout) | distance, | |||
| Integer,dimension (n_send),intent(inout) | nfound, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | locations, | |||
| Integer,intent(in) | n_send, | |||
| Double Precision,dimension (coords_shape(1,1),intent(in) | x_coords, | |||
| Double Precision,dimension (coords_shape(1,1),intent(in) | y_coords, | |||
| Double Precision,dimension (coords_shape(1,1),intent(in) | z_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(in) | sin_values, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(in) | cos_values, | |||
| Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7189 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_nn_3d_real | ( | Real,dimension (n_send, 2),intent(in) | sin_search, | |
| Real,dimension (n_send, 2),intent(in) | cos_search, | |||
| Real,dimension (n_send),intent(in) | z_search, | |||
| Real,dimension (n_send),intent(inout) | distance, | |||
| Integer,dimension (n_send),intent(inout) | nfound, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | locations, | |||
| Integer,intent(in) | n_send, | |||
| Real,dimension (coords_shape(1,1),intent(in) | x_coords, | |||
| Real,dimension (coords_shape(1,1),intent(in) | y_coords, | |||
| Real,dimension (coords_shape(1,1),intent(in) | z_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Real,dimension (grid_valid_shape(1,1),intent(in) | sin_values, | |||
| Real,dimension (grid_valid_shape(1,1),intent(in) | cos_values, | |||
| Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3845 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_nn_3d_reg_dble | ( | Double Precision,dimension (n_send, 2),intent(in) | sin_search, | |
| Double Precision,dimension (n_send, 2),intent(in) | cos_search, | |||
| Double Precision,dimension (n_send),intent(in) | z_search, | |||
| Double Precision,dimension (n_send),intent(inout) | distance, | |||
| Integer,dimension (n_send),intent(inout) | nfound, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | locations, | |||
| Integer,intent(in) | n_send, | |||
| Double Precision,dimension (coords_shape(1,1),intent(in) | x_coords, | |||
| Double Precision,dimension (coords_shape(1,1),intent(in) | y_coords, | |||
| Double Precision,dimension (coords_shape(1,3),intent(in) | z_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(in) | sin_values_lon, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(in) | cos_values_lon, | |||
| Double Precision,dimension (grid_valid_shape(1,2),intent(in) | sin_values_lat, | |||
| Double Precision,dimension (grid_valid_shape(1,2),intent(in) | cos_values_lat, | |||
| Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7238 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_nn_3d_reg_real | ( | Real,dimension (n_send, 2),intent(in) | sin_search, | |
| Real,dimension (n_send, 2),intent(in) | cos_search, | |||
| Real,dimension (n_send),intent(in) | z_search, | |||
| Real,dimension (n_send),intent(inout) | distance, | |||
| Integer,dimension (n_send),intent(inout) | nfound, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | locations, | |||
| Integer,intent(in) | n_send, | |||
| Real,dimension (coords_shape(1,1),intent(in) | x_coords, | |||
| Real,dimension (coords_shape(1,1),intent(in) | y_coords, | |||
| Real,dimension (coords_shape(1,3),intent(in) | z_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Real,dimension (grid_valid_shape(1,1),intent(in) | sin_values_lon, | |||
| Real,dimension (grid_valid_shape(1,1),intent(in) | cos_values_lon, | |||
| Real,dimension (grid_valid_shape(1,2),intent(in) | sin_values_lat, | |||
| Real,dimension (grid_valid_shape(1,2),intent(in) | cos_values_lat, | |||
| Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3894 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_nn_irreg2_dble | ( | Double Precision,dimension (n_send, 2),intent(in) | sin_search, | |
| Double Precision,dimension (n_send, 2),intent(in) | cos_search, | |||
| Double Precision,dimension (n_send),intent(in) | z_search, | |||
| Double Precision,dimension (n_send),intent(inout) | distance, | |||
| Integer,dimension (n_send),intent(inout) | nfound, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | locations, | |||
| Integer,intent(in) | n_send, | |||
| Double Precision,dimension( coords_shape(1,1),intent(in) | x_coords, | |||
| Double Precision,dimension( coords_shape(1,1),intent(in) | y_coords, | |||
| Double Precision,dimension( coords_shape(1,3),intent(in) | z_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(in) | sin_values, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(in) | cos_values, | |||
| Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
| Logical,dimension ( mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7285 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_nn_irreg2_real | ( | Real,dimension (n_send, 2),intent(in) | sin_search, | |
| Real,dimension (n_send, 2),intent(in) | cos_search, | |||
| Real,dimension (n_send),intent(in) | z_search, | |||
| Real,dimension (n_send),intent(inout) | distance, | |||
| Integer,dimension (n_send),intent(inout) | nfound, | |||
| Integer,dimension (ndim_3d, n_send),intent(out) | locations, | |||
| Integer,intent(in) | n_send, | |||
| Real,dimension( coords_shape(1,1),intent(in) | x_coords, | |||
| Real,dimension( coords_shape(1,1),intent(in) | y_coords, | |||
| Real,dimension( coords_shape(1,3),intent(in) | z_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Real,dimension ( grid_valid_shape(1,1),intent(in) | sin_values, | |||
| Real,dimension ( grid_valid_shape(1,1),intent(in) | cos_values, | |||
| Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
| Logical,dimension ( mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3941 of file psmile.F90.
| subroutine PSMILe::interface::psmile_sel_grid_range | ( | Integer,intent(in) | grid_id, | |
| Real (PSMILe_float_kind),dimension (2, ndim_3d),intent(in) | dinter, | |||
| Integer,dimension (2, ndim_3d),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2392 of file psmile.F90.
| subroutine PSMILe::interface::psmile_sel_grid_range_dble | ( | Integer,intent(in) | grid_id, | |
| Real (PSMILe_float_kind),dimension (2, ndim_3d),intent(in) | dinter, | |||
| Integer,dimension (2, ndim_3d),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 6758 of file psmile.F90.
| subroutine PSMILe::interface::psmile_sel_grid_range_real | ( | Integer,intent(in) | grid_id, | |
| Real (PSMILe_float_kind),dimension (2, ndim_3d),intent(in) | dinter, | |||
| Integer,dimension (2, ndim_3d),intent(out) | inter, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3412 of file psmile.F90.
| subroutine PSMILe::interface::psmile_select_nn_found | ( | Type (Enddef_search),intent(in) | search, | |
| Type (Extra_search_info),intent(inout) | extra_search, | |||
| Type (Send_information),intent(inout) | send_info, | |||
| Integer,dimension (2, extra_search%n_extra),intent(inout) | selected, | |||
| Type (Select_search_info),dimension (nrecv),intent(inout) | sel_info, | |||
| Integer,intent(inout) | nrecv, | |||
| Integer,intent(in) | nb_extra, | |||
| Integer,dimension (ndim_3d, nloc, num_neigh),intent(inout) | neighbors_3d, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3987 of file psmile.F90.
| subroutine PSMILe::interface::psmile_send_destinations | ( | Integer,intent(in) | method_id, | |
| Integer,intent(in) | cpl_index, | |||
| Integer,intent(in) | dir_index, | |||
| Integer,intent(in) | sender, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2312 of file psmile.F90.
| subroutine PSMILe::interface::psmile_send_req_coords_dble | ( | Type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7002 of file psmile.F90.
| subroutine PSMILe::interface::psmile_send_req_coords_real | ( | Type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3658 of file psmile.F90.
| subroutine PSMILe::interface::psmile_send_req_corners_dble | ( | Type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7011 of file psmile.F90.
| subroutine PSMILe::interface::psmile_send_req_corners_real | ( | Type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3667 of file psmile.F90.
| subroutine PSMILe::interface::psmile_send_req_mask | ( | Type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2006 of file psmile.F90.
| subroutine PSMILe::interface::psmile_send_req_subgrid | ( | Type (enddef_msg_intersections),intent(in) | msg_intersections, | |
| Integer,intent(in) | dest, | |||
| Integer,intent(in) | tag, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2015 of file psmile.F90.
| subroutine PSMILe::interface::psmile_set_corners_3d_double | ( | integer,intent(in) | grid_id, | |
| integer,intent(in) | nbr_corners, | |||
| integer,dimension (1:2, *),intent(in) | corners_actual_shape, | |||
| double precision,dimension (*),intent(in) | corners_1st_array, | |||
| double precision,dimension (*),intent(in) | corners_2nd_array, | |||
| double precision,dimension (*),intent(in) | corners_3rd_array, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1081 of file psmile.F90.
| subroutine PSMILe::interface::psmile_set_corners_3d_real | ( | integer,intent(in) | grid_id, | |
| integer,intent(in) | nbr_corners, | |||
| integer,dimension (1:2, *),intent(in) | corners_actual_shape, | |||
| real,dimension (*),intent(in) | corners_1st_array, | |||
| real,dimension (*),intent(in) | corners_2nd_array, | |||
| real,dimension (*),intent(in) | corners_3rd_array, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1093 of file psmile.F90.
| subroutine PSMILe::interface::psmile_set_mask | ( | integer,intent(inout) | mask_id, | |
| integer,intent(in) | grid_id, | |||
| integer,dimension(2, *),intent(in) | mask_actual_shape, | |||
| logical,dimension (*),intent(in) | mask_array, | |||
| logical,intent(in) | new_mask, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1105 of file psmile.F90.
| subroutine PSMILe::interface::psmile_set_points_3d_double | ( | integer,intent(inout) | method_id, | |
| character (len=*),intent(in) | point_name, | |||
| integer,intent(in) | grid_id, | |||
| integer,dimension (2, *),intent(in) | points_actual_shape, | |||
| double precision,dimension(*),intent(in) | points_1st_array, | |||
| double precision,dimension(*),intent(in) | points_2nd_array, | |||
| double precision,dimension(*),intent(in) | points_3rd_array, | |||
| logical,intent(in) | new_points, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1124 of file psmile.F90.
| subroutine PSMILe::interface::psmile_set_points_3d_real | ( | integer,intent(inout) | method_id, | |
| character (len=*),intent(in) | point_name, | |||
| integer,intent(in) | grid_id, | |||
| integer,dimension (2, *),intent(in) | points_actual_shape, | |||
| real,dimension(*),intent(in) | points_1st_array, | |||
| real,dimension(*),intent(in) | points_2nd_array, | |||
| real,dimension(*),intent(in) | points_3rd_array, | |||
| logical,intent(in) | new_points, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1137 of file psmile.F90.
| subroutine PSMILe::interface::psmile_set_points_gridless | ( | integer,intent(inout) | point_id, | |
| character (len=*),intent(in) | point_name, | |||
| integer,intent(in) | grid_id, | |||
| logical,intent(in) | new_points, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 1115 of file psmile.F90.
| subroutine PSMILe::interface::psmile_set_userdef | ( | Integer,intent(in) | var_id, | |
| Integer,intent(in) | side, | |||
| Integer,intent(in) | chan_id, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9897 of file psmile.F90.
| subroutine PSMILe::interface::psmile_spawn_child_appl | ( | Integer,intent(in) | intracomm, | |
| Integer,intent(out) | intercomm, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1419 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_dest_locs_21d | ( | Integer,dimension (*),intent(in) | found, | |
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Integer,dimension (*),intent(in) | foundz, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | opt, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2160 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_dest_locs_3d | ( | Integer,dimension (*),intent(in) | found, | |
| Integer,dimension (ndim_3d, *),intent(in) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | opt, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2172 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_dest_locs_3d_msk | ( | Logical,dimension ( mask_shape(1,1),intent(in) | mask_array, | |
| Integer,dimension(2,3),intent(in) | mask_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | inter, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2186 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_dest_locs_3d_reg | ( | Type (integer_vector),dimension (ndim_3d),intent(in) | found, | |
| Type (integer_vector),dimension (ndim_3d),intent(in) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | opt, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2201 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_faces_3d_dble | ( | Integer,dimension (nreq),intent(in) | indices_req, | |
| Integer,dimension (nreq),intent(in) | required, | |||
| Integer,intent(in) | nreq, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords1, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords2, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords3, | |||
| Integer,intent(in) | ncpl, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,dimension (ndim_3d, ndibuf),intent(in) | srcloc_ind, | |||
| Integer,dimension (len_item, ndibuf),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | ndibuf, | |||
| Integer,intent(inout) | ipia, | |||
| Double Precision,dimension (len_rtem, ndrbuf),intent(inout) | buf, | |||
| Integer,intent(in) | len_rtem, | |||
| Integer,intent(in) | ndrbuf, | |||
| Integer,intent(inout) | ipa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7329 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_faces_3d_real | ( | Integer,dimension (nreq),intent(in) | indices_req, | |
| Integer,dimension (nreq),intent(in) | required, | |||
| Integer,intent(in) | nreq, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords1, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords2, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords3, | |||
| Integer,intent(in) | ncpl, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,dimension (ndim_3d, ndibuf),intent(in) | srcloc_ind, | |||
| Integer,dimension (len_item, ndibuf),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | ndibuf, | |||
| Integer,intent(inout) | ipia, | |||
| Real,dimension (len_rtem, ndrbuf),intent(inout) | buf, | |||
| Integer,intent(in) | len_rtem, | |||
| Integer,intent(in) | ndrbuf, | |||
| Integer,intent(inout) | ipa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4009 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_faces_3d_reg_dble | ( | Integer,dimension (nreq),intent(in) | indices_req, | |
| Integer,dimension (nreq),intent(in) | required, | |||
| Integer,intent(in) | nreq, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords1, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords2, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords3, | |||
| Integer,intent(in) | ncpl, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,2),intent(in) | corners2, | |||
| Double Precision,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,dimension (ndim_3d, ndibuf),intent(in) | srcloc_ind, | |||
| Integer,dimension (len_item, ndibuf),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | ndibuf, | |||
| Integer,intent(inout) | ipia, | |||
| Double Precision,dimension (len_rtem, ndrbuf),intent(inout) | buf, | |||
| Integer,intent(in) | len_rtem, | |||
| Integer,intent(in) | ndrbuf, | |||
| Integer,intent(inout) | ipa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7369 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_faces_3d_reg_real | ( | Integer,dimension (nreq),intent(in) | indices_req, | |
| Integer,dimension (nreq),intent(in) | required, | |||
| Integer,intent(in) | nreq, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords1, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords2, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords3, | |||
| Integer,intent(in) | ncpl, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,2),intent(in) | corners2, | |||
| Real,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,dimension (ndim_3d, ndibuf),intent(in) | srcloc_ind, | |||
| Integer,dimension (len_item, ndibuf),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | ndibuf, | |||
| Integer,intent(inout) | ipia, | |||
| Real,dimension (len_rtem, ndrbuf),intent(inout) | buf, | |||
| Integer,intent(in) | len_rtem, | |||
| Integer,intent(in) | ndrbuf, | |||
| Integer,intent(inout) | ipa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4052 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_faces_gauss2_dble | ( | Integer,dimension (nreq),intent(in) | indices_req, | |
| Integer,dimension (nreq),intent(in) | required, | |||
| Integer,intent(in) | nreq, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords1, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords2, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords3, | |||
| Integer,intent(in) | ncpl, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Double Precision,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,dimension (ndim_3d, ndibuf),intent(in) | srcloc_ind, | |||
| Integer,dimension (ndibuf),intent(in) | virtual_ind, | |||
| Logical,intent(in) | virtual_cell_available, | |||
| Integer,dimension (len_item, ndibuf),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | ndibuf, | |||
| Integer,intent(inout) | ipia, | |||
| Double Precision,dimension (len_rtem, ndrbuf),intent(inout) | buf, | |||
| Integer,intent(in) | len_rtem, | |||
| Integer,intent(in) | ndrbuf, | |||
| Integer,intent(inout) | ipa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7403 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_faces_gauss2_real | ( | Integer,dimension (nreq),intent(in) | indices_req, | |
| Integer,dimension (nreq),intent(in) | required, | |||
| Integer,intent(in) | nreq, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords1, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords2, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords3, | |||
| Integer,intent(in) | ncpl, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Real,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,dimension (ndim_3d, ndibuf),intent(in) | srcloc_ind, | |||
| Integer,dimension (ndibuf),intent(in) | virtual_ind, | |||
| Logical,intent(in) | virtual_cell_available, | |||
| Integer,dimension (len_item, ndibuf),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | ndibuf, | |||
| Integer,intent(inout) | ipia, | |||
| Real,dimension (len_rtem, ndrbuf),intent(inout) | buf, | |||
| Integer,intent(in) | len_rtem, | |||
| Integer,intent(in) | ndrbuf, | |||
| Integer,intent(inout) | ipa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4089 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_faces_irreg2_dble | ( | Integer,dimension (nreq),intent(in) | indices_req, | |
| Integer,dimension (nreq),intent(in) | required, | |||
| Integer,intent(in) | nreq, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords1, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords2, | |||
| Double Precision,dimension (ncpl),intent(in) | tgt_coords3, | |||
| Integer,intent(in) | ncpl, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Double Precision,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Double Precision,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,dimension (ndim_3d, ndibuf),intent(in) | srcloc_ind, | |||
| Integer,dimension (len_item, ndibuf),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | ndibuf, | |||
| Integer,intent(inout) | ipia, | |||
| Double Precision,dimension (len_rtem, ndrbuf),intent(inout) | buf, | |||
| Integer,intent(in) | len_rtem, | |||
| Integer,intent(in) | ndrbuf, | |||
| Integer,intent(inout) | ipa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7443 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_faces_irreg2_real | ( | Integer,dimension (nreq),intent(in) | indices_req, | |
| Integer,dimension (nreq),intent(in) | required, | |||
| Integer,intent(in) | nreq, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords1, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords2, | |||
| Real,dimension (ncpl),intent(in) | tgt_coords3, | |||
| Integer,intent(in) | ncpl, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
| Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
| Real,dimension ( corner_shape(1,3),intent(in) | corners3, | |||
| Integer,dimension(2,3),intent(in) | corner_shape, | |||
| Integer,intent(in) | nbr_corners, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (nreq),intent(in) | send_mask, | |||
| Integer,dimension (ndim_3d, ndibuf),intent(in) | srcloc_ind, | |||
| Integer,dimension (len_item, ndibuf),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | ndibuf, | |||
| Integer,intent(inout) | ipia, | |||
| Real,dimension (len_rtem, ndrbuf),intent(inout) | buf, | |||
| Integer,intent(in) | len_rtem, | |||
| Integer,intent(in) | ndrbuf, | |||
| Integer,intent(inout) | ipa, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4129 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_mask_locs_3d | ( | Integer,intent(in) | ipart, | |
| Integer,dimension(2,3),intent(in) | range, | |||
| Integer,dimension(2,ndim_3d),intent(in) | control, | |||
| Integer,dimension ( range(1,1),intent(in) | found, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2215 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_send_info | ( | Integer,intent(in) | var_id, | |
| Integer,intent(in) | id_trans_out, | |||
| Integer,intent(in) | dir_index, | |||
| Integer,intent(in) | cpl_index, | |||
| Integer,intent(in) | appl_index, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1385 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_source_locs_1d | ( | Integer,dimension (*),intent(in) | found, | |
| Integer,dimension (*),intent(in) | loc, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | len, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | opt, | |||
| Integer,intent(in) | ialloc, | |||
| Integer,intent(in) | ipart, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2232 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_source_locs_2d | ( | Integer,dimension (*),intent(in) | found, | |
| Integer,dimension (ndim_2d, *),intent(in) | loc, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | len, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | opt, | |||
| Integer,intent(in) | ialloc, | |||
| Integer,intent(in) | ipart, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2244 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_source_locs_3d | ( | Integer,dimension (*),intent(in) | found, | |
| Integer,dimension (ndim_3d, *),intent(in) | loc, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | len, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | opt, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2256 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_source_locs_3d_msk | ( | Logical,dimension ( mask_shape(1,1),intent(in) | mask_array, | |
| Integer,dimension(2,3),intent(in) | mask_shape, | |||
| Integer,dimension (2, ndim_3d),intent(in) | inter, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2268 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_source_locs_3d_reg | ( | Type (integer_vector),dimension (ndim_3d),intent(in) | found, | |
| Type (integer_vector),dimension (ndim_3d),intent(in) | loc, | |||
| Integer,dimension (2, ndim_3d),intent(in) | range, | |||
| Integer,dimension (2, ndim_3d),intent(in) | control, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | opt, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | nadd, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2283 of file psmile.F90.
| subroutine PSMILe::interface::psmile_store_source_virt_3d | ( | Integer,dimension (len),intent(in) | found, | |
| Integer,dimension (len),intent(in) | virtual_cell, | |||
| Integer,intent(in) | ibeg, | |||
| Integer,intent(in) | len, | |||
| Type(Send_information),intent(inout) | send_info, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(in) | opt, | |||
| Integer,intent(in) | ialloc, | |||
| Integer,intent(in) | ipart, | |||
| Integer,intent(in) | nprev, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2297 of file psmile.F90.
| Logical PSMILe::interface::PSMILe_to_be_coupled | ( | Integer,intent(in) | comp_id1, | |
| Integer,intent(in) | comp_id2 | |||
| ) |
Definition at line 2347 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trans_loc2glob_3d | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (len_item, nloc),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2046 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trans_loc2glob_gauss2 | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (len_item, nloc),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | nloc, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2054 of file psmile.F90.
| subroutine PSMILe::interface::psmile_transform_gauss2 | ( | Type (Enddef_search_data) | search_data, | |
| Integer,dimension (search_data%npart, ndim_2d),intent(in) | glen, | |||
| Integer,dimension(3),intent(in) | map_shape, | |||
| Integer,dimension (map_shape(1),intent(in) | map, | |||
| Type (integer_vector),dimension (search_data%npart, ndim_3d),intent(in) | locations, | |||
| Type (integer_vector),dimension (search_data%npart, ndim_3d),intent(in) | found, | |||
| Type (integer_vector),dimension (search_data%npart, ndim_2d),intent(inout) | glocations, | |||
| Type (integer_vector),dimension (search_data%npart, ndim_2d),intent(inout) | gfound, | |||
| Logical,intent(in) | cell_based_switch, | |||
| Integer,intent(in) | nlev, | |||
| Integer,dimension(2),intent(in) | grid_valid_shape, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2024 of file psmile.F90.
| integer,dimension (ndim_3d) PSMILe::interface::psmile_transform_index_1d_to_3d | ( | integer,intent(in) | index_1d, | |
| integer,dimension (2, ndim_3d),intent(in) | array_shape | |||
| ) |
Definition at line 1185 of file psmile.F90.
| integer PSMILe::interface::psmile_transform_index_3d_to_1d | ( | integer,dimension(ndim_3d),intent(in) | index_3d, | |
| integer,dimension (2, ndim_3d),intent(in) | array_shape | |||
| ) |
Definition at line 1192 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trf_lonlat_1d_dble | ( | Double Precision,dimension(coords_shape(1,1),intent(in) | x_coords, | |
| Double Precision,dimension(coords_shape(1,2),intent(in) | y_coords, | |||
| Integer,dimension(2,2),intent(in) | coords_shape, | |||
| Integer,dimension(2,2),intent(out) | grid_valid_shape, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(out) | sin_values_lon, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(out) | cos_values_lon, | |||
| Double Precision,dimension (grid_valid_shape(1,2),intent(out) | sin_values_lat, | |||
| Double Precision,dimension (grid_valid_shape(1,2),intent(out) | cos_values_lat, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7481 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trf_lonlat_1d_real | ( | Real,dimension(coords_shape(1,1),intent(in) | x_coords, | |
| Real,dimension(coords_shape(1,2),intent(in) | y_coords, | |||
| Integer,dimension(2,2),intent(in) | coords_shape, | |||
| Integer,dimension(2,2),intent(out) | grid_valid_shape, | |||
| Real,dimension (grid_valid_shape(1,1),intent(out) | sin_values_lon, | |||
| Real,dimension (grid_valid_shape(1,1),intent(out) | cos_values_lon, | |||
| Real,dimension (grid_valid_shape(1,2),intent(out) | sin_values_lat, | |||
| Real,dimension (grid_valid_shape(1,2),intent(out) | cos_values_lat, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4167 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trf_lonlat_2d_dble | ( | Double Precision,dimension(coords_shape(1,1),intent(in) | x_coords, | |
| Double Precision,dimension(coords_shape(1,1),intent(in) | y_coords, | |||
| Integer,dimension(2,2),intent(in) | coords_shape, | |||
| Integer,dimension(2,2),intent(out) | grid_valid_shape, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(out) | sin_values, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(out) | cos_values, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7505 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trf_lonlat_2d_real | ( | Real,dimension(coords_shape(1,1),intent(in) | x_coords, | |
| Real,dimension(coords_shape(1,1),intent(in) | y_coords, | |||
| Integer,dimension(2,2),intent(in) | coords_shape, | |||
| Integer,dimension(2,2),intent(out) | grid_valid_shape, | |||
| Real,dimension (grid_valid_shape(1,1),intent(out) | sin_values, | |||
| Real,dimension (grid_valid_shape(1,1),intent(out) | cos_values, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4191 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trf_lonlat_3d_dble | ( | Double Precision,dimension(coords_shape(1,1),intent(in) | x_coords, | |
| Double Precision,dimension(coords_shape(1,1),intent(in) | y_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Integer,dimension(2,3),intent(out) | grid_valid_shape, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(out) | sin_values, | |||
| Double Precision,dimension (grid_valid_shape(1,1),intent(out) | cos_values, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7534 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trf_lonlat_3d_real | ( | Real,dimension(coords_shape(1,1),intent(in) | x_coords, | |
| Real,dimension(coords_shape(1,1),intent(in) | y_coords, | |||
| Integer,dimension(2,3),intent(in) | coords_shape, | |||
| Integer,dimension(2,3),intent(out) | grid_valid_shape, | |||
| Real,dimension (grid_valid_shape(1,1),intent(out) | sin_values, | |||
| Real,dimension (grid_valid_shape(1,1),intent(out) | cos_values, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4220 of file psmile.F90.
| subroutine PSMILe::interface::psmile_tricu_3d_extra_off | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_global_search),intent(inout) | search, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Integer,dimension (len_item, n_send),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,dimension (2, ndim_3d),intent(in) | grid_valid_shape, | |||
| Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2062 of file psmile.F90.
| subroutine PSMILe::interface::psmile_tricu_gauss2_extra | ( | Type (Enddef_global_search),intent(inout) | search, | |
| Integer,intent(in) | grid_id, | |||
| Logical,dimension (mask_shape(1,1),intent(in) | mask_array, | |||
| Integer,dimension(2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Integer,dimension (len_item, n_send),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9196 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trili_3d_extra_off | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_global_search),intent(inout) | search, | |||
| Integer,intent(in) | grid_id, | |||
| Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
| Integer,dimension (2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Integer,dimension (len_item, n_send),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2085 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trili_gauss2_extra | ( | Type (Enddef_global_search),intent(inout) | search, | |
| Integer,intent(in) | grid_id, | |||
| Logical,dimension (mask_shape(1,1),intent(in) | mask_array, | |||
| Integer,dimension(2,3),intent(in) | mask_shape, | |||
| Logical,intent(in) | mask_available, | |||
| Integer,dimension (len_item, n_send),intent(inout) | ibuf, | |||
| Integer,intent(in) | len_item, | |||
| Integer,intent(in) | n_send, | |||
| Integer,intent(in) | num_neigh, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9214 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_finalize | ( | Integer,intent(in) | id_trans_rank, | |
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9589 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_get_dble | ( | Integer,intent(in) | id_transient_in_id, | |
| Integer,intent(in) | id_epio_id, | |||
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_field_size, | |||
| Double Precision,dimension(id_epio_field_size),intent(out) | dda_field, | |||
| Integer,intent(in) | id_nbr_fields, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9486 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_get_int | ( | Integer,intent(in) | id_transient_in_id, | |
| Integer,intent(in) | id_epio_id, | |||
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_field_size, | |||
| Integer,dimension(id_epio_field_size),intent(out) | ida_field, | |||
| Integer,intent(in) | id_nbr_fields, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9454 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_get_real | ( | Integer,intent(in) | id_transient_in_id, | |
| Integer,intent(in) | id_epio_id, | |||
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_field_size, | |||
| Real,dimension(id_epio_field_size),intent(out) | rda_field, | |||
| Integer,intent(in) | id_nbr_fields, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9470 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_give_neighbors3d | ( | Integer,intent(in) | id_epio_id, | |
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_tgt_size, | |||
| Integer,intent(in) | id_nb_neighbors, | |||
| Integer,dimension(id_nb_neighbors*id_epio_tgt_size),intent(in) | ida_neighbor_indices, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9502 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_give_neighbors_gauss | ( | Integer,intent(in) | id_epio_id, | |
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_tgt_size, | |||
| Integer,intent(in) | id_nb_neighbors, | |||
| Integer,dimension(id_nb_neighbors*id_epio_tgt_size),intent(in) | ida_neighbor_indices, | |||
| Integer,dimension(id_epio_tgt_size),intent(in) | ida_neighbor_bascule, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9519 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_give_neighcells3d | ( | Integer,intent(in) | id_epio_id, | |
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_tgt_size, | |||
| Integer,dimension(id_epio_tgt_size),intent(in) | ida_nbsrccells_pertgtpt, | |||
| Integer,intent(in) | id_source_size, | |||
| Integer,intent(in) | id_nb_corners, | |||
| Integer,dimension(id_source_size),intent(in) | ida_source_cell_index, | |||
| Integer,dimension(id_nb_corners*id_source_size),intent(in) | ida_corner_index, | |||
| Integer,intent(in) | id_grid_type, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9539 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_inform | ( | Integer,dimension(psmile_trans_header_length),intent(in) | ida_args, | |
| Integer,intent(in) | id_trs_rank, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9299 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_put_dble | ( | Integer,intent(in) | id_transient_out_id, | |
| Integer,intent(in) | id_epio_id, | |||
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_field_size, | |||
| Double Precision,dimension(id_epio_field_size),intent(in) | dda_field, | |||
| Integer,intent(in) | id_nbr_fields, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9438 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_put_int | ( | Integer,intent(in) | id_transient_out_id, | |
| Integer,intent(in) | id_epio_id, | |||
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_field_size, | |||
| Integer,dimension(id_epio_field_size),intent(in) | ida_field, | |||
| Integer,intent(in) | id_nbr_fields, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9406 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_put_real | ( | Integer,intent(in) | id_transient_out_id, | |
| Integer,intent(in) | id_epio_id, | |||
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_epio_field_size, | |||
| Real,dimension(id_epio_field_size),intent(in) | rda_field, | |||
| Integer,intent(in) | id_nbr_fields, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9422 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_set_src_epio3d_dble | ( | Integer,intent(out) | id_epio_id, | |
| Integer,intent(out) | id_trans_rank, | |||
| Integer,intent(in) | id_src_epio_size, | |||
| Integer,intent(in) | id_nbr_corner, | |||
| Double Precision,dimension(id_src_epio_size),intent(in) | dda_src_epio_lat, | |||
| Double Precision,dimension(id_src_epio_size),intent(in) | dda_src_epio_lon, | |||
| Double Precision,dimension(id_src_epio_size),intent(in) | dda_src_epio_z, | |||
| Integer,intent(in) | id_src_mask, | |||
| Integer,dimension(id_src_epio_size),intent(in) | ida_src_epio_mask, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9306 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_set_src_epio3d_real | ( | Integer,intent(out) | id_epio_id, | |
| Integer,intent(out) | id_trans_rank, | |||
| Integer,intent(in) | id_src_epio_size, | |||
| Integer,intent(in) | id_nbr_corner, | |||
| Real,dimension(id_src_epio_size),intent(in) | rda_src_epio_lat, | |||
| Real,dimension(id_src_epio_size),intent(in) | rda_src_epio_lon, | |||
| Real,dimension(id_src_epio_size),intent(in) | rda_src_epio_z, | |||
| Integer,intent(in) | id_src_mask, | |||
| Integer,dimension(id_src_epio_size),intent(in) | ida_src_epio_mask, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9328 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_set_tgt_epio3d_dble | ( | Integer,intent(in) | id_epio_id, | |
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_tgt_epio_size, | |||
| Integer,intent(in) | id_nbr_corner, | |||
| Double Precision,dimension(id_tgt_epio_size),intent(in) | dda_tgt_epio_lat, | |||
| Double Precision,dimension(id_tgt_epio_size),intent(in) | dda_tgt_epio_lon, | |||
| Double Precision,dimension(id_tgt_epio_size),intent(in) | dda_tgt_epio_z, | |||
| Integer,intent(in) | id_tgt_mask, | |||
| Integer,dimension(id_tgt_epio_size),intent(in) | ida_tgt_epio_mask, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9350 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_set_tgt_epio3d_real | ( | Integer,intent(in) | id_epio_id, | |
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(in) | id_tgt_epio_size, | |||
| Integer,intent(in) | id_nbr_corner, | |||
| Real,dimension(id_tgt_epio_size),intent(in) | rda_tgt_epio_lat, | |||
| Real,dimension(id_tgt_epio_size),intent(in) | rda_tgt_epio_lon, | |||
| Real,dimension(id_tgt_epio_size),intent(in) | rda_tgt_epio_z, | |||
| Integer,intent(in) | id_tgt_mask, | |||
| Integer,dimension(id_tgt_epio_size),intent(in) | ida_tgt_epio_mask, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9372 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_set_triple_links | ( | Integer,intent(in) | id_trans_out_id, | |
| Integer,intent(in) | id_trans_in_id, | |||
| Integer,intent(in) | id_epio_id, | |||
| Integer,intent(in) | id_trans_rank, | |||
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9394 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_trili_srch_neigh3d | ( | Integer,dimension(3),intent(in) | ila_grid1_dims, | |
| Integer,intent(in) | il_grid1_size, | |||
| Integer,dimension(il_grid1_size),intent(in) | ila_grid1_mask, | |||
| Real,dimension(il_grid1_size),intent(inout) | ila_grid1_center_lon, | |||
| Real,dimension(il_grid1_size),intent(inout) | ila_grid1_center_lat, | |||
| Real,dimension(il_grid1_size),intent(inout) | ila_grid1_center_z, | |||
| Integer,dimension(3),intent(in) | ila_grid2_dims, | |||
| Integer,intent(in) | il_grid2_size, | |||
| Integer,dimension(il_grid2_size),intent(in) | ila_grid2_mask, | |||
| Real,dimension(il_grid2_size),intent(inout) | ila_grid2_center_lon, | |||
| Real,dimension(il_grid2_size),intent(inout) | ila_grid2_center_lat, | |||
| Real,dimension(il_grid2_size),intent(inout) | ila_grid2_center_z, | |||
| Integer,intent(in) | il_num_srch_bin, | |||
| Integer,intent(in) | il_restrict_type, | |||
| Integer,dimension(il_grid2_size,8),intent(out) | ila_neighbors, | |||
| Integer,intent(out) | il_err | |||
| ) |
Definition at line 9565 of file psmile.F90.
| subroutine PSMILe::interface::psmile_type_create_subarray | ( | Integer,intent(in) | ndims, | |
| Integer,dimension (ndims),intent(in) | array_of_sizes, | |||
| Integer,dimension (ndims),intent(in) | array_of_subsizes, | |||
| Integer,dimension (ndims),intent(in) | array_of_starts, | |||
| Integer,intent(in) | oldtype, | |||
| Integer,intent(out) | newtype, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2445 of file psmile.F90.
| subroutine PSMILe::interface::psmile_unpack_field_info | ( | type (enddef_field_info),dimension(num_field_info),intent(out) | field_info, | |
| integer,dimension(nd_field_list, num_field_info),intent(in) | buffer, | |||
| integer,intent(in) | num_field_info | |||
| ) |
Definition at line 9914 of file psmile.F90.
| subroutine PSMILe::interface::psmile_unpack_msg_extra | ( | type (enddef_msg_extra),intent(out) | msg_extra, | |
| integer,dimension(msg_extra_size),intent(in) | buffer | |||
| ) |
Definition at line 9984 of file psmile.F90.
| subroutine PSMILe::interface::psmile_unpack_msg_intersections | ( | type (enddef_msg_intersections),intent(out) | msg_intersections, | |
| integer,dimension(nd_msgint),intent(inout) | buffer | |||
| ) |
Definition at line 9935 of file psmile.F90.
| subroutine PSMILe::interface::psmile_unpack_msg_locations | ( | type (enddef_msg_locations),intent(out) | msg_locations, | |
| integer,dimension(msgloc_size),intent(in) | buffer | |||
| ) |
Definition at line 9964 of file psmile.F90.
| subroutine PSMILe::interface::psmile_write_meta | ( | Integer,intent(out) | ierror | ) |
Definition at line 9709 of file psmile.F90.
| subroutine PSMILe::interface::psmile_write_meta_byid | ( | Integer,intent(in) | id_varid, | |
| Integer,intent(in) | id_taskid, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9704 of file psmile.F90.
1.6.1