aboutsummaryrefslogtreecommitdiff
path: root/challenge-139/luca-ferrari/postgresql/ch-1.sql
blob: 9685ec29482309f3919ebebf8a710d1638185f97 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
CREATE OR REPLACE FUNCTION
  f_jort_sort( n int[] )
  RETURNS int
AS $CODE$
  DECLARE
  n_ordered int[];
BEGIN
  SELECT ( ARRAY( SELECT unnest( n ) ORDER BY 1 ) )
    INTO n_ordered;

  IF array_to_string( n, '|' ) = array_to_string( n_ordered, '|' ) THEN
    RETURN 1;
  ELSE
    RETURN 0;
  END IF;
END
  $CODE$
  LANGUAGE plpgsql;