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, nd_msg, 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, 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_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_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_control_cell_gauss2_real (grid_id, ic, nc, 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_search_donor_1d_real (grid_id, idim, found, locations, coords, len, tol, ierror) |
| subroutine | psmile_search_donor_2d_real (found, locations, len, search, ipart, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_3d_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_control_cell_gauss2_dble (grid_id, ic, nc, 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_search_donor_1d_dble (grid_id, idim, found, locations, coords, len, tol, ierror) |
| subroutine | psmile_search_donor_2d_dble (found, locations, len, search, ipart, grid_id, method_id, var_id, tol, ierror) |
| subroutine | psmile_search_donor_3d_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_cells_gauss2 (grid_id, search_grid_type, found, loc, loc_fnd_shape, control, 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_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) |
Definition at line 1076 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 6082 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 2657 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%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 1505 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 6101 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 2676 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 6116 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 2691 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 6208 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 2783 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 6242 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 2817 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 2846 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 2878 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 6142 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 2717 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 2451 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 6340 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 2979 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 6279 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 2918 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 6308 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 2947 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 6271 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 2910 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 1224 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 9723 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 9703 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 9718 of file psmile.F90.
| subroutine PSMILe::interface::psmile_close_files | ( | Integer,intent(out) | ierror | ) |
Definition at line 9710 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%npart, ndim),intent(inout) | found, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2395 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 2405 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 6369 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 3008 of file psmile.F90.
| subroutine PSMILe::interface::psmile_control_cell_gauss2_dble | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (nc),intent(in) | ic, | |||
| Integer,intent(in) | nc, | |||
| 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 6399 of file psmile.F90.
| subroutine PSMILe::interface::psmile_control_cell_gauss2_real | ( | Integer,intent(in) | grid_id, | |
| Integer,dimension (nc),intent(in) | ic, | |||
| Integer,intent(in) | nc, | |||
| 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 3038 of file psmile.F90.
| subroutine PSMILe::interface::psmile_control_grids | ( | Integer,intent(out) | ierror | ) |
Definition at line 1452 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 9969 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 9224 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 2626 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 6051 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 9209 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 2464 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 2638 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 6063 of file psmile.F90.
| subroutine PSMILe::interface::psmile_ddadd_mpi_callback | ( | dda | , | |
| ddb | , | |||
| integer,intent(in) | len, | |||
| integer,intent(in) | itype | |||
| ) |
Definition at line 9329 of file psmile.F90.
| subroutine PSMILe::interface::psmile_deallocate | ( | Integer,intent(out) | ierror | ) |
Definition at line 1252 of file psmile.F90.
| subroutine PSMILe::interface::psmile_deallocate_fields | ( | Integer,intent(out) | ierror | ) |
Definition at line 1260 of file psmile.F90.
| subroutine PSMILe::interface::psmile_deallocate_masks | ( | Integer,intent(out) | ierror | ) |
Definition at line 1264 of file psmile.F90.
| subroutine PSMILe::interface::psmile_deallocate_methods | ( | Integer,intent(out) | ierror | ) |
Definition at line 1256 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_datatypes | ( | Integer,intent(out) | ierror | ) |
Definition at line 1432 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_domains | ( | Integer,intent(out) | ierror | ) |
Definition at line 9679 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 1078 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_metadata | ( | Integer,intent(in) | id_varid, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9683 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_mpi_comm | ( | Integer,intent(out) | ierror | ) |
Definition at line 1436 of file psmile.F90.
| subroutine PSMILe::interface::psmile_def_mpi_compcomm | ( | Integer,intent(out) | ierror | ) |
Definition at line 1440 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 1089 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 1175 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 1483 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 1529 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 1537 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_action_extra | ( | Integer,dimension (nd_msg),intent(in) | msg_extra, | |
| Integer,intent(in) | nd_msg, | |||
| Integer,intent(in) | sender, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1544 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 1550 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_action_sel | ( | Integer,intent(in) | sender, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1557 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 1562 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 1570 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 1580 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 1588 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 1593 of file psmile.F90.
| subroutine PSMILe::interface::psmile_enddef_metadata | ( | Integer,intent(out) | ierror | ) |
Definition at line 9688 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 6429 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 3068 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 6442 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 2495 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 3081 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 2481 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 6499 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 3130 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 6510 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 3141 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 6523 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 3154 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 6467 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 3106 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 6479 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 2508 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 3118 of file psmile.F90.
| subroutine PSMILe::interface::psmile_field2grid | ( | Integer,intent(out) | ierror | ) |
Definition at line 1600 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 1268 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 1604 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_comp_handle | ( | Integer,intent(in) | comp_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1278 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_field_handle | ( | Integer,intent(in) | field_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1283 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_grid_handle | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1288 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 1293 of file psmile.F90.
| subroutine PSMILe::interface::psmile_free_method_handle | ( | Integer,intent(in) | method_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1299 of file psmile.F90.
| subroutine PSMILe::interface::psmile_gauss_get_neighbours | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1621 of file psmile.F90.
| subroutine PSMILe::interface::psmile_gauss_setup | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1616 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 6491 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 3169 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 6539 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 3176 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 2368 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 1304 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 6558 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 3195 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 1319 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 1309 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%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 1626 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%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 1642 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%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 1658 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 6586 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 3223 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 6619 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 3256 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 6646 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 3283 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 6673 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 3310 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%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 1675 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 9184 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_field_handle | ( | Integer,intent(out) | field_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1340 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 2520 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 6026 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 2376 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 6702 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 3339 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_grid_handle | ( | Integer,intent(out) | grid_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1344 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 1352 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_halo_points | ( | Integer,intent(in) | comp_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1359 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 1314 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 9931 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 1693 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 9193 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 2529 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 6035 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 1705 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_mask_handle | ( | Integer,intent(out) | mask_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1364 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 1368 of file psmile.F90.
| subroutine PSMILe::interface::psmile_get_next_field | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (nd_field_list, 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 1373 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 1458 of file psmile.F90.
| subroutine PSMILe::interface::PSMILe_Get_userdef_handle | ( | Integer,intent(out) | userdef_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1348 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 6741 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 3400 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_search_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 6709 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 6761 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 3346 of file psmile.F90.
| subroutine PSMILe::interface::psmile_global_search_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 3368 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 9272 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 9285 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 9312 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 9320 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 9295 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 9303 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 1712 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 7614 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 4266 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 7596 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 4284 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 7632 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 4302 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%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 7671 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%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 4341 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%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 7713 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%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 4383 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%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 7692 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%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 4362 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%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 7650 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%npart),intent(in) | coords, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control, | |||
| Integer,dimension (search%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 4320 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_datatypes | ( | Integer,intent(out) | ierror | ) |
Definition at line 1419 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_enddef_msg_inters | ( | type (enddef_msg_intersections),intent(out) | msg_intersections | ) |
Definition at line 9949 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_enddef_msg_locs | ( | type (enddef_msg_locations),intent(out) | msg_locations | ) |
Definition at line 9977 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_mpi1 | ( | Integer,intent(out) | ierror | ) |
Definition at line 1428 of file psmile.F90.
| subroutine PSMILe::interface::psmile_init_mpi2 | ( | Integer,intent(inout) | intercomm, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1423 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_cleanup | ( | Integer,intent(out) | ierror | ) |
Definition at line 9714 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_close | ( | Integer,intent(out) | ierror | ) |
Definition at line 9675 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 9638 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_finalize | ( | Integer,intent(out) | ierror | ) |
Definition at line 9671 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_init | ( | Integer,intent(out) | ierror | ) |
Definition at line 9649 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_init_cf | ( | Integer,intent(out) | ierror | ) |
Definition at line 9667 of file psmile.F90.
| subroutine PSMILe::interface::psmile_io_init_comp | ( | Integer,intent(in) | id_comp_id, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 9653 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 9658 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 9730 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 9738 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 1470 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 9918 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 9892 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 9905 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_3d | ( | Type (integer_vector),dimension (search%npart) | found, | |
| Type (integer_vector),dimension (search%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%npart) | virtual_cell, | |||
| Logical,intent(in) | virtual_cell_required, | |||
| Integer,intent(out) | dir_index, | |||
| Integer,intent(out) | cpl_index, | |||
| Integer,dimension (search%npart),intent(out) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1803 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_3d_mask | ( | Type (Enddef_search),intent(inout) | search, | |
| Integer,dimension (2, ndim_3d, search%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 1792 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_3d_reg | ( | Type (integer_vector),dimension (search%npart, ndim_3d) | found, | |
| Type (integer_vector),dimension (search%npart, ndim_3d) | loc, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | range, | |||
| Integer,dimension (2, ndim_3d, search%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%npart),intent(out) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1822 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_alloc | ( | Type(Send_information),intent(inout) | send_info, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1732 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_dealloc | ( | Type(Send_information),intent(inout) | send_info, | |
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1739 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 1746 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_gauss2 | ( | Type (integer_vector),dimension (search%npart, 2) | found, | |
| Type (integer_vector),dimension (search%npart, 2) | loc, | |||
| Integer,dimension (2, ndim_2d, search%npart),intent(in) | range, | |||
| Integer,dimension (2, ndim_2d, search%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%npart),intent(out) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1757 of file psmile.F90.
| subroutine PSMILe::interface::psmile_locations_irreg2 | ( | Type (integer_vector),dimension (search%npart, 2) | found, | |
| Type (integer_vector),dimension (search%npart, 2) | loc, | |||
| Integer,dimension (2, ndim_2d, search%npart),intent(in) | range, | |||
| Integer,dimension (2, ndim_2d, search%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%npart) | virtual_cell, | |||
| Logical,intent(in) | virtual_cell_required, | |||
| Integer,intent(out) | dir_index, | |||
| Integer,intent(out) | cpl_index, | |||
| Integer,dimension (search%npart),intent(out) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1772 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 8515 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 5372 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 8547 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 5404 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 8609 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_clean | ( | Integer,intent(out) | ierror | ) |
Definition at line 2317 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 2344 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 6982 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 3622 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 6993 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 3633 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 8364 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 5221 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 8375 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 5232 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 8389 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 5246 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 8626 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 5466 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 8641 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 5481 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 8660 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 5500 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 6855 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 3493 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 6872 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 3512 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 6893 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 3533 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 8678 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 5518 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 8729 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 5569 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 8762 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 5601 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 8797 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 5636 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 2329 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 6919 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 3560 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 6930 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 3571 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 6945 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 3586 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 6962 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 3603 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%npart, ndim_3d),intent(in) | found, | |||
| Type (integer_vector),dimension (search%npart, ndim_3d),intent(in) | locations, | |||
| Integer,dimension (search%npart, *),intent(in) | len, | |||
| Type (integer_vector),dimension (search%npart),intent(in) | virtual_cell, | |||
| Logical,intent(in) | virtual_cell_required, | |||
| Type (integer_vector),dimension (search%npart),intent(out) | found_3d, | |||
| Type (integer_vector),dimension (search%npart),intent(out) | locations_3d, | |||
| Type (integer_vector),dimension (search%npart),intent(out) | virtual_3d, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 2132 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 2356 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 7021 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 3661 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 8822 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 5661 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 8853 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 5692 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 8884 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 5722 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 8923 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 5761 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_irreg2_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%npart, 2) | locations, | |||
| Type (Enddef_search) | search, | |||
| Type (dble_vector),dimension ( ndim_3d, search%npart),intent(in) | array, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape_2d, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | range_2d, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control_2d, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape_1d, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | range_1d, | |||
| Integer,dimension (2, ndim_3d, search%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 8953 of file psmile.F90.
| subroutine PSMILe::interface::psmile_mg_method_irreg2_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%npart, 2) | locations, | |||
| Type (Enddef_search) | search, | |||
| Type (real_vector),dimension ( ndim_3d, search%npart),intent(in) | array, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape_2d, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | range_2d, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | control_2d, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | shape_1d, | |||
| Integer,dimension (2, ndim_3d, search%npart),intent(in) | range_1d, | |||
| Integer,dimension (2, ndim_3d, search%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 5791 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 8404 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 5261 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 8424 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 5281 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 8452 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 5309 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 8481 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 5338 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 8493 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 5350 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 8504 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 5361 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 2321 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 9017 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 5855 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 8980 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 5818 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 2419 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 9866 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 9814 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 9840 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%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 7808 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%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 4402 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%npart),intent(in) | corners, | |||
| Integer,dimension (ndim_3d, search%npart),intent(in) | npoints, | |||
| Type (integer_vector),dimension (ndim_3d, search%npart),intent(in) | srclocs, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7851 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%npart),intent(in) | corners, | |||
| Integer,dimension (ndim_3d, search%npart),intent(in) | npoints, | |||
| Type (integer_vector),dimension (ndim_3d, search%npart),intent(in) | srclocs, | |||
| Integer,intent(in) | ncpl, | |||
| Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 4445 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%npart),intent(in) | control, | |||
| Type (dble_vector),dimension(ndim_3d),intent(inout) | tgt_cell, | |||
| Integer,intent(in) | tgt_corners, | |||
| Integer,dimension (ndim_2d, search%npart),intent(in) | npoints, | |||
| Type (integer_vector),dimension (2,search%npart),intent(in) | srclocs, | |||
| Type (logical_vector),dimension (2,search%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 7872 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%npart),intent(in) | control, | |||
| Type (real_vector),dimension(ndim_3d),intent(inout) | tgt_cell, | |||
| Integer,intent(in) | tgt_corners, | |||
| Integer,dimension (ndim_2d, search%npart),intent(in) | npoints, | |||
| Type (integer_vector),dimension (2,search%npart),intent(in) | srclocs, | |||
| Type (logical_vector),dimension (2,search%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 4466 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%npart),intent(in) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1837 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 1858 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 7031 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 1866 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 3671 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 1876 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%npart),intent(in) | len_cpl, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1895 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 7977 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 4536 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 8018 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 4576 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 8058 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 4652 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 7907 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 4501 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 7732 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 4809 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 8294 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 4964 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 8329 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 4999 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 8097 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 4691 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 8137 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 4731 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 8176 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 4770 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 7942 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 4616 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 7770 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 4847 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 8215 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 4885 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 8253 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 4923 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 5034 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 5050 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 5068 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 5087 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 5109 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 5128 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 5145 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 5163 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 5181 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 5202 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 9696 of file psmile.F90.
| subroutine PSMILe::interface::psmile_open_files | ( | Integer,intent(out) | ierror | ) |
Definition at line 9692 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 9955 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 9984 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 9066 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 5908 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 9077 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 5919 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 1385 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_field_info | ( | Integer,intent(in) | field_id | ) |
Definition at line 1393 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_grid_info | ( | Integer,intent(in) | grid_id | ) |
Definition at line 1397 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 9088 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 5930 of file psmile.F90.
| subroutine PSMILe::interface::psmile_print_method_info | ( | Integer,intent(in) | method_id | ) |
Definition at line 1401 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 1405 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 6455 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 2543 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 3094 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 9142 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 2579 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 5984 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 9156 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 2593 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 5998 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 9118 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 9128 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 2565 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 5970 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 2555 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 5960 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 9170 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 2607 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 6012 of file psmile.F90.
| subroutine PSMILe::interface::psmile_quicksort | ( | Integer,dimension(n),intent(inout) | a, | |
| Integer,intent(in) | n | |||
| ) |
Definition at line 2427 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 2432 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 6805 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 3443 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 6817 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 3455 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 6835 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 3472 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 9780 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 9800 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 9790 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 7059 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 3700 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 7070 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 3710 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 1917 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 1929 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 1193 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 1098 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, | |||
| Integer,dimension (nd_extent_infos, *),intent(in) | local_extent_info, | |||
| Integer,dimension (nd_extent_infos, *),intent(in) | global_extent_info, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 1942 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 1955 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 6783 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 3420 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 1963 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_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 7082 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_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 3722 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_2d_dble | ( | Integer,dimension (len),intent(inout) | found, | |
| Integer,dimension (ndim_2d, len),intent(inout) | locations, | |||
| Integer,intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,intent(in) | ipart, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(in) | var_id, | |||
| Double Precision,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 7097 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_2d_real | ( | Integer,dimension (len),intent(inout) | found, | |
| Integer,dimension (ndim_2d, len),intent(inout) | locations, | |||
| Integer,intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,intent(in) | ipart, | |||
| Integer,intent(in) | grid_id, | |||
| Integer,intent(in) | method_id, | |||
| Integer,intent(in) | var_id, | |||
| Real,intent(in) | tol, | |||
| Integer,intent(out) | ierror | |||
| ) |
Definition at line 3737 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_3d_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (*) | found, | |||
| Type (integer_vector),dimension (*) | locations, | |||
| Integer,dimension (*),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,dimension (nd_field_list, 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 7114 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_3d_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (*) | found, | |||
| Type (integer_vector),dimension (*) | locations, | |||
| Integer,dimension (*),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,dimension (nd_field_list, 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 3754 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%npart),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,dimension (nd_field_list, 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 7134 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%npart),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,dimension (nd_field_list, 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 3774 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 1977 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 1985 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 2005 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 1993 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_gauss2_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%npart, 2) | locations, | |||
| Integer,dimension (search%npart, 2),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,dimension (nd_field_list, 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 7154 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_gauss2_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%npart, 2) | locations, | |||
| Integer,dimension (search%npart, 2),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,dimension (nd_field_list, 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 3794 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_gridless | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (Enddef_search),intent(inout) | search, | |||
| Integer,dimension (nd_field_list, 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 2016 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_irreg2_dble | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%npart, 2) | locations, | |||
| Integer,dimension (search%npart, 2),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,dimension (nd_field_list, 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 7174 of file psmile.F90.
| subroutine PSMILe::interface::psmile_search_donor_irreg2_real | ( | Type (Enddef_comp),intent(in) | comp_info, | |
| Type (integer_vector),dimension (search%npart, 2) | found, | |||
| Type (integer_vector),dimension (search%npart, 2) | locations, | |||
| Integer,dimension (search%npart, 2),intent(in) | len, | |||
| Type (Enddef_search) | search, | |||
| Integer,dimension (nd_field_list, 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 3814 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 7193 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 3833 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 7214 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 3854 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 7263 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 3903 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 7310 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 3950 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 2385 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 6797 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 3435 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 3996 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 2305 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 7041 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 3681 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 7050 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 3690 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 2031 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 2040 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 1106 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 1118 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 1130 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 1149 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 1162 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 1140 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 9937 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 1444 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 2153 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 2165 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 2179 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 2194 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 7354 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 4018 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 7394 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 4061 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 7428 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 4098 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 7468 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 4138 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 2208 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 1410 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 2225 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 2237 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 2249 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 2261 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 2276 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 2290 of file psmile.F90.
| Logical PSMILe::interface::PSMILe_to_be_coupled | ( | Integer,intent(in) | comp_id1, | |
| Integer,intent(in) | comp_id2 | |||
| ) |
Definition at line 2340 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 2071 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 2079 of file psmile.F90.
| subroutine PSMILe::interface::psmile_transform_gauss2 | ( | Type (Enddef_search) | search, | |
| Integer,dimension (search%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%npart, ndim_3d),intent(in) | locations, | |||
| Type (integer_vector),dimension (search%npart, ndim_3d),intent(in) | found, | |||
| Type (integer_vector),dimension (search%npart, ndim_2d),intent(inout) | glocations, | |||
| Type (integer_vector),dimension (search%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 2049 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 1210 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 1217 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 7506 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 4176 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 7530 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 4200 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 7559 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 4229 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 2087 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 9236 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 2110 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 9254 of file psmile.F90.
| subroutine PSMILe::interface::psmile_trs_finalize | ( | Integer,intent(in) | id_trans_rank, | |
| Integer,intent(out) | id_err | |||
| ) |
Definition at line 9629 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 9526 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 9494 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 9510 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 9542 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 9559 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 9579 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 9339 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 9478 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 9446 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 9462 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 9346 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 9368 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 9390 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 9412 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 9434 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 9605 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 2438 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 9962 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 9991 of file psmile.F90.
| subroutine PSMILe::interface::psmile_write_meta | ( | Integer,intent(out) | ierror | ) |
Definition at line 9749 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 9744 of file psmile.F90.
1.6.1