justConstr :: Constr
justConstr    = mkConstr maybeDataType "Just"    [] Prefix
justConstr :: Constr
justConstr    = mkConstr maybeDataType "Just"    [] Prefix
justConstr    = mkConstr maybeDataType "Just"    [] Prefix