Fudge to avoid a bizzare bug (?) in p2c which corrupts "zero_matrix"