<APP>Apolonio_PLC</APP>
<AUX>
_escala_=42.575203
_Ox_=-67
_Oy_=-50
_nNOG_=65
_pasos_=1
</AUX>
<CONSTRUCTION>
'P_101:=newCnstrGCtrl('','',-8.984992,-1.579778,'',gris_descartes,2,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.000000 ¦ '' ¦ '' ¦ 0.000000
'P_102:=newCnstrGCtrl('','',9.305884,-1.65383,'',gris_descartes,2,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.000000 ¦ '' ¦ '' ¦ 0.000000
'P_103:=newCnstrGCtrl('','',0.6742742521393262,0.9506448034229219,'',fuerte,3,'(ver>=0)')' ¦ 'fuerte' ¦ 3.000000 ¦ '' ¦ '' ¦ 0.000000
'P_104:=newCnstrGCtrl('','',4.275414,2.077075,'',morado,2,'(ver>=0)')' ¦ 'morado' ¦ 2.000000 ¦ '' ¦ '' ¦ 0.000000
'P_105:=newCnstrGCtrl('','',-9.922985,-5.948854,'',gris_descartes,2,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.000000 ¦ '' ¦ '' ¦ 0.000000
'P_106:=newCnstrGCtrl('','',-8.787519,-5.948854,'',gris_descartes,2,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.000000 ¦ '' ¦ '' ¦ 0.000000
'L_109:=newS(P_105,P_106,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'C_110:=newCircleSC2D(L_109,P_104,fuerte,2,'(ver>=0)')' ¦ 'fuerte' ¦ 2.000000 ¦ '' ¦ '' ¦ 0.000000
'L_113:=newLine2D(P_101,P_102,fuerte,2,'(ver>=0)')' ¦ 'fuerte' ¦ 2.000000 ¦ '' ¦ '' ¦ 0.000000
'L_116:=newPerp2D(L_113,P_103,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'L_119:=newPerp2D(L_113,P_104,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_120:=newMeetLL2D('','',L_113,L_119,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_121:=newMeetLL2D('','',L_113,L_116,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'C_122:=newCircleSC2D(L_109,P_120,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_123:=newFirstMeetLC2D('','',L_119,C_122,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_124:=newSecondMeetLC2D('','',L_119,C_122,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_127:=newLine2D(P_124,P_121,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'L_130:=newLine2D(P_104,P_103,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_131:=newMeetLL2D('','',L_127,L_130,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_134:=newPerp2D(L_113,P_131,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'C_135:=newCircleCP2D(P_124,P_104,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'L_138:=newParal2D(L_113,P_104,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'L_141:=newParal2D(L_113,P_124,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_142:=newFirstMeetLC2D('','',L_141,C_135,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_143:=newSecondMeetLC2D('','',L_141,C_135,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_146:=newPerp2D(L_141,P_143,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_147:=newMeetLL2D('','',L_138,L_146,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_150:=newS(P_103,P_121,azul_descartes,2,'(ver>=0)')' ¦ 'azul_descartes' ¦ 4.000000 ¦ '' ¦ '' ¦ 0.000000
'C_151:=newCircleSC2D(L_150,P_124,azul_descartes,1,'(ver>=0)')' ¦ 'azul_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_152:=newFirstMeetLC2D('','',L_141,C_151,'(ver>=0)')' ¦ 'azul_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_153:=newSecondMeetLC2D('','',L_141,C_151,'(ver>=0)')' ¦ 'azul_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_156:=newLine2D(P_147,P_153,azul_descartes,1,'(ver>=0)')' ¦ 'azul_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_157:=newMeetLL2D('','',L_119,L_156,'(ver>=0)')' ¦ 'azul_descartes' ¦ 3.500000 ¦ '' ¦ '' ¦ 0.000000
'L_160:=newParal2D(L_113,P_157,gris_descartes,1,'(ver>=0)')' ¦ 'gris_descartes' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_161:=newMeetLL2D('','',L_146,L_160,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_162:=newMidPoint('','',P_143,P_161,'(ver>=0)')' ¦ 'gris_descartes' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_165:=newS(P_162,P_161,rosa,2,'(ver>=0)')' ¦ 'rosa' ¦ 4.000000 ¦ '' ¦ '' ¦ 0.000000
'P_166:=newMeetLL2D('','',L_134,L_141,'(ver>=0)')' ¦ 'morado' ¦ 3.000000 ¦ '' ¦ '' ¦ 0.000000
'L_169:=newMediatrix2D(P_166,P_104,morado,1,'(ver>=0)')' ¦ 'morado' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_170:=newMeetLL2D('','',L_113,L_134,'(ver>=0)')' ¦ 'turquesa' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_173:=newMediatrix2D(P_170,P_103,turquesa,1,'(ver>=0)')' ¦ 'turquesa' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_174:=newMeetLL2D('','',L_134,L_173,'(ver>=0)')' ¦ 'turquesa' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_175:=newMeetLL2D('','',L_134,L_169,'(ver>=0)')' ¦ 'morado' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_178:=newS(P_174,P_170,verde,2,'(ver>=0)')' ¦ 'verde' ¦ 4.000000 ¦ '' ¦ '' ¦ 0.000000
'C_179:=newCircleSC2D(L_178,P_175,verde,1,'(ver>=0)')' ¦ 'verde' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_180:=newMeetLL2D('','',L_134,L_178,'(ver>=0)')' ¦ 'verde' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_181:=newMeetLL2D('','',L_134,L_178,'(ver>=0)')' ¦ 'verde' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_182:=newFirstMeetLC2D('','',L_134,C_179,'(ver>=0)')' ¦ 'verde' ¦ 3.000000 ¦ '' ¦ '' ¦ 0.000000
'P_183:=newSecondMeetLC2D('','',L_134,C_179,'(ver>=0)')' ¦ 'verde' ¦ 3.000000 ¦ '' ¦ '' ¦ 0.000000
'C_184:=newCircleSC2D(L_165,P_183,verde,1,'(ver>=0)')' ¦ 'rosa' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_185:=newFirstMeetLC2D('','',L_134,C_184,'(ver>=0)')' ¦ 'rosa' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_186:=newSecondMeetLC2D('','',L_134,C_184,'(ver>=0)')' ¦ 'rosa' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_187:=newMidPoint('','',P_185,P_170,'(ver>=0)')' ¦ 'morado' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'C_188:=newCircleCP2D(P_187,P_170,morado,1,'(ver>=0)')' ¦ 'morado' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'L_191:=newParal2D(L_113,P_183,naranja,1,'(ver>=0)')' ¦ 'naranja' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_192:=newFirstMeetLC2D('','',L_191,C_188,'(ver>=0)')' ¦ 'naranja' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_193:=newSecondMeetLC2D('','',L_191,C_188,'(ver>=0)')' ¦ 'naranja' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'C_194:=newCircleCP2D(P_193,P_183,naranja,1,'(ver>=0)')' ¦ 'naranja' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_195:=newFirstMeetLC2D('','',L_191,C_194,'(ver>=0)')' ¦ 'naranja' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'P_196:=newSecondMeetLC2D('','',L_191,C_194,'(ver>=0)')' ¦ 'naranja' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_199:=newPerp2D(L_113,P_196,naranja,1,'(ver>=0)')' ¦ 'naranja' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_200:=newMeetLL2D('','',L_113,L_199,'(ver>=0)')' ¦ 'naranja' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'L_203:=newMediatrix2D(P_103,P_200,naranja,3,'(ver>=0)')' ¦ 'naranja' ¦ 1.000000 ¦ '' ¦ '' ¦ 0.000000
'P_204:=newMeetLL2D('','',L_199,L_203,'(ver>=0)')' ¦ 'naranja' ¦ 2.500000 ¦ '' ¦ '' ¦ 0.000000
'C_205:=newCircleCP2D(P_204,P_200,rojo,3,'(ver>=0)')' ¦ 'rojo' ¦ 3.000000 ¦ '' ¦ '' ¦ 0.000000
</CONSTRUCTION>
<PASOS>
'C_205' ¦ 'He aquí una solución (parcial) del caso PLC. Como puede verse la construcción es muy complicada. En realidad lo que se hace es encontrar el centro de la circunferencia deseada como la intersección de dos parábolas. Una de ellas tiene vértice en el punto dado y su directriz es la recta dada. La otra tiene vértice en el centro de la circunferencia dada y su directriz es paralela a la recta dada, más alejada del centro de la circunferencia por una distancia igual a su radio. La construcción geométrica que se muestra aquí equivale a encontrar uno de los puntos de intersección de esas parábolas.' 
</PASOS>

<COLOCULT>
1.000000 ¦ 0.000000 ¦ 1.000000 ¦ 0.000000 ¦ 1.000000 ¦ 1.000000 ¦ 1.000000 ¦ 1.000000 ¦ 1.000000 ¦ 0.000000
</COLOCULT>