FProcecad, Version=1.0.2344.40701, Culture=neutral, PublicKeyToken=nullMemopilot.pcDocumento PlantillaCapasListadoMemopilot.pcPlantillaMemopilot.pcCapa[]  +{\rtf1\ansi\ansicpg1252\deff0\deflang8202{\fonttbl{\f0\fnil\fcharset0 Arial;}{\f1\fnil\fcharset0 Courier New;}} {\colortbl ;\red0\green0\blue139;\red0\green0\blue0;\red255\green0\blue0;} \viewkind4\uc1\pard\qr\cf1\fs16 -DIBUJO DEL MARCO VISIBLE\par \pard\cf2\b PROCEDIMIENTO:\par \cf1\b0 -ubicaci\'f3n de puntos\cf3\fs20\par \cf2\f1 sim = PuntoXY( -5/-122)\cf1\f0\fs16\par \cf2\f1\fs20 sdm = PuntoXY( 191/-122)\cf1\f0\fs16\par \cf2\f1\fs20 idm = PuntoXY( 191/122)\cf1\f0\fs16\par \cf2\f1\fs20 iim = PuntoXY( -5/122)\par \cf1\f0\fs16 -dibujo de segmentos\cf2\f1\fs20\par msup = Segmento( sim / sdm /L2)\par mder = Segmento( sdm / idm /L2)\par minf = Segmento( idm / iim /L2)\par mizq = Segmento( iim / sim /L2)\par \cf1\f0\fs16\par \pard\qr -DIBUJO DE LA L\'cdNEA DE TIERRA Y ORIGEN\par \pard -l\'ednea de tierra\cf2\b\par \b0\f1\fs20 LTizq = PuntoXY( 0/0)\cf1\f0\fs16\par \cf2\f1\fs20 LTder = PuntoXY( 186/0)\cf1\f0\fs16\par \cf2\f1\fs20 LT = Segmento( LTder / LTizq /L2)\par \cf1\f0\fs16 -origen\cf2\f1\fs20\par Osup = PuntoXY( 0/-5)\cf1\f0\fs16\par \cf2\f1\fs20 Oinf = PuntoXY( 0/5)\par LTo = Segmento( Osup / Oinf /L2)\par \par \pard\qr\cf1\f0\fs16 -DIBUJO DEL \'c1REA \'daTIL DE TRABAJO\cf2\f1\fs20\par \pard\cf1\f0\fs16 -ubicaci\'f3n de puntos\par \cf2\f1\fs20 si = PuntoXY( 0/-117)\cf1\f0\fs16\par \cf2\f1\fs20 sd = PuntoXY( 186/-117)\cf1\f0\fs16\par \cf2\f1\fs20 id = PuntoXY( 186/117)\cf1\f0\fs16\par \cf2\f1\fs20 ii = PuntoXY( 0/117)\par \cf1\f0\fs16 -dibujo de segmentos\par \cf2\f1\fs20 superior = Segmento( si / sd )\par derecho = Segmento( sd / id )\par inferior = Segmento( id / ii )\par izquierdo = Segmento( ii / si )\par \cf1\f0\fs16 -----------------------------------------------------------------------------------------FIN DEL FORMATO\cf2\f1\fs20\par \pard\qr\cf1\f0\fs16 -cilindro_rr_seccion-060615\par -Definir la secci\'f3n que produce el plano (beta) en un cilindro de 100 mms de altura, con base en el plano horizontal de proyecci\'f3n, y directriz de 70 mms de di\'e1metro, centrada en O(130;50;O).\par -beta[A(10;0;0), B(186;0;117), C(100;117;0)\par \par -REPRESENTACI\'d3N DEL CILINDRO\par \pard\cf2\b L1:\par \cf1\b0 -plano (beta)\par \cf2\f1\fs20 A= PuntoXY( 10/0)\cf1\f0\fs16\par \cf2\f1\fs20 B= PuntoXY( 186/-117)\par C= PuntoXY( 100/117)\par betav= Segmento( A / B /L2)\par betah= Segmento( A / C/L2 )\par \cf1\f0\fs16 -cilindro\cf2\b\par L1T:\cf1\b0\par \cf2\f1\fs20 O=PuntoXYZ(130/50/0)\par Oh/Ov=DobleProyeccionPunto(O)\cf1\f0\fs16\par \cf2\f1\fs20 Op=Segmento(Oh/Ov/L1)\par radio= Magnitud(35)\par altura=Magnitud(100)\par Cir=CircCentroRadio(Oh/radio/L3)\par \b\f0\fs16 PROCEDIMIENTO:\cf1\b0\par \cf2\f1\fs20 par = Paralela( Oh / LT )\par S / SS = InterseccionRectaConica( par / Cir/L1 )\par perp = Perpendicular( S / LT )\par perp0 = Perpendicular( SS / LT )\par I = InterseccionRectas( perp / LT )\par I0 = InterseccionRectas( perp0 / LT )\par Pdist = GP_DistanciaSobreRecta( altura / I / perp / sd )\par par0 = Paralela( Pdist / LT )\par I1 = InterseccionRectas( par0 / perp0 )\par \b\f0\fs16 L1:\par \b0\f1\fs20 AB = Segmento( S / Pdist )\par AB0 = Segmento( Pdist / I1 )\par AB1 = Segmento( SS / I1 )\par I2 = InterseccionRectas( Op / AB0 )\par AB2 = Segmento( Ov / I2/EJE)\par AB3 = Segmento( S / SS /EJE)\par \cf1\f0\fs16 -(O2)\par \cf2\b PROCEDIMIENTO:\par \b0\f1\fs20 I3 = InterseccionRectas( par / betah )\par perp1 = Perpendicular( I3 / LT )\par I4 = InterseccionRectas( perp1 / LT )\par par1 = Paralela( I4 / betav )\par O2v= InterseccionRectas( par1 / AB2/L1T )\par \b\f0\fs16 L1:\cf1\b0\par \cf2\f1\fs20 AB4 = Segmento( O2v / I4 )\par AB5 = Segmento( I4 / I3 )\par AB6 = Segmento( I3 / S )\par ah= Perpendicular( Oh / betah/PROCEDIMIENTO )\par I5 = InterseccionRectas( ah / betah )\par S0 / SS0 = InterseccionRectaConica( ah / Cir )\par AB7 = Segmento( S0 / I5 /EJE)\par perp2 = Perpendicular( I5 / LT /PROCEDIMIENTO)\par I6 = InterseccionRectas( perp2 / LT )\par mv= SemiRecta2Pts( I6 / O2v/PROCEDIMIENTO )\par AB8 = Segmento( I5 / I6 )\par perp3 = Perpendicular( SS0 / LT/PROCEDIMIENTO )\par perp4 = Perpendicular( S0 / LT /PROCEDIMIENTO)\par I7 = InterseccionRectas( perp3 / mv )\par I8 = InterseccionRectas( perp4 / mv )\par AB9 = Segmento( SS0 / I7 )\par AB10 = Segmento( S0 / I8 )\par AB11 = Segmento( I6 / I8 /EJE)\par par2 = Paralela( Oh / betah/PROCEDIMIENTO)\par S1 / SS1 = InterseccionRectaConica( par2 / Cir )\par AB12 = Segmento( SS1 / S1/eje )\par perp5 = Perpendicular( SS1 / LT/PROCEDIMIENTO )\par perp6 = Perpendicular( S1 / LT /PROCEDIMIENTO)\par par3 = Paralela( O2v / LT /PROCEDIMIENTO)\par I9 = InterseccionRectas( perp5 / par3 )\par I10 = InterseccionRectas( perp6 / par3 )\par AB13 = Segmento( I9 / I10 /EJE)\par AB110 = Segmento( SS1 / I9 )\par AB111 = Segmento( S1 / I10 )\par I11 = InterseccionRectas( perp / par1 )\par I12 = InterseccionRectas( perp0 / par1 )\par \cf1\f0\fs16 -seccion vertical\cf2\f1\fs20\par \b\f0\fs16 L3:\par \b0\f1\fs20 Elip = ElipseCentroEjes( O2v / I10 / I8 )\par AB14 = Segmento( I11 / I )\par AB15 = Segmento( I / I0 )\par AB16 = Segmento( I12 / I0 )\par } Memopilot.pcPlantilla UnidadesOrigenOrigenXOrigenYAnguloXAnguloYAnguloZ DeformacionX DeformacionY DeformacionZ EscalaDibujoEscalaRealidad DibujarEscalaUnidadesDibujoMemopilot.pcMotor+Unidades Memopilot.pcMotor+UnidadesMemopilot.pcMotor+Unidadesvalue__ ACB4C???tCwCMemopilot.pcCapa              TSystem.Drawing, Version=1.0.5000.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3aMemopilot.pcCapaLapizVisibleBorrableLeyendaNombreFuentePublicaMemopilot.PcPenSystem.Drawing.Font  PLANTILLA   DATOS   !"PROCEDIMIENTOS #  $% RESULTADOS &  '( REFERENCIA )  *+_TEMP , -._OUT / 01_IN 2 34L2 5 67OCULTA 8 9: PROCEDIMIENTO ; <=95 > ?@10 A BC80 D EFL1T G HIL1 J KLL3 M NOEJE PMemopilot.PcPenColor DashStyleWidthSystem.Drawing.Color"System.Drawing.Drawing2D.DashStyle System.Drawing.Colorvalue knownColorstatename # "System.Drawing.Drawing2D.DashStylevalue__System.Drawing.FontNameSizeStyleUnit System.Drawing.FontStyleSystem.Drawing.GraphicsUnitSArialASystem.Drawing.FontStylevalue__System.Drawing.GraphicsUnitvalue__O ? XArialA!4 ?#]ArialA$# @&bArialA'_ ?)gArialA*! ?,lArialA- @/qArialA0% @2vArialA3# @5{ArialA6# ?8ArialA~9} |?;ArialAzy<x' w?>ArialAut?s' r?AArialApoBn' m?DArialAkjEi# h?GArialAfeHd# c?JArialAa`K_# ^@@MArialA\[NZ# Y?PArialAWV