Add Network.YAML module.

diff --git a/Network/YAML.hs b/Network/YAML.hs
new file mode 100644
index 0000000..faf5ad9
--- /dev/null
+++ b/Network/YAML.hs
@@ -0,0 +1,20 @@
+
+module Network.YAML
+  (
+   module Network.YAML.Caller,
+   module Network.YAML.Instances,
+   module Network.YAML.Derive,
+   module Network.YAML.Dispatcher,
+   module Network.YAML.Balancer,
+   module Network.YAML.WrapMethods,
+   forkA
+  ) where
+
+import Network.YAML.Caller
+import Network.YAML.Instances
+import Network.YAML.Derive
+import Network.YAML.Dispatcher
+import Network.YAML.Balancer
+import Network.YAML.WrapMethods
+import Network.YAML.Server (forkA)
+
diff --git a/Test.hs b/Test.hs
index 473972c..6389bca 100644
--- a/Test.hs
+++ b/Test.hs
@@ -6,11 +6,7 @@ import Data.Object.Yaml
 import Data.Convertible.Base
 import qualified Data.Map as M

-import Network.YAML.Dispatcher
-import Network.YAML.Base
-import Network.YAML.Instances
-import Network.YAML.Server (forkA)
-import Network.YAML.WrapMethods
+import Network.YAML

 import TestTypes
 import Methods
diff --git a/TestCall.hs b/TestCall.hs
index ad88052..4f3d559 100644
--- a/TestCall.hs
+++ b/TestCall.hs
@@ -5,11 +5,7 @@ module Main where
 import Data.Object.Yaml
 import Data.Convertible.Base

-import Network.YAML.Base
-import Network.YAML.Instances
-import Network.YAML.Caller
-import Network.YAML.Balancer
-import Network.YAML.WrapMethods
+import Network.YAML

 import TestTypes
 import qualified Methods
@@ -18,6 +14,10 @@ import qualified Methods
 $(remote 'Methods.double)
 $(remote 'Methods.mySum)
 $(remote 'Methods.ls)
+-- For example, `ls' is defined in Methods.hs as
+-- ls :: String -> IO [String]
+-- Now `ls' is defined here as
+-- ls :: (ByteString,Int) -> String -> IO [String]

 rules = [("test", ("127.0.0.1", 5000), 1),
          ("test", ("127.0.0.1", 5001), 1),