-module(helloworld).
-export([loop/0,start/0]).
loop() ->
receive
{rectangle, Width, Ht} ->
io:fwrite(Area of rectangle is ~p~n ,[Width * Ht]),
loop();
{circle, R} ->
io:fwrite(Area of circle is ~p~n , [3.14159 * R * R]),
loop();
Other ->
io:fwrite(UnkNown),
loop()
end.
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 [email protected] 举报，一经查实，本站将立刻删除。