update

Author: claudioperez

content/en/examples/ShaftBuckling/e0020/e0020.tcl

@@ -0,0 +1,51 @@
+pragma openseespy
+
+model  -ndm 3 -ndf 6
+
+node 0 0.0 0 0 
+node 1 10.0 0 0 
+node 2 20.0 0 0 
+node 3 30.0 0 0 
+node 4 40.0 0 0 
+node 5 50.0 0 0 
+node 6 60.0 0 0 
+node 7 70.0 0 0 
+node 8 80.0 0 0 
+node 9 90.0 0 0 
+node 10 100.0 0 0 
+
+section ElasticFrame 1 -E 1 -G 1 -A 161538000.0 -Ay 161538000.0 -Az 161538000.0 -Iy 3500000000.0 -Iz 35000000.0 -J 35000000.0
+geomTransf Linear 1 0 0 1 
+
+element ExactFrame  1 {0 1} -section 1 -transform 1
+element ExactFrame  2 {1 2} -section 1 -transform 1
+element ExactFrame  3 {2 3} -section 1 -transform 1
+element ExactFrame  4 {3 4} -section 1 -transform 1
+element ExactFrame  5 {4 5} -section 1 -transform 1
+element ExactFrame  6 {5 6} -section 1 -transform 1
+element ExactFrame  7 {6 7} -section 1 -transform 1
+element ExactFrame  8 {7 8} -section 1 -transform 1
+element ExactFrame  9 {8 9} -section 1 -transform 1
+element ExactFrame 10 {9 10} -section 1 -transform 1
+fix 0 1 1 1 1 1 1 
+nodeRotation 0 
+nodeRotation 1 
+nodeRotation 2 
+nodeRotation 3 
+nodeRotation 4 
+nodeRotation 5 
+nodeRotation 6 
+nodeRotation 7 
+nodeRotation 8 
+nodeRotation 9 
+nodeRotation 10 
+pattern Plain 1 Linear 
+eleLoad Frame Dirac -force {0 1 0} -basis director -offset {1.0 0 0} -pattern 1 -elements {10}
+system FullGeneral 
+integrator LoadControl 300.0 
+test NormDispIncr 1e-12 10 1 
+algorithm Newton 
+analysis Static 
+
+analyze 500
+

content/en/examples/ShaftBuckling/e0020/index.md

@@ -4,6 +4,8 @@ bibliography: references.json
 description: This example demonstrates the simulation of follower loading applied to frame elements.
 downloads:
   Python: ["e0020.py"]
+  Tcl: ["e0020.tcl"]
+tags: ["Frame", "Loads", "Tcl", "Python"]
 render: e0020.glb
 draft: false
 ---
@@ -22,18 +24,29 @@ labeled with the tag `1` and scaled in time by a `Linear` time series:
 Next we add a [`FrameLoad`](https://xara.so/user/manual/model/elements/frame/FrameLoad.html)
 to this pattern, applied to the element with tag `ne` (ie, the last element).
 
+{{< tabs tabTotal="2" >}}
+{{% tab name="Python" %}}
 ```python
-    model.eleLoad("Frame", "Dirac",
+model.eleLoad("Frame", "Dirac",
                   force = [0, 1, 0],
                   basis = "director",
                   offset=[1.0,0,0],
                   pattern=1,
                   elements=[ne]
-    )
+)
 ```
-The argument `Dirac` specifies that the loading is Dirac delta function.
-Before performing the analysis, we'll also define a `veux.Motion` which
-we will use to animate the simulation:
+{{% /tab %}}
+{{% tab name="Tcl" %}}
+```tcl
+pattern Plain 1 Linear 
+eleLoad Frame Dirac -force {0 1 0} -basis director -offset {1.0 0 0} -pattern 1 -elements {10}
+```
+{{% /tab %}}
+{{< /tabs >}}
+
+The argument `"Dirac"` specifies that the loading is Dirac delta function.
+Before performing the analysis, we'll also define a `Motion` with the `veux`
+library which we will use to animate the simulation:
 ```python
 import veux
 artist = veux.create_artist(model, model_config=dict(extrude_outline="square"))