#
#	Copyright 1993, Center for Computer Vision and Visualization,
#	University of Florida.  All rights reserved.
#

#
# $Log:	int-convolutions.desc,v $
# Revision 1.3  93/05/27  11:41:13  thoth
# Copyright Notices
# 
# Revision 1.2  93/05/18  21:44:57  thoth
# New more descriptive names for standard convolutions.
# 
# Revision 1.1  93/03/18  11:23:20  thoth
# Initial revision
# 

int linear_product int int zero=0
init:	RTYPE	a = 0;
accum:	a += IVAL * TVAL;
final:	IRESULT = a;

int addmax_product int int zero=-MAXINT
init:	RTYPE	a=-MAXINT;
accum:	RTYPE temp = IVAL+TVAL; if (temp > a) a = temp;
final:	IRESULT = a;

# double addmax double double zero=-MAXDOUBLE
# init:	RTYPE	a=-MAXDOUBLE;
# accum:	RTYPE temp = IVAL+TVAL; if (temp > a) a = temp;
# final:	IRESULT = a;
#

int addmin_product int int  zero=MAXINT
init:	RTYPE	a=MAXINT;
accum:	register IBTYPE ival = IVAL; if (ival == MAXINT) continue; RTYPE temp = ival+TVAL; if (temp < a) a = temp;
accvar:	RTYPE temp = IVAL+TVAL; if (temp < a) a = temp;
final:	IRESULT = a;

# double addmin double double
# init:	RTYPE	a=MAXDOUBLE;
# accum:	RTYPE temp = IVAL+TVAL; if (temp < a) a = temp;
# final:	IRESULT = a;
#
