(motive : String → Sort u_1) →
  (tag : String) →
    (Unit → motive "leanSorryLike") →
      (Unit → motive "keyword") →
        (Unit → motive "variable") →
          (Unit → motive "property") →
            (Unit → motive "function") →
              (Unit → motive "namespace") →
                (Unit → motive "type") →
                  (Unit → motive "class") →
                    (Unit → motive "enum") →
                      (Unit → motive "interface") →
                        (Unit → motive "struct") →
                          (Unit → motive "typeParameter") →
                            (Unit → motive "parameter") →
                              (Unit → motive "enumMember") →
                                (Unit → motive "event") →
                                  (Unit → motive "method") →
                                    (Unit → motive "macro") →
                                      (Unit → motive "modifier") →
                                        (Unit → motive "comment") →
                                          (Unit → motive "string") →
                                            (Unit → motive "number") →
                                              (Unit → motive "regexp") →
                                                (Unit → motive "operator") →
                                                  (Unit → motive "decorator") → ((x : String) → motive x) → motive tag