view release on metacpan or  search on metacpan

lib/Math/Random/Cauchy.pm  view on Meta::CPAN

89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
          if not $args{random} eq 'rand';
    }
 
    my $self = {
        fwhm => $args{fwhm},
        middle => $args{middle},
        random => $args{random},
        cache => [],
    };
 
    bless $self => $class;
 
    return $self;
}
 
=head2 rand
 
Returns the next random number of Cauchy PDF.
 
=cut