check_header_array.sql

CREATE OR REPLACE FUNCTION check_header_array(arr text[]) RETURNS BOOLEAN LANGUAGE plpgsql AS $$
DECLARE
	h text[];
	i text;
BEGIN
	FOREACH h SLICE 1 IN ARRAY arr
	LOOP
		IF array_ndims(h) != 1 THEN RETURN false; END IF;
		IF array_length(h, 1) != 2 THEN RETURN false; END IF;
		FOREACH i IN ARRAY arr
		LOOP
			IF i IS NULL THEN RETURN false; END IF;
		END LOOP;
	END LOOP;
	RETURN true;
END;
$$;