simplyx.m

来自「利用matalab编制的转子动力学计算软件。其中模型利用有限元建模」· M 代码 · 共 31 行

global nn
TITLE=[' simplex  ']; 
 
%>>>>>>> nn must be specified elsewhere
NODES = [ 0:nn ]/nn;
 N_NODES=length(NODES);
for q=1:N_NODES-1, 
  ELEMENTS(q,:)=[q q+1 5e-2 0 1]; 
end

MATERIALS = [ ...
 2.15e+011 7800  0.3 
 ]; 
 
 DISCS = [ ...
 ]; 
 
 SPRINGS = [ ... 
 ]; 
 
 DASHPOTS= [ ... 
 ]; 
 
 
BCNodeDir=[1.1 1.3 nn+1+.1 nn+1+.3];
 
  
% |======================================================================== 
FORCE_NODE=[]; FORCE_DIR=[]; RESP_NODE=[]; RESP_DIR=[];