I have an array that I create, but when I pass it, it loses the indexing properties. example:
-main program-
real, allocatable, dimension(:) :: peanut
...
Allocate(peanut(5:16))
...
call subroutine butter(peanut)
...
real, intent(in out), dimension(:) :: peanut
...
-end subroutine
-end...