Fixed divide-by-0 bug in fortran versions when helicity_n=0