func x = (x,x)になる関数funcを関数合成だけでやる事ってできないよね？
idとかを組み合わせて。

途中に名前を使う関数(\x -> (x,x))等を使用するのは無しで。