INTERLIS 2.3; !!######################################################################## !! BASISMODULE LI !! !! PROVIDER: ABI CONTACT: info@abi.llv.li !! PUBLISHED: 2018-0810 !! ######################################################################## !! !! ######################################################################## !! Version | Who | Modification !!------------------------------------------------------------------------------ !! 2018-10-08 | ABI | !!@technicalContact=info@abi.llv.li !!@furtherInformation=https://www.abi.llv.li TYPE MODEL GeometryLILV95_V1 (en) AT "http://models.geo.llv.li/LI" VERSION "2018-10-08" = IMPORTS UNQUALIFIED INTERLIS; IMPORTS Units; IMPORTS CoordSys; REFSYSTEM BASKET BCoordSys ~ CoordSys.CoordsysTopic OBJECTS OF GeoCartesian2D: CHLV95 OBJECTS OF GeoHeight: SwissOrthometricAlt; DOMAIN !!@CRS=EPSG:2056 Coord2 = COORD 2700000.000 .. 2800000.000 [m] {CHLV95[1]}, 1200000.000 .. 1250000.000 [m] {CHLV95[2]}, ROTATION 2 -> 1; !!@CRS=EPSG:2056 Coord3 = COORD 2700000.000 .. 2800000.000 [m] {CHLV95[1]}, 1200000.000 .. 1250000.000 [m] {CHLV95[2]}, -200.000 .. 3000.000 [m] {SwissOrthometricAlt[1]}, ROTATION 2 -> 1; Surface = SURFACE WITH (STRAIGHTS, ARCS) VERTEX Coord2 WITHOUT OVERLAPS > 0.001; Area = AREA WITH (STRAIGHTS, ARCS) VERTEX Coord2 WITHOUT OVERLAPS > 0.001; Line = POLYLINE WITH (STRAIGHTS, ARCS) VERTEX Coord2; DirectedLine EXTENDS Line = DIRECTED POLYLINE; LineWithAltitude = POLYLINE WITH (STRAIGHTS, ARCS) VERTEX Coord3; DirectedLineWithAltitude = DIRECTED POLYLINE WITH (STRAIGHTS, ARCS) VERTEX Coord3; /* minimal overlaps only (2mm) */ SurfaceWithOverlaps2mm = SURFACE WITH (STRAIGHTS, ARCS) VERTEX Coord2 WITHOUT OVERLAPS > 0.002; AreaWithOverlaps2mm = AREA WITH (STRAIGHTS, ARCS) VERTEX Coord2 WITHOUT OVERLAPS > 0.002; Orientation = 0.00000 .. 359.99999 CIRCULAR [Units.Angle_Degree] ; Accuracy = (cm, cm50, m, m10, m50, vague); Method = (measured, sketched, calculated); STRUCTURE LineStructure = Line: Line; END LineStructure; STRUCTURE DirectedLineStructure = Line: DirectedLine; END DirectedLineStructure; STRUCTURE MultiLine = Lines: BAG {1..*} OF LineStructure; END MultiLine; STRUCTURE MultiDirectedLine = Lines: BAG {1..*} OF DirectedLineStructure; END MultiDirectedLine; STRUCTURE SurfaceStructure = Surface: Surface; END SurfaceStructure; STRUCTURE MultiSurface = Surfaces: BAG {1..*} OF SurfaceStructure; END MultiSurface; END GeometryLILV95_V1. !! ########################################################################