|
FUNCTION constraints_geometry_shell_based_surface_model (m : shell_based_surface_model) : BOOLEAN; LOCAL result : BOOLEAN := TRUE ; END_LOCAL ; REPEAT j := 1 TO SIZEOF ( m . sbsm_boundary ) ; IF ( NOT ( 'topology_schema.open_shell' IN TYPEOF ( m . sbsm_boundary [ j ] ) ) AND ( NOT ( 'topology_schema.closed_shell' IN TYPEOF ( m . sbsm_boundary [ j ] ) ) ) ) THEN result := FALSE ; RETURN ( result ) ; END_IF ; END_REPEAT ; RETURN ( result ) ; END_FUNCTION; -- constraints_geometry_shell_based_surface_model |
|
public class FConstraints_geometry_shell_based_surface_model public static Value run(SdaiContext _context, Value m) |