minor buoyancy 2d

Author: jginternational

kratos.gid/apps/Buoyancy/examples/examples.tcl

@@ -7,9 +7,11 @@ proc Buoyancy::examples::Init { } {
 }
 
 proc Buoyancy::examples::UpdateMenus { } {
-    GiDMenu::InsertOption "Kratos" [list "---"] 8 PRE "" "" "" insertafter =
-    GiDMenu::InsertOption "Kratos" [list "Heated square" ] 8 PRE [list ::Buoyancy::examples::HeatedSquare] "" "" insertafter =
-    GiDMenu::UpdateMenus
+    if {$::Model::SpatialDimension eq "2D"} {
+        GiDMenu::InsertOption "Kratos" [list "---"] 8 PRE "" "" "" insertafter =
+        GiDMenu::InsertOption "Kratos" [list "Heated square" ] 8 PRE [list ::Buoyancy::examples::HeatedSquare] "" "" insertafter =
+        GiDMenu::UpdateMenus
+    }
 }
 
 Buoyancy::examples::Init

kratos.gid/apps/Buoyancy/start.tcl

@@ -58,7 +58,10 @@ proc ::Buoyancy::GetAttribute {name} {
 
 proc ::Buoyancy::CustomToolbarItems { } {
     variable dir
-    Kratos::ToolbarAddItem "Example" "example.png" [list -np- ::Buoyancy::examples::HeatedSquare] [= "Example\nBuoyancy driven cavity flow (Ra = 1e6 - Pr = 0.71)"]   
+    
+    if {$::Model::SpatialDimension eq "2D"} {
+        Kratos::ToolbarAddItem "Example" "example.png" [list -np- ::Buoyancy::examples::HeatedSquare] [= "Example\nBuoyancy driven cavity flow (Ra = 1e6 - Pr = 0.71)"]   
+    }
 }
 
 ::Buoyancy::Init