POI2POIUPDATE Subroutine

subroutine POI2POIUPDATE(poi2poi, poi2plane, npolyplan, npolypoi, keepit, polyplaneA3, polyplaneB3, polyplaneC3, polyplaneD3, nedge, poiofplane)

Arguments

Type IntentOptional Attributes Name
integer :: poi2poi(0:nneimax,npoimax)
integer :: poi2plane(0:nplanemax,npoimax)
integer :: npolyplan
integer :: npolypoi
logical :: keepit(npoimax)
real(kind=8) :: polyplaneA3(nplanemax)
real(kind=8) :: polyplaneB3(nplanemax)
real(kind=8) :: polyplaneC3(nplanemax)
real(kind=8) :: polyplaneD3(nplanemax)
integer :: nedge(*)
integer :: poiofplane(nplanemax,npoimax)