1だったら1足して、
10だったら1を引く。
-module(test). -export([start/0]). -export([init/1]). -export([add/1,sub/1]). start() -> spawn(test,init,[1]), spawn(test,init,[10]). init(Num) when 1 =:= Num -> add(Num); init(Num) when 10 =:= Num -> sub(Num). add(Num) -> io:format("~p~n",[Num+1]). sub(Num) -> io:format("~p~n",[Num-1]).