% fst - first element of pair
% fst :: pair(A,B) -> A.
function x=fst(c), x=c{1}; end
