content: {-# LANGUAGE AllowAmbiguousTypes #-}
  module Ya.Operators.Generated.XXX where
  
  import Ya.Algebra.Abstract
  import Ya.Algebra.Definition
  import Ya.Algebra.Instances ()
  
  import Ya.Operators.Mappings
  import Ya.Operators.Handcraft
  
  infixl 2 `ha_______'yo'he`, `ha_______'ya'he`, `ha_______'yoi'he`, `ha_______'ha'he`, `ha_______'ho'he`, `ha_______'yia'he`, `ho_______'yo'he`, `ho_______'ya'he`, `ho_______'yoi'he`, `ho_______'ha'he`, `ho_______'ho'he`, `ho_______'yia'he`, `ha_______'yo'yo`, `ha_______'yo'ya`, `ha_______'yo'yoi`, `ha_______'yo'ha`, `ha_______'yo'ho`, `ha_______'yo'yia`, `ha_______'ya'yo`, `ha_______'ya'ya`, `ha_______'ya'yoi`, `ha_______'ya'ha`, `ha_______'ya'ho`, `ha_______'ya'yia`, `ha_______'yoi'yo`, `ha_______'yoi'ya`, `ha_______'yoi'yoi`, `ha_______'yoi'ha`, `ha_______'yoi'ho`, `ha_______'yoi'yia`, `ha_______'ha'yo`, `ha_______'ha'ya`, `ha_______'ha'yoi`, `ha_______'ha'ha`, `ha_______'ha'ho`, `ha_______'ha'yia`, `ha_______'ho'yo`, `ha_______'ho'ya`, `ha_______'ho'yoi`, `ha_______'ho'ha`, `ha_______'ho'ho`, `ha_______'ho'yia`, `ha_______'yia'yo`, `ha_______'yia'ya`, `ha_______'yia'yoi`, `ha_______'yia'ha`, `ha_______'yia'ho`, `ha_______'yia'yia`, `ho_______'yo'yo`, `ho_______'yo'ya`, `ho_______'yo'yoi`, `ho_______'yo'ha`, `ho_______'yo'ho`, `ho_______'yo'yia`, `ho_______'ya'yo`, `ho_______'ya'ya`, `ho_______'ya'yoi`, `ho_______'ya'ha`, `ho_______'ya'ho`, `ho_______'ya'yia`, `ho_______'yoi'yo`, `ho_______'yoi'ya`, `ho_______'yoi'yoi`, `ho_______'yoi'ha`, `ho_______'yoi'ho`, `ho_______'yoi'yia`, `ho_______'ha'yo`, `ho_______'ha'ya`, `ho_______'ha'yoi`, `ho_______'ha'ha`, `ho_______'ha'ho`, `ho_______'ha'yia`, `ho_______'ho'yo`, `ho_______'ho'ya`, `ho_______'ho'yoi`, `ho_______'ho'ha`, `ho_______'ho'ho`, `ho_______'ho'yia`, `ho_______'yia'yo`, `ho_______'yia'ya`, `ho_______'yia'yoi`, `ho_______'yia'ha`, `ho_______'yia'ho`, `ho_______'yia'yia`
  infixl 3 `ha______'yo'he`, `ha______'ya'he`, `ha______'yoi'he`, `ha______'ha'he`, `ha______'ho'he`, `ha______'yia'he`, `ho______'yo'he`, `ho______'ya'he`, `ho______'yoi'he`, `ho______'ha'he`, `ho______'ho'he`, `ho______'yia'he`, `ha______'yo'yo`, `ha______'yo'ya`, `ha______'yo'yoi`, `ha______'yo'ha`, `ha______'yo'ho`, `ha______'yo'yia`, `ha______'ya'yo`, `ha______'ya'ya`, `ha______'ya'yoi`, `ha______'ya'ha`, `ha______'ya'ho`, `ha______'ya'yia`, `ha______'yoi'yo`, `ha______'yoi'ya`, `ha______'yoi'yoi`, `ha______'yoi'ha`, `ha______'yoi'ho`, `ha______'yoi'yia`, `ha______'ha'yo`, `ha______'ha'ya`, `ha______'ha'yoi`, `ha______'ha'ha`, `ha______'ha'ho`, `ha______'ha'yia`, `ha______'ho'yo`, `ha______'ho'ya`, `ha______'ho'yoi`, `ha______'ho'ha`, `ha______'ho'ho`, `ha______'ho'yia`, `ha______'yia'yo`, `ha______'yia'ya`, `ha______'yia'yoi`, `ha______'yia'ha`, `ha______'yia'ho`, `ha______'yia'yia`, `ho______'yo'yo`, `ho______'yo'ya`, `ho______'yo'yoi`, `ho______'yo'ha`, `ho______'yo'ho`, `ho______'yo'yia`, `ho______'ya'yo`, `ho______'ya'ya`, `ho______'ya'yoi`, `ho______'ya'ha`, `ho______'ya'ho`, `ho______'ya'yia`, `ho______'yoi'yo`, `ho______'yoi'ya`, `ho______'yoi'yoi`, `ho______'yoi'ha`, `ho______'yoi'ho`, `ho______'yoi'yia`, `ho______'ha'yo`, `ho______'ha'ya`, `ho______'ha'yoi`, `ho______'ha'ha`, `ho______'ha'ho`, `ho______'ha'yia`, `ho______'ho'yo`, `ho______'ho'ya`, `ho______'ho'yoi`, `ho______'ho'ha`, `ho______'ho'ho`, `ho______'ho'yia`, `ho______'yia'yo`, `ho______'yia'ya`, `ho______'yia'yoi`, `ho______'yia'ha`, `ho______'yia'ho`, `ho______'yia'yia`
  infixl 4 `ha_____'yo'he`, `ha_____'ya'he`, `ha_____'yoi'he`, `ha_____'ha'he`, `ha_____'ho'he`, `ha_____'yia'he`, `ho_____'yo'he`, `ho_____'ya'he`, `ho_____'yoi'he`, `ho_____'ha'he`, `ho_____'ho'he`, `ho_____'yia'he`, `ha_____'yo'yo`, `ha_____'yo'ya`, `ha_____'yo'yoi`, `ha_____'yo'ha`, `ha_____'yo'ho`, `ha_____'yo'yia`, `ha_____'ya'yo`, `ha_____'ya'ya`, `ha_____'ya'yoi`, `ha_____'ya'ha`, `ha_____'ya'ho`, `ha_____'ya'yia`, `ha_____'yoi'yo`, `ha_____'yoi'ya`, `ha_____'yoi'yoi`, `ha_____'yoi'ha`, `ha_____'yoi'ho`, `ha_____'yoi'yia`, `ha_____'ha'yo`, `ha_____'ha'ya`, `ha_____'ha'yoi`, `ha_____'ha'ha`, `ha_____'ha'ho`, `ha_____'ha'yia`, `ha_____'ho'yo`, `ha_____'ho'ya`, `ha_____'ho'yoi`, `ha_____'ho'ha`, `ha_____'ho'ho`, `ha_____'ho'yia`, `ha_____'yia'yo`, `ha_____'yia'ya`, `ha_____'yia'yoi`, `ha_____'yia'ha`, `ha_____'yia'ho`, `ha_____'yia'yia`, `ho_____'yo'yo`, `ho_____'yo'ya`, `ho_____'yo'yoi`, `ho_____'yo'ha`, `ho_____'yo'ho`, `ho_____'yo'yia`, `ho_____'ya'yo`, `ho_____'ya'ya`, `ho_____'ya'yoi`, `ho_____'ya'ha`, `ho_____'ya'ho`, `ho_____'ya'yia`, `ho_____'yoi'yo`, `ho_____'yoi'ya`, `ho_____'yoi'yoi`, `ho_____'yoi'ha`, `ho_____'yoi'ho`, `ho_____'yoi'yia`, `ho_____'ha'yo`, `ho_____'ha'ya`, `ho_____'ha'yoi`, `ho_____'ha'ha`, `ho_____'ha'ho`, `ho_____'ha'yia`, `ho_____'ho'yo`, `ho_____'ho'ya`, `ho_____'ho'yoi`, `ho_____'ho'ha`, `ho_____'ho'ho`, `ho_____'ho'yia`, `ho_____'yia'yo`, `ho_____'yia'ya`, `ho_____'yia'yoi`, `ho_____'yia'ha`, `ho_____'yia'ho`, `ho_____'yia'yia`
  infixl 5 `ha____'yo'he`, `ha____'ya'he`, `ha____'yoi'he`, `ha____'ha'he`, `ha____'ho'he`, `ha____'yia'he`, `ho____'yo'he`, `ho____'ya'he`, `ho____'yoi'he`, `ho____'ha'he`, `ho____'ho'he`, `ho____'yia'he`, `ha____'yo'yo`, `ha____'yo'ya`, `ha____'yo'yoi`, `ha____'yo'ha`, `ha____'yo'ho`, `ha____'yo'yia`, `ha____'ya'yo`, `ha____'ya'ya`, `ha____'ya'yoi`, `ha____'ya'ha`, `ha____'ya'ho`, `ha____'ya'yia`, `ha____'yoi'yo`, `ha____'yoi'ya`, `ha____'yoi'yoi`, `ha____'yoi'ha`, `ha____'yoi'ho`, `ha____'yoi'yia`, `ha____'ha'yo`, `ha____'ha'ya`, `ha____'ha'yoi`, `ha____'ha'ha`, `ha____'ha'ho`, `ha____'ha'yia`, `ha____'ho'yo`, `ha____'ho'ya`, `ha____'ho'yoi`, `ha____'ho'ha`, `ha____'ho'ho`, `ha____'ho'yia`, `ha____'yia'yo`, `ha____'yia'ya`, `ha____'yia'yoi`, `ha____'yia'ha`, `ha____'yia'ho`, `ha____'yia'yia`, `ho____'yo'yo`, `ho____'yo'ya`, `ho____'yo'yoi`, `ho____'yo'ha`, `ho____'yo'ho`, `ho____'yo'yia`, `ho____'ya'yo`, `ho____'ya'ya`, `ho____'ya'yoi`, `ho____'ya'ha`, `ho____'ya'ho`, `ho____'ya'yia`, `ho____'yoi'yo`, `ho____'yoi'ya`, `ho____'yoi'yoi`, `ho____'yoi'ha`, `ho____'yoi'ho`, `ho____'yoi'yia`, `ho____'ha'yo`, `ho____'ha'ya`, `ho____'ha'yoi`, `ho____'ha'ha`, `ho____'ha'ho`, `ho____'ha'yia`, `ho____'ho'yo`, `ho____'ho'ya`, `ho____'ho'yoi`, `ho____'ho'ha`, `ho____'ho'ho`, `ho____'ho'yia`, `ho____'yia'yo`, `ho____'yia'ya`, `ho____'yia'yoi`, `ho____'yia'ha`, `ho____'yia'ho`, `ho____'yia'yia`
  infixl 6 `ha___'yo'he`, `ha___'ya'he`, `ha___'yoi'he`, `ha___'ha'he`, `ha___'ho'he`, `ha___'yia'he`, `ho___'yo'he`, `ho___'ya'he`, `ho___'yoi'he`, `ho___'ha'he`, `ho___'ho'he`, `ho___'yia'he`, `ha___'yo'yo`, `ha___'yo'ya`, `ha___'yo'yoi`, `ha___'yo'ha`, `ha___'yo'ho`, `ha___'yo'yia`, `ha___'ya'yo`, `ha___'ya'ya`, `ha___'ya'yoi`, `ha___'ya'ha`, `ha___'ya'ho`, `ha___'ya'yia`, `ha___'yoi'yo`, `ha___'yoi'ya`, `ha___'yoi'yoi`, `ha___'yoi'ha`, `ha___'yoi'ho`, `ha___'yoi'yia`, `ha___'ha'yo`, `ha___'ha'ya`, `ha___'ha'yoi`, `ha___'ha'ha`, `ha___'ha'ho`, `ha___'ha'yia`, `ha___'ho'yo`, `ha___'ho'ya`, `ha___'ho'yoi`, `ha___'ho'ha`, `ha___'ho'ho`, `ha___'ho'yia`, `ha___'yia'yo`, `ha___'yia'ya`, `ha___'yia'yoi`, `ha___'yia'ha`, `ha___'yia'ho`, `ha___'yia'yia`, `ho___'yo'yo`, `ho___'yo'ya`, `ho___'yo'yoi`, `ho___'yo'ha`, `ho___'yo'ho`, `ho___'yo'yia`, `ho___'ya'yo`, `ho___'ya'ya`, `ho___'ya'yoi`, `ho___'ya'ha`, `ho___'ya'ho`, `ho___'ya'yia`, `ho___'yoi'yo`, `ho___'yoi'ya`, `ho___'yoi'yoi`, `ho___'yoi'ha`, `ho___'yoi'ho`, `ho___'yoi'yia`, `ho___'ha'yo`, `ho___'ha'ya`, `ho___'ha'yoi`, `ho___'ha'ha`, `ho___'ha'ho`, `ho___'ha'yia`, `ho___'ho'yo`, `ho___'ho'ya`, `ho___'ho'yoi`, `ho___'ho'ha`, `ho___'ho'ho`, `ho___'ho'yia`, `ho___'yia'yo`, `ho___'yia'ya`, `ho___'yia'yoi`, `ho___'yia'ha`, `ho___'yia'ho`, `ho___'yia'yia`
  infixl 7 `yoi'yo'he`, `yoi'ya'he`, `yoi'yoi'he`, `yoi'yai'he`, `yoi'ha'he`, `yoi'yio'he`, `yoi'ho'he`, `yoi'yia'he`, `yai'yo'he`, `ha__'yo'he`, `yai'ya'he`, `ha__'ya'he`, `yai'yoi'he`, `ha__'yoi'he`, `yai'yai'he`, `ha__'ha'he`, `yai'yio'he`, `ha__'ho'he`, `yai'yia'he`, `ha__'yia'he`, `yio'yo'he`, `ho__'yo'he`, `yio'ya'he`, `ho__'ya'he`, `yio'yoi'he`, `ho__'yoi'he`, `yio'yai'he`, `ho__'ha'he`, `yio'yio'he`, `ho__'ho'he`, `yio'yia'he`, `ho__'yia'he`, `yia'yo'he`, `yia'ya'he`, `yia'yoi'he`, `yia'yai'he`, `yia'ha'he`, `yia'yio'he`, `yia'ho'he`, `yia'yia'he`, `yoi'yo'yo`, `yoi'yo'ya`, `yoi'yo'yoi`, `yoi'yo'yai`, `yoi'yo'ha`, `yoi'yo'yio`, `yoi'yo'ho`, `yoi'yo'yia`, `yoi'ya'yo`, `yoi'ya'ya`, `yoi'ya'yoi`, `yoi'ya'yai`, `yoi'ya'ha`, `yoi'ya'yio`, `yoi'ya'ho`, `yoi'ya'yia`, `yoi'yoi'yo`, `yoi'yoi'ya`, `yoi'yoi'yoi`, `yoi'yoi'yai`, `yoi'yoi'ha`, `yoi'yoi'yio`, `yoi'yoi'ho`, `yoi'yoi'yia`, `yoi'yai'yo`, `yoi'ha'yo`, `yoi'yai'ya`, `yoi'ha'ya`, `yoi'yai'yoi`, `yoi'ha'yoi`, `yoi'yai'yai`, `yoi'ha'ha`, `yoi'yai'yio`, `yoi'ha'ho`, `yoi'yai'yia`, `yoi'ha'yia`, `yoi'yio'yo`, `yoi'ho'yo`, `yoi'yio'ya`, `yoi'ho'ya`, `yoi'yio'yoi`, `yoi'ho'yoi`, `yoi'yio'yai`, `yoi'ho'ha`, `yoi'yio'yio`, `yoi'ho'ho`, `yoi'yio'yia`, `yoi'ho'yia`, `yoi'yia'yo`, `yoi'yia'ya`, `yoi'yia'yoi`, `yoi'yia'yai`, `yoi'yia'ha`, `yoi'yia'yio`, `yoi'yia'ho`, `yoi'yia'yia`, `yai'yo'yo`, `ha__'yo'yo`, `yai'yo'ya`, `ha__'yo'ya`, `yai'yo'yoi`, `ha__'yo'yoi`, `yai'yo'yai`, `ha__'yo'ha`, `yai'yo'yio`, `ha__'yo'ho`, `yai'yo'yia`, `ha__'yo'yia`, `yai'ya'yo`, `ha__'ya'yo`, `yai'ya'ya`, `ha__'ya'ya`, `yai'ya'yoi`, `ha__'ya'yoi`, `yai'ya'yai`, `ha__'ya'ha`, `yai'ya'yio`, `ha__'ya'ho`, `yai'ya'yia`, `ha__'ya'yia`, `yai'yoi'yo`, `ha__'yoi'yo`, `yai'yoi'ya`, `ha__'yoi'ya`, `yai'yoi'yoi`, `ha__'yoi'yoi`, `yai'yoi'yai`, `ha__'yoi'ha`, `yai'yoi'yio`, `ha__'yoi'ho`, `yai'yoi'yia`, `ha__'yoi'yia`, `yai'yai'yo`, `ha__'ha'yo`, `yai'yai'ya`, `ha__'ha'ya`, `yai'yai'yoi`, `ha__'ha'yoi`, `yai'yai'yai`, `ha__'ha'ha`, `yai'yai'yio`, `ha__'ha'ho`, `yai'yai'yia`, `ha__'ha'yia`, `yai'yio'yo`, `ha__'ho'yo`, `yai'yio'ya`, `ha__'ho'ya`, `yai'yio'yoi`, `ha__'ho'yoi`, `yai'yio'yai`, `ha__'ho'ha`, `yai'yio'yio`, `ha__'ho'ho`, `yai'yio'yia`, `ha__'ho'yia`, `yai'yia'yo`, `ha__'yia'yo`, `yai'yia'ya`, `ha__'yia'ya`, `yai'yia'yoi`, `ha__'yia'yoi`, `yai'yia'yai`, `ha__'yia'ha`, `yai'yia'yio`, `ha__'yia'ho`, `yai'yia'yia`, `ha__'yia'yia`, `yio'yo'yo`, `ho__'yo'yo`, `yio'yo'ya`, `ho__'yo'ya`, `yio'yo'yoi`, `ho__'yo'yoi`, `yio'yo'yai`, `ho__'yo'ha`, `yio'yo'yio`, `ho__'yo'ho`, `yio'yo'yia`, `ho__'yo'yia`, `yio'ya'yo`, `ho__'ya'yo`, `yio'ya'ya`, `ho__'ya'ya`, `yio'ya'yoi`, `ho__'ya'yoi`, `yio'ya'yai`, `ho__'ya'ha`, `yio'ya'yio`, `ho__'ya'ho`, `yio'ya'yia`, `ho__'ya'yia`, `yio'yoi'yo`, `ho__'yoi'yo`, `yio'yoi'ya`, `ho__'yoi'ya`, `yio'yoi'yoi`, `ho__'yoi'yoi`, `yio'yoi'yai`, `ho__'yoi'ha`, `yio'yoi'yio`, `ho__'yoi'ho`, `yio'yoi'yia`, `ho__'yoi'yia`, `yio'yai'yo`, `ho__'ha'yo`, `yio'yai'ya`, `ho__'ha'ya`, `yio'yai'yoi`, `ho__'ha'yoi`, `yio'yai'yai`, `ho__'ha'ha`, `yio'yai'yio`, `ho__'ha'ho`, `yio'yai'yia`, `ho__'ha'yia`, `yio'yio'yo`, `ho__'ho'yo`, `yio'yio'ya`, `ho__'ho'ya`, `yio'yio'yoi`, `ho__'ho'yoi`, `yio'yio'yai`, `ho__'ho'ha`, `yio'yio'yio`, `ho__'ho'ho`, `yio'yio'yia`, `ho__'ho'yia`, `yio'yia'yo`, `ho__'yia'yo`, `yio'yia'ya`, `ho__'yia'ya`, `yio'yia'yoi`, `ho__'yia'yoi`, `yio'yia'yai`, `ho__'yia'ha`, `yio'yia'yio`, `ho__'yia'ho`, `yio'yia'yia`, `ho__'yia'yia`, `yia'yo'yo`, `yia'yo'ya`, `yia'yo'yoi`, `yia'yo'yai`, `yia'yo'ha`, `yia'yo'yio`, `yia'yo'ho`, `yia'yo'yia`, `yia'ya'yo`, `yia'ya'ya`, `yia'ya'yoi`, `yia'ya'yai`, `yia'ya'ha`, `yia'ya'yio`, `yia'ya'ho`, `yia'ya'yia`, `yia'yoi'yo`, `yia'yoi'ya`, `yia'yoi'yoi`, `yia'yoi'yai`, `yia'yoi'ha`, `yia'yoi'yio`, `yia'yoi'ho`, `yia'yoi'yia`, `yia'yai'yo`, `yia'ha'yo`, `yia'yai'ya`, `yia'ha'ya`, `yia'yai'yoi`, `yia'ha'yoi`, `yia'yai'yai`, `yia'ha'ha`, `yia'yai'yio`, `yia'ha'ho`, `yia'yai'yia`, `yia'ha'yia`, `yia'yio'yo`, `yia'ho'yo`, `yia'yio'ya`, `yia'ho'ya`, `yia'yio'yoi`, `yia'ho'yoi`, `yia'yio'yai`, `yia'ho'ha`, `yia'yio'yio`, `yia'ho'ho`, `yia'yio'yia`, `yia'ho'yia`, `yia'yia'yo`, `yia'yia'ya`, `yia'yia'yoi`, `yia'yia'yai`, `yia'yia'ha`, `yia'yia'yio`, `yia'yia'ho`, `yia'yia'yia`
  infixl 8 `yo'yo'he`, `yo'ya'he`, `yo'yoi'he`, `yo'yai'he`, `yo'ha'he`, `yo'yio'he`, `yo'ho'he`, `yo'yia'he`, `ya'yo'he`, `ya'ya'he`, `ya'yoi'he`, `ya'yai'he`, `ya'ha'he`, `ya'yio'he`, `ya'ho'he`, `ya'yia'he`, `ha_'yo'he`, `ha_'ya'he`, `ha_'yoi'he`, `ha_'ha'he`, `ha_'ho'he`, `ha_'yia'he`, `ho_'yo'he`, `ho_'ya'he`, `ho_'yoi'he`, `ho_'ha'he`, `ho_'ho'he`, `ho_'yia'he`, `yo'yo'yo`, `yo'yo'ya`, `yo'yo'yoi`, `yo'yo'yai`, `yo'yo'ha`, `yo'yo'yio`, `yo'yo'ho`, `yo'yo'yia`, `yo'ya'yo`, `yo'ya'ya`, `yo'ya'yoi`, `yo'ya'yai`, `yo'ya'ha`, `yo'ya'yio`, `yo'ya'ho`, `yo'ya'yia`, `yo'yoi'yo`, `yo'yoi'ya`, `yo'yoi'yoi`, `yo'yoi'yai`, `yo'yoi'ha`, `yo'yoi'yio`, `yo'yoi'ho`, `yo'yoi'yia`, `yo'yai'yo`, `yo'ha'yo`, `yo'yai'ya`, `yo'ha'ya`, `yo'yai'yoi`, `yo'ha'yoi`, `yo'yai'yai`, `yo'ha'ha`, `yo'yai'yio`, `yo'ha'ho`, `yo'yai'yia`, `yo'ha'yia`, `yo'yio'yo`, `yo'ho'yo`, `yo'yio'ya`, `yo'ho'ya`, `yo'yio'yoi`, `yo'ho'yoi`, `yo'yio'yai`, `yo'ho'ha`, `yo'yio'yio`, `yo'ho'ho`, `yo'yio'yia`, `yo'ho'yia`, `yo'yia'yo`, `yo'yia'ya`, `yo'yia'yoi`, `yo'yia'yai`, `yo'yia'ha`, `yo'yia'yio`, `yo'yia'ho`, `yo'yia'yia`, `ya'yo'yo`, `ya'yo'ya`, `ya'yo'yoi`, `ya'yo'yai`, `ya'yo'ha`, `ya'yo'yio`, `ya'yo'ho`, `ya'yo'yia`, `ya'ya'yo`, `ya'ya'ya`, `ya'ya'yoi`, `ya'ya'yai`, `ya'ya'ha`, `ya'ya'yio`, `ya'ya'ho`, `ya'ya'yia`, `ya'yoi'yo`, `ya'yoi'ya`, `ya'yoi'yoi`, `ya'yoi'yai`, `ya'yoi'ha`, `ya'yoi'yio`, `ya'yoi'ho`, `ya'yoi'yia`, `ya'yai'yo`, `ya'ha'yo`, `ya'yai'ya`, `ya'ha'ya`, `ya'yai'yoi`, `ya'ha'yoi`, `ya'yai'yai`, `ya'ha'ha`, `ya'yai'yio`, `ya'ha'ho`, `ya'yai'yia`, `ya'ha'yia`, `ya'yio'yo`, `ya'ho'yo`, `ya'yio'ya`, `ya'ho'ya`, `ya'yio'yoi`, `ya'ho'yoi`, `ya'yio'yai`, `ya'ho'ha`, `ya'yio'yio`, `ya'ho'ho`, `ya'yio'yia`, `ya'ho'yia`, `ya'yia'yo`, `ya'yia'ya`, `ya'yia'yoi`, `ya'yia'yai`, `ya'yia'ha`, `ya'yia'yio`, `ya'yia'ho`, `ya'yia'yia`, `ha_'yo'yo`, `ha_'yo'ya`, `ha_'yo'yoi`, `ha_'yo'ha`, `ha_'yo'ho`, `ha_'yo'yia`, `ha_'ya'yo`, `ha_'ya'ya`, `ha_'ya'yoi`, `ha_'ya'ha`, `ha_'ya'ho`, `ha_'ya'yia`, `ha_'yoi'yo`, `ha_'yoi'ya`, `ha_'yoi'yoi`, `ha_'yoi'ha`, `ha_'yoi'ho`, `ha_'yoi'yia`, `ha_'ha'yo`, `ha_'ha'ya`, `ha_'ha'yoi`, `ha_'ha'ha`, `ha_'ha'ho`, `ha_'ha'yia`, `ha_'ho'yo`, `ha_'ho'ya`, `ha_'ho'yoi`, `ha_'ho'ha`, `ha_'ho'ho`, `ha_'ho'yia`, `ha_'yia'yo`, `ha_'yia'ya`, `ha_'yia'yoi`, `ha_'yia'ha`, `ha_'yia'ho`, `ha_'yia'yia`, `ho_'yo'yo`, `ho_'yo'ya`, `ho_'yo'yoi`, `ho_'yo'ha`, `ho_'yo'ho`, `ho_'yo'yia`, `ho_'ya'yo`, `ho_'ya'ya`, `ho_'ya'yoi`, `ho_'ya'ha`, `ho_'ya'ho`, `ho_'ya'yia`, `ho_'yoi'yo`, `ho_'yoi'ya`, `ho_'yoi'yoi`, `ho_'yoi'ha`, `ho_'yoi'ho`, `ho_'yoi'yia`, `ho_'ha'yo`, `ho_'ha'ya`, `ho_'ha'yoi`, `ho_'ha'ha`, `ho_'ha'ho`, `ho_'ha'yia`, `ho_'ho'yo`, `ho_'ho'ya`, `ho_'ho'yoi`, `ho_'ho'ha`, `ho_'ho'ho`, `ho_'ho'yia`, `ho_'yia'yo`, `ho_'yia'ya`, `ho_'yia'yoi`, `ho_'yia'ha`, `ho_'yia'ho`, `ho_'yia'yia`
  infixl 9 `ha'yo'he`, `ha'ya'he`, `ha'yoi'he`, `ha'ha'he`, `ha'ho'he`, `ha'yia'he`, `ho'yo'he`, `ho'ya'he`, `ho'yoi'he`, `ho'ha'he`, `ho'ho'he`, `ho'yia'he`, `ha'yo'yo`, `ha'yo'ya`, `ha'yo'yoi`, `ha'yo'ha`, `ha'yo'ho`, `ha'yo'yia`, `ha'ya'yo`, `ha'ya'ya`, `ha'ya'yoi`, `ha'ya'ha`, `ha'ya'ho`, `ha'ya'yia`, `ha'yoi'yo`, `ha'yoi'ya`, `ha'yoi'yoi`, `ha'yoi'ha`, `ha'yoi'ho`, `ha'yoi'yia`, `ha'ha'yo`, `ha'ha'ya`, `ha'ha'yoi`, `ha'ha'ha`, `ha'ha'ho`, `ha'ha'yia`, `ha'ho'yo`, `ha'ho'ya`, `ha'ho'yoi`, `ha'ho'ha`, `ha'ho'ho`, `ha'ho'yia`, `ha'yia'yo`, `ha'yia'ya`, `ha'yia'yoi`, `ha'yia'ha`, `ha'yia'ho`, `ha'yia'yia`, `ho'yo'yo`, `ho'yo'ya`, `ho'yo'yoi`, `ho'yo'ha`, `ho'yo'ho`, `ho'yo'yia`, `ho'ya'yo`, `ho'ya'ya`, `ho'ya'yoi`, `ho'ya'ha`, `ho'ya'ho`, `ho'ya'yia`, `ho'yoi'yo`, `ho'yoi'ya`, `ho'yoi'yoi`, `ho'yoi'ha`, `ho'yoi'ho`, `ho'yoi'yia`, `ho'ha'yo`, `ho'ha'ya`, `ho'ha'yoi`, `ho'ha'ha`, `ho'ha'ho`, `ho'ha'yia`, `ho'ho'yo`, `ho'ho'ya`, `ho'ho'yoi`, `ho'ho'ha`, `ho'ho'ho`, `ho'ho'yia`, `ho'yia'yo`, `ho'yia'ya`, `ho'yia'yoi`, `ho'yia'ha`, `ho'yia'ho`, `ho'yia'yia`
  
  yo'yo'he
   :: forall from into t tt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt o))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt a)) -> into (from (Supertype (a)) o) (t (tt o))
  yo'yo'he x = fai (fo @from @from @tt `compose` fai @from unwrap) (yo @from @into x)
  
  yo'ya'he
   :: forall from into t tt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt a))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt o)) -> into (from (Supertype (a)) o) (t (tt a))
  yo'ya'he x = fai (fa @from @from @tt `compose` fai @from unwrap) (yo @from @into x)
  
  yo'yoi'he
   :: forall from into t tt ii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt o ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt a ii)) -> into (from (Supertype (a)) o) (t (tt o ii))
  yo'yoi'he x = fai (foi @from @from @tt `compose` fai @from unwrap) (yo @from @into x)
  
  yo'yai'he, yo'ha'he
   :: forall from into t tt ii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt a ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt o ii)) -> into (from (Supertype (a)) o) (t (tt a ii))
  yo'yai'he x = fai (fai @from @from @tt `compose` fai @from unwrap) (yo @from @into x)
  yo'ha'he = yo'yai'he
  
  yo'yio'he, yo'ho'he
   :: forall from into t tt ii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii (o)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt ii (a))) -> into (from (Supertype (a)) o) (t (tt ii (o)))
  yo'yio'he x = fai (fio @from @from @tt `compose` fai @from unwrap) (yo @from @into x)
  yo'ho'he = yo'yio'he
  
  yo'yia'he
   :: forall from into t tt ii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii (a)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt ii (o))) -> into (from (Supertype (a)) o) (t (tt ii (a)))
  yo'yia'he x = fai (fia @from @from @tt `compose` fai @from unwrap) (yo @from @into x)
  
  ya'yo'he
   :: forall from into t tt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt a))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt o)) -> into (from (Supertype (a)) o) (t (tt a))
  ya'yo'he x = fai (fo @from @from @tt `compose` fai @from unwrap) (ya @from @into x)
  
  ya'ya'he
   :: forall from into t tt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt o))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt a)) -> into (from (Supertype (a)) o) (t (tt o))
  ya'ya'he x = fai (fa @from @from @tt `compose` fai @from unwrap) (ya @from @into x)
  
  ya'yoi'he
   :: forall from into t tt ii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt a ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt o ii)) -> into (from (Supertype (a)) o) (t (tt a ii))
  ya'yoi'he x = fai (foi @from @from @tt `compose` fai @from unwrap) (ya @from @into x)
  
  ya'yai'he, ya'ha'he
   :: forall from into t tt ii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt o ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt a ii)) -> into (from (Supertype (a)) o) (t (tt o ii))
  ya'yai'he x = fai (fai @from @from @tt `compose` fai @from unwrap) (ya @from @into x)
  ya'ha'he = ya'yai'he
  
  ya'yio'he, ya'ho'he
   :: forall from into t tt ii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii (a)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt ii (o))) -> into (from (Supertype (a)) o) (t (tt ii (a)))
  ya'yio'he x = fai (fio @from @from @tt `compose` fai @from unwrap) (ya @from @into x)
  ya'ho'he = ya'yio'he
  
  ya'yia'he
   :: forall from into t tt ii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii (o)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt ii (a))) -> into (from (Supertype (a)) o) (t (tt ii (o)))
  ya'yia'he x = fai (fia @from @from @tt `compose` fai @from unwrap) (ya @from @into x)
  
  yoi'yo'he
   :: forall from into t i tt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt o) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt a) i) -> into (from (Supertype (a)) o) (t (tt o) i)
  yoi'yo'he x = fai (fo @from @from @tt `compose` fai @from unwrap) (yoi @from @into x)
  
  yoi'ya'he
   :: forall from into t i tt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt a) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt o) i) -> into (from (Supertype (a)) o) (t (tt a) i)
  yoi'ya'he x = fai (fa @from @from @tt `compose` fai @from unwrap) (yoi @from @into x)
  
  yoi'yoi'he
   :: forall from into t i tt ii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt o ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt a ii) i) -> into (from (Supertype (a)) o) (t (tt o ii) i)
  yoi'yoi'he x = fai (foi @from @from @tt `compose` fai @from unwrap) (yoi @from @into x)
  
  yoi'yai'he, yoi'ha'he
   :: forall from into t i tt ii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt a ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt o ii) i) -> into (from (Supertype (a)) o) (t (tt a ii) i)
  yoi'yai'he x = fai (fai @from @from @tt `compose` fai @from unwrap) (yoi @from @into x)
  yoi'ha'he = yoi'yai'he
  
  yoi'yio'he, yoi'ho'he
   :: forall from into t i tt ii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii (o)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt ii (a)) i) -> into (from (Supertype (a)) o) (t (tt ii (o)) i)
  yoi'yio'he x = fai (fio @from @from @tt `compose` fai @from unwrap) (yoi @from @into x)
  yoi'ho'he = yoi'yio'he
  
  yoi'yia'he
   :: forall from into t i tt ii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii (a)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t (tt ii (o)) i) -> into (from (Supertype (a)) o) (t (tt ii (a)) i)
  yoi'yia'he x = fai (fia @from @from @tt `compose` fai @from unwrap) (yoi @from @into x)
  
  yai'yo'he, ha'yo'he, ha_'yo'he, ha__'yo'he, ha___'yo'he, ha____'yo'he, ha_____'yo'he, ha______'yo'he, ha_______'yo'he
   :: forall from into t i tt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt a) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt o) i) -> into (from (Supertype (a)) o) (t (tt a) i)
  yai'yo'he x = fai (fo @from @from @tt `compose` fai @from unwrap) (yai @from @into x)
  ha'yo'he = yai'yo'he
  ha_'yo'he = yai'yo'he
  ha__'yo'he = yai'yo'he
  ha___'yo'he = yai'yo'he
  ha____'yo'he = yai'yo'he
  ha_____'yo'he = yai'yo'he
  ha______'yo'he = yai'yo'he
  ha_______'yo'he = yai'yo'he
  
  yai'ya'he, ha'ya'he, ha_'ya'he, ha__'ya'he, ha___'ya'he, ha____'ya'he, ha_____'ya'he, ha______'ya'he, ha_______'ya'he
   :: forall from into t i tt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt o) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt a) i) -> into (from (Supertype (a)) o) (t (tt o) i)
  yai'ya'he x = fai (fa @from @from @tt `compose` fai @from unwrap) (yai @from @into x)
  ha'ya'he = yai'ya'he
  ha_'ya'he = yai'ya'he
  ha__'ya'he = yai'ya'he
  ha___'ya'he = yai'ya'he
  ha____'ya'he = yai'ya'he
  ha_____'ya'he = yai'ya'he
  ha______'ya'he = yai'ya'he
  ha_______'ya'he = yai'ya'he
  
  yai'yoi'he, ha'yoi'he, ha_'yoi'he, ha__'yoi'he, ha___'yoi'he, ha____'yoi'he, ha_____'yoi'he, ha______'yoi'he, ha_______'yoi'he
   :: forall from into t i tt ii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt a ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt o ii) i) -> into (from (Supertype (a)) o) (t (tt a ii) i)
  yai'yoi'he x = fai (foi @from @from @tt `compose` fai @from unwrap) (yai @from @into x)
  ha'yoi'he = yai'yoi'he
  ha_'yoi'he = yai'yoi'he
  ha__'yoi'he = yai'yoi'he
  ha___'yoi'he = yai'yoi'he
  ha____'yoi'he = yai'yoi'he
  ha_____'yoi'he = yai'yoi'he
  ha______'yoi'he = yai'yoi'he
  ha_______'yoi'he = yai'yoi'he
  
  yai'yai'he, ha'ha'he, ha_'ha'he, ha__'ha'he, ha___'ha'he, ha____'ha'he, ha_____'ha'he, ha______'ha'he, ha_______'ha'he
   :: forall from into t i tt ii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt o ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt a ii) i) -> into (from (Supertype (a)) o) (t (tt o ii) i)
  yai'yai'he x = fai (fai @from @from @tt `compose` fai @from unwrap) (yai @from @into x)
  ha'ha'he = yai'yai'he
  ha_'ha'he = yai'yai'he
  ha__'ha'he = yai'yai'he
  ha___'ha'he = yai'yai'he
  ha____'ha'he = yai'yai'he
  ha_____'ha'he = yai'yai'he
  ha______'ha'he = yai'yai'he
  ha_______'ha'he = yai'yai'he
  
  yai'yio'he, ha'ho'he, ha_'ho'he, ha__'ho'he, ha___'ho'he, ha____'ho'he, ha_____'ho'he, ha______'ho'he, ha_______'ho'he
   :: forall from into t i tt ii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii (a)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt ii (o)) i) -> into (from (Supertype (a)) o) (t (tt ii (a)) i)
  yai'yio'he x = fai (fio @from @from @tt `compose` fai @from unwrap) (yai @from @into x)
  ha'ho'he = yai'yio'he
  ha_'ho'he = yai'yio'he
  ha__'ho'he = yai'yio'he
  ha___'ho'he = yai'yio'he
  ha____'ho'he = yai'yio'he
  ha_____'ho'he = yai'yio'he
  ha______'ho'he = yai'yio'he
  ha_______'ho'he = yai'yio'he
  
  yai'yia'he, ha'yia'he, ha_'yia'he, ha__'yia'he, ha___'yia'he, ha____'yia'he, ha_____'yia'he, ha______'yia'he, ha_______'yia'he
   :: forall from into t i tt ii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii (o)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t (tt ii (a)) i) -> into (from (Supertype (a)) o) (t (tt ii (o)) i)
  yai'yia'he x = fai (fia @from @from @tt `compose` fai @from unwrap) (yai @from @into x)
  ha'yia'he = yai'yia'he
  ha_'yia'he = yai'yia'he
  ha__'yia'he = yai'yia'he
  ha___'yia'he = yai'yia'he
  ha____'yia'he = yai'yia'he
  ha_____'yia'he = yai'yia'he
  ha______'yia'he = yai'yia'he
  ha_______'yia'he = yai'yia'he
  
  yio'yo'he, ho'yo'he, ho_'yo'he, ho__'yo'he, ho___'yo'he, ho____'yo'he, ho_____'yo'he, ho______'yo'he, ho_______'yo'he
   :: forall from into t i tt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt o)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt a))) -> into (from (Supertype (a)) o) (t i ((tt o)))
  yio'yo'he x = fai (fo @from @from @tt `compose` fai @from unwrap) (yio @from @into x)
  ho'yo'he = yio'yo'he
  ho_'yo'he = yio'yo'he
  ho__'yo'he = yio'yo'he
  ho___'yo'he = yio'yo'he
  ho____'yo'he = yio'yo'he
  ho_____'yo'he = yio'yo'he
  ho______'yo'he = yio'yo'he
  ho_______'yo'he = yio'yo'he
  
  yio'ya'he, ho'ya'he, ho_'ya'he, ho__'ya'he, ho___'ya'he, ho____'ya'he, ho_____'ya'he, ho______'ya'he, ho_______'ya'he
   :: forall from into t i tt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt a)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt o))) -> into (from (Supertype (a)) o) (t i ((tt a)))
  yio'ya'he x = fai (fa @from @from @tt `compose` fai @from unwrap) (yio @from @into x)
  ho'ya'he = yio'ya'he
  ho_'ya'he = yio'ya'he
  ho__'ya'he = yio'ya'he
  ho___'ya'he = yio'ya'he
  ho____'ya'he = yio'ya'he
  ho_____'ya'he = yio'ya'he
  ho______'ya'he = yio'ya'he
  ho_______'ya'he = yio'ya'he
  
  yio'yoi'he, ho'yoi'he, ho_'yoi'he, ho__'yoi'he, ho___'yoi'he, ho____'yoi'he, ho_____'yoi'he, ho______'yoi'he, ho_______'yoi'he
   :: forall from into t i tt ii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt o ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt a ii))) -> into (from (Supertype (a)) o) (t i ((tt o ii)))
  yio'yoi'he x = fai (foi @from @from @tt `compose` fai @from unwrap) (yio @from @into x)
  ho'yoi'he = yio'yoi'he
  ho_'yoi'he = yio'yoi'he
  ho__'yoi'he = yio'yoi'he
  ho___'yoi'he = yio'yoi'he
  ho____'yoi'he = yio'yoi'he
  ho_____'yoi'he = yio'yoi'he
  ho______'yoi'he = yio'yoi'he
  ho_______'yoi'he = yio'yoi'he
  
  yio'yai'he, ho'ha'he, ho_'ha'he, ho__'ha'he, ho___'ha'he, ho____'ha'he, ho_____'ha'he, ho______'ha'he, ho_______'ha'he
   :: forall from into t i tt ii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt a ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt o ii))) -> into (from (Supertype (a)) o) (t i ((tt a ii)))
  yio'yai'he x = fai (fai @from @from @tt `compose` fai @from unwrap) (yio @from @into x)
  ho'ha'he = yio'yai'he
  ho_'ha'he = yio'yai'he
  ho__'ha'he = yio'yai'he
  ho___'ha'he = yio'yai'he
  ho____'ha'he = yio'yai'he
  ho_____'ha'he = yio'yai'he
  ho______'ha'he = yio'yai'he
  ho_______'ha'he = yio'yai'he
  
  yio'yio'he, ho'ho'he, ho_'ho'he, ho__'ho'he, ho___'ho'he, ho____'ho'he, ho_____'ho'he, ho______'ho'he, ho_______'ho'he
   :: forall from into t i tt ii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii (o))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt ii (a)))) -> into (from (Supertype (a)) o) (t i ((tt ii (o))))
  yio'yio'he x = fai (fio @from @from @tt `compose` fai @from unwrap) (yio @from @into x)
  ho'ho'he = yio'yio'he
  ho_'ho'he = yio'yio'he
  ho__'ho'he = yio'yio'he
  ho___'ho'he = yio'yio'he
  ho____'ho'he = yio'yio'he
  ho_____'ho'he = yio'yio'he
  ho______'ho'he = yio'yio'he
  ho_______'ho'he = yio'yio'he
  
  yio'yia'he, ho'yia'he, ho_'yia'he, ho__'yia'he, ho___'yia'he, ho____'yia'he, ho_____'yia'he, ho______'yia'he, ho_______'yia'he
   :: forall from into t i tt ii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii (a))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt ii (o)))) -> into (from (Supertype (a)) o) (t i ((tt ii (a))))
  yio'yia'he x = fai (fia @from @from @tt `compose` fai @from unwrap) (yio @from @into x)
  ho'yia'he = yio'yia'he
  ho_'yia'he = yio'yia'he
  ho__'yia'he = yio'yia'he
  ho___'yia'he = yio'yia'he
  ho____'yia'he = yio'yia'he
  ho_____'yia'he = yio'yia'he
  ho______'yia'he = yio'yia'he
  ho_______'yia'he = yio'yia'he
  
  yia'yo'he
   :: forall from into t i tt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt a)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt o))) -> into (from (Supertype (a)) o) (t i ((tt a)))
  yia'yo'he x = fai (fo @from @from @tt `compose` fai @from unwrap) (yia @from @into x)
  
  yia'ya'he
   :: forall from into t i tt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt o)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt a))) -> into (from (Supertype (a)) o) (t i ((tt o)))
  yia'ya'he x = fai (fa @from @from @tt `compose` fai @from unwrap) (yia @from @into x)
  
  yia'yoi'he
   :: forall from into t i tt ii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt a ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt o ii))) -> into (from (Supertype (a)) o) (t i ((tt a ii)))
  yia'yoi'he x = fai (foi @from @from @tt `compose` fai @from unwrap) (yia @from @into x)
  
  yia'yai'he, yia'ha'he
   :: forall from into t i tt ii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt o ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt a ii))) -> into (from (Supertype (a)) o) (t i ((tt o ii)))
  yia'yai'he x = fai (fai @from @from @tt `compose` fai @from unwrap) (yia @from @into x)
  yia'ha'he = yia'yai'he
  
  yia'yio'he, yia'ho'he
   :: forall from into t i tt ii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii (a))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt ii (o)))) -> into (from (Supertype (a)) o) (t i ((tt ii (a))))
  yia'yio'he x = fai (fio @from @from @tt `compose` fai @from unwrap) (yia @from @into x)
  yia'ho'he = yia'yio'he
  
  yia'yia'he
   :: forall from into t i tt ii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii (o))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   Wrapper from (a) =>
   (t i ((tt ii (a)))) -> into (from (Supertype (a)) o) (t i ((tt ii (o))))
  yia'yia'he x = fai (fia @from @from @tt `compose` fai @from unwrap) (yia @from @into x)
  
  yo'yo'yo
   :: forall from into t tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a))) -> into (from (a) o) (t (tt (ttt o)))
  yo'yo'yo x = fai (fo @from @from @tt `compose` fo @from @from @ttt) (yo @from @into x)
  
  yo'yo'ya
   :: forall from into t tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o))) -> into (from (a) o) (t (tt (ttt a)))
  yo'yo'ya x = fai (fo @from @from @tt `compose` fa @from @from @ttt) (yo @from @into x)
  
  yo'yo'yoi
   :: forall from into t tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a iii))) -> into (from (a) o) (t (tt (ttt o iii)))
  yo'yo'yoi x = fai (fo @from @from @tt `compose` foi @from @from @ttt) (yo @from @into x)
  
  yo'yo'yai, yo'yo'ha
   :: forall from into t tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o iii))) -> into (from (a) o) (t (tt (ttt a iii)))
  yo'yo'yai x = fai (fo @from @from @tt `compose` fai @from @from @ttt) (yo @from @into x)
  yo'yo'ha = yo'yo'yai
  
  yo'yo'yio, yo'yo'ho
   :: forall from into t tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (a)))) -> into (from (a) o) (t (tt (ttt iii (o))))
  yo'yo'yio x = fai (fo @from @from @tt `compose` fio @from @from @ttt) (yo @from @into x)
  yo'yo'ho = yo'yo'yio
  
  yo'yo'yia
   :: forall from into t tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (o)))) -> into (from (a) o) (t (tt (ttt iii (a))))
  yo'yo'yia x = fai (fo @from @from @tt `compose` fia @from @from @ttt) (yo @from @into x)
  
  yo'ya'yo
   :: forall from into t tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o))) -> into (from (a) o) (t (tt (ttt a)))
  yo'ya'yo x = fai (fa @from @from @tt `compose` fo @from @from @ttt) (yo @from @into x)
  
  yo'ya'ya
   :: forall from into t tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a))) -> into (from (a) o) (t (tt (ttt o)))
  yo'ya'ya x = fai (fa @from @from @tt `compose` fa @from @from @ttt) (yo @from @into x)
  
  yo'ya'yoi
   :: forall from into t tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o iii))) -> into (from (a) o) (t (tt (ttt a iii)))
  yo'ya'yoi x = fai (fa @from @from @tt `compose` foi @from @from @ttt) (yo @from @into x)
  
  yo'ya'yai, yo'ya'ha
   :: forall from into t tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a iii))) -> into (from (a) o) (t (tt (ttt o iii)))
  yo'ya'yai x = fai (fa @from @from @tt `compose` fai @from @from @ttt) (yo @from @into x)
  yo'ya'ha = yo'ya'yai
  
  yo'ya'yio, yo'ya'ho
   :: forall from into t tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (o)))) -> into (from (a) o) (t (tt (ttt iii (a))))
  yo'ya'yio x = fai (fa @from @from @tt `compose` fio @from @from @ttt) (yo @from @into x)
  yo'ya'ho = yo'ya'yio
  
  yo'ya'yia
   :: forall from into t tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (a)))) -> into (from (a) o) (t (tt (ttt iii (o))))
  yo'ya'yia x = fai (fa @from @from @tt `compose` fia @from @from @ttt) (yo @from @into x)
  
  yo'yoi'yo
   :: forall from into t tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a) ii)) -> into (from (a) o) (t (tt (ttt o) ii))
  yo'yoi'yo x = fai (foi @from @from @tt `compose` fo @from @from @ttt) (yo @from @into x)
  
  yo'yoi'ya
   :: forall from into t tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o) ii)) -> into (from (a) o) (t (tt (ttt a) ii))
  yo'yoi'ya x = fai (foi @from @from @tt `compose` fa @from @from @ttt) (yo @from @into x)
  
  yo'yoi'yoi
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a iii) ii)) -> into (from (a) o) (t (tt (ttt o iii) ii))
  yo'yoi'yoi x = fai (foi @from @from @tt `compose` foi @from @from @ttt) (yo @from @into x)
  
  yo'yoi'yai, yo'yoi'ha
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o iii) ii)) -> into (from (a) o) (t (tt (ttt a iii) ii))
  yo'yoi'yai x = fai (foi @from @from @tt `compose` fai @from @from @ttt) (yo @from @into x)
  yo'yoi'ha = yo'yoi'yai
  
  yo'yoi'yio, yo'yoi'ho
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o)) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (a)) ii)) -> into (from (a) o) (t (tt (ttt iii (o)) ii))
  yo'yoi'yio x = fai (foi @from @from @tt `compose` fio @from @from @ttt) (yo @from @into x)
  yo'yoi'ho = yo'yoi'yio
  
  yo'yoi'yia
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a)) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (o)) ii)) -> into (from (a) o) (t (tt (ttt iii (a)) ii))
  yo'yoi'yia x = fai (foi @from @from @tt `compose` fia @from @from @ttt) (yo @from @into x)
  
  yo'yai'yo, yo'ha'yo
   :: forall from into t tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o) ii)) -> into (from (a) o) (t (tt (ttt a) ii))
  yo'yai'yo x = fai (fai @from @from @tt `compose` fo @from @from @ttt) (yo @from @into x)
  yo'ha'yo = yo'yai'yo
  
  yo'yai'ya, yo'ha'ya
   :: forall from into t tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a) ii)) -> into (from (a) o) (t (tt (ttt o) ii))
  yo'yai'ya x = fai (fai @from @from @tt `compose` fa @from @from @ttt) (yo @from @into x)
  yo'ha'ya = yo'yai'ya
  
  yo'yai'yoi, yo'ha'yoi
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o iii) ii)) -> into (from (a) o) (t (tt (ttt a iii) ii))
  yo'yai'yoi x = fai (fai @from @from @tt `compose` foi @from @from @ttt) (yo @from @into x)
  yo'ha'yoi = yo'yai'yoi
  
  yo'yai'yai, yo'ha'ha
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a iii) ii)) -> into (from (a) o) (t (tt (ttt o iii) ii))
  yo'yai'yai x = fai (fai @from @from @tt `compose` fai @from @from @ttt) (yo @from @into x)
  yo'ha'ha = yo'yai'yai
  
  yo'yai'yio, yo'ha'ho
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a)) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (o)) ii)) -> into (from (a) o) (t (tt (ttt iii (a)) ii))
  yo'yai'yio x = fai (fai @from @from @tt `compose` fio @from @from @ttt) (yo @from @into x)
  yo'ha'ho = yo'yai'yio
  
  yo'yai'yia, yo'ha'yia
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o)) ii))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (a)) ii)) -> into (from (a) o) (t (tt (ttt iii (o)) ii))
  yo'yai'yia x = fai (fai @from @from @tt `compose` fia @from @from @ttt) (yo @from @into x)
  yo'ha'yia = yo'yai'yia
  
  yo'yio'yo, yo'ho'yo
   :: forall from into t tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt a)))) -> into (from (a) o) (t (tt ii ((ttt o))))
  yo'yio'yo x = fai (fio @from @from @tt `compose` fo @from @from @ttt) (yo @from @into x)
  yo'ho'yo = yo'yio'yo
  
  yo'yio'ya, yo'ho'ya
   :: forall from into t tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt o)))) -> into (from (a) o) (t (tt ii ((ttt a))))
  yo'yio'ya x = fai (fio @from @from @tt `compose` fa @from @from @ttt) (yo @from @into x)
  yo'ho'ya = yo'yio'ya
  
  yo'yio'yoi, yo'ho'yoi
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o iii))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt a iii)))) -> into (from (a) o) (t (tt ii ((ttt o iii))))
  yo'yio'yoi x = fai (fio @from @from @tt `compose` foi @from @from @ttt) (yo @from @into x)
  yo'ho'yoi = yo'yio'yoi
  
  yo'yio'yai, yo'ho'ha
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a iii))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt o iii)))) -> into (from (a) o) (t (tt ii ((ttt a iii))))
  yo'yio'yai x = fai (fio @from @from @tt `compose` fai @from @from @ttt) (yo @from @into x)
  yo'ho'ha = yo'yio'yai
  
  yo'yio'yio, yo'ho'ho
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (o)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt iii (a))))) -> into (from (a) o) (t (tt ii ((ttt iii (o)))))
  yo'yio'yio x = fai (fio @from @from @tt `compose` fio @from @from @ttt) (yo @from @into x)
  yo'ho'ho = yo'yio'yio
  
  yo'yio'yia, yo'ho'yia
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (a)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt iii (o))))) -> into (from (a) o) (t (tt ii ((ttt iii (a)))))
  yo'yio'yia x = fai (fio @from @from @tt `compose` fia @from @from @ttt) (yo @from @into x)
  yo'ho'yia = yo'yio'yia
  
  yo'yia'yo
   :: forall from into t tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt o)))) -> into (from (a) o) (t (tt ii ((ttt a))))
  yo'yia'yo x = fai (fia @from @from @tt `compose` fo @from @from @ttt) (yo @from @into x)
  
  yo'yia'ya
   :: forall from into t tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt a)))) -> into (from (a) o) (t (tt ii ((ttt o))))
  yo'yia'ya x = fai (fia @from @from @tt `compose` fa @from @from @ttt) (yo @from @into x)
  
  yo'yia'yoi
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a iii))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt o iii)))) -> into (from (a) o) (t (tt ii ((ttt a iii))))
  yo'yia'yoi x = fai (fia @from @from @tt `compose` foi @from @from @ttt) (yo @from @into x)
  
  yo'yia'yai, yo'yia'ha
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o iii))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt a iii)))) -> into (from (a) o) (t (tt ii ((ttt o iii))))
  yo'yia'yai x = fai (fia @from @from @tt `compose` fai @from @from @ttt) (yo @from @into x)
  yo'yia'ha = yo'yia'yai
  
  yo'yia'yio, yo'yia'ho
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (a)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt iii (o))))) -> into (from (a) o) (t (tt ii ((ttt iii (a)))))
  yo'yia'yio x = fai (fia @from @from @tt `compose` fio @from @from @ttt) (yo @from @into x)
  yo'yia'ho = yo'yia'yio
  
  yo'yia'yia
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (o)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt iii (a))))) -> into (from (a) o) (t (tt ii ((ttt iii (o)))))
  yo'yia'yia x = fai (fia @from @from @tt `compose` fia @from @from @ttt) (yo @from @into x)
  
  ya'yo'yo
   :: forall from into t tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o))) -> into (from (a) o) (t (tt (ttt a)))
  ya'yo'yo x = fai (fo @from @from @tt `compose` fo @from @from @ttt) (ya @from @into x)
  
  ya'yo'ya
   :: forall from into t tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a))) -> into (from (a) o) (t (tt (ttt o)))
  ya'yo'ya x = fai (fo @from @from @tt `compose` fa @from @from @ttt) (ya @from @into x)
  
  ya'yo'yoi
   :: forall from into t tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o iii))) -> into (from (a) o) (t (tt (ttt a iii)))
  ya'yo'yoi x = fai (fo @from @from @tt `compose` foi @from @from @ttt) (ya @from @into x)
  
  ya'yo'yai, ya'yo'ha
   :: forall from into t tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a iii))) -> into (from (a) o) (t (tt (ttt o iii)))
  ya'yo'yai x = fai (fo @from @from @tt `compose` fai @from @from @ttt) (ya @from @into x)
  ya'yo'ha = ya'yo'yai
  
  ya'yo'yio, ya'yo'ho
   :: forall from into t tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (o)))) -> into (from (a) o) (t (tt (ttt iii (a))))
  ya'yo'yio x = fai (fo @from @from @tt `compose` fio @from @from @ttt) (ya @from @into x)
  ya'yo'ho = ya'yo'yio
  
  ya'yo'yia
   :: forall from into t tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (a)))) -> into (from (a) o) (t (tt (ttt iii (o))))
  ya'yo'yia x = fai (fo @from @from @tt `compose` fia @from @from @ttt) (ya @from @into x)
  
  ya'ya'yo
   :: forall from into t tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a))) -> into (from (a) o) (t (tt (ttt o)))
  ya'ya'yo x = fai (fa @from @from @tt `compose` fo @from @from @ttt) (ya @from @into x)
  
  ya'ya'ya
   :: forall from into t tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o))) -> into (from (a) o) (t (tt (ttt a)))
  ya'ya'ya x = fai (fa @from @from @tt `compose` fa @from @from @ttt) (ya @from @into x)
  
  ya'ya'yoi
   :: forall from into t tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a iii))) -> into (from (a) o) (t (tt (ttt o iii)))
  ya'ya'yoi x = fai (fa @from @from @tt `compose` foi @from @from @ttt) (ya @from @into x)
  
  ya'ya'yai, ya'ya'ha
   :: forall from into t tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o iii))) -> into (from (a) o) (t (tt (ttt a iii)))
  ya'ya'yai x = fai (fa @from @from @tt `compose` fai @from @from @ttt) (ya @from @into x)
  ya'ya'ha = ya'ya'yai
  
  ya'ya'yio, ya'ya'ho
   :: forall from into t tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (a)))) -> into (from (a) o) (t (tt (ttt iii (o))))
  ya'ya'yio x = fai (fa @from @from @tt `compose` fio @from @from @ttt) (ya @from @into x)
  ya'ya'ho = ya'ya'yio
  
  ya'ya'yia
   :: forall from into t tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (o)))) -> into (from (a) o) (t (tt (ttt iii (a))))
  ya'ya'yia x = fai (fa @from @from @tt `compose` fia @from @from @ttt) (ya @from @into x)
  
  ya'yoi'yo
   :: forall from into t tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o) ii)) -> into (from (a) o) (t (tt (ttt a) ii))
  ya'yoi'yo x = fai (foi @from @from @tt `compose` fo @from @from @ttt) (ya @from @into x)
  
  ya'yoi'ya
   :: forall from into t tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a) ii)) -> into (from (a) o) (t (tt (ttt o) ii))
  ya'yoi'ya x = fai (foi @from @from @tt `compose` fa @from @from @ttt) (ya @from @into x)
  
  ya'yoi'yoi
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o iii) ii)) -> into (from (a) o) (t (tt (ttt a iii) ii))
  ya'yoi'yoi x = fai (foi @from @from @tt `compose` foi @from @from @ttt) (ya @from @into x)
  
  ya'yoi'yai, ya'yoi'ha
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a iii) ii)) -> into (from (a) o) (t (tt (ttt o iii) ii))
  ya'yoi'yai x = fai (foi @from @from @tt `compose` fai @from @from @ttt) (ya @from @into x)
  ya'yoi'ha = ya'yoi'yai
  
  ya'yoi'yio, ya'yoi'ho
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a)) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (o)) ii)) -> into (from (a) o) (t (tt (ttt iii (a)) ii))
  ya'yoi'yio x = fai (foi @from @from @tt `compose` fio @from @from @ttt) (ya @from @into x)
  ya'yoi'ho = ya'yoi'yio
  
  ya'yoi'yia
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o)) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (a)) ii)) -> into (from (a) o) (t (tt (ttt iii (o)) ii))
  ya'yoi'yia x = fai (foi @from @from @tt `compose` fia @from @from @ttt) (ya @from @into x)
  
  ya'yai'yo, ya'ha'yo
   :: forall from into t tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a) ii)) -> into (from (a) o) (t (tt (ttt o) ii))
  ya'yai'yo x = fai (fai @from @from @tt `compose` fo @from @from @ttt) (ya @from @into x)
  ya'ha'yo = ya'yai'yo
  
  ya'yai'ya, ya'ha'ya
   :: forall from into t tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o) ii)) -> into (from (a) o) (t (tt (ttt a) ii))
  ya'yai'ya x = fai (fai @from @from @tt `compose` fa @from @from @ttt) (ya @from @into x)
  ya'ha'ya = ya'yai'ya
  
  ya'yai'yoi, ya'ha'yoi
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a iii) ii)) -> into (from (a) o) (t (tt (ttt o iii) ii))
  ya'yai'yoi x = fai (fai @from @from @tt `compose` foi @from @from @ttt) (ya @from @into x)
  ya'ha'yoi = ya'yai'yoi
  
  ya'yai'yai, ya'ha'ha
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o iii) ii)) -> into (from (a) o) (t (tt (ttt a iii) ii))
  ya'yai'yai x = fai (fai @from @from @tt `compose` fai @from @from @ttt) (ya @from @into x)
  ya'ha'ha = ya'yai'yai
  
  ya'yai'yio, ya'ha'ho
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o)) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (a)) ii)) -> into (from (a) o) (t (tt (ttt iii (o)) ii))
  ya'yai'yio x = fai (fai @from @from @tt `compose` fio @from @from @ttt) (ya @from @into x)
  ya'ha'ho = ya'yai'yio
  
  ya'yai'yia, ya'ha'yia
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a)) ii))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (o)) ii)) -> into (from (a) o) (t (tt (ttt iii (a)) ii))
  ya'yai'yia x = fai (fai @from @from @tt `compose` fia @from @from @ttt) (ya @from @into x)
  ya'ha'yia = ya'yai'yia
  
  ya'yio'yo, ya'ho'yo
   :: forall from into t tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt o)))) -> into (from (a) o) (t (tt ii ((ttt a))))
  ya'yio'yo x = fai (fio @from @from @tt `compose` fo @from @from @ttt) (ya @from @into x)
  ya'ho'yo = ya'yio'yo
  
  ya'yio'ya, ya'ho'ya
   :: forall from into t tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt a)))) -> into (from (a) o) (t (tt ii ((ttt o))))
  ya'yio'ya x = fai (fio @from @from @tt `compose` fa @from @from @ttt) (ya @from @into x)
  ya'ho'ya = ya'yio'ya
  
  ya'yio'yoi, ya'ho'yoi
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a iii))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt o iii)))) -> into (from (a) o) (t (tt ii ((ttt a iii))))
  ya'yio'yoi x = fai (fio @from @from @tt `compose` foi @from @from @ttt) (ya @from @into x)
  ya'ho'yoi = ya'yio'yoi
  
  ya'yio'yai, ya'ho'ha
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o iii))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt a iii)))) -> into (from (a) o) (t (tt ii ((ttt o iii))))
  ya'yio'yai x = fai (fio @from @from @tt `compose` fai @from @from @ttt) (ya @from @into x)
  ya'ho'ha = ya'yio'yai
  
  ya'yio'yio, ya'ho'ho
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (a)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt iii (o))))) -> into (from (a) o) (t (tt ii ((ttt iii (a)))))
  ya'yio'yio x = fai (fio @from @from @tt `compose` fio @from @from @ttt) (ya @from @into x)
  ya'ho'ho = ya'yio'yio
  
  ya'yio'yia, ya'ho'yia
   :: forall from into t tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (o)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt iii (a))))) -> into (from (a) o) (t (tt ii ((ttt iii (o)))))
  ya'yio'yia x = fai (fio @from @from @tt `compose` fia @from @from @ttt) (ya @from @into x)
  ya'ho'yia = ya'yio'yia
  
  ya'yia'yo
   :: forall from into t tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt a)))) -> into (from (a) o) (t (tt ii ((ttt o))))
  ya'yia'yo x = fai (fia @from @from @tt `compose` fo @from @from @ttt) (ya @from @into x)
  
  ya'yia'ya
   :: forall from into t tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt o)))) -> into (from (a) o) (t (tt ii ((ttt a))))
  ya'yia'ya x = fai (fia @from @from @tt `compose` fa @from @from @ttt) (ya @from @into x)
  
  ya'yia'yoi
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o iii))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt a iii)))) -> into (from (a) o) (t (tt ii ((ttt o iii))))
  ya'yia'yoi x = fai (fia @from @from @tt `compose` foi @from @from @ttt) (ya @from @into x)
  
  ya'yia'yai, ya'yia'ha
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a iii))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt o iii)))) -> into (from (a) o) (t (tt ii ((ttt a iii))))
  ya'yia'yai x = fai (fia @from @from @tt `compose` fai @from @from @ttt) (ya @from @into x)
  ya'yia'ha = ya'yia'yai
  
  ya'yia'yio, ya'yia'ho
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (o)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt iii (a))))) -> into (from (a) o) (t (tt ii ((ttt iii (o)))))
  ya'yia'yio x = fai (fia @from @from @tt `compose` fio @from @from @ttt) (ya @from @into x)
  ya'yia'ho = ya'yia'yio
  
  ya'yia'yia
   :: forall from into t tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into t =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (a)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt iii (o))))) -> into (from (a) o) (t (tt ii ((ttt iii (a)))))
  ya'yia'yia x = fai (fia @from @from @tt `compose` fia @from @from @ttt) (ya @from @into x)
  
  yoi'yo'yo
   :: forall from into t i tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a)) i) -> into (from (a) o) (t (tt (ttt o)) i)
  yoi'yo'yo x = fai (fo @from @from @tt `compose` fo @from @from @ttt) (yoi @from @into x)
  
  yoi'yo'ya
   :: forall from into t i tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o)) i) -> into (from (a) o) (t (tt (ttt a)) i)
  yoi'yo'ya x = fai (fo @from @from @tt `compose` fa @from @from @ttt) (yoi @from @into x)
  
  yoi'yo'yoi
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a iii)) i) -> into (from (a) o) (t (tt (ttt o iii)) i)
  yoi'yo'yoi x = fai (fo @from @from @tt `compose` foi @from @from @ttt) (yoi @from @into x)
  
  yoi'yo'yai, yoi'yo'ha
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o iii)) i) -> into (from (a) o) (t (tt (ttt a iii)) i)
  yoi'yo'yai x = fai (fo @from @from @tt `compose` fai @from @from @ttt) (yoi @from @into x)
  yoi'yo'ha = yoi'yo'yai
  
  yoi'yo'yio, yoi'yo'ho
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (a))) i) -> into (from (a) o) (t (tt (ttt iii (o))) i)
  yoi'yo'yio x = fai (fo @from @from @tt `compose` fio @from @from @ttt) (yoi @from @into x)
  yoi'yo'ho = yoi'yo'yio
  
  yoi'yo'yia
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (o))) i) -> into (from (a) o) (t (tt (ttt iii (a))) i)
  yoi'yo'yia x = fai (fo @from @from @tt `compose` fia @from @from @ttt) (yoi @from @into x)
  
  yoi'ya'yo
   :: forall from into t i tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o)) i) -> into (from (a) o) (t (tt (ttt a)) i)
  yoi'ya'yo x = fai (fa @from @from @tt `compose` fo @from @from @ttt) (yoi @from @into x)
  
  yoi'ya'ya
   :: forall from into t i tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a)) i) -> into (from (a) o) (t (tt (ttt o)) i)
  yoi'ya'ya x = fai (fa @from @from @tt `compose` fa @from @from @ttt) (yoi @from @into x)
  
  yoi'ya'yoi
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o iii)) i) -> into (from (a) o) (t (tt (ttt a iii)) i)
  yoi'ya'yoi x = fai (fa @from @from @tt `compose` foi @from @from @ttt) (yoi @from @into x)
  
  yoi'ya'yai, yoi'ya'ha
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii)) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a iii)) i) -> into (from (a) o) (t (tt (ttt o iii)) i)
  yoi'ya'yai x = fai (fa @from @from @tt `compose` fai @from @from @ttt) (yoi @from @into x)
  yoi'ya'ha = yoi'ya'yai
  
  yoi'ya'yio, yoi'ya'ho
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (o))) i) -> into (from (a) o) (t (tt (ttt iii (a))) i)
  yoi'ya'yio x = fai (fa @from @from @tt `compose` fio @from @from @ttt) (yoi @from @into x)
  yoi'ya'ho = yoi'ya'yio
  
  yoi'ya'yia
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (a))) i) -> into (from (a) o) (t (tt (ttt iii (o))) i)
  yoi'ya'yia x = fai (fa @from @from @tt `compose` fia @from @from @ttt) (yoi @from @into x)
  
  yoi'yoi'yo
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a) ii) i) -> into (from (a) o) (t (tt (ttt o) ii) i)
  yoi'yoi'yo x = fai (foi @from @from @tt `compose` fo @from @from @ttt) (yoi @from @into x)
  
  yoi'yoi'ya
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o) ii) i) -> into (from (a) o) (t (tt (ttt a) ii) i)
  yoi'yoi'ya x = fai (foi @from @from @tt `compose` fa @from @from @ttt) (yoi @from @into x)
  
  yoi'yoi'yoi
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a iii) ii) i) -> into (from (a) o) (t (tt (ttt o iii) ii) i)
  yoi'yoi'yoi x = fai (foi @from @from @tt `compose` foi @from @from @ttt) (yoi @from @into x)
  
  yoi'yoi'yai, yoi'yoi'ha
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o iii) ii) i) -> into (from (a) o) (t (tt (ttt a iii) ii) i)
  yoi'yoi'yai x = fai (foi @from @from @tt `compose` fai @from @from @ttt) (yoi @from @into x)
  yoi'yoi'ha = yoi'yoi'yai
  
  yoi'yoi'yio, yoi'yoi'ho
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o)) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (a)) ii) i) -> into (from (a) o) (t (tt (ttt iii (o)) ii) i)
  yoi'yoi'yio x = fai (foi @from @from @tt `compose` fio @from @from @ttt) (yoi @from @into x)
  yoi'yoi'ho = yoi'yoi'yio
  
  yoi'yoi'yia
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a)) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (o)) ii) i) -> into (from (a) o) (t (tt (ttt iii (a)) ii) i)
  yoi'yoi'yia x = fai (foi @from @from @tt `compose` fia @from @from @ttt) (yoi @from @into x)
  
  yoi'yai'yo, yoi'ha'yo
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o) ii) i) -> into (from (a) o) (t (tt (ttt a) ii) i)
  yoi'yai'yo x = fai (fai @from @from @tt `compose` fo @from @from @ttt) (yoi @from @into x)
  yoi'ha'yo = yoi'yai'yo
  
  yoi'yai'ya, yoi'ha'ya
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a) ii) i) -> into (from (a) o) (t (tt (ttt o) ii) i)
  yoi'yai'ya x = fai (fai @from @from @tt `compose` fa @from @from @ttt) (yoi @from @into x)
  yoi'ha'ya = yoi'yai'ya
  
  yoi'yai'yoi, yoi'ha'yoi
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt o iii) ii) i) -> into (from (a) o) (t (tt (ttt a iii) ii) i)
  yoi'yai'yoi x = fai (fai @from @from @tt `compose` foi @from @from @ttt) (yoi @from @into x)
  yoi'ha'yoi = yoi'yai'yoi
  
  yoi'yai'yai, yoi'ha'ha
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt a iii) ii) i) -> into (from (a) o) (t (tt (ttt o iii) ii) i)
  yoi'yai'yai x = fai (fai @from @from @tt `compose` fai @from @from @ttt) (yoi @from @into x)
  yoi'ha'ha = yoi'yai'yai
  
  yoi'yai'yio, yoi'ha'ho
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a)) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (o)) ii) i) -> into (from (a) o) (t (tt (ttt iii (a)) ii) i)
  yoi'yai'yio x = fai (fai @from @from @tt `compose` fio @from @from @ttt) (yoi @from @into x)
  yoi'ha'ho = yoi'yai'yio
  
  yoi'yai'yia, yoi'ha'yia
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o)) ii) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt (ttt iii (a)) ii) i) -> into (from (a) o) (t (tt (ttt iii (o)) ii) i)
  yoi'yai'yia x = fai (fai @from @from @tt `compose` fia @from @from @ttt) (yoi @from @into x)
  yoi'ha'yia = yoi'yai'yia
  
  yoi'yio'yo, yoi'ho'yo
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt a))) i) -> into (from (a) o) (t (tt ii ((ttt o))) i)
  yoi'yio'yo x = fai (fio @from @from @tt `compose` fo @from @from @ttt) (yoi @from @into x)
  yoi'ho'yo = yoi'yio'yo
  
  yoi'yio'ya, yoi'ho'ya
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt o))) i) -> into (from (a) o) (t (tt ii ((ttt a))) i)
  yoi'yio'ya x = fai (fio @from @from @tt `compose` fa @from @from @ttt) (yoi @from @into x)
  yoi'ho'ya = yoi'yio'ya
  
  yoi'yio'yoi, yoi'ho'yoi
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o iii))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt a iii))) i) -> into (from (a) o) (t (tt ii ((ttt o iii))) i)
  yoi'yio'yoi x = fai (fio @from @from @tt `compose` foi @from @from @ttt) (yoi @from @into x)
  yoi'ho'yoi = yoi'yio'yoi
  
  yoi'yio'yai, yoi'ho'ha
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a iii))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt o iii))) i) -> into (from (a) o) (t (tt ii ((ttt a iii))) i)
  yoi'yio'yai x = fai (fio @from @from @tt `compose` fai @from @from @ttt) (yoi @from @into x)
  yoi'ho'ha = yoi'yio'yai
  
  yoi'yio'yio, yoi'ho'ho
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (o)))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt iii (a)))) i) -> into (from (a) o) (t (tt ii ((ttt iii (o)))) i)
  yoi'yio'yio x = fai (fio @from @from @tt `compose` fio @from @from @ttt) (yoi @from @into x)
  yoi'ho'ho = yoi'yio'yio
  
  yoi'yio'yia, yoi'ho'yia
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (a)))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt iii (o)))) i) -> into (from (a) o) (t (tt ii ((ttt iii (a)))) i)
  yoi'yio'yia x = fai (fio @from @from @tt `compose` fia @from @from @ttt) (yoi @from @into x)
  yoi'ho'yia = yoi'yio'yia
  
  yoi'yia'yo
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt o))) i) -> into (from (a) o) (t (tt ii ((ttt a))) i)
  yoi'yia'yo x = fai (fia @from @from @tt `compose` fo @from @from @ttt) (yoi @from @into x)
  
  yoi'yia'ya
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt a))) i) -> into (from (a) o) (t (tt ii ((ttt o))) i)
  yoi'yia'ya x = fai (fia @from @from @tt `compose` fa @from @from @ttt) (yoi @from @into x)
  
  yoi'yia'yoi
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a iii))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt o iii))) i) -> into (from (a) o) (t (tt ii ((ttt a iii))) i)
  yoi'yia'yoi x = fai (fia @from @from @tt `compose` foi @from @from @ttt) (yoi @from @into x)
  
  yoi'yia'yai, yoi'yia'ha
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o iii))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt a iii))) i) -> into (from (a) o) (t (tt ii ((ttt o iii))) i)
  yoi'yia'yai x = fai (fia @from @from @tt `compose` fai @from @from @ttt) (yoi @from @into x)
  yoi'yia'ha = yoi'yia'yai
  
  yoi'yia'yio, yoi'yia'ho
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (a)))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt iii (o)))) i) -> into (from (a) o) (t (tt ii ((ttt iii (a)))) i)
  yoi'yia'yio x = fai (fia @from @from @tt `compose` fio @from @from @ttt) (yoi @from @into x)
  yoi'yia'ho = yoi'yia'yio
  
  yoi'yia'yia
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (o)))) i)) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t (tt ii ((ttt iii (a)))) i) -> into (from (a) o) (t (tt ii ((ttt iii (o)))) i)
  yoi'yia'yia x = fai (fia @from @from @tt `compose` fia @from @from @ttt) (yoi @from @into x)
  
  yai'yo'yo, ha'yo'yo, ha_'yo'yo, ha__'yo'yo, ha___'yo'yo, ha____'yo'yo, ha_____'yo'yo, ha______'yo'yo, ha_______'yo'yo
   :: forall from into t i tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o)) i) -> into (from (a) o) (t (tt (ttt a)) i)
  yai'yo'yo x = fai (fo @from @from @tt `compose` fo @from @from @ttt) (yai @from @into x)
  ha'yo'yo = yai'yo'yo
  ha_'yo'yo = yai'yo'yo
  ha__'yo'yo = yai'yo'yo
  ha___'yo'yo = yai'yo'yo
  ha____'yo'yo = yai'yo'yo
  ha_____'yo'yo = yai'yo'yo
  ha______'yo'yo = yai'yo'yo
  ha_______'yo'yo = yai'yo'yo
  
  yai'yo'ya, ha'yo'ya, ha_'yo'ya, ha__'yo'ya, ha___'yo'ya, ha____'yo'ya, ha_____'yo'ya, ha______'yo'ya, ha_______'yo'ya
   :: forall from into t i tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a)) i) -> into (from (a) o) (t (tt (ttt o)) i)
  yai'yo'ya x = fai (fo @from @from @tt `compose` fa @from @from @ttt) (yai @from @into x)
  ha'yo'ya = yai'yo'ya
  ha_'yo'ya = yai'yo'ya
  ha__'yo'ya = yai'yo'ya
  ha___'yo'ya = yai'yo'ya
  ha____'yo'ya = yai'yo'ya
  ha_____'yo'ya = yai'yo'ya
  ha______'yo'ya = yai'yo'ya
  ha_______'yo'ya = yai'yo'ya
  
  yai'yo'yoi, ha'yo'yoi, ha_'yo'yoi, ha__'yo'yoi, ha___'yo'yoi, ha____'yo'yoi, ha_____'yo'yoi, ha______'yo'yoi, ha_______'yo'yoi
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o iii)) i) -> into (from (a) o) (t (tt (ttt a iii)) i)
  yai'yo'yoi x = fai (fo @from @from @tt `compose` foi @from @from @ttt) (yai @from @into x)
  ha'yo'yoi = yai'yo'yoi
  ha_'yo'yoi = yai'yo'yoi
  ha__'yo'yoi = yai'yo'yoi
  ha___'yo'yoi = yai'yo'yoi
  ha____'yo'yoi = yai'yo'yoi
  ha_____'yo'yoi = yai'yo'yoi
  ha______'yo'yoi = yai'yo'yoi
  ha_______'yo'yoi = yai'yo'yoi
  
  yai'yo'yai, ha'yo'ha, ha_'yo'ha, ha__'yo'ha, ha___'yo'ha, ha____'yo'ha, ha_____'yo'ha, ha______'yo'ha, ha_______'yo'ha
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a iii)) i) -> into (from (a) o) (t (tt (ttt o iii)) i)
  yai'yo'yai x = fai (fo @from @from @tt `compose` fai @from @from @ttt) (yai @from @into x)
  ha'yo'ha = yai'yo'yai
  ha_'yo'ha = yai'yo'yai
  ha__'yo'ha = yai'yo'yai
  ha___'yo'ha = yai'yo'yai
  ha____'yo'ha = yai'yo'yai
  ha_____'yo'ha = yai'yo'yai
  ha______'yo'ha = yai'yo'yai
  ha_______'yo'ha = yai'yo'yai
  
  yai'yo'yio, ha'yo'ho, ha_'yo'ho, ha__'yo'ho, ha___'yo'ho, ha____'yo'ho, ha_____'yo'ho, ha______'yo'ho, ha_______'yo'ho
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (o))) i) -> into (from (a) o) (t (tt (ttt iii (a))) i)
  yai'yo'yio x = fai (fo @from @from @tt `compose` fio @from @from @ttt) (yai @from @into x)
  ha'yo'ho = yai'yo'yio
  ha_'yo'ho = yai'yo'yio
  ha__'yo'ho = yai'yo'yio
  ha___'yo'ho = yai'yo'yio
  ha____'yo'ho = yai'yo'yio
  ha_____'yo'ho = yai'yo'yio
  ha______'yo'ho = yai'yo'yio
  ha_______'yo'ho = yai'yo'yio
  
  yai'yo'yia, ha'yo'yia, ha_'yo'yia, ha__'yo'yia, ha___'yo'yia, ha____'yo'yia, ha_____'yo'yia, ha______'yo'yia, ha_______'yo'yia
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (a))) i) -> into (from (a) o) (t (tt (ttt iii (o))) i)
  yai'yo'yia x = fai (fo @from @from @tt `compose` fia @from @from @ttt) (yai @from @into x)
  ha'yo'yia = yai'yo'yia
  ha_'yo'yia = yai'yo'yia
  ha__'yo'yia = yai'yo'yia
  ha___'yo'yia = yai'yo'yia
  ha____'yo'yia = yai'yo'yia
  ha_____'yo'yia = yai'yo'yia
  ha______'yo'yia = yai'yo'yia
  ha_______'yo'yia = yai'yo'yia
  
  yai'ya'yo, ha'ya'yo, ha_'ya'yo, ha__'ya'yo, ha___'ya'yo, ha____'ya'yo, ha_____'ya'yo, ha______'ya'yo, ha_______'ya'yo
   :: forall from into t i tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a)) i) -> into (from (a) o) (t (tt (ttt o)) i)
  yai'ya'yo x = fai (fa @from @from @tt `compose` fo @from @from @ttt) (yai @from @into x)
  ha'ya'yo = yai'ya'yo
  ha_'ya'yo = yai'ya'yo
  ha__'ya'yo = yai'ya'yo
  ha___'ya'yo = yai'ya'yo
  ha____'ya'yo = yai'ya'yo
  ha_____'ya'yo = yai'ya'yo
  ha______'ya'yo = yai'ya'yo
  ha_______'ya'yo = yai'ya'yo
  
  yai'ya'ya, ha'ya'ya, ha_'ya'ya, ha__'ya'ya, ha___'ya'ya, ha____'ya'ya, ha_____'ya'ya, ha______'ya'ya, ha_______'ya'ya
   :: forall from into t i tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o)) i) -> into (from (a) o) (t (tt (ttt a)) i)
  yai'ya'ya x = fai (fa @from @from @tt `compose` fa @from @from @ttt) (yai @from @into x)
  ha'ya'ya = yai'ya'ya
  ha_'ya'ya = yai'ya'ya
  ha__'ya'ya = yai'ya'ya
  ha___'ya'ya = yai'ya'ya
  ha____'ya'ya = yai'ya'ya
  ha_____'ya'ya = yai'ya'ya
  ha______'ya'ya = yai'ya'ya
  ha_______'ya'ya = yai'ya'ya
  
  yai'ya'yoi, ha'ya'yoi, ha_'ya'yoi, ha__'ya'yoi, ha___'ya'yoi, ha____'ya'yoi, ha_____'ya'yoi, ha______'ya'yoi, ha_______'ya'yoi
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a iii)) i) -> into (from (a) o) (t (tt (ttt o iii)) i)
  yai'ya'yoi x = fai (fa @from @from @tt `compose` foi @from @from @ttt) (yai @from @into x)
  ha'ya'yoi = yai'ya'yoi
  ha_'ya'yoi = yai'ya'yoi
  ha__'ya'yoi = yai'ya'yoi
  ha___'ya'yoi = yai'ya'yoi
  ha____'ya'yoi = yai'ya'yoi
  ha_____'ya'yoi = yai'ya'yoi
  ha______'ya'yoi = yai'ya'yoi
  ha_______'ya'yoi = yai'ya'yoi
  
  yai'ya'yai, ha'ya'ha, ha_'ya'ha, ha__'ya'ha, ha___'ya'ha, ha____'ya'ha, ha_____'ya'ha, ha______'ya'ha, ha_______'ya'ha
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii)) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o iii)) i) -> into (from (a) o) (t (tt (ttt a iii)) i)
  yai'ya'yai x = fai (fa @from @from @tt `compose` fai @from @from @ttt) (yai @from @into x)
  ha'ya'ha = yai'ya'yai
  ha_'ya'ha = yai'ya'yai
  ha__'ya'ha = yai'ya'yai
  ha___'ya'ha = yai'ya'yai
  ha____'ya'ha = yai'ya'yai
  ha_____'ya'ha = yai'ya'yai
  ha______'ya'ha = yai'ya'yai
  ha_______'ya'ha = yai'ya'yai
  
  yai'ya'yio, ha'ya'ho, ha_'ya'ho, ha__'ya'ho, ha___'ya'ho, ha____'ya'ho, ha_____'ya'ho, ha______'ya'ho, ha_______'ya'ho
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (a))) i) -> into (from (a) o) (t (tt (ttt iii (o))) i)
  yai'ya'yio x = fai (fa @from @from @tt `compose` fio @from @from @ttt) (yai @from @into x)
  ha'ya'ho = yai'ya'yio
  ha_'ya'ho = yai'ya'yio
  ha__'ya'ho = yai'ya'yio
  ha___'ya'ho = yai'ya'yio
  ha____'ya'ho = yai'ya'yio
  ha_____'ya'ho = yai'ya'yio
  ha______'ya'ho = yai'ya'yio
  ha_______'ya'ho = yai'ya'yio
  
  yai'ya'yia, ha'ya'yia, ha_'ya'yia, ha__'ya'yia, ha___'ya'yia, ha____'ya'yia, ha_____'ya'yia, ha______'ya'yia, ha_______'ya'yia
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (o))) i) -> into (from (a) o) (t (tt (ttt iii (a))) i)
  yai'ya'yia x = fai (fa @from @from @tt `compose` fia @from @from @ttt) (yai @from @into x)
  ha'ya'yia = yai'ya'yia
  ha_'ya'yia = yai'ya'yia
  ha__'ya'yia = yai'ya'yia
  ha___'ya'yia = yai'ya'yia
  ha____'ya'yia = yai'ya'yia
  ha_____'ya'yia = yai'ya'yia
  ha______'ya'yia = yai'ya'yia
  ha_______'ya'yia = yai'ya'yia
  
  yai'yoi'yo, ha'yoi'yo, ha_'yoi'yo, ha__'yoi'yo, ha___'yoi'yo, ha____'yoi'yo, ha_____'yoi'yo, ha______'yoi'yo, ha_______'yoi'yo
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o) ii) i) -> into (from (a) o) (t (tt (ttt a) ii) i)
  yai'yoi'yo x = fai (foi @from @from @tt `compose` fo @from @from @ttt) (yai @from @into x)
  ha'yoi'yo = yai'yoi'yo
  ha_'yoi'yo = yai'yoi'yo
  ha__'yoi'yo = yai'yoi'yo
  ha___'yoi'yo = yai'yoi'yo
  ha____'yoi'yo = yai'yoi'yo
  ha_____'yoi'yo = yai'yoi'yo
  ha______'yoi'yo = yai'yoi'yo
  ha_______'yoi'yo = yai'yoi'yo
  
  yai'yoi'ya, ha'yoi'ya, ha_'yoi'ya, ha__'yoi'ya, ha___'yoi'ya, ha____'yoi'ya, ha_____'yoi'ya, ha______'yoi'ya, ha_______'yoi'ya
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a) ii) i) -> into (from (a) o) (t (tt (ttt o) ii) i)
  yai'yoi'ya x = fai (foi @from @from @tt `compose` fa @from @from @ttt) (yai @from @into x)
  ha'yoi'ya = yai'yoi'ya
  ha_'yoi'ya = yai'yoi'ya
  ha__'yoi'ya = yai'yoi'ya
  ha___'yoi'ya = yai'yoi'ya
  ha____'yoi'ya = yai'yoi'ya
  ha_____'yoi'ya = yai'yoi'ya
  ha______'yoi'ya = yai'yoi'ya
  ha_______'yoi'ya = yai'yoi'ya
  
  yai'yoi'yoi, ha'yoi'yoi, ha_'yoi'yoi, ha__'yoi'yoi, ha___'yoi'yoi, ha____'yoi'yoi, ha_____'yoi'yoi, ha______'yoi'yoi, ha_______'yoi'yoi
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o iii) ii) i) -> into (from (a) o) (t (tt (ttt a iii) ii) i)
  yai'yoi'yoi x = fai (foi @from @from @tt `compose` foi @from @from @ttt) (yai @from @into x)
  ha'yoi'yoi = yai'yoi'yoi
  ha_'yoi'yoi = yai'yoi'yoi
  ha__'yoi'yoi = yai'yoi'yoi
  ha___'yoi'yoi = yai'yoi'yoi
  ha____'yoi'yoi = yai'yoi'yoi
  ha_____'yoi'yoi = yai'yoi'yoi
  ha______'yoi'yoi = yai'yoi'yoi
  ha_______'yoi'yoi = yai'yoi'yoi
  
  yai'yoi'yai, ha'yoi'ha, ha_'yoi'ha, ha__'yoi'ha, ha___'yoi'ha, ha____'yoi'ha, ha_____'yoi'ha, ha______'yoi'ha, ha_______'yoi'ha
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a iii) ii) i) -> into (from (a) o) (t (tt (ttt o iii) ii) i)
  yai'yoi'yai x = fai (foi @from @from @tt `compose` fai @from @from @ttt) (yai @from @into x)
  ha'yoi'ha = yai'yoi'yai
  ha_'yoi'ha = yai'yoi'yai
  ha__'yoi'ha = yai'yoi'yai
  ha___'yoi'ha = yai'yoi'yai
  ha____'yoi'ha = yai'yoi'yai
  ha_____'yoi'ha = yai'yoi'yai
  ha______'yoi'ha = yai'yoi'yai
  ha_______'yoi'ha = yai'yoi'yai
  
  yai'yoi'yio, ha'yoi'ho, ha_'yoi'ho, ha__'yoi'ho, ha___'yoi'ho, ha____'yoi'ho, ha_____'yoi'ho, ha______'yoi'ho, ha_______'yoi'ho
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a)) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (o)) ii) i) -> into (from (a) o) (t (tt (ttt iii (a)) ii) i)
  yai'yoi'yio x = fai (foi @from @from @tt `compose` fio @from @from @ttt) (yai @from @into x)
  ha'yoi'ho = yai'yoi'yio
  ha_'yoi'ho = yai'yoi'yio
  ha__'yoi'ho = yai'yoi'yio
  ha___'yoi'ho = yai'yoi'yio
  ha____'yoi'ho = yai'yoi'yio
  ha_____'yoi'ho = yai'yoi'yio
  ha______'yoi'ho = yai'yoi'yio
  ha_______'yoi'ho = yai'yoi'yio
  
  yai'yoi'yia, ha'yoi'yia, ha_'yoi'yia, ha__'yoi'yia, ha___'yoi'yia, ha____'yoi'yia, ha_____'yoi'yia, ha______'yoi'yia, ha_______'yoi'yia
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o)) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (a)) ii) i) -> into (from (a) o) (t (tt (ttt iii (o)) ii) i)
  yai'yoi'yia x = fai (foi @from @from @tt `compose` fia @from @from @ttt) (yai @from @into x)
  ha'yoi'yia = yai'yoi'yia
  ha_'yoi'yia = yai'yoi'yia
  ha__'yoi'yia = yai'yoi'yia
  ha___'yoi'yia = yai'yoi'yia
  ha____'yoi'yia = yai'yoi'yia
  ha_____'yoi'yia = yai'yoi'yia
  ha______'yoi'yia = yai'yoi'yia
  ha_______'yoi'yia = yai'yoi'yia
  
  yai'yai'yo, ha'ha'yo, ha_'ha'yo, ha__'ha'yo, ha___'ha'yo, ha____'ha'yo, ha_____'ha'yo, ha______'ha'yo, ha_______'ha'yo
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a) ii) i) -> into (from (a) o) (t (tt (ttt o) ii) i)
  yai'yai'yo x = fai (fai @from @from @tt `compose` fo @from @from @ttt) (yai @from @into x)
  ha'ha'yo = yai'yai'yo
  ha_'ha'yo = yai'yai'yo
  ha__'ha'yo = yai'yai'yo
  ha___'ha'yo = yai'yai'yo
  ha____'ha'yo = yai'yai'yo
  ha_____'ha'yo = yai'yai'yo
  ha______'ha'yo = yai'yai'yo
  ha_______'ha'yo = yai'yai'yo
  
  yai'yai'ya, ha'ha'ya, ha_'ha'ya, ha__'ha'ya, ha___'ha'ya, ha____'ha'ya, ha_____'ha'ya, ha______'ha'ya, ha_______'ha'ya
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o) ii) i) -> into (from (a) o) (t (tt (ttt a) ii) i)
  yai'yai'ya x = fai (fai @from @from @tt `compose` fa @from @from @ttt) (yai @from @into x)
  ha'ha'ya = yai'yai'ya
  ha_'ha'ya = yai'yai'ya
  ha__'ha'ya = yai'yai'ya
  ha___'ha'ya = yai'yai'ya
  ha____'ha'ya = yai'yai'ya
  ha_____'ha'ya = yai'yai'ya
  ha______'ha'ya = yai'yai'ya
  ha_______'ha'ya = yai'yai'ya
  
  yai'yai'yoi, ha'ha'yoi, ha_'ha'yoi, ha__'ha'yoi, ha___'ha'yoi, ha____'ha'yoi, ha_____'ha'yoi, ha______'ha'yoi, ha_______'ha'yoi
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt o iii) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt a iii) ii) i) -> into (from (a) o) (t (tt (ttt o iii) ii) i)
  yai'yai'yoi x = fai (fai @from @from @tt `compose` foi @from @from @ttt) (yai @from @into x)
  ha'ha'yoi = yai'yai'yoi
  ha_'ha'yoi = yai'yai'yoi
  ha__'ha'yoi = yai'yai'yoi
  ha___'ha'yoi = yai'yai'yoi
  ha____'ha'yoi = yai'yai'yoi
  ha_____'ha'yoi = yai'yai'yoi
  ha______'ha'yoi = yai'yai'yoi
  ha_______'ha'yoi = yai'yai'yoi
  
  yai'yai'yai, ha'ha'ha, ha_'ha'ha, ha__'ha'ha, ha___'ha'ha, ha____'ha'ha, ha_____'ha'ha, ha______'ha'ha, ha_______'ha'ha
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt a iii) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt o iii) ii) i) -> into (from (a) o) (t (tt (ttt a iii) ii) i)
  yai'yai'yai x = fai (fai @from @from @tt `compose` fai @from @from @ttt) (yai @from @into x)
  ha'ha'ha = yai'yai'yai
  ha_'ha'ha = yai'yai'yai
  ha__'ha'ha = yai'yai'yai
  ha___'ha'ha = yai'yai'yai
  ha____'ha'ha = yai'yai'yai
  ha_____'ha'ha = yai'yai'yai
  ha______'ha'ha = yai'yai'yai
  ha_______'ha'ha = yai'yai'yai
  
  yai'yai'yio, ha'ha'ho, ha_'ha'ho, ha__'ha'ho, ha___'ha'ho, ha____'ha'ho, ha_____'ha'ho, ha______'ha'ho, ha_______'ha'ho
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (o)) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (a)) ii) i) -> into (from (a) o) (t (tt (ttt iii (o)) ii) i)
  yai'yai'yio x = fai (fai @from @from @tt `compose` fio @from @from @ttt) (yai @from @into x)
  ha'ha'ho = yai'yai'yio
  ha_'ha'ho = yai'yai'yio
  ha__'ha'ho = yai'yai'yio
  ha___'ha'ho = yai'yai'yio
  ha____'ha'ho = yai'yai'yio
  ha_____'ha'ho = yai'yai'yio
  ha______'ha'ho = yai'yai'yio
  ha_______'ha'ho = yai'yai'yio
  
  yai'yai'yia, ha'ha'yia, ha_'ha'yia, ha__'ha'yia, ha___'ha'yia, ha____'ha'yia, ha_____'ha'yia, ha______'ha'yia, ha_______'ha'yia
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt (ttt iii (a)) ii) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt (ttt iii (o)) ii) i) -> into (from (a) o) (t (tt (ttt iii (a)) ii) i)
  yai'yai'yia x = fai (fai @from @from @tt `compose` fia @from @from @ttt) (yai @from @into x)
  ha'ha'yia = yai'yai'yia
  ha_'ha'yia = yai'yai'yia
  ha__'ha'yia = yai'yai'yia
  ha___'ha'yia = yai'yai'yia
  ha____'ha'yia = yai'yai'yia
  ha_____'ha'yia = yai'yai'yia
  ha______'ha'yia = yai'yai'yia
  ha_______'ha'yia = yai'yai'yia
  
  yai'yio'yo, ha'ho'yo, ha_'ho'yo, ha__'ho'yo, ha___'ho'yo, ha____'ho'yo, ha_____'ho'yo, ha______'ho'yo, ha_______'ho'yo
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt o))) i) -> into (from (a) o) (t (tt ii ((ttt a))) i)
  yai'yio'yo x = fai (fio @from @from @tt `compose` fo @from @from @ttt) (yai @from @into x)
  ha'ho'yo = yai'yio'yo
  ha_'ho'yo = yai'yio'yo
  ha__'ho'yo = yai'yio'yo
  ha___'ho'yo = yai'yio'yo
  ha____'ho'yo = yai'yio'yo
  ha_____'ho'yo = yai'yio'yo
  ha______'ho'yo = yai'yio'yo
  ha_______'ho'yo = yai'yio'yo
  
  yai'yio'ya, ha'ho'ya, ha_'ho'ya, ha__'ho'ya, ha___'ho'ya, ha____'ho'ya, ha_____'ho'ya, ha______'ho'ya, ha_______'ho'ya
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt a))) i) -> into (from (a) o) (t (tt ii ((ttt o))) i)
  yai'yio'ya x = fai (fio @from @from @tt `compose` fa @from @from @ttt) (yai @from @into x)
  ha'ho'ya = yai'yio'ya
  ha_'ho'ya = yai'yio'ya
  ha__'ho'ya = yai'yio'ya
  ha___'ho'ya = yai'yio'ya
  ha____'ho'ya = yai'yio'ya
  ha_____'ho'ya = yai'yio'ya
  ha______'ho'ya = yai'yio'ya
  ha_______'ho'ya = yai'yio'ya
  
  yai'yio'yoi, ha'ho'yoi, ha_'ho'yoi, ha__'ho'yoi, ha___'ho'yoi, ha____'ho'yoi, ha_____'ho'yoi, ha______'ho'yoi, ha_______'ho'yoi
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a iii))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt o iii))) i) -> into (from (a) o) (t (tt ii ((ttt a iii))) i)
  yai'yio'yoi x = fai (fio @from @from @tt `compose` foi @from @from @ttt) (yai @from @into x)
  ha'ho'yoi = yai'yio'yoi
  ha_'ho'yoi = yai'yio'yoi
  ha__'ho'yoi = yai'yio'yoi
  ha___'ho'yoi = yai'yio'yoi
  ha____'ho'yoi = yai'yio'yoi
  ha_____'ho'yoi = yai'yio'yoi
  ha______'ho'yoi = yai'yio'yoi
  ha_______'ho'yoi = yai'yio'yoi
  
  yai'yio'yai, ha'ho'ha, ha_'ho'ha, ha__'ho'ha, ha___'ho'ha, ha____'ho'ha, ha_____'ho'ha, ha______'ho'ha, ha_______'ho'ha
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o iii))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt a iii))) i) -> into (from (a) o) (t (tt ii ((ttt o iii))) i)
  yai'yio'yai x = fai (fio @from @from @tt `compose` fai @from @from @ttt) (yai @from @into x)
  ha'ho'ha = yai'yio'yai
  ha_'ho'ha = yai'yio'yai
  ha__'ho'ha = yai'yio'yai
  ha___'ho'ha = yai'yio'yai
  ha____'ho'ha = yai'yio'yai
  ha_____'ho'ha = yai'yio'yai
  ha______'ho'ha = yai'yio'yai
  ha_______'ho'ha = yai'yio'yai
  
  yai'yio'yio, ha'ho'ho, ha_'ho'ho, ha__'ho'ho, ha___'ho'ho, ha____'ho'ho, ha_____'ho'ho, ha______'ho'ho, ha_______'ho'ho
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (a)))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt iii (o)))) i) -> into (from (a) o) (t (tt ii ((ttt iii (a)))) i)
  yai'yio'yio x = fai (fio @from @from @tt `compose` fio @from @from @ttt) (yai @from @into x)
  ha'ho'ho = yai'yio'yio
  ha_'ho'ho = yai'yio'yio
  ha__'ho'ho = yai'yio'yio
  ha___'ho'ho = yai'yio'yio
  ha____'ho'ho = yai'yio'yio
  ha_____'ho'ho = yai'yio'yio
  ha______'ho'ho = yai'yio'yio
  ha_______'ho'ho = yai'yio'yio
  
  yai'yio'yia, ha'ho'yia, ha_'ho'yia, ha__'ho'yia, ha___'ho'yia, ha____'ho'yia, ha_____'ho'yia, ha______'ho'yia, ha_______'ho'yia
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (o)))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt iii (a)))) i) -> into (from (a) o) (t (tt ii ((ttt iii (o)))) i)
  yai'yio'yia x = fai (fio @from @from @tt `compose` fia @from @from @ttt) (yai @from @into x)
  ha'ho'yia = yai'yio'yia
  ha_'ho'yia = yai'yio'yia
  ha__'ho'yia = yai'yio'yia
  ha___'ho'yia = yai'yio'yia
  ha____'ho'yia = yai'yio'yia
  ha_____'ho'yia = yai'yio'yia
  ha______'ho'yia = yai'yio'yia
  ha_______'ho'yia = yai'yio'yia
  
  yai'yia'yo, ha'yia'yo, ha_'yia'yo, ha__'yia'yo, ha___'yia'yo, ha____'yia'yo, ha_____'yia'yo, ha______'yia'yo, ha_______'yia'yo
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt a))) i) -> into (from (a) o) (t (tt ii ((ttt o))) i)
  yai'yia'yo x = fai (fia @from @from @tt `compose` fo @from @from @ttt) (yai @from @into x)
  ha'yia'yo = yai'yia'yo
  ha_'yia'yo = yai'yia'yo
  ha__'yia'yo = yai'yia'yo
  ha___'yia'yo = yai'yia'yo
  ha____'yia'yo = yai'yia'yo
  ha_____'yia'yo = yai'yia'yo
  ha______'yia'yo = yai'yia'yo
  ha_______'yia'yo = yai'yia'yo
  
  yai'yia'ya, ha'yia'ya, ha_'yia'ya, ha__'yia'ya, ha___'yia'ya, ha____'yia'ya, ha_____'yia'ya, ha______'yia'ya, ha_______'yia'ya
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt o))) i) -> into (from (a) o) (t (tt ii ((ttt a))) i)
  yai'yia'ya x = fai (fia @from @from @tt `compose` fa @from @from @ttt) (yai @from @into x)
  ha'yia'ya = yai'yia'ya
  ha_'yia'ya = yai'yia'ya
  ha__'yia'ya = yai'yia'ya
  ha___'yia'ya = yai'yia'ya
  ha____'yia'ya = yai'yia'ya
  ha_____'yia'ya = yai'yia'ya
  ha______'yia'ya = yai'yia'ya
  ha_______'yia'ya = yai'yia'ya
  
  yai'yia'yoi, ha'yia'yoi, ha_'yia'yoi, ha__'yia'yoi, ha___'yia'yoi, ha____'yia'yoi, ha_____'yia'yoi, ha______'yia'yoi, ha_______'yia'yoi
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt o iii))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt a iii))) i) -> into (from (a) o) (t (tt ii ((ttt o iii))) i)
  yai'yia'yoi x = fai (fia @from @from @tt `compose` foi @from @from @ttt) (yai @from @into x)
  ha'yia'yoi = yai'yia'yoi
  ha_'yia'yoi = yai'yia'yoi
  ha__'yia'yoi = yai'yia'yoi
  ha___'yia'yoi = yai'yia'yoi
  ha____'yia'yoi = yai'yia'yoi
  ha_____'yia'yoi = yai'yia'yoi
  ha______'yia'yoi = yai'yia'yoi
  ha_______'yia'yoi = yai'yia'yoi
  
  yai'yia'yai, ha'yia'ha, ha_'yia'ha, ha__'yia'ha, ha___'yia'ha, ha____'yia'ha, ha_____'yia'ha, ha______'yia'ha, ha_______'yia'ha
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt a iii))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt o iii))) i) -> into (from (a) o) (t (tt ii ((ttt a iii))) i)
  yai'yia'yai x = fai (fia @from @from @tt `compose` fai @from @from @ttt) (yai @from @into x)
  ha'yia'ha = yai'yia'yai
  ha_'yia'ha = yai'yia'yai
  ha__'yia'ha = yai'yia'yai
  ha___'yia'ha = yai'yia'yai
  ha____'yia'ha = yai'yia'yai
  ha_____'yia'ha = yai'yia'yai
  ha______'yia'ha = yai'yia'yai
  ha_______'yia'ha = yai'yia'yai
  
  yai'yia'yio, ha'yia'ho, ha_'yia'ho, ha__'yia'ho, ha___'yia'ho, ha____'yia'ho, ha_____'yia'ho, ha______'yia'ho, ha_______'yia'ho
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (o)))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt iii (a)))) i) -> into (from (a) o) (t (tt ii ((ttt iii (o)))) i)
  yai'yia'yio x = fai (fia @from @from @tt `compose` fio @from @from @ttt) (yai @from @into x)
  ha'yia'ho = yai'yia'yio
  ha_'yia'ho = yai'yia'yio
  ha__'yia'ho = yai'yia'yio
  ha___'yia'ho = yai'yia'yio
  ha____'yia'ho = yai'yia'yio
  ha_____'yia'ho = yai'yia'yio
  ha______'yia'ho = yai'yia'yio
  ha_______'yia'ho = yai'yia'yio
  
  yai'yia'yia, ha'yia'yia, ha_'yia'yia, ha__'yia'yia, ha___'yia'yia, ha____'yia'yia, ha_____'yia'yia, ha______'yia'yia, ha_______'yia'yia
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'II'I t i) =>
   (forall e ee . Wrapper into (T'II'I t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t (tt ii ((ttt iii (a)))) i)) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t (tt ii ((ttt iii (o)))) i) -> into (from (a) o) (t (tt ii ((ttt iii (a)))) i)
  yai'yia'yia x = fai (fia @from @from @tt `compose` fia @from @from @ttt) (yai @from @into x)
  ha'yia'yia = yai'yia'yia
  ha_'yia'yia = yai'yia'yia
  ha__'yia'yia = yai'yia'yia
  ha___'yia'yia = yai'yia'yia
  ha____'yia'yia = yai'yia'yia
  ha_____'yia'yia = yai'yia'yia
  ha______'yia'yia = yai'yia'yia
  ha_______'yia'yia = yai'yia'yia
  
  yio'yo'yo, ho'yo'yo, ho_'yo'yo, ho__'yo'yo, ho___'yo'yo, ho____'yo'yo, ho_____'yo'yo, ho______'yo'yo, ho_______'yo'yo
   :: forall from into t i tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt a)))) -> into (from (a) o) (t i ((tt (ttt o))))
  yio'yo'yo x = fai (fo @from @from @tt `compose` fo @from @from @ttt) (yio @from @into x)
  ho'yo'yo = yio'yo'yo
  ho_'yo'yo = yio'yo'yo
  ho__'yo'yo = yio'yo'yo
  ho___'yo'yo = yio'yo'yo
  ho____'yo'yo = yio'yo'yo
  ho_____'yo'yo = yio'yo'yo
  ho______'yo'yo = yio'yo'yo
  ho_______'yo'yo = yio'yo'yo
  
  yio'yo'ya, ho'yo'ya, ho_'yo'ya, ho__'yo'ya, ho___'yo'ya, ho____'yo'ya, ho_____'yo'ya, ho______'yo'ya, ho_______'yo'ya
   :: forall from into t i tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt o)))) -> into (from (a) o) (t i ((tt (ttt a))))
  yio'yo'ya x = fai (fo @from @from @tt `compose` fa @from @from @ttt) (yio @from @into x)
  ho'yo'ya = yio'yo'ya
  ho_'yo'ya = yio'yo'ya
  ho__'yo'ya = yio'yo'ya
  ho___'yo'ya = yio'yo'ya
  ho____'yo'ya = yio'yo'ya
  ho_____'yo'ya = yio'yo'ya
  ho______'yo'ya = yio'yo'ya
  ho_______'yo'ya = yio'yo'ya
  
  yio'yo'yoi, ho'yo'yoi, ho_'yo'yoi, ho__'yo'yoi, ho___'yo'yoi, ho____'yo'yoi, ho_____'yo'yoi, ho______'yo'yoi, ho_______'yo'yoi
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o iii))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt a iii)))) -> into (from (a) o) (t i ((tt (ttt o iii))))
  yio'yo'yoi x = fai (fo @from @from @tt `compose` foi @from @from @ttt) (yio @from @into x)
  ho'yo'yoi = yio'yo'yoi
  ho_'yo'yoi = yio'yo'yoi
  ho__'yo'yoi = yio'yo'yoi
  ho___'yo'yoi = yio'yo'yoi
  ho____'yo'yoi = yio'yo'yoi
  ho_____'yo'yoi = yio'yo'yoi
  ho______'yo'yoi = yio'yo'yoi
  ho_______'yo'yoi = yio'yo'yoi
  
  yio'yo'yai, ho'yo'ha, ho_'yo'ha, ho__'yo'ha, ho___'yo'ha, ho____'yo'ha, ho_____'yo'ha, ho______'yo'ha, ho_______'yo'ha
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a iii))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt o iii)))) -> into (from (a) o) (t i ((tt (ttt a iii))))
  yio'yo'yai x = fai (fo @from @from @tt `compose` fai @from @from @ttt) (yio @from @into x)
  ho'yo'ha = yio'yo'yai
  ho_'yo'ha = yio'yo'yai
  ho__'yo'ha = yio'yo'yai
  ho___'yo'ha = yio'yo'yai
  ho____'yo'ha = yio'yo'yai
  ho_____'yo'ha = yio'yo'yai
  ho______'yo'ha = yio'yo'yai
  ho_______'yo'ha = yio'yo'yai
  
  yio'yo'yio, ho'yo'ho, ho_'yo'ho, ho__'yo'ho, ho___'yo'ho, ho____'yo'ho, ho_____'yo'ho, ho______'yo'ho, ho_______'yo'ho
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (o)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt iii (a))))) -> into (from (a) o) (t i ((tt (ttt iii (o)))))
  yio'yo'yio x = fai (fo @from @from @tt `compose` fio @from @from @ttt) (yio @from @into x)
  ho'yo'ho = yio'yo'yio
  ho_'yo'ho = yio'yo'yio
  ho__'yo'ho = yio'yo'yio
  ho___'yo'ho = yio'yo'yio
  ho____'yo'ho = yio'yo'yio
  ho_____'yo'ho = yio'yo'yio
  ho______'yo'ho = yio'yo'yio
  ho_______'yo'ho = yio'yo'yio
  
  yio'yo'yia, ho'yo'yia, ho_'yo'yia, ho__'yo'yia, ho___'yo'yia, ho____'yo'yia, ho_____'yo'yia, ho______'yo'yia, ho_______'yo'yia
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (a)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt iii (o))))) -> into (from (a) o) (t i ((tt (ttt iii (a)))))
  yio'yo'yia x = fai (fo @from @from @tt `compose` fia @from @from @ttt) (yio @from @into x)
  ho'yo'yia = yio'yo'yia
  ho_'yo'yia = yio'yo'yia
  ho__'yo'yia = yio'yo'yia
  ho___'yo'yia = yio'yo'yia
  ho____'yo'yia = yio'yo'yia
  ho_____'yo'yia = yio'yo'yia
  ho______'yo'yia = yio'yo'yia
  ho_______'yo'yia = yio'yo'yia
  
  yio'ya'yo, ho'ya'yo, ho_'ya'yo, ho__'ya'yo, ho___'ya'yo, ho____'ya'yo, ho_____'ya'yo, ho______'ya'yo, ho_______'ya'yo
   :: forall from into t i tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt o)))) -> into (from (a) o) (t i ((tt (ttt a))))
  yio'ya'yo x = fai (fa @from @from @tt `compose` fo @from @from @ttt) (yio @from @into x)
  ho'ya'yo = yio'ya'yo
  ho_'ya'yo = yio'ya'yo
  ho__'ya'yo = yio'ya'yo
  ho___'ya'yo = yio'ya'yo
  ho____'ya'yo = yio'ya'yo
  ho_____'ya'yo = yio'ya'yo
  ho______'ya'yo = yio'ya'yo
  ho_______'ya'yo = yio'ya'yo
  
  yio'ya'ya, ho'ya'ya, ho_'ya'ya, ho__'ya'ya, ho___'ya'ya, ho____'ya'ya, ho_____'ya'ya, ho______'ya'ya, ho_______'ya'ya
   :: forall from into t i tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt a)))) -> into (from (a) o) (t i ((tt (ttt o))))
  yio'ya'ya x = fai (fa @from @from @tt `compose` fa @from @from @ttt) (yio @from @into x)
  ho'ya'ya = yio'ya'ya
  ho_'ya'ya = yio'ya'ya
  ho__'ya'ya = yio'ya'ya
  ho___'ya'ya = yio'ya'ya
  ho____'ya'ya = yio'ya'ya
  ho_____'ya'ya = yio'ya'ya
  ho______'ya'ya = yio'ya'ya
  ho_______'ya'ya = yio'ya'ya
  
  yio'ya'yoi, ho'ya'yoi, ho_'ya'yoi, ho__'ya'yoi, ho___'ya'yoi, ho____'ya'yoi, ho_____'ya'yoi, ho______'ya'yoi, ho_______'ya'yoi
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a iii))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt o iii)))) -> into (from (a) o) (t i ((tt (ttt a iii))))
  yio'ya'yoi x = fai (fa @from @from @tt `compose` foi @from @from @ttt) (yio @from @into x)
  ho'ya'yoi = yio'ya'yoi
  ho_'ya'yoi = yio'ya'yoi
  ho__'ya'yoi = yio'ya'yoi
  ho___'ya'yoi = yio'ya'yoi
  ho____'ya'yoi = yio'ya'yoi
  ho_____'ya'yoi = yio'ya'yoi
  ho______'ya'yoi = yio'ya'yoi
  ho_______'ya'yoi = yio'ya'yoi
  
  yio'ya'yai, ho'ya'ha, ho_'ya'ha, ho__'ya'ha, ho___'ya'ha, ho____'ya'ha, ho_____'ya'ha, ho______'ya'ha, ho_______'ya'ha
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o iii))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt a iii)))) -> into (from (a) o) (t i ((tt (ttt o iii))))
  yio'ya'yai x = fai (fa @from @from @tt `compose` fai @from @from @ttt) (yio @from @into x)
  ho'ya'ha = yio'ya'yai
  ho_'ya'ha = yio'ya'yai
  ho__'ya'ha = yio'ya'yai
  ho___'ya'ha = yio'ya'yai
  ho____'ya'ha = yio'ya'yai
  ho_____'ya'ha = yio'ya'yai
  ho______'ya'ha = yio'ya'yai
  ho_______'ya'ha = yio'ya'yai
  
  yio'ya'yio, ho'ya'ho, ho_'ya'ho, ho__'ya'ho, ho___'ya'ho, ho____'ya'ho, ho_____'ya'ho, ho______'ya'ho, ho_______'ya'ho
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (a)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt iii (o))))) -> into (from (a) o) (t i ((tt (ttt iii (a)))))
  yio'ya'yio x = fai (fa @from @from @tt `compose` fio @from @from @ttt) (yio @from @into x)
  ho'ya'ho = yio'ya'yio
  ho_'ya'ho = yio'ya'yio
  ho__'ya'ho = yio'ya'yio
  ho___'ya'ho = yio'ya'yio
  ho____'ya'ho = yio'ya'yio
  ho_____'ya'ho = yio'ya'yio
  ho______'ya'ho = yio'ya'yio
  ho_______'ya'ho = yio'ya'yio
  
  yio'ya'yia, ho'ya'yia, ho_'ya'yia, ho__'ya'yia, ho___'ya'yia, ho____'ya'yia, ho_____'ya'yia, ho______'ya'yia, ho_______'ya'yia
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (o)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt iii (a))))) -> into (from (a) o) (t i ((tt (ttt iii (o)))))
  yio'ya'yia x = fai (fa @from @from @tt `compose` fia @from @from @ttt) (yio @from @into x)
  ho'ya'yia = yio'ya'yia
  ho_'ya'yia = yio'ya'yia
  ho__'ya'yia = yio'ya'yia
  ho___'ya'yia = yio'ya'yia
  ho____'ya'yia = yio'ya'yia
  ho_____'ya'yia = yio'ya'yia
  ho______'ya'yia = yio'ya'yia
  ho_______'ya'yia = yio'ya'yia
  
  yio'yoi'yo, ho'yoi'yo, ho_'yoi'yo, ho__'yoi'yo, ho___'yoi'yo, ho____'yoi'yo, ho_____'yoi'yo, ho______'yoi'yo, ho_______'yoi'yo
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt a) ii))) -> into (from (a) o) (t i ((tt (ttt o) ii)))
  yio'yoi'yo x = fai (foi @from @from @tt `compose` fo @from @from @ttt) (yio @from @into x)
  ho'yoi'yo = yio'yoi'yo
  ho_'yoi'yo = yio'yoi'yo
  ho__'yoi'yo = yio'yoi'yo
  ho___'yoi'yo = yio'yoi'yo
  ho____'yoi'yo = yio'yoi'yo
  ho_____'yoi'yo = yio'yoi'yo
  ho______'yoi'yo = yio'yoi'yo
  ho_______'yoi'yo = yio'yoi'yo
  
  yio'yoi'ya, ho'yoi'ya, ho_'yoi'ya, ho__'yoi'ya, ho___'yoi'ya, ho____'yoi'ya, ho_____'yoi'ya, ho______'yoi'ya, ho_______'yoi'ya
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt o) ii))) -> into (from (a) o) (t i ((tt (ttt a) ii)))
  yio'yoi'ya x = fai (foi @from @from @tt `compose` fa @from @from @ttt) (yio @from @into x)
  ho'yoi'ya = yio'yoi'ya
  ho_'yoi'ya = yio'yoi'ya
  ho__'yoi'ya = yio'yoi'ya
  ho___'yoi'ya = yio'yoi'ya
  ho____'yoi'ya = yio'yoi'ya
  ho_____'yoi'ya = yio'yoi'ya
  ho______'yoi'ya = yio'yoi'ya
  ho_______'yoi'ya = yio'yoi'ya
  
  yio'yoi'yoi, ho'yoi'yoi, ho_'yoi'yoi, ho__'yoi'yoi, ho___'yoi'yoi, ho____'yoi'yoi, ho_____'yoi'yoi, ho______'yoi'yoi, ho_______'yoi'yoi
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o iii) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt a iii) ii))) -> into (from (a) o) (t i ((tt (ttt o iii) ii)))
  yio'yoi'yoi x = fai (foi @from @from @tt `compose` foi @from @from @ttt) (yio @from @into x)
  ho'yoi'yoi = yio'yoi'yoi
  ho_'yoi'yoi = yio'yoi'yoi
  ho__'yoi'yoi = yio'yoi'yoi
  ho___'yoi'yoi = yio'yoi'yoi
  ho____'yoi'yoi = yio'yoi'yoi
  ho_____'yoi'yoi = yio'yoi'yoi
  ho______'yoi'yoi = yio'yoi'yoi
  ho_______'yoi'yoi = yio'yoi'yoi
  
  yio'yoi'yai, ho'yoi'ha, ho_'yoi'ha, ho__'yoi'ha, ho___'yoi'ha, ho____'yoi'ha, ho_____'yoi'ha, ho______'yoi'ha, ho_______'yoi'ha
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a iii) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt o iii) ii))) -> into (from (a) o) (t i ((tt (ttt a iii) ii)))
  yio'yoi'yai x = fai (foi @from @from @tt `compose` fai @from @from @ttt) (yio @from @into x)
  ho'yoi'ha = yio'yoi'yai
  ho_'yoi'ha = yio'yoi'yai
  ho__'yoi'ha = yio'yoi'yai
  ho___'yoi'ha = yio'yoi'yai
  ho____'yoi'ha = yio'yoi'yai
  ho_____'yoi'ha = yio'yoi'yai
  ho______'yoi'ha = yio'yoi'yai
  ho_______'yoi'ha = yio'yoi'yai
  
  yio'yoi'yio, ho'yoi'ho, ho_'yoi'ho, ho__'yoi'ho, ho___'yoi'ho, ho____'yoi'ho, ho_____'yoi'ho, ho______'yoi'ho, ho_______'yoi'ho
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (o)) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt iii (a)) ii))) -> into (from (a) o) (t i ((tt (ttt iii (o)) ii)))
  yio'yoi'yio x = fai (foi @from @from @tt `compose` fio @from @from @ttt) (yio @from @into x)
  ho'yoi'ho = yio'yoi'yio
  ho_'yoi'ho = yio'yoi'yio
  ho__'yoi'ho = yio'yoi'yio
  ho___'yoi'ho = yio'yoi'yio
  ho____'yoi'ho = yio'yoi'yio
  ho_____'yoi'ho = yio'yoi'yio
  ho______'yoi'ho = yio'yoi'yio
  ho_______'yoi'ho = yio'yoi'yio
  
  yio'yoi'yia, ho'yoi'yia, ho_'yoi'yia, ho__'yoi'yia, ho___'yoi'yia, ho____'yoi'yia, ho_____'yoi'yia, ho______'yoi'yia, ho_______'yoi'yia
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (a)) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt iii (o)) ii))) -> into (from (a) o) (t i ((tt (ttt iii (a)) ii)))
  yio'yoi'yia x = fai (foi @from @from @tt `compose` fia @from @from @ttt) (yio @from @into x)
  ho'yoi'yia = yio'yoi'yia
  ho_'yoi'yia = yio'yoi'yia
  ho__'yoi'yia = yio'yoi'yia
  ho___'yoi'yia = yio'yoi'yia
  ho____'yoi'yia = yio'yoi'yia
  ho_____'yoi'yia = yio'yoi'yia
  ho______'yoi'yia = yio'yoi'yia
  ho_______'yoi'yia = yio'yoi'yia
  
  yio'yai'yo, ho'ha'yo, ho_'ha'yo, ho__'ha'yo, ho___'ha'yo, ho____'ha'yo, ho_____'ha'yo, ho______'ha'yo, ho_______'ha'yo
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt o) ii))) -> into (from (a) o) (t i ((tt (ttt a) ii)))
  yio'yai'yo x = fai (fai @from @from @tt `compose` fo @from @from @ttt) (yio @from @into x)
  ho'ha'yo = yio'yai'yo
  ho_'ha'yo = yio'yai'yo
  ho__'ha'yo = yio'yai'yo
  ho___'ha'yo = yio'yai'yo
  ho____'ha'yo = yio'yai'yo
  ho_____'ha'yo = yio'yai'yo
  ho______'ha'yo = yio'yai'yo
  ho_______'ha'yo = yio'yai'yo
  
  yio'yai'ya, ho'ha'ya, ho_'ha'ya, ho__'ha'ya, ho___'ha'ya, ho____'ha'ya, ho_____'ha'ya, ho______'ha'ya, ho_______'ha'ya
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt a) ii))) -> into (from (a) o) (t i ((tt (ttt o) ii)))
  yio'yai'ya x = fai (fai @from @from @tt `compose` fa @from @from @ttt) (yio @from @into x)
  ho'ha'ya = yio'yai'ya
  ho_'ha'ya = yio'yai'ya
  ho__'ha'ya = yio'yai'ya
  ho___'ha'ya = yio'yai'ya
  ho____'ha'ya = yio'yai'ya
  ho_____'ha'ya = yio'yai'ya
  ho______'ha'ya = yio'yai'ya
  ho_______'ha'ya = yio'yai'ya
  
  yio'yai'yoi, ho'ha'yoi, ho_'ha'yoi, ho__'ha'yoi, ho___'ha'yoi, ho____'ha'yoi, ho_____'ha'yoi, ho______'ha'yoi, ho_______'ha'yoi
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a iii) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt o iii) ii))) -> into (from (a) o) (t i ((tt (ttt a iii) ii)))
  yio'yai'yoi x = fai (fai @from @from @tt `compose` foi @from @from @ttt) (yio @from @into x)
  ho'ha'yoi = yio'yai'yoi
  ho_'ha'yoi = yio'yai'yoi
  ho__'ha'yoi = yio'yai'yoi
  ho___'ha'yoi = yio'yai'yoi
  ho____'ha'yoi = yio'yai'yoi
  ho_____'ha'yoi = yio'yai'yoi
  ho______'ha'yoi = yio'yai'yoi
  ho_______'ha'yoi = yio'yai'yoi
  
  yio'yai'yai, ho'ha'ha, ho_'ha'ha, ho__'ha'ha, ho___'ha'ha, ho____'ha'ha, ho_____'ha'ha, ho______'ha'ha, ho_______'ha'ha
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o iii) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt a iii) ii))) -> into (from (a) o) (t i ((tt (ttt o iii) ii)))
  yio'yai'yai x = fai (fai @from @from @tt `compose` fai @from @from @ttt) (yio @from @into x)
  ho'ha'ha = yio'yai'yai
  ho_'ha'ha = yio'yai'yai
  ho__'ha'ha = yio'yai'yai
  ho___'ha'ha = yio'yai'yai
  ho____'ha'ha = yio'yai'yai
  ho_____'ha'ha = yio'yai'yai
  ho______'ha'ha = yio'yai'yai
  ho_______'ha'ha = yio'yai'yai
  
  yio'yai'yio, ho'ha'ho, ho_'ha'ho, ho__'ha'ho, ho___'ha'ho, ho____'ha'ho, ho_____'ha'ho, ho______'ha'ho, ho_______'ha'ho
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (a)) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt iii (o)) ii))) -> into (from (a) o) (t i ((tt (ttt iii (a)) ii)))
  yio'yai'yio x = fai (fai @from @from @tt `compose` fio @from @from @ttt) (yio @from @into x)
  ho'ha'ho = yio'yai'yio
  ho_'ha'ho = yio'yai'yio
  ho__'ha'ho = yio'yai'yio
  ho___'ha'ho = yio'yai'yio
  ho____'ha'ho = yio'yai'yio
  ho_____'ha'ho = yio'yai'yio
  ho______'ha'ho = yio'yai'yio
  ho_______'ha'ho = yio'yai'yio
  
  yio'yai'yia, ho'ha'yia, ho_'ha'yia, ho__'ha'yia, ho___'ha'yia, ho____'ha'yia, ho_____'ha'yia, ho______'ha'yia, ho_______'ha'yia
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (o)) ii)))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt (ttt iii (a)) ii))) -> into (from (a) o) (t i ((tt (ttt iii (o)) ii)))
  yio'yai'yia x = fai (fai @from @from @tt `compose` fia @from @from @ttt) (yio @from @into x)
  ho'ha'yia = yio'yai'yia
  ho_'ha'yia = yio'yai'yia
  ho__'ha'yia = yio'yai'yia
  ho___'ha'yia = yio'yai'yia
  ho____'ha'yia = yio'yai'yia
  ho_____'ha'yia = yio'yai'yia
  ho______'ha'yia = yio'yai'yia
  ho_______'ha'yia = yio'yai'yia
  
  yio'yio'yo, ho'ho'yo, ho_'ho'yo, ho__'ho'yo, ho___'ho'yo, ho____'ho'yo, ho_____'ho'yo, ho______'ho'yo, ho_______'ho'yo
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt o)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt a))))) -> into (from (a) o) (t i ((tt ii ((ttt o)))))
  yio'yio'yo x = fai (fio @from @from @tt `compose` fo @from @from @ttt) (yio @from @into x)
  ho'ho'yo = yio'yio'yo
  ho_'ho'yo = yio'yio'yo
  ho__'ho'yo = yio'yio'yo
  ho___'ho'yo = yio'yio'yo
  ho____'ho'yo = yio'yio'yo
  ho_____'ho'yo = yio'yio'yo
  ho______'ho'yo = yio'yio'yo
  ho_______'ho'yo = yio'yio'yo
  
  yio'yio'ya, ho'ho'ya, ho_'ho'ya, ho__'ho'ya, ho___'ho'ya, ho____'ho'ya, ho_____'ho'ya, ho______'ho'ya, ho_______'ho'ya
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt a)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt o))))) -> into (from (a) o) (t i ((tt ii ((ttt a)))))
  yio'yio'ya x = fai (fio @from @from @tt `compose` fa @from @from @ttt) (yio @from @into x)
  ho'ho'ya = yio'yio'ya
  ho_'ho'ya = yio'yio'ya
  ho__'ho'ya = yio'yio'ya
  ho___'ho'ya = yio'yio'ya
  ho____'ho'ya = yio'yio'ya
  ho_____'ho'ya = yio'yio'ya
  ho______'ho'ya = yio'yio'ya
  ho_______'ho'ya = yio'yio'ya
  
  yio'yio'yoi, ho'ho'yoi, ho_'ho'yoi, ho__'ho'yoi, ho___'ho'yoi, ho____'ho'yoi, ho_____'ho'yoi, ho______'ho'yoi, ho_______'ho'yoi
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt o iii)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt a iii))))) -> into (from (a) o) (t i ((tt ii ((ttt o iii)))))
  yio'yio'yoi x = fai (fio @from @from @tt `compose` foi @from @from @ttt) (yio @from @into x)
  ho'ho'yoi = yio'yio'yoi
  ho_'ho'yoi = yio'yio'yoi
  ho__'ho'yoi = yio'yio'yoi
  ho___'ho'yoi = yio'yio'yoi
  ho____'ho'yoi = yio'yio'yoi
  ho_____'ho'yoi = yio'yio'yoi
  ho______'ho'yoi = yio'yio'yoi
  ho_______'ho'yoi = yio'yio'yoi
  
  yio'yio'yai, ho'ho'ha, ho_'ho'ha, ho__'ho'ha, ho___'ho'ha, ho____'ho'ha, ho_____'ho'ha, ho______'ho'ha, ho_______'ho'ha
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt a iii)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt o iii))))) -> into (from (a) o) (t i ((tt ii ((ttt a iii)))))
  yio'yio'yai x = fai (fio @from @from @tt `compose` fai @from @from @ttt) (yio @from @into x)
  ho'ho'ha = yio'yio'yai
  ho_'ho'ha = yio'yio'yai
  ho__'ho'ha = yio'yio'yai
  ho___'ho'ha = yio'yio'yai
  ho____'ho'ha = yio'yio'yai
  ho_____'ho'ha = yio'yio'yai
  ho______'ho'ha = yio'yio'yai
  ho_______'ho'ha = yio'yio'yai
  
  yio'yio'yio, ho'ho'ho, ho_'ho'ho, ho__'ho'ho, ho___'ho'ho, ho____'ho'ho, ho_____'ho'ho, ho______'ho'ho, ho_______'ho'ho
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt iii (o))))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt iii (a)))))) -> into (from (a) o) (t i ((tt ii ((ttt iii (o))))))
  yio'yio'yio x = fai (fio @from @from @tt `compose` fio @from @from @ttt) (yio @from @into x)
  ho'ho'ho = yio'yio'yio
  ho_'ho'ho = yio'yio'yio
  ho__'ho'ho = yio'yio'yio
  ho___'ho'ho = yio'yio'yio
  ho____'ho'ho = yio'yio'yio
  ho_____'ho'ho = yio'yio'yio
  ho______'ho'ho = yio'yio'yio
  ho_______'ho'ho = yio'yio'yio
  
  yio'yio'yia, ho'ho'yia, ho_'ho'yia, ho__'ho'yia, ho___'ho'yia, ho____'ho'yia, ho_____'ho'yia, ho______'ho'yia, ho_______'ho'yia
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt iii (a))))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt iii (o)))))) -> into (from (a) o) (t i ((tt ii ((ttt iii (a))))))
  yio'yio'yia x = fai (fio @from @from @tt `compose` fia @from @from @ttt) (yio @from @into x)
  ho'ho'yia = yio'yio'yia
  ho_'ho'yia = yio'yio'yia
  ho__'ho'yia = yio'yio'yia
  ho___'ho'yia = yio'yio'yia
  ho____'ho'yia = yio'yio'yia
  ho_____'ho'yia = yio'yio'yia
  ho______'ho'yia = yio'yio'yia
  ho_______'ho'yia = yio'yio'yia
  
  yio'yia'yo, ho'yia'yo, ho_'yia'yo, ho__'yia'yo, ho___'yia'yo, ho____'yia'yo, ho_____'yia'yo, ho______'yia'yo, ho_______'yia'yo
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt a)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt o))))) -> into (from (a) o) (t i ((tt ii ((ttt a)))))
  yio'yia'yo x = fai (fia @from @from @tt `compose` fo @from @from @ttt) (yio @from @into x)
  ho'yia'yo = yio'yia'yo
  ho_'yia'yo = yio'yia'yo
  ho__'yia'yo = yio'yia'yo
  ho___'yia'yo = yio'yia'yo
  ho____'yia'yo = yio'yia'yo
  ho_____'yia'yo = yio'yia'yo
  ho______'yia'yo = yio'yia'yo
  ho_______'yia'yo = yio'yia'yo
  
  yio'yia'ya, ho'yia'ya, ho_'yia'ya, ho__'yia'ya, ho___'yia'ya, ho____'yia'ya, ho_____'yia'ya, ho______'yia'ya, ho_______'yia'ya
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt o)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt a))))) -> into (from (a) o) (t i ((tt ii ((ttt o)))))
  yio'yia'ya x = fai (fia @from @from @tt `compose` fa @from @from @ttt) (yio @from @into x)
  ho'yia'ya = yio'yia'ya
  ho_'yia'ya = yio'yia'ya
  ho__'yia'ya = yio'yia'ya
  ho___'yia'ya = yio'yia'ya
  ho____'yia'ya = yio'yia'ya
  ho_____'yia'ya = yio'yia'ya
  ho______'yia'ya = yio'yia'ya
  ho_______'yia'ya = yio'yia'ya
  
  yio'yia'yoi, ho'yia'yoi, ho_'yia'yoi, ho__'yia'yoi, ho___'yia'yoi, ho____'yia'yoi, ho_____'yia'yoi, ho______'yia'yoi, ho_______'yia'yoi
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt a iii)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt o iii))))) -> into (from (a) o) (t i ((tt ii ((ttt a iii)))))
  yio'yia'yoi x = fai (fia @from @from @tt `compose` foi @from @from @ttt) (yio @from @into x)
  ho'yia'yoi = yio'yia'yoi
  ho_'yia'yoi = yio'yia'yoi
  ho__'yia'yoi = yio'yia'yoi
  ho___'yia'yoi = yio'yia'yoi
  ho____'yia'yoi = yio'yia'yoi
  ho_____'yia'yoi = yio'yia'yoi
  ho______'yia'yoi = yio'yia'yoi
  ho_______'yia'yoi = yio'yia'yoi
  
  yio'yia'yai, ho'yia'ha, ho_'yia'ha, ho__'yia'ha, ho___'yia'ha, ho____'yia'ha, ho_____'yia'ha, ho______'yia'ha, ho_______'yia'ha
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt o iii)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt a iii))))) -> into (from (a) o) (t i ((tt ii ((ttt o iii)))))
  yio'yia'yai x = fai (fia @from @from @tt `compose` fai @from @from @ttt) (yio @from @into x)
  ho'yia'ha = yio'yia'yai
  ho_'yia'ha = yio'yia'yai
  ho__'yia'ha = yio'yia'yai
  ho___'yia'ha = yio'yia'yai
  ho____'yia'ha = yio'yia'yai
  ho_____'yia'ha = yio'yia'yai
  ho______'yia'ha = yio'yia'yai
  ho_______'yia'ha = yio'yia'yai
  
  yio'yia'yio, ho'yia'ho, ho_'yia'ho, ho__'yia'ho, ho___'yia'ho, ho____'yia'ho, ho_____'yia'ho, ho______'yia'ho, ho_______'yia'ho
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt iii (a))))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt iii (o)))))) -> into (from (a) o) (t i ((tt ii ((ttt iii (a))))))
  yio'yia'yio x = fai (fia @from @from @tt `compose` fio @from @from @ttt) (yio @from @into x)
  ho'yia'ho = yio'yia'yio
  ho_'yia'ho = yio'yia'yio
  ho__'yia'ho = yio'yia'yio
  ho___'yia'ho = yio'yia'yio
  ho____'yia'ho = yio'yia'yio
  ho_____'yia'ho = yio'yia'yio
  ho______'yia'ho = yio'yia'yio
  ho_______'yia'ho = yio'yia'yio
  
  yio'yia'yia, ho'yia'yia, ho_'yia'yia, ho__'yia'yia, ho___'yia'yia, ho____'yia'yia, ho_____'yia'yia, ho______'yia'yia, ho_______'yia'yia
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Covariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt iii (o))))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (t i ((tt ii ((ttt iii (a)))))) -> into (from (a) o) (t i ((tt ii ((ttt iii (o))))))
  yio'yia'yia x = fai (fia @from @from @tt `compose` fia @from @from @ttt) (yio @from @into x)
  ho'yia'yia = yio'yia'yia
  ho_'yia'yia = yio'yia'yia
  ho__'yia'yia = yio'yia'yia
  ho___'yia'yia = yio'yia'yia
  ho____'yia'yia = yio'yia'yia
  ho_____'yia'yia = yio'yia'yia
  ho______'yia'yia = yio'yia'yia
  ho_______'yia'yia = yio'yia'yia
  
  yia'yo'yo
   :: forall from into t i tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt o)))) -> into (from (a) o) (t i ((tt (ttt a))))
  yia'yo'yo x = fai (fo @from @from @tt `compose` fo @from @from @ttt) (yia @from @into x)
  
  yia'yo'ya
   :: forall from into t i tt ttt a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt a)))) -> into (from (a) o) (t i ((tt (ttt o))))
  yia'yo'ya x = fai (fo @from @from @tt `compose` fa @from @from @ttt) (yia @from @into x)
  
  yia'yo'yoi
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a iii))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt o iii)))) -> into (from (a) o) (t i ((tt (ttt a iii))))
  yia'yo'yoi x = fai (fo @from @from @tt `compose` foi @from @from @ttt) (yia @from @into x)
  
  yia'yo'yai, yia'yo'ha
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o iii))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt a iii)))) -> into (from (a) o) (t i ((tt (ttt o iii))))
  yia'yo'yai x = fai (fo @from @from @tt `compose` fai @from @from @ttt) (yia @from @into x)
  yia'yo'ha = yia'yo'yai
  
  yia'yo'yio, yia'yo'ho
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (a)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt iii (o))))) -> into (from (a) o) (t i ((tt (ttt iii (a)))))
  yia'yo'yio x = fai (fo @from @from @tt `compose` fio @from @from @ttt) (yia @from @into x)
  yia'yo'ho = yia'yo'yio
  
  yia'yo'yia
   :: forall from into t i tt ttt iii a o .
   Covariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (o)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt iii (a))))) -> into (from (a) o) (t i ((tt (ttt iii (o)))))
  yia'yo'yia x = fai (fo @from @from @tt `compose` fia @from @from @ttt) (yia @from @into x)
  
  yia'ya'yo
   :: forall from into t i tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt a)))) -> into (from (a) o) (t i ((tt (ttt o))))
  yia'ya'yo x = fai (fa @from @from @tt `compose` fo @from @from @ttt) (yia @from @into x)
  
  yia'ya'ya
   :: forall from into t i tt ttt a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt o)))) -> into (from (a) o) (t i ((tt (ttt a))))
  yia'ya'ya x = fai (fa @from @from @tt `compose` fa @from @from @ttt) (yia @from @into x)
  
  yia'ya'yoi
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o iii))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt a iii)))) -> into (from (a) o) (t i ((tt (ttt o iii))))
  yia'ya'yoi x = fai (fa @from @from @tt `compose` foi @from @from @ttt) (yia @from @into x)
  
  yia'ya'yai, yia'ya'ha
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a iii))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt o iii)))) -> into (from (a) o) (t i ((tt (ttt a iii))))
  yia'ya'yai x = fai (fa @from @from @tt `compose` fai @from @from @ttt) (yia @from @into x)
  yia'ya'ha = yia'ya'yai
  
  yia'ya'yio, yia'ya'ho
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (o)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt iii (a))))) -> into (from (a) o) (t i ((tt (ttt iii (o)))))
  yia'ya'yio x = fai (fa @from @from @tt `compose` fio @from @from @ttt) (yia @from @into x)
  yia'ya'ho = yia'ya'yio
  
  yia'ya'yia
   :: forall from into t i tt ttt iii a o .
   Contravariant Endo Semi Functor from tt =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (a)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt iii (o))))) -> into (from (a) o) (t i ((tt (ttt iii (a)))))
  yia'ya'yia x = fai (fa @from @from @tt `compose` fia @from @from @ttt) (yia @from @into x)
  
  yia'yoi'yo
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt o) ii))) -> into (from (a) o) (t i ((tt (ttt a) ii)))
  yia'yoi'yo x = fai (foi @from @from @tt `compose` fo @from @from @ttt) (yia @from @into x)
  
  yia'yoi'ya
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt a) ii))) -> into (from (a) o) (t i ((tt (ttt o) ii)))
  yia'yoi'ya x = fai (foi @from @from @tt `compose` fa @from @from @ttt) (yia @from @into x)
  
  yia'yoi'yoi
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a iii) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt o iii) ii))) -> into (from (a) o) (t i ((tt (ttt a iii) ii)))
  yia'yoi'yoi x = fai (foi @from @from @tt `compose` foi @from @from @ttt) (yia @from @into x)
  
  yia'yoi'yai, yia'yoi'ha
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o iii) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt a iii) ii))) -> into (from (a) o) (t i ((tt (ttt o iii) ii)))
  yia'yoi'yai x = fai (foi @from @from @tt `compose` fai @from @from @ttt) (yia @from @into x)
  yia'yoi'ha = yia'yoi'yai
  
  yia'yoi'yio, yia'yoi'ho
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (a)) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt iii (o)) ii))) -> into (from (a) o) (t i ((tt (ttt iii (a)) ii)))
  yia'yoi'yio x = fai (foi @from @from @tt `compose` fio @from @from @ttt) (yia @from @into x)
  yia'yoi'ho = yia'yoi'yio
  
  yia'yoi'yia
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (o)) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt iii (a)) ii))) -> into (from (a) o) (t i ((tt (ttt iii (o)) ii)))
  yia'yoi'yia x = fai (foi @from @from @tt `compose` fia @from @from @ttt) (yia @from @into x)
  
  yia'yai'yo, yia'ha'yo
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt a) ii))) -> into (from (a) o) (t i ((tt (ttt o) ii)))
  yia'yai'yo x = fai (fai @from @from @tt `compose` fo @from @from @ttt) (yia @from @into x)
  yia'ha'yo = yia'yai'yo
  
  yia'yai'ya, yia'ha'ya
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt o) ii))) -> into (from (a) o) (t i ((tt (ttt a) ii)))
  yia'yai'ya x = fai (fai @from @from @tt `compose` fa @from @from @ttt) (yia @from @into x)
  yia'ha'ya = yia'yai'ya
  
  yia'yai'yoi, yia'ha'yoi
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt o iii) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt a iii) ii))) -> into (from (a) o) (t i ((tt (ttt o iii) ii)))
  yia'yai'yoi x = fai (fai @from @from @tt `compose` foi @from @from @ttt) (yia @from @into x)
  yia'ha'yoi = yia'yai'yoi
  
  yia'yai'yai, yia'ha'ha
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt a iii) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt o iii) ii))) -> into (from (a) o) (t i ((tt (ttt a iii) ii)))
  yia'yai'yai x = fai (fai @from @from @tt `compose` fai @from @from @ttt) (yia @from @into x)
  yia'ha'ha = yia'yai'yai
  
  yia'yai'yio, yia'ha'ho
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (o)) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt iii (a)) ii))) -> into (from (a) o) (t i ((tt (ttt iii (o)) ii)))
  yia'yai'yio x = fai (fai @from @from @tt `compose` fio @from @from @ttt) (yia @from @into x)
  yia'ha'ho = yia'yai'yio
  
  yia'yai'yia, yia'ha'yia
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'II'I tt ii) =>
   (forall e ee . Wrapper from (T'II'I tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt (ttt iii (a)) ii)))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt (ttt iii (o)) ii))) -> into (from (a) o) (t i ((tt (ttt iii (a)) ii)))
  yia'yai'yia x = fai (fai @from @from @tt `compose` fia @from @from @ttt) (yia @from @into x)
  yia'ha'yia = yia'yai'yia
  
  yia'yio'yo, yia'ho'yo
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt a)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt o))))) -> into (from (a) o) (t i ((tt ii ((ttt a)))))
  yia'yio'yo x = fai (fio @from @from @tt `compose` fo @from @from @ttt) (yia @from @into x)
  yia'ho'yo = yia'yio'yo
  
  yia'yio'ya, yia'ho'ya
   :: forall from into t i tt ii ttt a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt o)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt a))))) -> into (from (a) o) (t i ((tt ii ((ttt o)))))
  yia'yio'ya x = fai (fio @from @from @tt `compose` fa @from @from @ttt) (yia @from @into x)
  yia'ho'ya = yia'yio'ya
  
  yia'yio'yoi, yia'ho'yoi
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt a iii)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt o iii))))) -> into (from (a) o) (t i ((tt ii ((ttt a iii)))))
  yia'yio'yoi x = fai (fio @from @from @tt `compose` foi @from @from @ttt) (yia @from @into x)
  yia'ho'yoi = yia'yio'yoi
  
  yia'yio'yai, yia'ho'ha
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt o iii)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt a iii))))) -> into (from (a) o) (t i ((tt ii ((ttt o iii)))))
  yia'yio'yai x = fai (fio @from @from @tt `compose` fai @from @from @ttt) (yia @from @into x)
  yia'ho'ha = yia'yio'yai
  
  yia'yio'yio, yia'ho'ho
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt iii (a))))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt iii (o)))))) -> into (from (a) o) (t i ((tt ii ((ttt iii (a))))))
  yia'yio'yio x = fai (fio @from @from @tt `compose` fio @from @from @ttt) (yia @from @into x)
  yia'ho'ho = yia'yio'yio
  
  yia'yio'yia, yia'ho'yia
   :: forall from into t i tt ii ttt iii a o .
   Covariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt iii (o))))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt iii (a)))))) -> into (from (a) o) (t i ((tt ii ((ttt iii (o))))))
  yia'yio'yia x = fai (fio @from @from @tt `compose` fia @from @from @ttt) (yia @from @into x)
  yia'ho'yia = yia'yio'yia
  
  yia'yia'yo
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt o)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt a))))) -> into (from (a) o) (t i ((tt ii ((ttt o)))))
  yia'yia'yo x = fai (fia @from @from @tt `compose` fo @from @from @ttt) (yia @from @into x)
  
  yia'yia'ya
   :: forall from into t i tt ii ttt a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from ttt =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt a)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt o))))) -> into (from (a) o) (t i ((tt ii ((ttt a)))))
  yia'yia'ya x = fai (fia @from @from @tt `compose` fa @from @from @ttt) (yia @from @into x)
  
  yia'yia'yoi
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt o iii)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt a iii))))) -> into (from (a) o) (t i ((tt ii ((ttt o iii)))))
  yia'yia'yoi x = fai (fia @from @from @tt `compose` foi @from @from @ttt) (yia @from @into x)
  
  yia'yia'yai, yia'yia'ha
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'II'I ttt iii) =>
   (forall e ee . Wrapper from (T'II'I ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt a iii)))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt o iii))))) -> into (from (a) o) (t i ((tt ii ((ttt a iii)))))
  yia'yia'yai x = fai (fia @from @from @tt `compose` fai @from @from @ttt) (yia @from @into x)
  yia'yia'ha = yia'yia'yai
  
  yia'yia'yio, yia'yia'ho
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt iii (o))))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt iii (a)))))) -> into (from (a) o) (t i ((tt ii ((ttt iii (o))))))
  yia'yia'yio x = fai (fia @from @from @tt `compose` fio @from @from @ttt) (yia @from @into x)
  yia'yia'ho = yia'yia'yio
  
  yia'yia'yia
   :: forall from into t i tt ii ttt iii a o .
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e ee . Wrapper from (T'I'II tt e ee)) =>
   Contravariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e ee . Wrapper from (T'I'II ttt e ee)) =>
   Contravariant Yoneda Functor from into (T'I'II t i) =>
   (forall e ee . Wrapper into (T'I'II t e ee)) =>
   Contravariant Endo Semi Functor (AR) (T'II'I into (t i ((tt ii ((ttt iii (a))))))) =>
   (forall e ee . Wrapper into (T'II'I from e ee)) =>
   (t i ((tt ii ((ttt iii (o)))))) -> into (from (a) o) (t i ((tt ii ((ttt iii (a))))))
  yia'yia'yia x = fai (fia @from @from @tt `compose` fia @from @from @ttt) (yia @from @into x)
  
  yio'yio'yia'yoi' :: forall from into t tt ttt tttt i ii iii iiii a o .
   Covariant Yoneda Functor from into (T'I'II tttt iiii) =>
   (forall e . Wrapper into (T'I'II tttt iiii e)) =>
   Covariant Endo Semi Functor from (T'I'II ttt iii) =>
   (forall e . Wrapper from (T'I'II ttt iii e)) =>
   Contravariant Endo Semi Functor from (T'I'II tt ii) =>
   (forall e . Wrapper from (T'I'II tt ii e)) =>
   Covariant Endo Semi Functor from (T'II'I t i) =>
   (forall e . Wrapper from (T'II'I t i e)) =>
   Contravariant Endo Semi Functor (->) (T'II'I into (tttt (iiii) (ttt (iii) (tt (ii) (t (a) (i)))))) =>
   (forall e ee . Wrapper into (T'I'II from e ee)) =>
   (tttt (iiii) (ttt (iii) (tt (ii) (t (o) (i))))) -> into (from a o) (tttt (iiii) (ttt (iii) (tt (ii) (t (a) (i)))))
  yio'yio'yia'yoi' = fai (identity `compose` fio @from `compose` fia @from `compose` foi @from) `compose` yio @from @into