64 lines
2.2 KiB
Plaintext
64 lines
2.2 KiB
Plaintext
|
########################################
|
||
|
|
# INITIALIZATION
|
||
|
|
########################################
|
||
|
|
delete database pc2testf;
|
||
|
|
|
||
|
|
#setup pc2testf Pointcloud2Algebra
|
||
|
|
create database pc2testf;
|
||
|
|
open database pc2testf;
|
||
|
|
|
||
|
|
let ps_undef = [const rel(tuple([P: point, Alt: int, X: int])) value ((undefined undefined undefined))];
|
||
|
|
let ps_pointInt = [const rel(tuple([P: point, Alt: int, X: int])) value (((1.0 2.0) 3 4) ((4.0 4.0) 1 12))];
|
||
|
|
let ps_pointReal = [const rel(tuple([P: point, Alt: real, X: int])) value (((1.0 2.0) 3.0 4) ((4.0 4.0) 1.1 12))];
|
||
|
|
let ps_point2Attr = [const rel(tuple([P: point, Alt: real, X: int, Y:string])) value (((1.0 2.0) 3.0 4 "hase") ((4.0 4.0) 1.1 12 "huhn"))];
|
||
|
|
|
||
|
|
|
||
|
|
########################################
|
||
|
|
# OPERATOR - COLLECTPC2
|
||
|
|
########################################
|
||
|
|
|
||
|
|
#testcase -1- query no attribute Alt Int
|
||
|
|
#yields ((pointcloud2 EUCLID) ((1.0 2.0 3.0) (4.0 4.0 1.0)))
|
||
|
|
query ps_pointInt feed collectPc2[P,Alt,EUCLID;];
|
||
|
|
|
||
|
|
#testcase -2- query attribute Alt Real
|
||
|
|
#yields ((pointcloud2 (WGS84 (tuple((X int))))) ((1.0 2.0 3.0 (4)) (4.0 4.0 1.1 (12))))
|
||
|
|
query ps_pointReal feed collectPc2[P,Alt,WGS84;X];
|
||
|
|
|
||
|
|
#testcase -3- query more attributes
|
||
|
|
#yields ((pointcloud2 (WGS84 (tuple((X int)(Y string))))) ((1.0 2.0 3.0 (4 "hase")) (4.0 4.0 1.1 (12 "huhn"))))
|
||
|
|
query ps_point2Attr feed collectPc2[P,Alt,WGS84;X,Y];
|
||
|
|
|
||
|
|
#testcase -4- query one attribute twice
|
||
|
|
#yields ((pointcloud2 (WGS84 (tuple((X int)(X int))))) ((1.0 2.0 3.0 (4 4)) (4.0 4.0 1.1 (12 12))))
|
||
|
|
query ps_pointReal feed collectPc2[P,Alt,WGS84;X,X];
|
||
|
|
|
||
|
|
#testcase -5- query wrong attribute
|
||
|
|
#yields ((pointcloud2 (WGS84 (tuple((X int))))) ((1.0 2.0 3.0 (4)) (4.0 4.0 1.1 (12))))
|
||
|
|
query ps_pointReal feed collectPc2[P,Alt,WGS84;X,Y];
|
||
|
|
|
||
|
|
#testcase -6- query wrong projection
|
||
|
|
#yields error
|
||
|
|
query ps_pointReal feed collectPc2[P,Alt,WGS22;X,Y];
|
||
|
|
|
||
|
|
#testcase -7- query wrong alt
|
||
|
|
#yields error
|
||
|
|
query ps_pointReal feed collectPc2[P,P,WGS84;X,Y];
|
||
|
|
|
||
|
|
#testcase -8- query wrong point
|
||
|
|
#yields error
|
||
|
|
query ps_pointReal feed collectPc2[HASE,Alt,WGS84;X,Y];
|
||
|
|
|
||
|
|
#testcase -9- query undefined
|
||
|
|
#yields ((pointcloud2 EUCLID) ())
|
||
|
|
query ps_undef feed collectPc2[P,Alt,EUCLID;];
|
||
|
|
|
||
|
|
|
||
|
|
#teardown
|
||
|
|
kill ps_undef;
|
||
|
|
kill ps_pointInt;
|
||
|
|
kill ps_pointReal;
|
||
|
|
kill ps_point2Attr;
|
||
|
|
close database;
|
||
|
|
delete database pc2testf;
|