XGC1
|
Functions/Subroutines | |
subroutine | checkoverlap (txy, xlo, xhi, ylo, yhi, has_overlap) |
subroutine | init_guess_xtable_fort (n, grid_guess_max, grid_guess_min, grid_inv_guess_d, ntriangle, nnodes, grid_x, grid_nd, guess_xtable, guess_count, ntotal) |
subroutine | init_guess_list_fort (n, grid_guess_max, grid_guess_min, grid_inv_guess_d, ntriangle, nnodes, grid_x, grid_nd, guess_list, guess_xtable, guess_count, ntotal) |
subroutine | split_indices_omp (total, num_pieces, ibeg, iend) |
subroutine | split_indices_single (total, num_pieces, index, ibeg, iend) |
get single ibeg and iend of index-th number – to split the work in mpi More... | |
subroutine checkoverlap | ( | real(kind=8), dimension(2,0:2) | txy, |
real(kind=8) | xlo, | ||
real(kind=8) | xhi, | ||
real(kind=8) | ylo, | ||
real(kind=8) | yhi, | ||
logical | has_overlap | ||
) |
subroutine init_guess_list_fort | ( | integer (c_int), dimension(2) | n, |
real (c_double), dimension(2) | grid_guess_max, | ||
real (c_double), dimension(2) | grid_guess_min, | ||
real (c_double), dimension(2) | grid_inv_guess_d, | ||
integer (c_int) | ntriangle, | ||
integer (c_int) | nnodes, | ||
real (c_double), dimension(2,nnodes) | grid_x, | ||
integer (c_int), dimension(3,ntriangle) | grid_nd, | ||
integer (c_int), dimension(ntotal) | guess_list, | ||
integer (c_int), dimension(n(1),n(2)) | guess_xtable, | ||
integer (c_int), dimension(n(1),n(2)) | guess_count, | ||
integer (c_int) | ntotal | ||
) |
subroutine init_guess_xtable_fort | ( | integer (c_int), dimension(2) | n, |
real (c_double), dimension(2) | grid_guess_max, | ||
real (c_double), dimension(2) | grid_guess_min, | ||
real (c_double), dimension(2) | grid_inv_guess_d, | ||
integer (c_int) | ntriangle, | ||
integer (c_int) | nnodes, | ||
real (c_double), dimension(2,nnodes) | grid_x, | ||
integer (c_int), dimension(3,ntriangle) | grid_nd, | ||
integer (c_int), dimension(n(1),n(2)) | guess_xtable, | ||
integer (c_int), dimension(n(1),n(2)) | guess_count, | ||
integer (c_int) | ntotal | ||
) |
subroutine split_indices_omp | ( | integer | total, |
integer | num_pieces, | ||
integer, dimension(num_pieces) | ibeg, | ||
integer, dimension(num_pieces) | iend | ||
) |
subroutine split_indices_single | ( | integer, intent(in) | total, |
integer, intent(in) | num_pieces, | ||
integer, intent(in) | index, | ||
integer, intent(out) | ibeg, | ||
integer, intent(out) | iend | ||
) |
get single ibeg and iend of index-th number – to split the work in mpi
[in] | total | total work |
[in] | num_pieces | number of pieces of work |
[in] | index | index-th work |
[out] | iend | begining and end of index-th work piece. |