Change traverseRecursively into recCondFoldMap