不定の輩 DO LOOP を抜けた時の loop 変数の値は FORTRAN 66 では不定でしたが、FORTRAN 77 以降では loop を抜けた時点での値になっています。 例えば、以下のようなプログラムの場合、i = 6 で do loop 脱出条件を満たすので、i=6 が出力されます。loop の途中で exit する場合もその時点での i の値を保ちます。 program loops implicit none integer :: i i = 99 do i = 1, 5 print *, 'loop' end do print *, 'i=', i end program lo…