1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
# -*-octave-*- Put Emacs into octave-mode
# Numerical parameter file (pPinnedBeam_numpar.txt)
# Generated by MTT at Mon Apr 19 06:24:08 BST 1999
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% Version control history
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% $Id$
# %% $Log$
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
## Number of lumps
Lumps = 20; # Number of lumps
## Beam physical parameters
BeamLength = 0.60;
|
>
>
>
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
# -*-octave-*- Put Emacs into octave-mode
# Numerical parameter file (pPinnedBeam_numpar.txt)
# Generated by MTT at Mon Apr 19 06:24:08 BST 1999
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% Version control history
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% $Id$
# %% $Log$
# %% Revision 1.1 2000/12/28 17:59:05 peterg
# %% To RCS
# %%
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
## Number of lumps
Lumps = 20; # Number of lumps
## Beam physical parameters
BeamLength = 0.60;
|
24
25
26
27
28
29
30
|
rhoA = Density*Area;
## Segments
dz = BeamLength/Lumps; # Incremental length
dm = rhoA*dz; # Incremental mass
dk = EI/dz; # Incremental stiffness
dr = 0; # Damping
|
>
|
27
28
29
30
31
32
33
34
|
rhoA = Density*Area;
## Segments
dz = BeamLength/Lumps; # Incremental length
dm = rhoA*dz; # Incremental mass
dk = EI/dz; # Incremental stiffness
dr = 0; # Damping
|