#include "defs.h"



/* compute current net length */

L_INT dsum()
{
	L_INT r;
	REG DPIN dv;

	r = 0;
	for (dv = &pinvec[0]; dv < &pinvec[npins]; dv++)
		r += dv->del;
	return(r);
}