summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/unbtex/unbtex-example/codigos/ModalReduction.jl
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/unbtex/unbtex-example/codigos/ModalReduction.jl')
-rw-r--r--macros/latex/contrib/unbtex/unbtex-example/codigos/ModalReduction.jl36
1 files changed, 36 insertions, 0 deletions
diff --git a/macros/latex/contrib/unbtex/unbtex-example/codigos/ModalReduction.jl b/macros/latex/contrib/unbtex/unbtex-example/codigos/ModalReduction.jl
new file mode 100644
index 0000000000..f7108d0fd5
--- /dev/null
+++ b/macros/latex/contrib/unbtex/unbtex-example/codigos/ModalReduction.jl
@@ -0,0 +1,36 @@
+module ModalReduction
+export generateA, generateB, generateC
+export generateABC, getABC_M, getABCD_R
+export manuscript_p48, simulation
+export generateMATLABSimulationScript
+
+
+#Gera A, B, C to sistema completo
+function generateABC(n)
+ tau = 0.2426 # tau do barbante (1/s) para excursão de 30cm
+ taul = 0.1133 # tau da bolinha (1/s) para excursão de 30cm
+ ms = 0.0006 # massa linear do barbante (kg/m)
+ mb = 0.00015 # massa da bolinha (kg)
+ g = 9.80665 # aceleração da gravidade (m/s^2)
+ L = 0.82 # Comprimento total do barbante (m)
+ l = L/n # distância entre dois pontos de discretização (m)
+ T0 = mb*g # Tração no ponto 0 (logo acima da bolinha) - considerando peso da bolinha (N)
+
+ b = zeros(n)
+ c = g/(2l)
+ d = zeros(n)
+ e = zeros(n)
+
+ b[1] = g/l
+ for k = 2:n
+ b[k] = (T0 + ms*g*(k-1)*l)/(ms*l^2)
+ d[k] = b[k] - c
+ e[k] = b[k] + c
+ end
+
+ A = generateA(n, b, d, e, tau, taul)
+ B = generateB(n,e[n])
+ C = generateC(n)
+
+ return A, B, C
+end \ No newline at end of file