bSI 551 Georeferencing changes

[aothms]

bSI-551 Georeferencing changes

[aothms]

--- tmp/a/IFC.exp	2023-06-19 20:18:24.153075100 +0200
+++ tmp/b/IFC.exp	2023-06-21 13:28:07.707789200 +0200
@@ -5414,20 +5414,21 @@
 	SourceCRS : IfcCoordinateReferenceSystemSelect;
 	TargetCRS : IfcCoordinateReferenceSystem;
 END_ENTITY;
 
 ENTITY IfcCoordinateReferenceSystem
  ABSTRACT SUPERTYPE OF (ONEOF
 	(IfcGeographicCRS
 	,IfcProjectedCRS));
 	Name : OPTIONAL IfcLabel;
 	Description : OPTIONAL IfcText;
+	GeodeticDatum : OPTIONAL IfcIdentifier;
  INVERSE
 	HasCoordinateOperation : SET [0:1] OF IfcCoordinateOperation FOR SourceCRS;
 	WellKnownText : SET [0:1] OF IfcWellKnownText FOR CoordinateReferenceSystem;
  WHERE
 	NameOrWKT : (HIINDEX(WellKnownText) = 1) OR EXISTS(Name);
 END_ENTITY;
 
 ENTITY IfcCosineSpiral
  SUBTYPE OF (IfcSpiral);
 	CosineTerm : IfcLengthMeasure;
@@ -7081,25 +7082,26 @@
 	AssemblyPlace : IfcAssemblyPlaceEnum;
 	PredefinedType : OPTIONAL IfcFurnitureTypeEnum;
  WHERE
 	CorrectPredefinedType : NOT(EXISTS(PredefinedType)) OR
  (PredefinedType <> IfcFurnitureTypeEnum.USERDEFINED) OR
  ((PredefinedType = IfcFurnitureTypeEnum.USERDEFINED) AND EXISTS (SELF\IfcElementType.ElementType));
 END_ENTITY;
 
 ENTITY IfcGeographicCRS
  SUBTYPE OF (IfcCoordinateReferenceSystem);
-	GeodeticDatum : OPTIONAL IfcIdentifier;
 	PrimeMeridian : OPTIONAL IfcIdentifier;
-	Unit : OPTIONAL IfcNamedUnit;
+	AngleUnit : OPTIONAL IfcNamedUnit;
+	HeightUnit : OPTIONAL IfcNamedUnit;
  WHERE
-	IsPlaneAngleUnit : NOT(EXISTS(Unit)) OR (Unit.UnitType=IfcUnitEnum.PLANEANGLEUNIT);
+	AngleUnitIsPlaneAngle : NOT(EXISTS(SELF.AngleUnit)) OR (SELF.AngleUnit.UnitType=IfcUnitEnum.PLANEANGLEUNIT);
+	HeightUnitIsLength : NOT(EXISTS(SELF.HeightUnit)) OR (SELF.HeightUnit.UnitType=IfcUnitEnum.PLANEANGLEUNIT);
 END_ENTITY;
 
 ENTITY IfcGeographicElement
  SUBTYPE OF (IfcElement);
 	PredefinedType : OPTIONAL IfcGeographicElementTypeEnum;
  WHERE
 	CorrectPredefinedType : NOT(EXISTS(PredefinedType)) OR
  (PredefinedType <> IfcGeographicElementTypeEnum.USERDEFINED) OR
  ((PredefinedType = IfcGeographicElementTypeEnum.USERDEFINED) AND EXISTS (SELF\IfcObject.ObjectType));
 	CorrectTypeAssigned : (SIZEOF(IsTypedBy) = 0) OR
@@ -7732,20 +7734,22 @@
 ENTITY IfcMapConversion
  SUPERTYPE OF (ONEOF
 	(IfcMapConversionScaled))
  SUBTYPE OF (IfcCoordinateOperation);
 	Eastings : IfcLengthMeasure;
 	Northings : IfcLengthMeasure;
 	OrthogonalHeight : IfcLengthMeasure;
 	XAxisAbscissa : OPTIONAL IfcReal;
 	XAxisOrdinate : OPTIONAL IfcReal;
 	Scale : OPTIONAL IfcReal;
+ WHERE
+	TargetCRSOnlyProjected : 'IFC4X3_DEV.IfcProjectedCRS' IN TYPEOF(SELF\IfcCoordinateOperation.TargetCRS);
 END_ENTITY;
 
 ENTITY IfcMapConversionScaled
  SUBTYPE OF (IfcMapConversion);
 	ScaleX : IfcReal;
 	ScaleY : IfcReal;
 	ScaleZ : IfcReal;
 END_ENTITY;
 
 ENTITY IfcMappedItem
@@ -8904,27 +8908,26 @@
 
 ENTITY IfcProjectOrder
  SUBTYPE OF (IfcControl);
 	PredefinedType : OPTIONAL IfcProjectOrderTypeEnum;
 	Status : OPTIONAL IfcLabel;
 	LongDescription : OPTIONAL IfcText;
 END_ENTITY;
 
 ENTITY IfcProjectedCRS
  SUBTYPE OF (IfcCoordinateReferenceSystem);
-	GeodeticDatum : OPTIONAL IfcIdentifier;
 	VerticalDatum : OPTIONAL IfcIdentifier;
 	MapProjection : OPTIONAL IfcIdentifier;
 	MapZone : OPTIONAL IfcIdentifier;
 	MapUnit : OPTIONAL IfcNamedUnit;
  WHERE
-	IsLengthUnit : NOT(EXISTS(MapUnit)) OR (MapUnit.UnitType = IfcUnitEnum.LENGTHUNIT);
+	MapUnitIsLength : NOT(EXISTS(SELF.MapUnit)) OR (SELF.MapUnit.UnitType = IfcUnitEnum.LENGTHUNIT);
 END_ENTITY;
 
 ENTITY IfcProjectionElement
  SUBTYPE OF (IfcFeatureElementAddition);
 	PredefinedType : OPTIONAL IfcProjectionElementTypeEnum;
  WHERE
 	CorrectPredefinedType : NOT(EXISTS(PredefinedType)) OR
  (PredefinedType <> IfcProjectionElementTypeEnum.USERDEFINED) OR
  ((PredefinedType = IfcProjectionElementTypeEnum.USERDEFINED) AND EXISTS (SELF\IfcObject.ObjectType));
 END_ENTITY;