# -*-octave-*- Put Emacs into octave-mode # Numerical parameter file (PPPCantileverBeam_numpar.txt) # Generated by MTT at Mon Apr 19 06:24:08 BST 1999 # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% Version control history # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% $Id$ # %% $Log$ # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # Parameters N = 16; BeamLength = 0.58; BeamWidth = 0.05; BeamThickness = 0.005; Youngs = 1e6; Density = 1e5; Area = BeamWidth*BeamThickness; AreaMoment = (BeamThickness*BeamWidth^2)/12; EI= 58.6957 # from Reza rhoA= 0.7989 # from Reza dz = BeamLength/N; # Incremental length dm = rhoA*dz; # Incremental mass dk = EI/dz; # Incremental stiffness dr = 1e-2; # Damping