Octave-Forge - Extra packages for GNU Octave | |
Home · Packages · Developers · Documentation · FAQ · Bugs · Mailing Lists · Links · Code |
00001 /* 00002 00003 Copyright (C) 2006, 2007 John W. Eaton 00004 00005 This file is part of Octave. 00006 00007 Octave is free software; you can redistribute it and/or modify it 00008 under the terms of the GNU General Public License as published by the 00009 Free Software Foundation; either version 3 of the License, or (at your 00010 option) any later version. 00011 00012 Octave is distributed in the hope that it will be useful, but WITHOUT 00013 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 00014 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 00015 for more details. 00016 00017 You should have received a copy of the GNU General Public License 00018 along with Octave; see the file COPYING. If not, see 00019 <http://www.gnu.org/licenses/>. 00020 00021 */ 00022 00023 /* Original version written by Paul Kienzle distributed as free 00024 software in the in the public domain. */ 00025 00026 #ifndef _RANDPOISSON_H 00027 00028 #ifdef __cplusplus 00029 extern "C" { 00030 #endif 00031 00032 extern double oct_randp (double L); 00033 extern void oct_fill_randp (double L, octave_idx_type n, double *p); 00034 00035 #ifdef __cplusplus 00036 } 00037 #endif 00038 #endif 00039 00040 /* 00041 ;;; Local Variables: *** 00042 ;;; mode: C *** 00043 ;;; End: *** 00044 */ 00045