AddClassLookupMonad.