Searched refs:test_size_1 (Results 1 – 2 of 2) sorted by relevance
17 logical, parameter :: test_size_1 = size(shape(transfer(123456789,0_1,size=4))) == 1 variable
25 logical, parameter :: test_size_1 = size1 == 2 local