285 lines
		
	
	
		
			8.8 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
		
		
			
		
	
	
			285 lines
		
	
	
		
			8.8 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| 
								 | 
							
								/* boost random/uniform_on_sphere.hpp header file
							 | 
						||
| 
								 | 
							
								 *
							 | 
						||
| 
								 | 
							
								 * Copyright Jens Maurer 2000-2001
							 | 
						||
| 
								 | 
							
								 * Copyright Steven Watanabe 2011
							 | 
						||
| 
								 | 
							
								 * Distributed under the Boost Software License, Version 1.0. (See
							 | 
						||
| 
								 | 
							
								 * accompanying file LICENSE_1_0.txt or copy at
							 | 
						||
| 
								 | 
							
								 * http://www.boost.org/LICENSE_1_0.txt)
							 | 
						||
| 
								 | 
							
								 *
							 | 
						||
| 
								 | 
							
								 * See http://www.boost.org for most recent version including documentation.
							 | 
						||
| 
								 | 
							
								 *
							 | 
						||
| 
								 | 
							
								 * $Id$
							 | 
						||
| 
								 | 
							
								 *
							 | 
						||
| 
								 | 
							
								 * Revision history
							 | 
						||
| 
								 | 
							
								 *  2001-02-18  moved to individual header files
							 | 
						||
| 
								 | 
							
								 */
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								#ifndef BOOST_RANDOM_UNIFORM_ON_SPHERE_HPP
							 | 
						||
| 
								 | 
							
								#define BOOST_RANDOM_UNIFORM_ON_SPHERE_HPP
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								#include <vector>
							 | 
						||
| 
								 | 
							
								#include <algorithm>     // std::transform
							 | 
						||
| 
								 | 
							
								#include <functional>    // std::bind2nd, std::divides
							 | 
						||
| 
								 | 
							
								#include <boost/assert.hpp>
							 | 
						||
| 
								 | 
							
								#include <boost/random/detail/config.hpp>
							 | 
						||
| 
								 | 
							
								#include <boost/random/detail/operators.hpp>
							 | 
						||
| 
								 | 
							
								#include <boost/random/normal_distribution.hpp>
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								namespace boost {
							 | 
						||
| 
								 | 
							
								namespace random {
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								/**
							 | 
						||
| 
								 | 
							
								 * Instantiations of class template uniform_on_sphere model a
							 | 
						||
| 
								 | 
							
								 * \random_distribution. Such a distribution produces random
							 | 
						||
| 
								 | 
							
								 * numbers uniformly distributed on the unit sphere of arbitrary
							 | 
						||
| 
								 | 
							
								 * dimension @c dim. The @c Cont template parameter must be a STL-like
							 | 
						||
| 
								 | 
							
								 * container type with begin and end operations returning non-const
							 | 
						||
| 
								 | 
							
								 * ForwardIterators of type @c Cont::iterator. 
							 | 
						||
| 
								 | 
							
								 */
							 | 
						||
| 
								 | 
							
								template<class RealType = double, class Cont = std::vector<RealType> >
							 | 
						||
| 
								 | 
							
								class uniform_on_sphere
							 | 
						||
| 
								 | 
							
								{
							 | 
						||
| 
								 | 
							
								public:
							 | 
						||
| 
								 | 
							
								    typedef RealType input_type;
							 | 
						||
| 
								 | 
							
								    typedef Cont result_type;
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    class param_type
							 | 
						||
| 
								 | 
							
								    {
							 | 
						||
| 
								 | 
							
								    public:
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								        typedef uniform_on_sphere distribution_type;
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								        /**
							 | 
						||
| 
								 | 
							
								         * Constructs the parameters of a uniform_on_sphere
							 | 
						||
| 
								 | 
							
								         * distribution, given the dimension of the sphere.
							 | 
						||
| 
								 | 
							
								         */
							 | 
						||
| 
								 | 
							
								        explicit param_type(int dim_arg = 2) : _dim(dim_arg)
							 | 
						||
| 
								 | 
							
								        {
							 | 
						||
| 
								 | 
							
								            BOOST_ASSERT(_dim >= 0);
							 | 
						||
| 
								 | 
							
								        }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								        /** Returns the dimension of the sphere. */
							 | 
						||
| 
								 | 
							
								        int dim() const { return _dim; }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								        /** Writes the parameters to a @c std::ostream. */
							 | 
						||
| 
								 | 
							
								        BOOST_RANDOM_DETAIL_OSTREAM_OPERATOR(os, param_type, parm)
							 | 
						||
| 
								 | 
							
								        {
							 | 
						||
| 
								 | 
							
								            os << parm._dim;
							 | 
						||
| 
								 | 
							
								            return os;
							 | 
						||
| 
								 | 
							
								        }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								        /** Reads the parameters from a @c std::istream. */
							 | 
						||
| 
								 | 
							
								        BOOST_RANDOM_DETAIL_ISTREAM_OPERATOR(is, param_type, parm)
							 | 
						||
| 
								 | 
							
								        {
							 | 
						||
| 
								 | 
							
								            is >> parm._dim;
							 | 
						||
| 
								 | 
							
								            return is;
							 | 
						||
| 
								 | 
							
								        }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								        /** Returns true if the two sets of parameters are equal. */
							 | 
						||
| 
								 | 
							
								        BOOST_RANDOM_DETAIL_EQUALITY_OPERATOR(param_type, lhs, rhs)
							 | 
						||
| 
								 | 
							
								        { return lhs._dim == rhs._dim; }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								        /** Returns true if the two sets of parameters are different. */
							 | 
						||
| 
								 | 
							
								        BOOST_RANDOM_DETAIL_INEQUALITY_OPERATOR(param_type)
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    private:
							 | 
						||
| 
								 | 
							
								        int _dim;
							 | 
						||
| 
								 | 
							
								    };
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Constructs a @c uniform_on_sphere distribution.
							 | 
						||
| 
								 | 
							
								     * @c dim is the dimension of the sphere.
							 | 
						||
| 
								 | 
							
								     *
							 | 
						||
| 
								 | 
							
								     * Requires: dim >= 0
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    explicit uniform_on_sphere(int dim_arg = 2)
							 | 
						||
| 
								 | 
							
								      : _container(dim_arg), _dim(dim_arg) { }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Constructs a @c uniform_on_sphere distribution from its parameters.
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    explicit uniform_on_sphere(const param_type& parm)
							 | 
						||
| 
								 | 
							
								      : _container(parm.dim()), _dim(parm.dim()) { }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    // compiler-generated copy ctor and assignment operator are fine
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /** Returns the dimension of the sphere. */
							 | 
						||
| 
								 | 
							
								    int dim() const { return _dim; }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /** Returns the parameters of the distribution. */
							 | 
						||
| 
								 | 
							
								    param_type param() const { return param_type(_dim); }
							 | 
						||
| 
								 | 
							
								    /** Sets the parameters of the distribution. */
							 | 
						||
| 
								 | 
							
								    void param(const param_type& parm)
							 | 
						||
| 
								 | 
							
								    {
							 | 
						||
| 
								 | 
							
								        _dim = parm.dim();
							 | 
						||
| 
								 | 
							
								        _container.resize(_dim);
							 | 
						||
| 
								 | 
							
								    }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Returns the smallest value that the distribution can produce.
							 | 
						||
| 
								 | 
							
								     * Note that this is required to approximate the standard library's
							 | 
						||
| 
								 | 
							
								     * requirements.  The behavior is defined according to lexicographical
							 | 
						||
| 
								 | 
							
								     * comparison so that for a container type of std::vector,
							 | 
						||
| 
								 | 
							
								     * dist.min() <= x <= dist.max() where x is any value produced
							 | 
						||
| 
								 | 
							
								     * by the distribution.
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    result_type min BOOST_PREVENT_MACRO_SUBSTITUTION () const
							 | 
						||
| 
								 | 
							
								    {
							 | 
						||
| 
								 | 
							
								        result_type result(_dim);
							 | 
						||
| 
								 | 
							
								        if(_dim != 0) {
							 | 
						||
| 
								 | 
							
								            result.front() = RealType(-1.0);
							 | 
						||
| 
								 | 
							
								        }
							 | 
						||
| 
								 | 
							
								        return result;
							 | 
						||
| 
								 | 
							
								    }
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Returns the largest value that the distribution can produce.
							 | 
						||
| 
								 | 
							
								     * Note that this is required to approximate the standard library's
							 | 
						||
| 
								 | 
							
								     * requirements.  The behavior is defined according to lexicographical
							 | 
						||
| 
								 | 
							
								     * comparison so that for a container type of std::vector,
							 | 
						||
| 
								 | 
							
								     * dist.min() <= x <= dist.max() where x is any value produced
							 | 
						||
| 
								 | 
							
								     * by the distribution.
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    result_type max BOOST_PREVENT_MACRO_SUBSTITUTION () const
							 | 
						||
| 
								 | 
							
								    {
							 | 
						||
| 
								 | 
							
								        result_type result(_dim);
							 | 
						||
| 
								 | 
							
								        if(_dim != 0) {
							 | 
						||
| 
								 | 
							
								            result.front() = RealType(1.0);
							 | 
						||
| 
								 | 
							
								        }
							 | 
						||
| 
								 | 
							
								        return result;
							 | 
						||
| 
								 | 
							
								    }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Effects: Subsequent uses of the distribution do not depend
							 | 
						||
| 
								 | 
							
								     * on values produced by any engine prior to invoking reset.
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    void reset() {}
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Returns a point uniformly distributed over the surface of
							 | 
						||
| 
								 | 
							
								     * a sphere of dimension dim().
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    template<class Engine>
							 | 
						||
| 
								 | 
							
								    const result_type & operator()(Engine& eng)
							 | 
						||
| 
								 | 
							
								    {
							 | 
						||
| 
								 | 
							
								        using std::sqrt;
							 | 
						||
| 
								 | 
							
								        switch(_dim)
							 | 
						||
| 
								 | 
							
								        {
							 | 
						||
| 
								 | 
							
								        case 0: break;
							 | 
						||
| 
								 | 
							
								        case 1:
							 | 
						||
| 
								 | 
							
								            {
							 | 
						||
| 
								 | 
							
								                if(uniform_01<RealType>()(eng) < 0.5) {
							 | 
						||
| 
								 | 
							
								                    *_container.begin() = -1;
							 | 
						||
| 
								 | 
							
								                } else {
							 | 
						||
| 
								 | 
							
								                    *_container.begin() = 1;
							 | 
						||
| 
								 | 
							
								                }
							 | 
						||
| 
								 | 
							
								                break;
							 | 
						||
| 
								 | 
							
								            }
							 | 
						||
| 
								 | 
							
								        case 2:
							 | 
						||
| 
								 | 
							
								            {
							 | 
						||
| 
								 | 
							
								                uniform_01<RealType> uniform;
							 | 
						||
| 
								 | 
							
								                RealType sqsum;
							 | 
						||
| 
								 | 
							
								                RealType x, y;
							 | 
						||
| 
								 | 
							
								                do {
							 | 
						||
| 
								 | 
							
								                    x = uniform(eng) * 2 - 1;
							 | 
						||
| 
								 | 
							
								                    y = uniform(eng) * 2 - 1;
							 | 
						||
| 
								 | 
							
								                    sqsum = x*x + y*y;
							 | 
						||
| 
								 | 
							
								                } while(sqsum == 0 || sqsum > 1);
							 | 
						||
| 
								 | 
							
								                RealType mult = 1/sqrt(sqsum);
							 | 
						||
| 
								 | 
							
								                typename Cont::iterator iter = _container.begin();
							 | 
						||
| 
								 | 
							
								                *iter = x * mult;
							 | 
						||
| 
								 | 
							
								                iter++;
							 | 
						||
| 
								 | 
							
								                *iter = y * mult;
							 | 
						||
| 
								 | 
							
								                break;
							 | 
						||
| 
								 | 
							
								            }
							 | 
						||
| 
								 | 
							
								        case 3:
							 | 
						||
| 
								 | 
							
								            {
							 | 
						||
| 
								 | 
							
								                uniform_01<RealType> uniform;
							 | 
						||
| 
								 | 
							
								                RealType sqsum;
							 | 
						||
| 
								 | 
							
								                RealType x, y;
							 | 
						||
| 
								 | 
							
								                do {
							 | 
						||
| 
								 | 
							
								                    x = uniform(eng) * 2 - 1;
							 | 
						||
| 
								 | 
							
								                    y = uniform(eng) * 2 - 1;
							 | 
						||
| 
								 | 
							
								                    sqsum = x*x + y*y;
							 | 
						||
| 
								 | 
							
								                } while(sqsum > 1);
							 | 
						||
| 
								 | 
							
								                RealType mult = 2 * sqrt(1 - sqsum);
							 | 
						||
| 
								 | 
							
								                typename Cont::iterator iter = _container.begin();
							 | 
						||
| 
								 | 
							
								                *iter = x * mult;
							 | 
						||
| 
								 | 
							
								                ++iter;
							 | 
						||
| 
								 | 
							
								                *iter = y * mult;
							 | 
						||
| 
								 | 
							
								                ++iter;
							 | 
						||
| 
								 | 
							
								                *iter = 2 * sqsum - 1;
							 | 
						||
| 
								 | 
							
								                break;
							 | 
						||
| 
								 | 
							
								            }
							 | 
						||
| 
								 | 
							
								        default:
							 | 
						||
| 
								 | 
							
								            {
							 | 
						||
| 
								 | 
							
								                detail::unit_normal_distribution<RealType> normal;
							 | 
						||
| 
								 | 
							
								                RealType sqsum;
							 | 
						||
| 
								 | 
							
								                do {
							 | 
						||
| 
								 | 
							
								                    sqsum = 0;
							 | 
						||
| 
								 | 
							
								                    for(typename Cont::iterator it = _container.begin();
							 | 
						||
| 
								 | 
							
								                        it != _container.end();
							 | 
						||
| 
								 | 
							
								                        ++it) {
							 | 
						||
| 
								 | 
							
								                        RealType val = normal(eng);
							 | 
						||
| 
								 | 
							
								                        *it = val;
							 | 
						||
| 
								 | 
							
								                        sqsum += val * val;
							 | 
						||
| 
								 | 
							
								                    }
							 | 
						||
| 
								 | 
							
								                } while(sqsum == 0);
							 | 
						||
| 
								 | 
							
								                // for all i: result[i] /= sqrt(sqsum)
							 | 
						||
| 
								 | 
							
								                std::transform(_container.begin(), _container.end(), _container.begin(),
							 | 
						||
| 
								 | 
							
								                               std::bind2nd(std::multiplies<RealType>(), 1/sqrt(sqsum)));
							 | 
						||
| 
								 | 
							
								            }
							 | 
						||
| 
								 | 
							
								        }
							 | 
						||
| 
								 | 
							
								        return _container;
							 | 
						||
| 
								 | 
							
								    }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Returns a point uniformly distributed over the surface of
							 | 
						||
| 
								 | 
							
								     * a sphere of dimension param.dim().
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    template<class Engine>
							 | 
						||
| 
								 | 
							
								    result_type operator()(Engine& eng, const param_type& parm) const
							 | 
						||
| 
								 | 
							
								    {
							 | 
						||
| 
								 | 
							
								        return uniform_on_sphere(parm)(eng);
							 | 
						||
| 
								 | 
							
								    }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /** Writes the distribution to a @c std::ostream. */
							 | 
						||
| 
								 | 
							
								    BOOST_RANDOM_DETAIL_OSTREAM_OPERATOR(os, uniform_on_sphere, sd)
							 | 
						||
| 
								 | 
							
								    {
							 | 
						||
| 
								 | 
							
								        os << sd._dim;
							 | 
						||
| 
								 | 
							
								        return os;
							 | 
						||
| 
								 | 
							
								    }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /** Reads the distribution from a @c std::istream. */
							 | 
						||
| 
								 | 
							
								    BOOST_RANDOM_DETAIL_ISTREAM_OPERATOR(is, uniform_on_sphere, sd)
							 | 
						||
| 
								 | 
							
								    {
							 | 
						||
| 
								 | 
							
								        is >> sd._dim;
							 | 
						||
| 
								 | 
							
								        sd._container.resize(sd._dim);
							 | 
						||
| 
								 | 
							
								        return is;
							 | 
						||
| 
								 | 
							
								    }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Returns true if the two distributions will produce identical
							 | 
						||
| 
								 | 
							
								     * sequences of values, given equal generators.
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    BOOST_RANDOM_DETAIL_EQUALITY_OPERATOR(uniform_on_sphere, lhs, rhs)
							 | 
						||
| 
								 | 
							
								    { return lhs._dim == rhs._dim; }
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								    /**
							 | 
						||
| 
								 | 
							
								     * Returns true if the two distributions may produce different
							 | 
						||
| 
								 | 
							
								     * sequences of values, given equal generators.
							 | 
						||
| 
								 | 
							
								     */
							 | 
						||
| 
								 | 
							
								    BOOST_RANDOM_DETAIL_INEQUALITY_OPERATOR(uniform_on_sphere)
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								private:
							 | 
						||
| 
								 | 
							
								    result_type _container;
							 | 
						||
| 
								 | 
							
								    int _dim;
							 | 
						||
| 
								 | 
							
								};
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								} // namespace random
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								using random::uniform_on_sphere;
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								} // namespace boost
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								#endif // BOOST_RANDOM_UNIFORM_ON_SPHERE_HPP
							 |