blob: 5e444e2a9fa2e44f5c8dd59e2a67b2d06d2aadf8 [file] [log] [blame]
! Exercises the Section 6 rules for co-array expressions
! J. Overbey - 7 Dec 2009
! This is obviously not semantically legal
! TODO: Finish this
a[3,4] = 7
b(1,2)[3,4] = a[3,4]
b(1,2)[3,4] = a[3,4:8] * b(3)%c[3,4]
allocate (a[3:4,*])
end program