samer@4: function y=id(x)
samer@4: % id - identity function
samer@4: %
samer@4: % id :: A->A.
samer@4: y=x;