fork download

copy

program loop
      integer row, col
      integer mat(2,2)
      integer sum
      mat (1, 1) = 1
      mat (1, 2) = 2
      mat (2, 1) = 3
	 mat (2, 2) = 4
     sum = 0
      Do row = 0, col, 1
 	    Do col = 0, row, 1
 	    sum += mat(row, col)
 	    End Do
      End Do
 
      print *, sum
 
end program loop

prog.f95:8.1:

  mat (2, 2) = 4
 1
Warning: Nonconforming tab character at (1)
prog.f95:11.2:

      Do col = 0, row, 1
  1
Warning: Nonconforming tab character at (1)
prog.f95:12.2:

      sum += mat(row, col)
  1
Warning: Nonconforming tab character at (1)
prog.f95:12.6:

      sum += mat(row, col)
      1
Error: Unclassifiable statement at (1)
prog.f95:13.2:

      End Do
  1
Warning: Nonconforming tab character at (1)

Standard output is empty