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 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 | ||
) |