,.......................|.........., :plus | : : *==================* | : ->!send [(W,S),(W,E)]!--#---+ : : *==================* | | : : + | | : :+-+ +----------------+ | : :| v v : :|*==============* *============* : :|!case N of S, E!->!send [(N,E)]!-- :|*==============* *============* : :| | : :| v : :| *========* *================* : :+>!use plus!->!send [(Inl W,E)]!--- : *========* *================* : ,.................................., ,.................................|............., :mult v : : *==================* *==================* : ->!send [(W,S),(W,E)]!-+ !send [(N,S),(N,E)]!-+ : : *==================* | *==================* | : : | | | ++ : : | +--#----+ | : : v | v | : : *==============* | *=============* | : : !case N of S, E!-------#->!send [(N, E)]!-#--- : *==============* | *=============* | : : | v v : : | *========* *========* : : +------->!use mult!------->!use plus!-- : *========* *========* : ,...............................................,