As conditional or control statements you have IF in many variants (but essentially not changed from Fortran 77), DO (with some new variants) and the completely new statement CASE . The DO- loop should now be ended with the statement END DO and we no longer need any statement number. In addition, we can use the statement EXIT to jump out of the DO -loop and CYCLE in order to go to the next iteration of the present DO -loop. ... all negative numbers WRITE (*,*) 'Negative number' CASE (0) ! ...