Searched refs:preconnected_unit (Results 1 – 1 of 1) sorted by relevance
4 integer, parameter :: preconnected_unit(3) = [0, 5, 6] variable12 do i = lbound(preconnected_unit,1), ubound(preconnected_unit,1)14 if (preconnected_unit(i) == u) return