1type t
2   integer, allocatable :: A(:,:)
3end type t
4
5type(t), allocatable :: b(:)
6
7!$acc update host(b)
8!$acc update host(b(:))
9!$acc update host(b(1)%A)
10!$acc update host(b(1)%A(:,:))
11end
12