X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.modeling.ontology%2Fgraph%2FModelingViewpoint.pgraph;h=b97753e5fc5c920061de1be78cd1f8b7adde20d9;hp=cd3f1f31f996a4d8eb4a26237b7ca09baab4870a;hb=b000e272429e157638c0384878b07b8dcd758472;hpb=fad36d463b75c3a9944d875fc627c3533f6da74d

diff --git a/bundles/org.simantics.modeling.ontology/graph/ModelingViewpoint.pgraph b/bundles/org.simantics.modeling.ontology/graph/ModelingViewpoint.pgraph
index cd3f1f31f..b97753e5f 100644
--- a/bundles/org.simantics.modeling.ontology/graph/ModelingViewpoint.pgraph
+++ b/bundles/org.simantics.modeling.ontology/graph/ModelingViewpoint.pgraph
@@ -20,9 +20,21 @@ MOD.Contributions : L0.Library
 MOD.SCLChildRule <T VP.ChildRule
   >-- MOD.SCLChildRule.getChildren ==> "Resource -> <ReadGraph> [Resource]" <R L0.HasProperty : L0.FunctionalRelation
 
-MOD.SCLLabelRule <T VP.ChildRule
+MOD.SCLLabelRule <T VP.VisualsRule
   >-- MOD.SCLLabelRule.getLabels ==> "Resource -> <ReadGraph> [String]" <R L0.HasProperty : L0.FunctionalRelation
 
+MOD.SCLImageRule <T VP.VisualsRule
+  >-- MOD.SCLImageRule.getImages ==> "Resource -> <ReadGraph> [(String,ImageDescriptor)]" <R L0.HasProperty : L0.FunctionalRelation
+
+MOD.SCLLabelForegroundColorRule <T VP.VisualsRule
+  >-- MOD.SCLLabelForegroundColorRule.getColor ==> "Resource -> Maybe (Double, Double, Double) -> String -> Integer -> <ReadGraph> Maybe (Double, Double, Double)]" <R L0.HasProperty : L0.FunctionalRelation
+
+MOD.SCLLabelBackgroundColorRule <T VP.VisualsRule
+  >-- MOD.SCLLabelBackgroundColorRule.getColor ==> "Resource -> Maybe (Double, Double, Double) -> String -> Integer -> <ReadGraph> Maybe (Double, Double, Double)]" <R L0.HasProperty : L0.FunctionalRelation
+
+MOD.SCLCheckedStateRule <T VP.VisualsRule
+  >-- MOD.SCLCheckedStateRule.getState ==> "BrowseNodeRule CheckedState" <R L0.HasProperty : L0.FunctionalRelation
+
 MOD.SCLAction <T ACT.Action
   --> MOD.SCLAction.action ==> "Resource -> <Proc> ()" <R L0.HasProperty : L0.FunctionalRelation 
 
@@ -182,6 +194,8 @@ MBC
 
     @VP.namedRelationChildRule           MOD.Contributions.SCLModules L0.Entity   L0.ConsistsOf L0.SCLModule
     
+    @VP.namedRelationChildRule           MOD.Contributions.SCLScripts L0.Entity   L0.ConsistsOf L0.SCLScript
+    
     @VP.namedRelationChildRule           MOD.Contributions.SCLQueries L0.Library   L0.ConsistsOf MOD.SCLQuery
     
     @VP.namedRelationChildRule           MOD.Contributions.PGraphs L0.Ontology   L0.ConsistsOf L0.PGraph
@@ -342,6 +356,7 @@ MBC
         VP.VisualsContribution.HasCondition MBC.IsUserDefinedComponentTest
     @VP.namedConstantImageRule           MOD.Contributions.ImageImage            IMAGE.Image                          SILK.image
     @VP.namedConstantImageRule           MOD.Contributions.ModuleImage           L0.SCLModule                         SILK.box
+    @VP.namedConstantImageRule           MOD.Contributions.ScriptImage           L0.SCLScript                         SILK.script_go
     @VP.namedConstantImageRule           MOD.Contributions.PGraphImage           L0.PGraph                            SILK.box
     @VP.namedConstantImageRule           MOD.Contributions.QueryImage            MOD.SCLQuery                         SILK.script
     @VP.namedConstantImageRule           MOD.Contributions.CodeImage             STR.ProceduralComponentTypeCode      SILK.book_open
@@ -372,6 +387,41 @@ MOD.sclChildRule : L0.Template
             L0.SCLValue.expression %expression
             L0.HasValueType "Resource -> <ReadGraph> [Resource]"
 
+MOD.sclLabelRule : L0.Template
+    @template %action %expression
+        %action : MOD.SCLLabelRule
+          MOD.SCLLabelRule.getLabels _ : MOD.SCLValue
+            L0.SCLValue.expression %expression
+            L0.HasValueType "Resource -> <ReadGraph> [String]"
+
+MOD.sclImageRule : L0.Template
+    @template %action %expression
+        %action : MOD.SCLImageRule
+          MOD.SCLImageRule.getImages _ : MOD.SCLValue
+            L0.SCLValue.expression %expression
+            L0.HasValueType "Resource -> <ReadGraph> [(String,ImageDescriptor)]"
+
+MOD.sclLabelForegroundColorRule : L0.Template
+    @template %action %expression
+        %action : MOD.SCLLabelForegroundColorRule
+          MOD.SCLLabelForegroundColorRule.getColor _ : MOD.SCLValue
+            L0.SCLValue.expression %expression
+            L0.HasValueType "Resource -> Maybe (Double, Double, Double) -> String -> Integer -> <ReadGraph> Maybe (Double, Double, Double)"
+
+MOD.sclLabelBackgroundColorRule : L0.Template
+    @template %action %expression
+        %action : MOD.SCLLabelBackgroundColorRule
+          MOD.SCLLabelBackgroundColorRule.getColor _ : MOD.SCLValue
+            L0.SCLValue.expression %expression
+            L0.HasValueType "Resource -> Maybe (Double, Double, Double) -> String -> Integer -> <ReadGraph> Maybe (Double, Double, Double)"
+
+MOD.sclCheckedStateRule : L0.Template
+    @template %action %expression
+        %action : MOD.SCLCheckedStateRule
+          MOD.SCLCheckedStateRule.getState _ : MOD.SCLValue
+            L0.SCLValue.expression %expression
+            L0.HasValueType "Browsable a => a -> <ReadGraph> CheckedState"
+
 MOD.sclAction : L0.Template
     @template %action %expression
         %action : MOD.SCLAction
@@ -407,16 +457,36 @@ MOD.Contributions.ActivateModel : VP.ActionContribution
     VP.ActionContribution.HasNodeType SIMU.Model
     VP.ActionContribution.HasAction ACTIONS.ActivateModel
 
+MOD.Contributions.ActivateExperiment : VP.ActionContribution
+    L0.HasLabel "Activate"
+    VP.ActionContribution.HasImage SILK.bullet_go
+    VP.ActionContribution.HasCategory VP.EditActionCategory
+    VP.ActionContribution.HasNodeType SIMU.Experiment
+    VP.ActionContribution.HasAction ACTIONS.ActivateExperiment
+
 MOD.Contributions.Help : VP.ActionContribution
     L0.HasLabel "Help"
     VP.ActionContribution.HasImage SILK.help
     VP.ActionContribution.HasCategory VP.EditActionCategory
     VP.ActionContribution.HasNodeType L0.Entity
     VP.ActionContribution.HasAction ACTIONS.Help
-              
+
+MOD.Contributions.CopyURI : VP.ActionContribution
+    L0.HasLabel "Copy URI"
+    VP.ActionContribution.HasImage SILK.clipboard
+    VP.ActionContribution.HasCategory VP.EditActionCategory
+    VP.ActionContribution.HasNodeType L0.Entity
+    VP.ActionContribution.HasNodeType MBC.Variable
+    VP.ActionContribution.HasAction ACTIONS.CopyURI
+    VP.ActionContribution.IsVisibleIf _ : VP.AndTest
+        VP.AndTest.HasTest
+            _ : VP.InDevelopmentModeTest
+            _ : VP.HasURITest
+
 // Actions
 MAC    
     VP.BrowseContext.HasActionContribution MOD.Contributions.Help
+    VP.BrowseContext.HasActionContribution MOD.Contributions.CopyURI
     VP.BrowseContext.HasActionContribution _ : VP.ActionContribution
         L0.HasLabel "Migrate"
         VP.ActionContribution.HasImage SILK.star
@@ -477,6 +547,20 @@ MAC
             STR.ComponentType
         VP.ActionContribution.HasAction ACTIONS.NewSCLModule
         VP.ActionContribution.IsVisibleIf TESTS.IsContainerNotPublished
+    VP.BrowseContext.HasActionContribution MOD.Contributions.NewSCLScript : VP.ActionContribution
+        L0.HasLabel "SCL Script"
+        VP.ActionContribution.HasImage SILK.script_go
+        VP.ActionContribution.HasCategory VP.NewActionCategory
+        VP.ActionContribution.HasNodeType
+            L0.Library
+        VP.ActionContribution.HasAction ACTIONS.NewSCLScript
+        VP.ActionContribution.IsVisibleIf TESTS.IsContainerNotPublished
+    VP.BrowseContext.HasActionContribution _ : VP.ActionContribution
+        L0.HasLabel "Run SCL Script"
+        VP.ActionContribution.HasImage SILK.script_start
+        VP.ActionContribution.HasCategory VP.EditActionCategory
+        VP.ActionContribution.HasNodeType L0.SCLScript
+        VP.ActionContribution.HasAction ACTIONS.RunSCLScript
     VP.BrowseContext.HasActionContribution MOD.Contributions.NewPGraph : VP.ActionContribution
         L0.HasLabel "Ontology Definition File"
         VP.ActionContribution.HasImage SILK.page_white_text
@@ -638,6 +722,9 @@ ACTIONS.CreateNewVersion
   @MOD.sclAction "newVersionAction"
 ACTIONS.NewSCLModule
   @MOD.sclAction "createSCLModuleAction"
+ACTIONS.NewSCLScript
+  @MOD.sclAction "createSCLScriptAction"
+ACTIONS.RunSCLScript : ACT.Action
 ACTIONS.NewPGraph
   @MOD.sclAction "createPGraphAction"
 ACTIONS.NewSCLQuery : ACT.Action
@@ -647,11 +734,14 @@ ACTIONS.NewSheetBook
   @MOD.sclAction "createSpreadsheetBookAction"
 ACTIONS.ActivateModel
   @MOD.sclAction "activateModelAction"
+ACTIONS.ActivateExperiment
+  @MOD.sclAction "activateExperimentAction"
 ACTIONS.MigrateComponentType : ACT.Action
 ACTIONS.CompilePGraphs : ACT.Action
 //ACTIONS.MigrateMasterTypical : ACT.Action
 ACTIONS.RenameDiagramComponents : ACT.Action
 ACTIONS.Help : ACT.Action
+ACTIONS.CopyURI : ACT.Action
 
 ACTIONS.NavigateToSubstructure
   @MOD.sclAction "navigateToSubstructureAction"