|
FUNCTION composable_sequence (operands : LIST [2:?] OF maths_function) : BOOLEAN; REPEAT i := 1 TO SIZEOF ( operands ) - 1 ; IF NOT compatible_spaces ( operands [ i ] . range , operands [ i + 1 ] . domain ) THEN RETURN ( FALSE ) ; END_IF ; END_REPEAT ; RETURN ( TRUE ) ; END_FUNCTION; -- composable_sequence |
|
public class FComposable_sequence public static Value run(SdaiContext _context, Value operands) |