/*
 * builtin.c
 *
 * Copyright (C) 1989, 1991, Craig E. Kolb, Rod G. Bogart
 * All rights reserved.
 *
 * This software may be freely copied, modified, and redistributed
 * provided that this copyright notice is preserved on all copies.
 *
 * You may not distribute this software, in whole or in part, as part of
 * any commercial product without the express consent of the authors.
 * 
 * There is no warranty or other guarantee of fitness of this software
 * for any purpose.  It is provided solely "as is".
 *
 * builtin.c,v 4.1 1994/08/09 08:04:20 explorer Exp
 *
 * builtin.c,v
 * Revision 4.1  1994/08/09  08:04:20  explorer
 * Bump version to 4.1
 *
 * Revision 1.1.1.1  1994/08/08  04:52:16  explorer
 * Initial import.  This is a prerelease of 4.0.6enh3, or 4.1 possibly.
 *
 * Revision 4.0  91/07/17  14:45:00  kolb
 * Initial version.
 * 
 */

#include "rayshade.h"

Float
SumExpr(a, b)
Float a, b;
{
	return a + b;
}
Float
DiffExpr(a, b)
Float a, b;
{
	return a - b;
}

Float
MultExpr(a, b)
Float a, b;
{
	return a * b;
}
Float
DivideExpr(a, b)
Float a, b;
{
	return a / b;
}

Float
ModExpr(a, b)
Float a, b;
{
	return (Float)((int)a % (int)b);
}

Float
NegateExpr(a)
Float a;
{
	return -a;
}

Float
LinearTime(starttime, startval, endtime, endval)
Float starttime, endtime, startval, endval;
{
	if (TimeExpr->value < starttime)
		return startval;
	if (TimeExpr->value > endtime)
		return endval;
	if (equal(endtime, starttime))
		return startval;
	return startval + (endval - startval) * 
		(TimeExpr->value - starttime) / (endtime - starttime);
}