Hide 2d examples in pfemfluid

Author: jginternational

kratos.gid/apps/PfemFluid/examples/examples.tcl

@@ -8,10 +8,12 @@ proc PfemFluid::examples::Init { } {
 }
 
 proc PfemFluid::examples::UpdateMenus { } {
-    GiDMenu::InsertOption "Kratos" [list "---"] 7 PRE "" "" "" insertafter =
-    GiDMenu::InsertOption "Kratos" [list "Water dam break" ] 7 PRE [list ::PfemFluid::examples::WaterDamBreak] "" "" insertafter =
-    GiDMenu::InsertOption "Kratos" [list "Dam break FSI" ] 7 PRE [list ::PfemFluid::examples::DamBreakFSI] "" "" insertafter =
-    GiDMenu::UpdateMenus
+    if {$::Model::SpatialDimension eq "2D"} {
+        GiDMenu::InsertOption "Kratos" [list "---"] 7 PRE "" "" "" insertafter =
+        GiDMenu::InsertOption "Kratos" [list "Water dam break" ] 7 PRE [list ::PfemFluid::examples::WaterDamBreak] "" "" insertafter =
+        GiDMenu::InsertOption "Kratos" [list "Dam break FSI" ] 7 PRE [list ::PfemFluid::examples::DamBreakFSI] "" "" insertafter =
+        GiDMenu::UpdateMenus
+    }
 }
 
 PfemFluid::examples::Init

kratos.gid/apps/PfemFluid/start.tcl

@@ -53,10 +53,11 @@ proc ::PfemFluid::CustomToolbarItems { } {
     Kratos::ToolbarAddItem "Output" [file join $img_dir "view.png"] [list -np- PWViewOutput] [= "View process info"]
     Kratos::ToolbarAddItem "Stop" [file join $img_dir "cancelProcess.png"] {Utilities CancelProcess} [= "Cancel process"]
     Kratos::ToolbarAddItem "SpacerApp" "" "" ""
-    Kratos::ToolbarAddItem "Spacer" "" "" ""
-    Kratos::ToolbarAddItem "Example" [file join $img_dir "exampleFluid.png"] [list -np- ::PfemFluid::examples::WaterDamBreak] [= "Example\nWater dam break"]
-    Kratos::ToolbarAddItem "Example" [file join $img_dir "exampleFsi.png"] [list -np- ::PfemFluid::examples::DamBreakFSI] [= "Example\nDam break FSI"]
-
+    if {$::Model::SpatialDimension eq "2D"} {
+        Kratos::ToolbarAddItem "Spacer" "" "" ""
+        Kratos::ToolbarAddItem "Example" [file join $img_dir "exampleFluid.png"] [list -np- ::PfemFluid::examples::WaterDamBreak] [= "Example\nWater dam break"]
+        Kratos::ToolbarAddItem "Example" [file join $img_dir "exampleFsi.png"] [list -np- ::PfemFluid::examples::DamBreakFSI] [= "Example\nDam break FSI"]
+    }
     # Solo para JG
     if {[GiD_Info problemtypepath] eq "E:/PROYECTOS/Kratos/interfaces/GiD/kratos.gid"} {
         Kratos::ToolbarAddItem "Conditions" "list.png" [list -np- PfemFluid::xml::StartSortingWindow] [= "Sort the conditions"]

kratos.gid/apps/PfemFluid/xml/XmlController.tcl

@@ -17,7 +17,7 @@ proc PfemFluid::xml::Init { } {
     Model::getProcesses "../../Common/xml/Processes.xml"
     Model::getProcesses Processes.xml
     Model::getNodalConditions NodalConditions.xml
-    Model::getSolvers "../../Pfem/xml/Solvers.xml"
+    Model::getSolvers Solvers.xml
 
     Model::ForgetNodalCondition "CONTACT"
 }