fork download

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

prog.f95:4.18:

      integer summ = 0
                  1
Error: Syntax error in data declaration at (1)
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:

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

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

Standard output is empty