生成したprivate.xmlを表示できるようにした

簡単に確認でき内の辛かったので、runghc Sample.hs dump
とかするとprivate.xmlを表示するようにしました