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