diff --git a/src/Servant/Server.hs b/src/Servant/Server.hs
index d1d6e4c4..d8661585 100644
--- a/src/Servant/Server.hs
+++ b/src/Servant/Server.hs
@@ -29,6 +29,9 @@ import Servant.Server.Internal
 -- >   where listAllBooks = ...
 -- >         postBook book = ...
 -- >
+-- > myApi :: Proxy MyApi
+-- > myApi = Proxy 
+-- >
 -- > app :: Application
 -- > app = serve myApi server
 -- >