-module(test).
-export([loop/1, main/1]).

loop(121) -> ok;
loop(N) ->
    
    if
        N == 1 -> 
            io:format("~p >> x ~n", [N]); % 2. ifの途中の句切りは「;」
        N rem 2 == 0, N =/= 2 -> 
            io:format("~p >> x ~n", [N]); % 2. ifの途中の句切りは「;」
        N rem 3 == 0, N =/= 3 -> 
            io:format("~p >> x ~n", [N]); % 2. ifの途中の句切りは「;」
        N rem 5 == 0, N =/= 5 -> 
            io:format("~p >> x ~n", [N]); % 2. ifの途中の句切りは「;」
        N rem 7 == 0, N =/= 7 -> 
            io:format("~p >> x ~n", [N]); % 2. ifの途中の句切りは「;」
        true ->
            io:format("~p >> o ~n", [N])  % 3. endの直前には記号を付けない
    end, 
    loop(N + 1).

main(_) -> 
    loop(1).