, (emptyId , (0, Left $ genExprFCall emptyId ) )
, (singletonId , (1, Left $ genExprFCall singletonId ) )
, (copyId , (2, Left $ genExprFCall copyId ) )
, (emptyId , (0, Left $ genExprFCall emptyId ) )
, (singletonId , (1, Left $ genExprFCall singletonId ) )
, (copyId , (2, Left $ genExprFCall copyId ) )