X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.structural.ontology%2Fgraph%2FStructural.pgraph;h=aa31879c524944a994d17f72065de7d328036170;hb=ab9d7c411f5de4e4453e9bfb893c5a7559202fdb;hp=0393439f6c89781c09b891e83f1b0239122d8451;hpb=969bd23cab98a79ca9101af33334000879fb60c5;p=simantics%2Fplatform.git

diff --git a/bundles/org.simantics.structural.ontology/graph/Structural.pgraph b/bundles/org.simantics.structural.ontology/graph/Structural.pgraph
index 0393439f6..aa31879c5 100644
--- a/bundles/org.simantics.structural.ontology/graph/Structural.pgraph
+++ b/bundles/org.simantics.structural.ontology/graph/Structural.pgraph
@@ -23,6 +23,7 @@ STR.ComponentType <T L0.Type
     >-- STR.ComponentType.HasDefaultPropertyRelationType <R L0.IsRelatedTo
     >-- STR.ComponentType.HasDefaultPropertyValueType <R L0.IsRelatedTo
     >-- STR.ComponentType.HasDefaultMonitorValueType --> STR.MonitorValueType <R L0.IsRelatedTo
+    @L0.assert L0X.HasGeneratedNamePrefix ""
 
 STR.MonitorValueType <T L0.Entity
 STR.MonitorValue <T L0.SCLValue : STR.MonitorValueType
@@ -106,14 +107,16 @@ STR.Connection <T L0.Entity
 STR.ConnectionVariable <T STR.Variable <T STR.Connection
     //[STR.Binds all STR.ConnectionRelation]
 */
+
+STR.Functions.connectionValueAccessor : L0.ExternalValue
+    L0.HasValueType "ValueAccessor"
+
 STR.ConnectionRelation <T L0.Relation
     @L0.assert L0.SharedRange STR.ConnectionRelation
     >-- STR.ConnectionRelation.connectionRequired --> L0.Boolean <R L0.HasProperty : L0.FunctionalRelation
     >-- STR.ConnectionRelation.equivalentConnectionPoint --> STR.ConnectionRelation <R L0.IsRelatedTo
         L0.InverseOf STR.ConnectionRelation.equivalentConnectionPoint
-    @L0.assert L0.valueAccessor 
-        STR.Functions.connectionValueAccessor : L0.ExternalValue
-            L0.HasValueType "ValueAccessor"
+    @L0.assert L0.valueAccessor STR.Functions.connectionValueAccessor
     @L0.assert L0.domainProperties L0.Functions.standardPropertyDomainProperties
     @L0.assert L0.domainChildren L0.Functions.standardPropertyDomainChildren            
 
@@ -268,10 +271,8 @@ STR.Run
 STR.Connection
   @L0.assert L0.domainProperties L0.Functions.standardPropertyDomainProperties
   @L0.assert L0.domainChildren L0.Functions.standardPropertyDomainChildren
-  @L0.assert L0.valueAccessor 
-    STR.Functions.connectionValueAccessor : L0.ExternalValue
-      L0.HasValueType "ValueAccessor"
-      
+  @L0.assert L0.valueAccessor STR.Functions.connectionValueAccessor
+
 STR.SCLValue <T L0.SCLValue
   @L0.assert L0.ConvertsToValueWith STR.Functions.computeExpression
   @L0.assert L0.SCLValue.environment