The manual states that `cards 2, 2a, and 3a for nout.ne.0 only`. The code states it is for `nout.le.0`.