PascalGen.java

/*
 * Class:        PascalGen
 * Description:  Pascal random variate generators
 * Environment:  Java
 * Software:     SSJ 
 * Copyright (C) 2001  Pierre L'Ecuyer and Universite de Montreal
 * Organization: DIRO, Universite de Montreal
 * @author       
 * @since
 *
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
 */
package umontreal.ssj.randvar;
 
import umontreal.ssj.rng.*;
import umontreal.ssj.probdist.*;

public class PascalGen extends RandomVariateGenInt {
   protected int n;
   protected double p;

   public PascalGen(RandomStream s, int n, double p) {
      super(s, new PascalDist(n, p));
      setParams(n, p);
   }

   public PascalGen(RandomStream s, PascalDist dist) {
      super(s, dist);
      if (dist != null)
         setParams(dist.getN1(), dist.getP());
   }

   public static int nextInt(RandomStream s, int n, double p) {
      return PascalDist.inverseF(n, p, s.nextDouble());
   }

   public int getN() {
      return n;
   }

   public double getP() {
      return p;
   }

   protected void setParams(int n, double p) {
      if (p < 0.0 || p > 1.0)
         throw new IllegalArgumentException("p not in [0, 1]");
      if (n <= 0)
         throw new IllegalArgumentException("n <= 0");
      this.p = p;
      this.n = n;
   }
}