ST_AsText_Array.sql

-- Instance of ST_AsText that can handle an array of geometries
create or replace function ST_AsText(geometry[])
    returns text
    language plpgsql immutable as
$$
declare
    g geometry;
    res text := '{';
begin
    if $1 is null or array_length($1, 1) = 0 then
        return '{}';
    end if;
    foreach g in array $1 loop
        res := res || ST_AsText(g) || ', ';
    end loop;
    return trim(trailing ', ' from res) || '}';
end;
$$;