|
FUNCTION at_most_two_synonyms_per_language (languages : present_translations, synonymous_names : SET [0:?] OF syn_name_type) : BOOLEAN; IF EXISTS ( languages ) THEN REPEAT i := 1 TO SIZEOF ( languages . language_codes ) ; IF SIZEOF ( QUERY ( s <* synonymous_names | s . language = languages . language_codes [ i ] ) ) > 2 THEN RETURN ( FALSE ) ; END_IF ; END_REPEAT ; RETURN ( TRUE ) ; ELSE RETURN ( SIZEOF ( synonymous_names ) <= 2 ) ; END_IF ; END_FUNCTION; -- at_most_two_synonyms_per_language |
|
public class FAt_most_two_synonyms_per_language public static Value run(SdaiContext _context, Value languages, Value synonymous_names) |