FV3 Bundle
tools_stripack Module Reference

Functions/Subroutines

subroutine, public addnod (mpl, nst, k, x, y, z, list, lptr, lend, lnew, ier)
 
real(kind_real) function, public areas (v1, v2, v3)
 
subroutine bdyadd (kk, i1, i2, list, lptr, lend, lnew)
 
subroutine, public bnodes (n, list, lptr, lend, nodes, nb, na, nt)
 
subroutine circum (v1, v2, v3, c, ier)
 
subroutine covsph (kk, n0, list, lptr, lend, lnew)
 
subroutine det (x1, y1, z1, x2, y2, z2, x0, y0, z0, output)
 
subroutine, public crlist (n, ncol, x, y, z, list, lend, lptr, lnew, ltri, listc, nb, xc, yc, zc, rc, ier)
 
subroutine insert (k, lp, list, lptr, lnew)
 
logical function, public inside (p, lv, xv, yv, zv, nv, listv, ier)
 
subroutine intadd (kk, i1, i2, i3, list, lptr, lend, lnew)
 
subroutine intrsc (p1, p2, cn, p, ier)
 
subroutine jrand (n, ix, iy, iz, output)
 
subroutine left (x1, y1, z1, x2, y2, z2, x0, y0, z0, output)
 
subroutine lstptr (lpl, nb, list, lptr, output)
 
integer function nbcnt (lpl, lptr)
 
integer function nearnd (p, ist, n, x, y, z, list, lptr, lend, al)
 
subroutine, public scoord (px, py, pz, plat, plon, pnrm)
 
subroutine swap (in1, in2, io1, io2, list, lptr, lend, lp21)
 
subroutine swptst (n1, n2, n3, n4, x, y, z, output)
 
subroutine, public trans (n, rlat, rlon, x, y, z)
 
subroutine, public trfind (nst, p, n, x, y, z, list, lptr, lend, b1, b2, b3, i1, i2, i3)
 
subroutine, public trlist (n, list, lptr, lend, nrow, nt, ltri, ier)
 
subroutine, public trmesh (mpl, n, x, y, z, list, lptr, lend, lnew, near, next, dist, ier)
 

Function/Subroutine Documentation

◆ addnod()

subroutine, public tools_stripack::addnod ( type(mpl_type), intent(in)  mpl,
integer  nst,
integer  k,
real ( kind_real ), dimension(k)  x,
real ( kind_real ), dimension(k)  y,
real ( kind_real ), dimension(k)  z,
integer, dimension(*)  list,
integer, dimension(*)  lptr,
integer, dimension(k)  lend,
integer  lnew,
integer  ier 
)

Definition at line 25 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ areas()

real ( kind_real ) function, public tools_stripack::areas ( real ( kind_real ), dimension(3)  v1,
real ( kind_real ), dimension(3)  v2,
real ( kind_real ), dimension(3)  v3 
)

Definition at line 294 of file tools_stripack.F90.

Here is the caller graph for this function:

◆ bdyadd()

subroutine tools_stripack::bdyadd ( integer  kk,
integer  i1,
integer  i2,
integer, dimension(*)  list,
integer, dimension(*)  lptr,
integer, dimension(*)  lend,
integer  lnew 
)
private

Definition at line 439 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ bnodes()

subroutine, public tools_stripack::bnodes ( integer  n,
integer, dimension(6*(n-2))  list,
integer, dimension(6*(n-2))  lptr,
integer, dimension(n)  lend,
integer, dimension(*)  nodes,
integer  nb,
integer  na,
integer  nt 
)

Definition at line 581 of file tools_stripack.F90.

◆ circum()

subroutine tools_stripack::circum ( real (kind_real), dimension(3)  v1,
real (kind_real), dimension(3)  v2,
real (kind_real), dimension(3)  v3,
real (kind_real), dimension(3)  c,
integer  ier 
)
private

Definition at line 717 of file tools_stripack.F90.

Here is the caller graph for this function:

◆ covsph()

subroutine tools_stripack::covsph ( integer  kk,
integer  n0,
integer, dimension(*)  list,
integer, dimension(*)  lptr,
integer, dimension(*)  lend,
integer  lnew 
)
private

Definition at line 804 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ crlist()

subroutine, public tools_stripack::crlist ( integer  n,
integer  ncol,
real (kind_real), dimension(n)  x,
real (kind_real), dimension(n)  y,
real (kind_real), dimension(n)  z,
integer, dimension(6*(n-2))  list,
integer, dimension(n)  lend,
integer, dimension(6*(n-2))  lptr,
integer  lnew,
integer, dimension(6,ncol)  ltri,
integer, dimension(6*(n-2))  listc,
integer  nb,
real (kind_real), dimension(2*n-4)  xc,
real (kind_real), dimension(2*n-4)  yc,
real (kind_real), dimension(2*n-4)  zc,
real (kind_real), dimension(2*n-4)  rc,
integer  ier 
)

Definition at line 953 of file tools_stripack.F90.

Here is the call graph for this function:

◆ det()

subroutine tools_stripack::det ( real ( kind_real )  x1,
real ( kind_real )  y1,
real ( kind_real )  z1,
real ( kind_real )  x2,
real ( kind_real )  y2,
real ( kind_real )  z2,
real ( kind_real )  x0,
real ( kind_real )  y0,
real ( kind_real )  z0,
real ( kind_real )  output 
)
private

Definition at line 917 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ insert()

subroutine tools_stripack::insert ( integer  k,
integer  lp,
integer, dimension(*)  list,
integer, dimension(*)  lptr,
integer  lnew 
)
private

Definition at line 1593 of file tools_stripack.F90.

Here is the caller graph for this function:

◆ inside()

logical function, public tools_stripack::inside ( real ( kind_real ), dimension(3)  p,
integer  lv,
real ( kind_real ), dimension(lv)  xv,
real ( kind_real ), dimension(lv)  yv,
real ( kind_real ), dimension(lv)  zv,
integer  nv,
integer, dimension(nv)  listv,
integer  ier 
)

Definition at line 1652 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ intadd()

subroutine tools_stripack::intadd ( integer  kk,
integer  i1,
integer  i2,
integer  i3,
integer, dimension(*)  list,
integer, dimension(*)  lptr,
integer, dimension(*)  lend,
integer  lnew 
)
private

Definition at line 2015 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ intrsc()

subroutine tools_stripack::intrsc ( real ( kind_real ), dimension(3)  p1,
real ( kind_real ), dimension(3)  p2,
real ( kind_real ), dimension(3)  cn,
real ( kind_real ), dimension(3)  p,
integer  ier 
)
private

Definition at line 2117 of file tools_stripack.F90.

Here is the caller graph for this function:

◆ jrand()

subroutine tools_stripack::jrand ( integer  n,
integer  ix,
integer  iy,
integer  iz,
integer  output 
)
private

Definition at line 2225 of file tools_stripack.F90.

Here is the caller graph for this function:

◆ left()

subroutine tools_stripack::left ( real ( kind_real )  x1,
real ( kind_real )  y1,
real ( kind_real )  z1,
real ( kind_real )  x2,
real ( kind_real )  y2,
real ( kind_real )  z2,
real ( kind_real )  x0,
real ( kind_real )  y0,
real ( kind_real )  z0,
logical  output 
)
private

Definition at line 2291 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ lstptr()

subroutine tools_stripack::lstptr ( integer  lpl,
integer  nb,
integer, dimension(*)  list,
integer, dimension(*)  lptr,
integer  output 
)
private

Definition at line 2354 of file tools_stripack.F90.

Here is the caller graph for this function:

◆ nbcnt()

integer function tools_stripack::nbcnt ( integer  lpl,
integer, dimension(*)  lptr 
)
private

Definition at line 2435 of file tools_stripack.F90.

◆ nearnd()

integer function tools_stripack::nearnd ( real ( kind_real ), dimension(3)  p,
integer  ist,
integer  n,
real ( kind_real ), dimension(n)  x,
real ( kind_real ), dimension(n)  y,
real ( kind_real ), dimension(n)  z,
integer, dimension(6*(n-2))  list,
integer, dimension(6*(n-2))  lptr,
integer, dimension(n)  lend,
real ( kind_real )  al 
)
private

Definition at line 2511 of file tools_stripack.F90.

Here is the call graph for this function:

◆ scoord()

subroutine, public tools_stripack::scoord ( real(kind_real)  px,
real(kind_real)  py,
real(kind_real)  pz,
real(kind_real)  plat,
real(kind_real)  plon,
real(kind_real)  pnrm 
)

Definition at line 2835 of file tools_stripack.F90.

Here is the caller graph for this function:

◆ swap()

subroutine tools_stripack::swap ( integer  in1,
integer  in2,
integer  io1,
integer  io2,
integer, dimension(*)  list,
integer, dimension(*)  lptr,
integer, dimension(*)  lend,
integer  lp21 
)
private

Definition at line 2900 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ swptst()

subroutine tools_stripack::swptst ( integer  n1,
integer  n2,
integer  n3,
integer  n4,
real ( kind_real ), dimension(*)  x,
real ( kind_real ), dimension(*)  y,
real ( kind_real ), dimension(*)  z,
logical  output 
)
private

Definition at line 3017 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ trans()

subroutine, public tools_stripack::trans ( integer  n,
real ( kind_real ), dimension(n)  rlat,
real ( kind_real ), dimension(n)  rlon,
real ( kind_real ), dimension(n)  x,
real ( kind_real ), dimension(n)  y,
real ( kind_real ), dimension(n)  z 
)

Definition at line 3117 of file tools_stripack.F90.

Here is the caller graph for this function:

◆ trfind()

subroutine, public tools_stripack::trfind ( integer  nst,
real ( kind_real ), dimension(3)  p,
integer  n,
real ( kind_real ), dimension(n)  x,
real ( kind_real ), dimension(n)  y,
real ( kind_real ), dimension(n)  z,
integer, dimension(6*(n-2))  list,
integer, dimension(6*(n-2))  lptr,
integer, dimension(n)  lend,
real ( kind_real )  b1,
real ( kind_real )  b2,
real ( kind_real )  b3,
integer  i1,
integer  i2,
integer  i3 
)

Definition at line 3196 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ trlist()

subroutine, public tools_stripack::trlist ( integer  n,
integer, dimension(6*(n-2))  list,
integer, dimension(6*(n-2))  lptr,
integer, dimension(n)  lend,
integer  nrow,
integer  nt,
integer, dimension(nrow,*)  ltri,
integer  ier 
)

Definition at line 3710 of file tools_stripack.F90.

◆ trmesh()

subroutine, public tools_stripack::trmesh ( type(mpl_type), intent(in)  mpl,
integer  n,
real ( kind_real ), dimension(n)  x,
real ( kind_real ), dimension(n)  y,
real ( kind_real ), dimension(n)  z,
integer, dimension(6*(n-2))  list,
integer, dimension(6*(n-2))  lptr,
integer, dimension(n)  lend,
integer  lnew,
integer, dimension(n)  near,
integer, dimension(n)  next,
real ( kind_real ), dimension(n)  dist,
integer  ier 
)

Definition at line 4010 of file tools_stripack.F90.

Here is the call graph for this function:
Here is the caller graph for this function: