<div dir="ltr"><br clear="all">I am trying to write a toy function to sum all members of a list but
the biggest. This list is entirely composed by integers bigger than 0.<br><br>I have:<br><br><span style="font-family: courier new,monospace;">f::[Integer]-&gt;Integer</span><br style="font-family: courier new,monospace;">

<span style="font-family: courier new,monospace;">f a = x a - y a where <br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; x=sum<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; y=foldr max 0</span><br style="font-family: courier new,monospace;" clear="all"><br>Is there any way to implement that using composition, so I have a point-free implementation?<br>
<font color="#888888">
</font><br>-- <br>Rafael Gustavo da Cunha Pereira Pinto<br>Electronic Engineer, MSc.
</div>