[J3] Question involving explicit initialization

[Vipul Parekh]

Does the following code conform to the Fortran standard?

--- begin code ---
module m
contains
   subroutine sub1()
      integer :: i = 0
      i = i + 1
   end subroutine
   subroutine sub2()
      integer :: i = 0
      i = i + 1
   end subroutine
end module
--- end code ---

None of the compilers I tried raise any errors with above.

Thanks and regards,
Vipul Parekh