#403 XmlWrite.hsとそのテストプログラムを作成