|
FUNCTION acyclic_solid_replica (rep : solid_replica, parent : solid_model) : BOOLEAN; IF NOT ( ( 'geometry_schema.solid_replica' ) IN TYPEOF ( parent ) ) THEN RETURN ( TRUE ) ; END_IF ; IF ( parent :=: rep ) THEN RETURN ( FALSE ) ; ELSE RETURN ( acyclic_solid_replica ( rep , parent \ solid_replica . parent_solid ) ) ; END_IF ; END_FUNCTION; -- acyclic_solid_replica |
|
public class FAcyclic_solid_replica public static Value run(SdaiContext _context, Value rep, Value parent) |