-module(sup).

-compile([export_all]).



sup_start(N) ->
    List = spawn_slaves(),
    sup1().

sup1() ->
    receive
    _ ->
        sup1()
    end.

server(State) ->
    receive
    {plus, A} ->
        State1 = State + A,
        server(State1);
    {minus, A} ->
        State1 = State - A,
        server(State1);
    {mul, A} ->
        State1 = State * A,
        server(State1);
    {division, A} ->
        State1 = State / A,
        server(State1);
    exit ->
        ok;
    print ->
        io:format("~p~n", [State]),
        server(State);
    _ ->
        server(State)
    end.