src/.svn/text-base/sub.C.svn-base

   1 /* Divisor subtraction */
   2
   3 #if HAVE_CONFIG_H
   4 #include <config.h>
   5 #endif
   6
   7 #include <g2hec_Genus2_ops.h>
   8
   9 NS_G2_START_IMPL
  10
  11 bool_t sub(divisor& x, const divisor& a, const divisor& b)
  12 {
  13   divisor c;
  14   return ( dnegate(c, b) && add(x, a, c) );
  15 }
  16
  17 NS_G2_END_IMPL