halfnorm_acc function

Acceptance rate of half-normal rejection sampling