diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,9 @@
 # Changelog for extensible-effects-concurrent
 
+## 0.6.3
+
+- Add `ServerReader` type alias
+
 ## 0.6.2
 
 - Fix bad `containers` version boundary
diff --git a/extensible-effects-concurrent.cabal b/extensible-effects-concurrent.cabal
--- a/extensible-effects-concurrent.cabal
+++ b/extensible-effects-concurrent.cabal
@@ -1,5 +1,5 @@
 name:           extensible-effects-concurrent
-version:        0.6.2
+version:        0.6.3
 description:    Please see the README on GitHub at <https://github.com/sheyll/extensible-effects-concurrent#readme>
 synopsis:       Message passing concurrency as extensible-effect
 homepage:       https://github.com/sheyll/extensible-effects-concurrent#readme
diff --git a/src/Control/Eff/Concurrent/Api/Client.hs b/src/Control/Eff/Concurrent/Api/Client.hs
--- a/src/Control/Eff/Concurrent/Api/Client.hs
+++ b/src/Control/Eff/Concurrent/Api/Client.hs
@@ -11,6 +11,7 @@
   , callRegistered
   , callRegisteredA
   , ServesApi
+  , ServerReader
   , registerServer
   )
 where
@@ -102,12 +103,15 @@
 type ServesApi o r q =
   ( Typeable o
   , SetMember Process (Process q) r
-  , Member (Reader (Server o)) r
+  , Member (ServerReader o) r
   )
 
+-- | The reader effect for 'ProcessId's for 'Api's, see 'registerServer'
+type ServerReader o = Reader (Server o)
+
 -- | Run a reader effect that contains __the one__ server handling a specific
 -- 'Api' instance.
-registerServer :: Server o -> Eff (Reader (Server o) ': r) a -> Eff r a
+registerServer :: Server o -> Eff (ServerReader o ': r) a -> Eff r a
 registerServer = runReader
 
 -- | Like 'call' but take the 'Server' from the reader provided by
@@ -131,7 +135,7 @@
   => SchedulerProxy q
   -> Api o ( 'Synchronous (f reply))
   -> Eff r (f reply)
-callRegisteredA px method = do
+callRegisteredA px method =
   catchRaisedError px (const (return (empty @f))) (callRegistered px method)
 
 -- | Like 'cast' but take the 'Server' from the reader provided by