thenAName            = varQual gHC_BASE (fsLit "*>")          thenAClassOpKey
thenAName            = varQual gHC_BASE (fsLit "*>")          thenAClassOpKey
thenAName            = varQual gHC_BASE (fsLit "*>")          thenAClassOpKey