\pstGeonode(5, 5){O}(14,2){M}
\pstCircleOA[Radius=\pstDistVal{4}]{O}{}
\pstMiddleAB[PointSymbol=none, PointName=none]{O}{M}{O'}
\pstInterCC[RadiusA=\pstDistVal{4}, DiameterB=\pstDistAB{O}{M},
            CodeFigB=true, CodeFigColor=magenta, PosAngleB=45]
  {O}{}{O'}{}{A}{B}
\psset{linecolor=red, linewidth=1.3\pslinewidth, nodesep=-2}
\pstLineAB{M}{A}\pstLineAB{M}{B}
