Powiedz, że mam poniższy kod:

program test
  call foo
  call foo
contains
  subroutine foo
    integer(8),dimension(:),allocatable:: var1
    allocate(var1(10))
    ...
    return
  end subroutine foo
end

czy zmienna var1 zostanie przydzielona dwukrotnie? (Chyba tak). Jeśli zostanie przydzielone dla każdego połączenia, czy pamięć przydzielona podczas pierwszego połączenia stanie się wolna?