(motive : String → Sort u_1) →
  (s : String) →
    (Unit → motive "fixpoint_induct") →
      (Unit → motive "coinduct") →
        (Unit → motive "induct") →
          (Unit → motive "mutual_induct") →
            (Unit → motive "mutual_fixpoint_induct") → ((x : String) → motive x) → motive s