program example
  != unit (s) :: x
  integer :: x, y
  x = 5
  y = x + 1
end program example