! legal integer, parameter :: j = huge(j) integer i if (j /= huge(i)) call abort end