6 equivalence (c(1:1), d(1)(2:)), (c(3:5), e(2:4))
7 equivalence (c(6:6), f(2)(:))
10 if (c.ne.'abcdefgh'.or.d(1).ne.'Aa'.or.d(2).ne.'bc') call abort
11 if (e.ne.'bcde'.or.f(1).ne.'de'.or.f(2).ne.'fg') call abort
14 equivalence (c(1:1), d(1)(2:2)), (c(3:5), e(2:4))
15 equivalence (c(6:6), f(2)(1:))
22 if (c.ne.'abcdefgh'.or.d(1).ne.'Aa'.or.d(2).ne.'bc') call abort
23 if (e.ne.'bcde'.or.f(1).ne.'de'.or.f(2).ne.'fg') call abort
29 equivalence (c(1:1), d(1)(2:)), (c(3:5), e(2:4))
30 equivalence (c(6:6), f(2)(:1))
34 if (c.ne.'abcdefgh'.or.d(1).ne.'Aa'.or.d(2).ne.'bc') call abort
35 if (e.ne.'bcde'.or.f(1).ne.'de'.or.f(2).ne.'fg') call abort
39 equivalence (c(1:1), d(1)(2:2)), (c(3:5), e(2:4))
40 equivalence (c(6:6), f(2)(1:2))
46 if (c.ne.'abcdefgh'.or.d(1).ne.'Aa'.or.d(2).ne.'bc') call abort
47 if (e.ne.'bcde'.or.f(1).ne.'de'.or.f(2).ne.'fg') call abort