[BACK]Return to dp.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / builtin

Diff for /OpenXM_contrib2/asir2000/builtin/dp.c between version 1.1 and 1.2

version 1.1, 1999/12/03 07:39:07 version 1.2, 2000/04/13 06:01:01
Line 1 
Line 1 
 /* $OpenXM: OpenXM/src/asir99/builtin/dp.c,v 1.1.1.1 1999/11/10 08:12:25 noro Exp $ */  /* $OpenXM: OpenXM_contrib2/asir2000/builtin/dp.c,v 1.1.1.1 1999/12/03 07:39:07 noro Exp $ */
 #include "ca.h"  #include "ca.h"
 #include "base.h"  #include "base.h"
 #include "parse.h"  #include "parse.h"
Line 1210  DP *rp;
Line 1210  DP *rp;
         NEWDL(d,n); d->td = d1->td - d2->td;          NEWDL(d,n); d->td = d1->td - d2->td;
         for ( i = 0; i < n; i++ )          for ( i = 0; i < n; i++ )
                 d->d[i] = d1->d[i]-d2->d[i];                  d->d[i] = d1->d[i]-d2->d[i];
         NEWMP(m); m->dl = d; m->c = (P)ONE; NEXT(m) = 0; MKDP(n,m,s); s->sugar = d->td;          NEWMP(m); m->dl = d; m->c = (P)ONE; NEXT(m) = 0;
           MKDP(n,m,s); s->sugar = d->td;
           *rp = s;
   }
   
   void dltod(d,n,rp)
   DL d;
   int n;
   DP *rp;
   {
           MP m;
           DP s;
   
           NEWMP(m); m->dl = d; m->c = (P)ONE; NEXT(m) = 0;
           MKDP(n,m,s); s->sugar = d->td;
         *rp = s;          *rp = s;
 }  }
   
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>