análise de pavimentos de edifícios de concreto armado com a ...
análise de pavimentos de edifícios de concreto armado com a ...
análise de pavimentos de edifícios de concreto armado com a ...
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
fbar2=aux1+aux2<br />
fbar=SQRT(fbar2)<br />
dfbar=(1./(SQRT(aux1+aux2)*2))*<br />
* (aux3-((4*aux2*G)/(1+(2*G*GAMA))))<br />
R2=(((((fbar*GAMA*SQRT(2./3.))+EPSTN)*HL)+PM)**2)*(1./3.)<br />
R=SQRT(R2)<br />
dR=(((1./(6*fbar))*GAMA*SQRT(6.)*(SQRT(3.)/3.))*<br />
* (((-2*AUX1)*AUX4)-(4*AUX2*G))+(1./3.)*fbar*SQRT(6.))*HL<br />
f= (0.5*fbar2)-R2<br />
df=(fbar*dfbar)-(2*(R*dR))<br />
RETURN<br />
END<br />
Apêndice 3 - Programa para a <strong>de</strong>terminação do diagrama<br />
momento-curvatura <strong>de</strong> uma seção transversal<br />
******************************************************************************************************<br />
C PROGRAMA PARA A DETERMINACAO DO DIAGRAMA MOMENTO x<br />
C CURVATURA CARACTERISTICO DE UMA SEÇÃO DE<br />
C CONCRETO ARMADO (VIGA OU LAJE)<br />
******************************************************************************************************<br />
C<br />
C Principais variáveis<br />
C Ec - módulo <strong>de</strong> elasticida<strong>de</strong> longitudinal do <strong>concreto</strong><br />
C fcm - resistência média do <strong>concreto</strong> à <strong>com</strong>pressão<br />
C fctk - resistência característica do <strong>concreto</strong> à tração<br />
C fctm - resistência média do <strong>concreto</strong> à tração na flexão<br />
C Es - módulo <strong>de</strong> elasticida<strong>de</strong> longitudinal do aço<br />
C fyk - tensão <strong>de</strong> escoamento do aço<br />
C b, h - dimensões da seção transversal<br />
C d - altura útil da seção<br />
C dl - cobrimento da armadura longitudinal <strong>de</strong> <strong>com</strong>pressão<br />
C As - armadura longitudinal <strong>de</strong> tração<br />
C Als - armadura longitudinal <strong>de</strong> <strong>com</strong>pressão<br />
C M - vetor que armazena os momentos Mr,My e Mu<br />
C curv - vetor que armazena as respectivas curvaturas<br />
C alfae - Es/Ec<br />
C ecc - <strong>de</strong>formação específica do <strong>concreto</strong> à <strong>com</strong>pressão<br />
C esc - <strong>de</strong>formação específica do aço à <strong>com</strong>pressão<br />
C est - <strong>de</strong>formação específica do aço à tração<br />
C Rcc - resultante <strong>de</strong> <strong>com</strong>pressão no <strong>concreto</strong><br />
C Rsc - resultante <strong>de</strong> tração na armadura longitudinal <strong>de</strong> tração<br />
C scc - tensão normal <strong>de</strong> <strong>com</strong>pressão no <strong>concreto</strong><br />
C xis - profundida<strong>de</strong>s da linha neutra para as diversas situações<br />
C Dr, Dy, Du - inclinações dos trechos do diagrama momento-curvatura trilinear<br />
C ky, ku - parâmetro <strong>de</strong> encruamento isótropo correspon<strong>de</strong>nte ao primeiro ou<br />
segundo trecho <strong>de</strong> encruamento<br />
INCLUDE 'FGRAPH.FI'<br />
INCLUDE 'FGRAPH.FD'<br />
INTEGER tipo<br />
REAL Ec, fcm, fctk, fctm, Es, fyk, b, h, d, dl, As, Als, M(3),<br />
* curv(3), alfae, ecc, esc, est, Rcc, Rsc, scc,