|
FUNCTION identical_sets (set_a : class, set_b : class) : BOOLEAN; LOCAL set_of_sets : SET OF class := [ ] ; END_LOCAL ; IF ( set_a = set_b ) THEN RETURN ( TRUE ) ; END_IF ; set_of_sets := set_of_sets + set_b ; RETURN ( identical_to_one_of_set_of_sets ( set_a , set_of_sets ) ) ; END_FUNCTION; -- identical_sets |
|
public class FIdentical_sets public static Value run(SdaiContext _context, Value set_a, Value set_b) |