Searched refs:ubca2 (Results 1 – 1 of 1) sorted by relevance
36 integer, parameter :: ubca2(*) = ubound(ca(:)(1:1)) variable37 logical, parameter :: test_ubca2 = all(ubca2 == [3])