Current section

Files

Jump to
gleam_stdlib src gleam@function.erl
Raw

src/gleam@function.erl

-module(gleam@function).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([compose/2, curry2/1, curry3/1, curry4/1, curry5/1, curry6/1, flip/1, identity/1, constant/1, tap/2, apply1/2, apply2/3, apply3/4]).
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 2).
-spec compose(fun((EFY) -> EFZ), fun((EFZ) -> EGA)) -> fun((EFY) -> EGA).
compose(Fun1, Fun2) ->
fun(A) -> Fun2(Fun1(A)) end.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 7).
-spec curry2(fun((EGB, EGC) -> EGD)) -> fun((EGB) -> fun((EGC) -> EGD)).
curry2(Fun) ->
fun(A) -> fun(B) -> Fun(A, B) end end.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 12).
-spec curry3(fun((EGF, EGG, EGH) -> EGI)) -> fun((EGF) -> fun((EGG) -> fun((EGH) -> EGI))).
curry3(Fun) ->
fun(A) -> fun(B) -> fun(C) -> Fun(A, B, C) end end end.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 17).
-spec curry4(fun((EGK, EGL, EGM, EGN) -> EGO)) -> fun((EGK) -> fun((EGL) -> fun((EGM) -> fun((EGN) -> EGO)))).
curry4(Fun) ->
fun(A) -> fun(B) -> fun(C) -> fun(D) -> Fun(A, B, C, D) end end end end.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 22).
-spec curry5(fun((EGQ, EGR, EGS, EGT, EGU) -> EGV)) -> fun((EGQ) -> fun((EGR) -> fun((EGS) -> fun((EGT) -> fun((EGU) -> EGV))))).
curry5(Fun) ->
fun(A) ->
fun(B) ->
fun(C) -> fun(D) -> fun(E) -> Fun(A, B, C, D, E) end end end
end
end.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 27).
-spec curry6(fun((EGX, EGY, EGZ, EHA, EHB, EHC) -> EHD)) -> fun((EGX) -> fun((EGY) -> fun((EGZ) -> fun((EHA) -> fun((EHB) -> fun((EHC) -> EHD)))))).
curry6(Fun) ->
fun(A) ->
fun(B) ->
fun(C) ->
fun(D) -> fun(E) -> fun(F) -> Fun(A, B, C, D, E, F) end end end
end
end
end.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 36).
-spec flip(fun((EHF, EHG) -> EHH)) -> fun((EHG, EHF) -> EHH).
flip(Fun) ->
fun(B, A) -> Fun(A, B) end.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 42).
-spec identity(EHI) -> EHI.
identity(X) ->
X.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 47).
-spec constant(EHJ) -> fun((any()) -> EHJ).
constant(Value) ->
fun(_) -> Value end.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 56).
-spec tap(EHL, fun((EHL) -> any())) -> EHL.
tap(Arg, Effect) ->
Effect(Arg),
Arg.
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 62).
-spec apply1(fun((EHN) -> EHO), EHN) -> EHO.
apply1(Fun, Arg1) ->
Fun(Arg1).
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 67).
-spec apply2(fun((EHP, EHQ) -> EHR), EHP, EHQ) -> EHR.
apply2(Fun, Arg1, Arg2) ->
Fun(Arg1, Arg2).
-file("/Users/louis/src/gleam/stdlib/src/gleam/function.gleam", 72).
-spec apply3(fun((EHS, EHT, EHU) -> EHV), EHS, EHT, EHU) -> EHV.
apply3(Fun, Arg1, Arg2, Arg3) ->
Fun(Arg1, Arg2, Arg3).