POLCHK Subroutine

subroutine POLCHK(NFACE, NVERTICES, XVERT, YVERT, ZVERT, TOLVDIST)

@# KKRtags: VORONOI unit-test sanity-check ---------------------------------------------------------------- THIS SUBROUTINE READS THE COORDINATES OF THE VERTICES OF EACH (POLYGON) FACE OF A CONVEX POLYHEDRON AND CHECKS IF THESE VERTICES ARRANGED CONSECUTIVELY DEFINE A POLYGON. THEN THE SUBROUTINE DETERMINES THE VERTICES AND THE EDGES OF THE POLYHEDRON AND CHECKS IF THE NUMBER OF VERTICES PLUS THE
NUMBER OF FACES EQUALS THE NUMBER OF EDGES PLUS 2.

 DATA ARE READ FROM FILE IN UNIT 7, WHICH WE FINALLY REWIND
 ----------------------------------------------------------------

 .. PARAMETER STATEMENTS ..

Arguments