fb200cb2-2945-4542-ba13-fd5031213d92 287 Alvaro Diaz Falconi 4 5 false false 0 10 decimal

&[DATE] &[TIME] - &[FILENAME]

References:

[1] Timoshenko - Vibration Problems in Engineering pag 342

[2]

[3]

ρ 8000 kg m 3^/ * :

ν 0.298 :

E 198000 MPa * :

G E 21 ν + (* / :

κ_hollow 21 ν + (43 ν * + / * : 0.5304

Hollow cylinder cross section

mass 0.98 kg m / * :

Isect 2.331 108 -^* m 4^* :

Asect 1.225 104 -^* m 2^* :

L 0.32 m * :

Isect Asect r Isect Asect / (sqrt :

ε κ_hollow :

Isect mass a E Isect mass / * (sqrt :

ω Isect mass β ω 2^Isect mass a 2^/ (4 nthroot :

L Isect Asect α 1 ε / Isect Asect r L / (2^* E G / * :

L Isect Asect γ Isect Asect r L / (2^:

ω Isect Asect mass L A ω Isect mass β L * (4^L Isect Asect α L Isect Asect γ + (* :

ω Isect Asect mass L B ω Isect mass β L * (8^L Isect Asect α (L Isect Asect γ (- (2^* 4 ω Isect mass β L * (4^* (+ (sqrt :

ω Isect Asect mass L η 2 sqrt 2 L * / ω Isect Asect mass L A - ω Isect Asect mass L B + (sqrt * :

ω Isect Asect mass L θ 2 sqrt 2 L * / ω Isect Asect mass L A ω Isect Asect mass L B + (sqrt * :

ω Isect Asect mass L σ1 1 L / ω Isect Asect mass L θ L * L Isect Asect α ω Isect Asect mass L θ L * / ω Isect mass β L * (4^* - (* :

ω Isect Asect mass L σ2 1 L / ω Isect Asect mass L η L * L Isect Asect α ω Isect Asect mass L η L * / ω Isect mass β L * (4^* + (* :

Isect k E Isect * :

ω Isect Asect mass L σ11 ω Isect Asect mass L θ 3^L Isect Asect α L 2^* ω Isect mass β 4^* ω Isect Asect mass L θ * - L Isect Asect γ L 2^* ω Isect mass β 4^* ω Isect Asect mass L σ1 * - (:

ω Isect Asect mass L σ21 ω Isect Asect mass L η 3^L Isect Asect α L 2^* ω Isect mass β (4^* ω Isect Asect mass L η * + L Isect Asect γ L 2^* ω Isect mass β 4^* ω Isect Asect mass L σ1 * + (:

ω Isect Asect mass L σ12 ω Isect Asect mass L θ (2^L Isect Asect α L 2^* ω Isect mass β (4^* - (:

ω Isect Asect mass L σ21 ω Isect Asect mass L η (3^L Isect Asect α L 2^* ω Isect mass β (4^* ω Isect Asect mass L η * + L Isect Asect γ L 2^* ω Isect mass β (4^* ω Isect Asect mass L σ2 * + (:

ω Isect Asect mass L σ22 ω Isect Asect mass L η (2^L Isect Asect α L 2^* ω Isect mass β (4^* + (:

ω Isect Asect mass L φ11 1 ω Isect Asect mass L σ12 ω Isect Asect mass L σ22 + / ω Isect Asect mass L σ22 ω Isect Asect mass L θ L * cos * ω Isect Asect mass L σ12 ω Isect Asect mass L η L * cosh * + (* :

ω Isect Asect mass L φ12 1 ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * + / ω Isect Asect mass L σ21 ω Isect Asect mass L θ L * (sin * ω Isect Asect mass L σ11 ω Isect Asect mass L η L * (sinh * + (* :

ω Isect Asect mass L φ13 1 Isect k (ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * + (* / ω Isect Asect mass L σ2 - (ω Isect Asect mass L θ L * (sin * ω Isect Asect mass L σ1 ω Isect Asect mass L η L * (sinh * + (* :

ω Isect Asect mass L φ14 1 Isect k (ω Isect Asect mass L σ12 ω Isect Asect mass L σ22 + (* / ω Isect Asect mass L θ L * cos - ω Isect Asect mass L η L * (cosh + (* :

ω Isect Asect mass L φ21 1 ω Isect Asect mass L σ12 ω Isect Asect mass L σ22 + / ω Isect Asect mass L σ1 ω Isect Asect mass L σ22 ω Isect Asect mass L θ L * (sin * * ω Isect Asect mass L σ2 ω Isect Asect mass L σ12 * ω Isect Asect mass L η L * (sinh * - (* :

ω Isect Asect mass L φ22 1 ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * + / ω Isect Asect mass L σ2 ω Isect Asect mass L σ21 ω Isect Asect mass L θ L * ((cos * * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * ω Isect Asect mass L η L * ((cosh * + (* :

ω Isect Asect mass L φ23 ω Isect Asect mass L σ1 ω Isect Asect mass L σ2 * Isect k (ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * + (* / ω Isect Asect mass L θ L * cos - ω Isect Asect mass L η L * (cosh + (* :

ω Isect Asect mass L φ24 1 Isect k (ω Isect Asect mass L σ12 ω Isect Asect mass L σ22 + (* / ω Isect Asect mass L σ1 ω Isect Asect mass L θ L * (sin * ω Isect Asect mass L σ2 ω Isect Asect mass L η L * (sinh * + (* :

ω Isect Asect mass L φ31 Isect k (ω Isect Asect mass L σ12 ω Isect Asect mass L σ22 + (/ ω Isect Asect mass L σ11 ω Isect Asect mass L σ22 * ω Isect Asect mass L θ L * (sin * ω Isect Asect mass L σ12 ω Isect Asect mass L σ21 * ω Isect Asect mass L η L * sinh * + (* :

ω Isect Asect mass L φ32 Isect k ω Isect Asect mass L σ11 ω Isect Asect mass L σ21 * * - (ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * + (/ ω Isect Asect mass L θ L * cos ω Isect Asect mass L η L * (cosh - (* :

ω Isect Asect mass L φ33 1 ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * + (/ ω Isect Asect mass L σ2 ω Isect Asect mass L σ21 * ω Isect Asect mass L θ L * cos * ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L η L * ((cosh * + (* :

ω Isect Asect mass L φ34 1 ω Isect Asect mass L σ12 ω Isect Asect mass L σ22 + / ω Isect Asect mass L σ11 - (ω Isect Asect mass L θ L * sin * ω Isect Asect mass L σ21 ω Isect Asect mass L η L * (sinh * + (* :

ω Isect Asect mass L φ41 Isect k (ω Isect Asect mass L σ12 * ω Isect Asect mass L σ22 * - ω Isect Asect mass L σ12 ω Isect Asect mass L σ22 + (/ ω Isect Asect mass L θ L * cos ω Isect Asect mass L η L * (cosh - (* :

ω Isect Asect mass L φ42 Isect k (- ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * + (/ ω Isect Asect mass L σ12 ω Isect Asect mass L σ21 ω Isect Asect mass L θ L * (sin * * ω Isect Asect mass L σ11 ω Isect Asect mass L σ22 * ω Isect Asect mass L η L * (sinh * - (* :

ω Isect Asect mass L φ43 1 ω Isect Asect mass L σ1 ω Isect Asect mass L σ21 * ω Isect Asect mass L σ2 ω Isect Asect mass L σ11 * + (/ ω Isect Asect mass L σ2 ω Isect Asect mass L σ12 ω Isect Asect mass L θ L * (sin * * ω Isect Asect mass L σ1 ω Isect Asect mass L σ22 * ω Isect Asect mass L η L * (sinh * + (* :

ω Isect Asect mass L φ44 1 ω Isect Asect mass L σ12 ω Isect Asect mass L σ22 + (/ ω Isect Asect mass L σ12 ω Isect Asect mass L θ L * ((cos * ω Isect Asect mass L σ22 ω Isect Asect mass L η L * ((cosh * + (* :

added eval here

ω Φ ω Isect Asect mass L φ11 ω Isect Asect mass L φ12 ω Isect Asect mass L φ13 ω Isect Asect mass L φ14 ω Isect Asect mass L φ21 ω Isect Asect mass L φ22 ω Isect Asect mass L φ23 ω Isect Asect mass L φ24 ω Isect Asect mass L φ31 ω Isect Asect mass L φ32 ω Isect Asect mass L φ33 ω Isect Asect mass L φ34 ω Isect Asect mass L φ41 ω Isect Asect mass L φ42 ω Isect Asect mass L φ43 ω Isect Asect mass L φ44 44 mat eval :

ω detZ ω Isect Asect mass L φ31 ω Isect Asect mass L φ42 * ω Isect Asect mass L φ32 ω Isect Asect mass L φ41 * - eval :

1 F a NR MI h εx εy 14 mat 25105 -^a UnitsOf * 103 -^a UnitsOf * 103 -^a F UnitsOf * 14 mat : x a : iter 1 MI range Fx x F : abs εy > x' x h Fx * x h + F Fx - / - eval : x x' - abs εx > x x' : break if 21 line break if for x 41 line :

k 18 range Ω k el x detZ 20 k * kHz * NR : for

Ω detZ vectorize kg kHz * GW * / normi 2.4508 106 -^*

s 0 > s kHz * detZ kg kHz * GW * / if

Ω kHz 13.7131 32.8356 55.3997 78.9188 102.4893 125.3542 146.9698 162.0383 81 mat

s 0 > s kHz * detZ kg kHz * GW * / if Ω kHz / Ω detZ vectorize kg kHz * GW * / o augment 2 1 sys x Z