SimplePolygonQ

SimplePolygonQ[poly] gives True if the polygon poly is simple and False otherwise.

Examples

SimplePolygonQ[Polygon[{{0, 0}, {1, 0}, {1, 1}, {0, 1}}]]
(* True *)

SimplePolygonQ[Polygon[{{0, 0}, {1, 1}, {1, 0}, {0, 1}}]]
(* False, self-intersecting *)

Please visit the official Wolfram Language Reference for more details.