#433 toFeatureをCommon.hsに移動させた