Searched refs:array19 (Results 1 – 1 of 1) sorted by relevance
42 type(dType), parameter :: array19(*) = [dType::dType(field=[1,2])] variable43 logical, parameter :: lVar = all(array19(:)%field(1) == [2])