IF 'AIC_MANIFOLD_SUBSURFACE.ADVANCED_FACE' IN  TYPEOF(testface) THEN
    RETURN  (TRUE);
END_IF;
(* IF testface is a subface recursively test the parent_face,
return FALSE FOR all other types OF face *)
IF  ('AIC_MANIFOLD_SUBSURFACE.SUBFACE' IN TYPEOF(testface)) THEN
     RETURN(advanced_face_properties(testface\subface.parent_face));
   ELSE RETURN (FALSE);
END_IF;