changed floating point equality comparison inout.f90: Q10B, Q10R