Add initial prototype.

4-high/gel/applet/demo/distributed/gel_demo_server.ads

@@ -0,0 +1,18 @@
+with
+     gel.World.server;
+
+
+package gel_demo_Server
+--
+-- Provides the server.
+--
+is
+   the_server_World : gel.World.server.view;
+
+   task Item
+   is
+      entry start;
+      entry stop;
+   end Item;
+
+end gel_demo_Server;