More def equalities in Homotopy.Truncation.
has-all-truncated-paths.