/* -*-ePiX-*- */
#include "epix.h"
using namespace ePiX;

int main()
{
  picture(P(0, 0), P(1, 0.7), "2 x 1.4in");

  begin();
  double th(M_PI_4);
  P pO(0,0), pP(cis(th)), pA(1,0), pN(pP.x1(), 0);

  bold();
  arc(pO, 1, 0, th);
  line(pO, pA);
  line(pO, pP);
  line(pN, pP);

  label(pO, P(0,-4), "$O$", b);
  label(pN, P(0,-4), "$N$", b);
  label(pA, P(0,-4), "$A$", b);

  label(pP, P(0, 2), "$P$", t);

  tikz_format();
  end();
}