Searched refs:t2x1 (Results 1 – 1 of 1) sorted by relevance
16 type(t2), parameter :: t2x1(*) = & variable19 logical, parameter :: t2check1 = t2x1(1)%dta1(2)%ia1(2) == 421 all(t2x1(2)%dta1(2)%ia1(:) == [7,8])23 all(t2x1(1)%dta1(:)%ia1(2) == [2,4])25 all(t2x1(:)%dta1(1)%ia1(2) == [2,6])