org.eclipse.photran.core.vpg.tests/refactoring-test-code/encapsulate-variable/test-encap-06a-fail-array.f90

module mod
  implicit none
  integer, dimension(3) :: variable  !3,28,8
end module

program encap1
  use mod
  implicit none
  variable = (/ 1, 2, 3 /)
  print *, variable
end program encap1