mcsstream.cpp

来自「随机数 基于c++的Monte Carlo源代码」· C++ 代码 · 共 59 行

/* 
   This object defines a random number stream.  An array or list of
   such streams will be defined at runtime.
*/

/*
    MCS-libre, a library to facilite Monte-Carlo simulation.
    Copyright (C) 2002  D. E. Williams

    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Lesser General Public
    License as published by the Free Software Foundation; either
    version 2.1 of the License, or (at your option) any later version.

    This library is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    Lesser General Public License for more details.

    You should have received a copy of the GNU Lesser General Public
    License along with this library; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

    The full text of the GNU Lesser General Public License is
    contained in the files COPYING and LICENSE.

    See the 'MCS-libre-HOWTO' in the 'doc' directory for author's
    contact information.  

    Have a nice day!
*/

#include "mcsStream.h"

double stream::get_new_random_value()
{
  // gets a new value and rolls stream record
  lastvalue = rng.generate_random_number(lastvalue);
  // return uniform(0,1)
  return lastvalue / rng.show_maximum();
}

void stream::set_seed(double s)
{
  seed = s;
  lastvalue = seed;
}

stream::stream(double s)
{
  set_seed(s);
}

stream::stream()
{
  set_seed(0);
}