Searched refs:constant_integer (Results 1 – 1 of 1) sorted by relevance
13 integer, parameter :: constant_integer = 2, constant_negative = -4, constant_zero = 0 variable21 n = image_status(constant_integer)