1-module(sup).
2-vsn(1).
3-behaviour(supervisor).
4-export([init/1]).
5
6init([]) ->
7    SupFlags = {one_for_one, 4, 3600},
8    Server = {my_server, {my_server, start_link, []},
9	      permanent, 2000, worker, [my_server]},
10    GS1 = {gs1, {gs1, start_link, []}, permanent, 2000, worker, [gs1]},
11    {ok, {SupFlags, [Server, GS1]}}.
12