매틀랩을 이용한 고체 전단력선도 굽힘모멘트선도 처짐곡선 프로그램

소개글

매틀랩을 이용한 고체 전단력선도 굽힘모멘트선도 처짐곡선 프로그램에 대한 보고서 자료입니다.

본문내용

value')==1 %단순지지보
subplot(3,2,5)
set(gca,'color','w')
title('보 그림','fontweight','bold','fontsize',11)
axis([-L/5,L+L/5,-h*5,h*5])
line([0,L],[h/2,h/2])%보
line([0,L],[-h/2,-h/2])
line([0,0],[-h/2,h/2])
line([L,L],[-h/2,h/2])
line([a,a],[h/2,4*h])%화살표
line([a,a-L/50],[h/2,2*h])
line([a,a+L/50],[h/2,2*h])
line([0,L/20],[-h/2,-3*h])%왼쪽 지지대
line([0,-L/20],[-h/2,-3*h])%왼쪽 지지대
line([-L/10,L/10],[-3*h,-3*h])%바닥
line([L,L+L/20],[-h/2,-3*h])%왼쪽 지지대
line([L,L-L/20],[-h/2,-3*h])%왼쪽 지지대
line([L-L/10,L+L/10],[-3*h,-3*h])%바닥
line([0,-L/50],[-3*h,-4*h])%오른쪽 빗금
line([-L/50*2,-L/50*3],[-3*h,-4*h])
line([-L/50*4,-L/50*5],[-3*h,-4*h])
line([L/50*2,L/50],[-3*h,-4*h])
line([L/50*4,L/50*3],[-3*h,-4*h])
line([L,L-L/50],[-3*h,-4*h])%왼쪽 빗금
line([L-L/50*2,L-L/50*3],[-3*h,-4*h])
line([L-L/50*4,L-L/50*5],[-3*h,-4*h])
line([L+L/50*2,L+L/50],[-3*h,-4*h])
line([L+L/50*4,L+L/50*3],[-3*h,-4*h])
elseif get(beam(2),'value')==1 %단순지지보
subplot(3,2,5)
set(gca,'color','w')
title('보 그림','fontweight','bold','fontsize',11)
axis([-L/5,L+L/5,-h*5,h*5])
line([0,L],[h/2,h/2])%보
line([0,L],[-h/2,-h/2])
line([0,0],[-h*3,h*3])
line([L,L],[-h/2,h/2])
line([a,a],[h/2,4*h])%화살표축
line([a,a-L/50],[h/2,2*h])
line([a,a+L/50],[h/2,2*h])
line([0,-L/20],[0,-h])%강체
line([0,-L/20],[-h,-h*2])
line([0,-L/20],[-h*2,-h*3])
line([0,-L/20],[h,0])
line([0,-L/20],[h*2,h])
line([0,-L/20],[h*3,h*2])
elseif get(beam(3),'value')==1 %양단고정보
subplot(3,2,5)
set(gca,'color','w')
title('보 그림','fontweight','bold','fontsize',11)
axis([-L/5,L+L/5,-h*5,h*5])
line([0,L],[h/2,h/2])%보
line([0,L],[-h/2,-h/2])
line([0,0],[-h*3,h*3])
line([L,L],[-h*3,h*3])
line([a,a],[h/2,4*h])%화살표
line([a,a-L/50],[h/2,2*h])
line([a,a+L/50],[h/2,2*h])
line([0,-L/20],[0,-h])%외쪽강체
line([0,-L/20],[-h,-h*2])
line([0,-L/20],[-h*2,-h*3])
line([0,-L/20],[h,0])
line([0,-L/20],[h*2,h])
line([0,-L/20],[h*3,h*2])
line([L,L+L/20],[-h,0])%오른쪽강체
line([L,L+L/20],[-h*2,-h])
line([L,L+L/20],[-h*3,-h*2])
line([L,L+L/20],[0,h])
line([L,L+L/20],[h,h*2])
line([L,L+L/20],[h*2,h*3])
end
end
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 배 타 적 선 택 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function exchoice1(state1)
global beam
state_max1=length(beam);
if get( beam(state1),'value')==1
set( beam([1:(state1-1),(state1+1):state_max1]),'value',0);
end
function exchoice2(state2)
global section Q T
state_max2=length(section);
if get( section(state2),'value')==1
set( section([1:(state2-1),(state2+1):state_max2]),'value',0);
if get( section(1),'value')==1
set(T(1),'visible','on')
set(T(2),'visible','on')
set(T(3),'visible','on')
set(T(4),'visible','off')
set(Q(5),'visible','on')
set(Q(5),'enable','on')
elseif get( section(2),'value')==1
set(T(1),'visible','off')
set(T(2),'visible','off')
set(T(3),'visible','off')
set(T(4),'visible','on')
set(T(5),'visible','off')
set(Q(5),'visible','off')
set(Q(5),'enable','off')
end
end
function exchoice3(state3)
global materials
state_max3=length(materials);
if get( materials(state3),'value')==1
set( materials([1:(state3-1),(state3+1):state_max3]),'value',0);
end

키워드

매틀랩,   고체,   프로젝트,   수치해석,   프로그램,   보처짐,   매틀랩코딩