/* See {Tools.h} */
#include <Tools.h>

/* Last edited on 2007-02-03 23:22:30 by stolfi */

#define Tools_C_COPYRIGHT \
  "Copyright © 1999, 2007 Universidade Estadual de Campinas (UNICAMP)"

#define Tools_C_author \
  "Created by L. P. Lozada, 1999."

#include <Octf.h>
#include <OctfEnum.h>
#include <Triangulation.h>

#define _GNU_SOURCE
#include <stdio.h>

void PrtDFR(Place_t p)
  { PrintPlace(stderr, p, 5, FALSE);
    fprintf(stderr," DFR = %d\n", DegreeOfWall(p));
  }

void PrtDER(Place_t p)
  { PrintPlace(stderr, p, 5, FALSE);
    fprintf(stderr," DER = %d\n", DegreeOfEdge(p));
  }

void PrtDOV(Place_t p)
  { PrintPlace(stderr, p, 5, FALSE);
    fprintf(stderr," ");
    fprintf(stderr," DOV = %d\n", DegreeOfNode(p));
  }

void PrtNextE(Place_t p)
  { PrintPlace(stderr, p, 5, FALSE);
    fprintf(stderr, " NextE = ");
    PrintPlace(stderr, NextE(p), 5, TRUE);
  }

void PrtNextF(Place_t p)
  { PrintPlace(stderr, p, 5, FALSE);
    fprintf(stderr, " NextF = ");
    PrintPlace(stderr, NextF(p), 5, TRUE);
  }

void PrtOrgNum(Place_t p)
  { PrintPlace(stderr, p, 5, FALSE);
    fprintf(stderr," OrgV = %d\n", OrgV(p)->num);
  }
        
void PrtWallNum(Place_t p)
  { PrintPlace(stderr, p, 5, FALSE);
    fprintf(stderr, " PWall = %d\n", PWall(p)->num);
  }

void PrtEdgeNum(Place_t p)
  { PrintPlace(stderr, p, 1, FALSE);
    fprintf(stderr, " PEdge = %d\n", PEdge(p)->num);
  }

void PrtPnegNum(Place_t p)
  { PrintPlace(stderr, p, 1, FALSE);
    if (PnegP(p) != NULL)
      { fprintf(stderr, " PnegP = %d\n", PnegP(p)->num); }
    else
      { fprintf(stderr, " PnegP = NULL\n"); }
  }

void PrtPposNum(Place_t p)
  { PrintPlace(stderr, p, 1, FALSE);
    if (PposP(p)!=NULL)
      { fprintf(stderr, " PposP = %d\n", PposP(p)->num); }
    else
      { fprintf(stderr, " PposP = NULL\n"); }
  }

void PrtNextPneg(Place_t p)
  { 
    auto void PrintPnegsOfWall(Place_t q);
    
    void PrintPnegsOfWall(Place_t q)
      { Place_t h = q;
        do { PrtPnegNum(h); h = PrevE(h); } while (h != q);
      }
      
    Place_t t = p;
    PrintPnegsOfWall(t);
    do { PrintPnegsOfWall(Clock(PrevF(t))); t = PrevE(t); } while (t != p);
  }

void PrtNextPpos(Place_t p)
  { 
    auto void PrintPposOfWall(Place_t q);
    
    void PrintPposOfWall(Place_t q)
      { Place_t h = q;
        do { PrtPposNum(h); h = PrevE(h); } while (h != q);
      }

    Place_t t = p;
    PrintPposOfWall(t);
    do { PrintPposOfWall(Clock(NextF(t))); t = PrevE(t); } while (t != p);
  }