Changeset View

Standalone View

	/*			/*
	* Copyright (c) 1993 Martin Birgmeier			* Copyright (c) 1993 Martin Birgmeier
	* All rights reserved.			* All rights reserved.
	*			*
	* You may redistribute unmodified or modified versions of this source			* You may redistribute unmodified or modified versions of this source
	* code provided that the above copyright notice and this and the			* code provided that the above copyright notice and this and the
	* following conditions are retained.			* following conditions are retained.
	*			*
	* This software is provided ``as is'', and comes with no warranties			* This software is provided ``as is'', and comes with no warranties
	* of any kind. I shall in no event be liable for anything that happens			* of any kind. I shall in no event be liable for anything that happens
	* to anyone/anything when using this software.			* to anyone/anything when using this software.
	*/			*/

	#include "rand48.h"			#include "rand48.h"

	extern unsigned short _rand48_seed[3];
	extern unsigned short _rand48_mult[3];
	extern unsigned short _rand48_add;

	void			void
	lcong48(unsigned short p[7])			lcong48(unsigned short p[7])
	{			{
	_rand48_seed[0] = p[0];			LOADRAND48(_rand48_seed, &p[0]);
	_rand48_seed[1] = p[1];			LOADRAND48(_rand48_mult, &p[3]);
	_rand48_seed[2] = p[2];
	_rand48_mult[0] = p[3];
	_rand48_mult[1] = p[4];
	_rand48_mult[2] = p[5];
	_rand48_add = p[6];			_rand48_add = p[6];
	}			}