Create dsl_1.hs