Andreza Costa Batista.pdf - mtc-m17:80 - Inpe
Andreza Costa Batista.pdf - mtc-m17:80 - Inpe
Andreza Costa Batista.pdf - mtc-m17:80 - Inpe
- No tags were found...
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
plot(xee,yee,'-k')hold onend%%%%%%%% entortamentoan=(ye2-ye1)/2; %novos semi-eixos maioresman=abs(an); %modulo dos novos semi-eixosdetetamax=a/raio; %delta teta maximodetetan=(detetamax*an)/a; %delta teta proporcional aos novos semi-eixos maioresraion=xcee-xc; %novos raiosyctorto=yc+raion*sin(pi-detetan);xctorto=xc-raion*cos(pi-detetan);% coordenadas de x e y apos o entortamentoyctorto1=yc+raion*sin(pi+detetan);xctorto1=xc-raion*cos(pi+detetan);%%%%%%%%%%%%plotagem da circunferenciafor ycirc1=yctorto:1:yctorto1xcirc1=xc-sqrt(raion.^2-((ycirc1-yc).^2));plot(xcirc1,ycirc1,'-r')hold onendendaxis equal57