tipo_de_macro=R2
id='vueltas' expresi&oacute;n='3' evaluar='una-sola-vez' constante='si'
id='L' expresi&oacute;n='0' evaluar='una-sola-vez' constante='si'
id='rabo' expresi&oacute;n='1/5' evaluar='una-sola-vez' constante='si'
id='x1' expresi&oacute;n='-1' evaluar='una-sola-vez' constante='si'
id='y1' expresi&oacute;n='0' evaluar='una-sola-vez' constante='si'
id='x2' expresi&oacute;n='1' evaluar='una-sola-vez' constante='si'
id='y2' expresi&oacute;n='0' evaluar='una-sola-vez' constante='si'
id='INIT' evaluar='una-sola-vez' algoritmo='si'
inicio='l=sqrt((x2-x1)^2+(y2-y1)^2)' hacer='ca=(x2-x1)/l;sa=(y2-y1)/l;extra=l*rabo;ancho=l/7;amp=1/(vueltas+1)' id='CALC' evaluar='siempre' algoritmo='si'
id='rojo' expresi&oacute;n='0' evaluar='una-sola-vez' constante='si'
id='verde' expresi&oacute;n='0' evaluar='una-sola-vez' constante='si'
id='azul' expresi&oacute;n='0' evaluar='una-sola-vez' constante='si'
id='A(s)' expresi&oacute;n='(s+amp*sen((vueltas+1)*pi*s)^2)/(1+amp-1/(2*(vueltas+1)))'
id='B(s)' expresi&oacute;n='sen(2*pi*(vueltas+1)*s)'
tipo='segmento' color='(rojo,verde,azul,0.0)' expresi&oacute;n='(x1,y1)(x1+extra*ca,y1+extra*sa)' tamaņo='0' 
tipo='curva' color='(rojo,verde,azul,0.0)' expresi&oacute;n='[x1+(extra+A(s)*(l-2*extra))*ca-ancho*B(s)*sa,y1+(extra+A(s)*(l-2*extra))*sa+ancho*B(s)*ca]' par&aacute;metro='s' s.intervalo='[0,1-1/(2*(vueltas+1))]' s.pasos='32*(vueltas+1)' visible='no' editable='si' 
tipo='segmento' color='(rojo,verde,azul,0.0)' expresi&oacute;n='(x2-extra*ca,y2-extra*sa)(x2,y2)' tamaņo='0' 
tipo='punto' color='(rojo,verde,azul,0.0)' expresi&oacute;n='(x1+(x2-x1)*s,y1+(y2-y1)*s)' familia='s' s.intervalo='[0,1]' s.pasos='1' 
