28 lines
728 B
Matlab
28 lines
728 B
Matlab
function B = MatrixB( ie )
|
|
% 셕炬데禱돨壇긴앤黎B
|
|
% 渴흙꽝鑒:
|
|
% ie ---- 데禱뵀
|
|
% 럿쀼令:
|
|
% B ---- 데禱壇긴앤黎
|
|
global gNode gElement
|
|
xi = gNode( gElement( ie, 1 ), 1 ) ;
|
|
yi = gNode( gElement( ie, 1 ), 2 ) ;
|
|
xj = gNode( gElement( ie, 2 ), 1 ) ;
|
|
yj = gNode( gElement( ie, 2 ), 2 ) ;
|
|
xm = gNode( gElement( ie, 3 ), 1 ) ;
|
|
ym = gNode( gElement( ie, 3 ), 2 ) ;
|
|
ai = xj*ym - xm*yj ;
|
|
aj = xm*yi - xi*ym ;
|
|
am = xi*yj - xj*yi ;
|
|
bi = yj - ym ;
|
|
bj = ym - yi ;
|
|
bm = yi - yj ;
|
|
ci = -(xj-xm) ;
|
|
cj = -(xm-xi) ;
|
|
cm = -(xi-xj) ;
|
|
area = abs((ai+aj+am)/2) ;
|
|
B = [bi 0 bj 0 bm 0
|
|
0 ci 0 cj 0 cm
|
|
ci bi cj bj cm bm] ;
|
|
B = B/2/area ;
|
|
return |