home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / files / gnu / g__inc / xnegexp.h < prev    next >
Encoding:
C/C++ Source or Header  |  1993-07-23  |  1.5 KB  |  59 lines
  1. // This may look like C code, but it is really -*- C++ -*-
  2. /* 
  3. Copyright (C) 1988 Free Software Foundation
  4.     written by Dirk Grunwald (grunwald@cs.uiuc.edu)
  5.  
  6. This file is part of the GNU C++ Library.  This library is free
  7. software; you can redistribute it and/or modify it under the terms of
  8. the GNU Library General Public License as published by the Free
  9. Software Foundation; either version 2 of the License, or (at your
  10. option) any later version.  This library is distributed in the hope
  11. that it will be useful, but WITHOUT ANY WARRANTY; without even the
  12. implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
  13. PURPOSE.  See the GNU Library General Public License for more details.
  14. You should have received a copy of the GNU Library General Public
  15. License along with this library; if not, write to the Free Software
  16. Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  17. */
  18. #ifndef _NegativeExpntl_h
  19. #ifdef __GNUG__
  20. #pragma once
  21. #pragma interface
  22. #endif
  23. #define _NegativeExpntl_h 1
  24.  
  25.  
  26. //
  27. //    Negative Exponential Random Numbers
  28. //
  29. // 
  30.  
  31. #include <xrandom.h>
  32.  
  33. class NegativeExpntl: public Random {
  34. protected:
  35.     double pMean;
  36. public:
  37.     NegativeExpntl(double xmean, RNG *gen);
  38.     double mean();
  39.     double mean(double x);
  40.  
  41.     virtual double operator()();
  42. };
  43.  
  44. #if defined(__OPTIMIZE__) || defined(USE_LIBGXX_INLINES)
  45.  
  46. inline NegativeExpntl::NegativeExpntl(double xmean, RNG *gen)
  47. : (gen) {
  48.   pMean = xmean;
  49. }
  50.  
  51. inline double NegativeExpntl::mean() { return pMean; }
  52. inline double NegativeExpntl::mean(double x) {
  53.   double t = pMean; pMean = x;
  54.   return t;
  55. }
  56.  
  57. #endif
  58. #endif
  59.