my $z = -15863.8668285308;
my $e = exp($z * -1);
my $prob = 1/$e;