function fmap(a, gen) {
var res;
var args = [];

return function seq(){
for (var i = 0; i < arguments.length; i++) {
  args[i] = arguments[i];
}

res = a(gen(args));

}
}