bernoulli.c: minor refactoring