/* file arcseq1.c */
  
  #include "sctk.h"
  
  boolean arcs_equal(ARC *arc1, ARC *arc2)                  
  /***************************************************/
  /* Determines if two arcs of a network are equal.  */
  /***************************************************/
  {if ((arc1->from_node == arc2->from_node) &&
  /*      (streq(arc1->symbol,arc2->symbol)) && */
       (arc1->to_node   == arc2->to_node)) return T;
   else  return F;
  }