head	1.2;
access;
symbols
	r0_10:1.2
	Eglin_alpha_1:1.2;
locks; strict;
comment	@# @;


1.2
date	93.05.27.11.41.03;	author thoth;	state Exp;
branches;
next	1.1;

1.1
date	93.05.26.17.16.30;	author thoth;	state Exp;
branches;
next	;


desc
@meta-definition of float convolutions.
@


1.2
log
@Copyright Notices
@
text
@#
#	Copyright 1993, Center for Computer Vision and Visualization,
#	University of Florida.  All rights reserved.
#

#
# $Log:	float-convolutions.desc,v $
# Revision 1.1  93/05/26  17:16:30  thoth
# Initial revision
# 
# 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
# 

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

float addmax_product float float  zero=-infinity()
init:	RTYPE	a=ZERO;
accum:	register IBTYPE ival = IVAL; if (ival == ZERO) continue; RTYPE temp = ival+TVAL; if (temp > a) a = temp;
accvar:	RTYPE temp = IVAL+TVAL; if (temp > a) a = temp;
final:	IRESULT = a;

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


1.1
log
@Initial revision
@
text
@d2 9
a10 1
# $Log:	int-convolutions.desc,v $
@
