fortran: do..while loop code example

Example: fortran do while

do while (logical expr) 
   statements
end do