Собственно, есть такой код:
Код: Выделить всё
-module(shapes).
-export([area/2],[area/1],[area/4]).
area({square, Side}) ->
Side*Side;
area({circle, Radius}) ->
math:pi() * Radius * Radius;
area({triangle, A,B,C}) ->
S = (A+B+C)/2,
math:sqrt(S * (S-A) * (S-B) * (S-C));
area(_Other) ->
{error, invalid_object}.
В местной оболочке делаю и получаю такое:
Код: Выделить всё
1> c(shapes).
./shapes.erl:2: bad export declaration
./shapes.erl:4: Warning: function area/1 is unused
error
Собственно, хотелось бы, чтобы знающие люди объяснили, где я тут не прав и как это исправить.