{P : Sort u} →
  {allowNewlines : Bool} →
    {minIndent : ℕ} →
      {boldDepth emphDepth : Option ℕ} →
        {inLink allowNewlines' : Bool} →
          {minIndent' : ℕ} →
            {boldDepth' emphDepth' : Option ℕ} →
              {inLink' : Bool} →
                { allowNewlines := allowNewlines, minIndent := minIndent, boldDepth := boldDepth,
                      emphDepth := emphDepth, inLink := inLink } =
                    { allowNewlines := allowNewlines', minIndent := minIndent', boldDepth := boldDepth',
                      emphDepth := emphDepth', inLink := inLink' } →
                  (allowNewlines = allowNewlines' →
                      minIndent = minIndent' → boldDepth = boldDepth' → emphDepth = emphDepth' → inLink = inLink' → P) →
                    P