view src/samer/maths/random/Ternary.java @ 0:bf79fb79ee13

Initial Mercurial check in.

/*
 *	Copyright (c) 2000, Samer Abdallah, King's College London.
 *	All rights reserved.
 *
 *	This software is provided AS iS and WITHOUT ANY WARRANTY; 
 *	without even the implied warranty of MERCHANTABILITY or 
 *	FITNESS FOR A PARTICULAR PURPOSE.
 */

package samer.maths.random;
import  samer.core.types.*;

public class Ternary extends BaseRandom
{
	VDouble	p = new VDouble("p",0.5);

	public void dispose() { p.dispose(); }
	public double next() { 
		double r=rnd.nextDouble();
		if (r>=p.value) return 0;
		if (r<p.value/2) return -1;
		return 1;
	}
}