ptrcmd
says to
YSITD
發現 agda 編出來的 haskell code 長的有點可怕XD