X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.structural2%2Fscl%2FStructural%2FProcedural.scl;h=8fd2ef34c69278500012c29afd36353589924d6b;hb=8daf1d98d61e83fc6450ddac8e800476a9d52ab3;hp=b4600dcb281baaebcc995c372cede8fde8eca54f;hpb=969bd23cab98a79ca9101af33334000879fb60c5;p=simantics%2Fplatform.git

diff --git a/bundles/org.simantics.structural2/scl/Structural/Procedural.scl b/bundles/org.simantics.structural2/scl/Structural/Procedural.scl
index b4600dcb2..8fd2ef34c 100644
--- a/bundles/org.simantics.structural2/scl/Structural/Procedural.scl
+++ b/bundles/org.simantics.structural2/scl/Structural/Procedural.scl
@@ -1,31 +1,31 @@
-include "Simantics/DB"
-
-@JavaType "org.simantics.structural2.procedural.Property"
-data Property =
-    @FieldNames [relation, value]
-    Property Resource a
-
-instance Show Property where
-    sb <+ Property relation value = sb << "(Property " <+ relation << ")"
-
-@JavaType "org.simantics.structural2.procedural.ConnectionPoint"
-data ConnectionPoint =
-    @JavaType "org.simantics.structural2.procedural.Terminal"
-    @FieldNames [component, relation]
-    Terminal String Resource
-  | @JavaType "org.simantics.structural2.procedural.Interface"
-    @FieldNames [relation]
-    Interface Resource
-
-deriving instance Show ConnectionPoint
-
-@JavaType "org.simantics.structural2.procedural.SubstructureElement"
-data SubstructureElement =
-    @JavaType "org.simantics.structural2.procedural.Component"
-    @FieldNames [name, "type", properties]
-    Component String Resource [Property]
-  | @JavaType "org.simantics.structural2.procedural.Connection"
-    @FieldNames [connectionPoints]  
-    Connection [ConnectionPoint]
-
+include "Simantics/DB"
+
+@JavaType "org.simantics.structural2.procedural.Property"
+data Property =
+    @FieldNames [relation, value]
+    Property Resource a
+
+instance Show Property where
+    sb <+ Property relation value = sb << "(Property " <+ relation << ")"
+
+@JavaType "org.simantics.structural2.procedural.ConnectionPoint"
+data ConnectionPoint =
+    @JavaType "org.simantics.structural2.procedural.Terminal"
+    @FieldNames [component, relation]
+    Terminal String Resource
+  | @JavaType "org.simantics.structural2.procedural.Interface"
+    @FieldNames [relation]
+    Interface Resource
+
+deriving instance Show ConnectionPoint
+
+@JavaType "org.simantics.structural2.procedural.SubstructureElement"
+data SubstructureElement =
+    @JavaType "org.simantics.structural2.procedural.Component"
+    @FieldNames [name, "type", properties]
+    Component String Resource [Property]
+  | @JavaType "org.simantics.structural2.procedural.Connection"
+    @FieldNames [connectionPoints]  
+    Connection [ConnectionPoint]
+
 deriving instance Show SubstructureElement
\ No newline at end of file