motiejus/stud
1
Fork 0
Code Releases Activity

remove demo_bends1

Browse Source
This commit is contained in:
Motiejus Jakštys 2021-04-03 17:14:44 +03:00
parent fb6e178fb2
commit f48fdf52ab
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
IV/tests.sql
View File

@ -10,6 +10,8 @@ begin
end if; end if;
end $$ LANGUAGE plpgsql; end $$ LANGUAGE plpgsql;
-- to preview this somewhat conveniently in QGIS:
-- stage || '_' || dbgname || ' i:' || coalesce(i,'<nil>') || ' j:'|| coalesce(j,'<nil>')
drop table if exists debug_wm; drop table if exists debug_wm;
create table debug_wm(stage text, dbgname text, i bigint, j bigint, way geometry, props json); create table debug_wm(stage text, dbgname text, i bigint, j bigint, way geometry, props json);
@ -32,11 +34,9 @@ insert into figures (name, way) values ('inflection-1',ST_GeomFromText('LINESTRI
insert into figures (name, way) values ('multi-island',ST_GeomFromText('MULTILINESTRING((-15 10,-10 10,-5 11,0 11,5 11,10 10,11 9,13 10,15 9),(-5 11,-2 15,0 16,2 15,5 11))')); insert into figures (name, way) values ('multi-island',ST_GeomFromText('MULTILINESTRING((-15 10,-10 10,-5 11,0 11,5 11,10 10,11 9,13 10,15 9),(-5 11,-2 15,0 16,2 15,5 11))'));
-- DETECT BENDS -- DETECT BENDS
drop table if exists bends, demo_bends1; drop table if exists bends;
create table bends (name text, ways geometry[]); create table bends (name text, ways geometry[]);
insert into bends select name, detect_bends(way, name) from figures; insert into bends select name, detect_bends(way, name) from figures;
create table demo_bends1 (name text, i bigint, way geometry);
insert into demo_bends1 select name, generate_subscripts(ways, 1), unnest(ways) from bends;
-- FIX BEND INFLECTIONS -- FIX BEND INFLECTIONS
drop table if exists inflections, demo_inflections2; drop table if exists inflections, demo_inflections2;
@ -70,7 +70,7 @@ do $$
declare declare
vbends geometry[]; vbends geometry[];
begin begin
select detect_bends((select way from figures where name='fig3')) into vbends; select array((select way from debug_wm where dbgname='fig3' and stage='bbends')) into vbends;
perform assert_equals(5, array_length(vbends, 1)); perform assert_equals(5, array_length(vbends, 1));
perform assert_equals('LINESTRING(0 0,12 0,13 4)', st_astext(vbends[1])); perform assert_equals('LINESTRING(0 0,12 0,13 4)', st_astext(vbends[1]));
perform assert_equals('LINESTRING(12 0,13 4,20 2,20 0)', st_astext(vbends[2])); perform assert_equals('LINESTRING(12 0,13 4,20 2,20 0)', st_astext(vbends[2]));