@@ -909,17 +909,23 @@ module Math where
909909 \ return Math.log(n);\
910910 \}" :: Number -> Number
911911
912− foreign import max "function max(n){\
913− \ return Math.max(n);\
914− \}" :: Number -> Number
915−
916− foreign import min "function min(n){\
917− \ return Math.min(n);\
918− \}" :: Number -> Number
912+ foreign import max "function max(n1){\
913+ \ return function(n2) {\
914+ \ return Math.max(n1, n2);\
915+ \ }\
916+ \}" :: Number -> Number -> Number
917+
918+ foreign import min "function min(n1){\
919+ \ return function(n2) {\
920+ \ return Math.min(n1, n2);\
921+ \ }\
922+ \}" :: Number -> Number -> Number
919923
920924 foreign import pow "function pow(n){\
921− \ return Math.pow(n);\
922− \}" :: Number -> Number
925+ \ return function(p) {\
926+ \ return Math.pow(n, p);\
927+ \ }\
928+ \}" :: Number -> Number -> Number
923929
924930 foreign import round "function round(n){\
925931 \ return Math.round(n);\