#433 toTag, fromTagをCommon.hsに移動させた