Searched refs:uba3 (Results 1 – 1 of 1) sorted by relevance
97 integer, parameter :: uba3(*) = ubound(a3) local98 logical, parameter :: test_uba3 = all(uba3 == [-5, 1, 6])