Fortran - Cycle Statement


Advertisements

The cycle statement causes the loop to skip the remainder of its body, and immediately retest its condition prior to reiterating.

Flow diagram

Cycle Statement

Example

program cycle_example     
implicit none      

   integer :: i     
   
   do i = 1, 20          
   
      if (i == 5) then 
         cycle          
      end if         
      
   print*, i      
   end do  
   
end program cycle_example

When the above code is compiled and executed, it produces the following result −

1
2
3
4
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
fortran_loops.htm
Advertisements