/*scan for rank number calculation /*scan for rank number calculation type temporary_type = record decimal("|") i; end /* Temporary variable*/; temp::initialize(in) = begin temp.i :: 0; end; --------------------------------- let string(",")[] vec =reinterpret_as(string(1)[],in.data); ---------------------------------------------------------------------- out::scan(temp, in) = begin out.i :: temp.i + 1; end; out::finalize(temp, in) = begin out.* :: in.*; out.rank_nbr :: temp.i; end; out :: output_select(out) = begin out :: out.rank_nbr == 1; end; ---------------------------------------- type temporary_type = record decimal("|") i; end /* Temporary variable*/; temp::initialize(in) = begin temp.i :: 0; end; --------------------------------- let string(",")[] vectors =reinterpret_as(string(1)[],in.data); ---------------------------------------------------------------------- out::scan(temp, in) = begin out.i :: temp.i + ...