Pregunta

Pregunta

Quiero sombrear de la siguiente manera.

ingrese la descripción de la imagen aquí

Sin embargo, mi código a continuación produce un resultado inesperado como el siguiente.

ingrese la descripción de la imagen aquí

\documentclass[pstricks,border=12pt,12pt]{standalone}
\usepackage{pst-eucl}

\begin{document}
\begin{pspicture}[dimen=m](-1,-1)(11,11)
    \pstGeonode[PosAngle={-135,-45,45,135,180,90}]
        (0,0){A}
        (10,0){B}
        (10,10){C}
        (0,10){D}
        (0,5){M}
        (5,10){N}
    \psframe(10,10)
    \psarcn(A){10}{90}{0}
    \psarcn(M){5}{90}{-90}
    \psarcn(N){5}{0}{180}
    \pstInterCC[RadiusA=\pstDistVal{10},RadiusB=\pstDistVal{5}]{A}{}{N}{}{P1}{P2}
    \pstInterCC[RadiusA=\pstDistVal{5},RadiusB=\pstDistVal{5}]{M}{}{N}{}{P3}{P4}
    \pscustom[fillstyle=solid,fillcolor=gray]
    {
        \psarcn[origin=M](M){5}{(D)}{(P4)}
        \psarc[origin=N](N){5}{(P4)}{(P2)}
        \psarc[origin=O](O){10}{(P2)}{(D)}
        \closepath
    }
\end{pspicture}
\end{document}

Pregunta

No puedo encontrar al culpable, ¿y tú?

Respuesta1

Utilice la sintaxis pst-eucl para la curva personalizada. Tenga en cuenta que, probablemente debido a errores de aproximación, tuve que trazar los semicírculos dos veces.

\documentclass[pstricks, svgnames, border=12pt,12pt]{standalone}
\usepackage{pst-eucl}

\begin{document}
\begin{pspicture}[dimen=m](-1,-1)(11,11)
    \pstGeonode[PosAngle={-135,-45,45,135,180,90}]
        (0,0){A}
        (10,0){B}
        (10,10){C}
        (0,10){D}
        (0,5){M}
        (5,10){N}
    \psframe(10,10)
    \psarcn(A){10}{90}{0}
    \psarcn(M){5}{90}{-90}
    \psarcn(N){5}{0}{180}
    \pstInterCC[RadiusA=\pstDistVal{10},RadiusB=\pstDistVal{5}]{A}{}{N}{}{D}{P2}%D = P1
    \pstInterCC[RadiusA=\pstDistVal{5},RadiusB=\pstDistVal{5}]{M}{}{N}{}{D}{P4}% D = P3
     \pscustom[fillstyle=solid,fillcolor=Silver!40!Lavender, linestyle=none]
     {
     \pstArcnOAB{M}{D}{P4}
     \pstArcOAB{N}{P4}{P2}
     \pstArcOAB{A}{P2}{D}
     \closepath
        }
    \psarcn(A){10}{90}{0}
    \psarcn(M){5}{90}{-90}
    \psarcn(N){5}{0}{180}
\end{pspicture}

\end{document} 

ingrese la descripción de la imagen aquí

información relacionada