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

      print *, summ
	 
end program loop