Current section

Files

Jump to
gluple src gluple@transform.erl
Raw

src/gluple@transform.erl

-module(gluple@transform).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([replace_last1/2, replace_last2/2, replace_last3/2, replace_last4/2, replace_last5/2, replace_last6/2, replace_last7/2, replace_last8/2, replace_last9/2]).
-spec replace_last1({any()}, JPC) -> {JPC}.
replace_last1(_, Data) ->
{Data}.
-spec replace_last2({JPD, any()}, JPF) -> {JPD, JPF}.
replace_last2(Tuple, Data) ->
{erlang:element(1, Tuple), Data}.
-spec replace_last3({JPG, JPH, any()}, JPJ) -> {JPG, JPH, JPJ}.
replace_last3(Tuple, Data) ->
{erlang:element(1, Tuple), erlang:element(2, Tuple), Data}.
-spec replace_last4({JPK, JPL, JPM, any()}, JPO) -> {JPK, JPL, JPM, JPO}.
replace_last4(Tuple, Data) ->
{erlang:element(1, Tuple),
erlang:element(2, Tuple),
erlang:element(3, Tuple),
Data}.
-spec replace_last5({JPP, JPQ, JPR, JPS, any()}, JPU) -> {JPP,
JPQ,
JPR,
JPS,
JPU}.
replace_last5(Tuple, Data) ->
{erlang:element(1, Tuple),
erlang:element(2, Tuple),
erlang:element(3, Tuple),
erlang:element(4, Tuple),
Data}.
-spec replace_last6({JPV, JPW, JPX, JPY, JPZ, any()}, JQB) -> {JPV,
JPW,
JPX,
JPY,
JPZ,
JQB}.
replace_last6(Tuple, Data) ->
{erlang:element(1, Tuple),
erlang:element(2, Tuple),
erlang:element(3, Tuple),
erlang:element(4, Tuple),
erlang:element(5, Tuple),
Data}.
-spec replace_last7({JQC, JQD, JQE, JQF, JQG, JQH, any()}, JQJ) -> {JQC,
JQD,
JQE,
JQF,
JQG,
JQH,
JQJ}.
replace_last7(Tuple, Data) ->
{erlang:element(1, Tuple),
erlang:element(2, Tuple),
erlang:element(3, Tuple),
erlang:element(4, Tuple),
erlang:element(5, Tuple),
erlang:element(6, Tuple),
Data}.
-spec replace_last8({JQK, JQL, JQM, JQN, JQO, JQP, JQQ, any()}, JQS) -> {JQK,
JQL,
JQM,
JQN,
JQO,
JQP,
JQQ,
JQS}.
replace_last8(Tuple, Data) ->
{erlang:element(1, Tuple),
erlang:element(2, Tuple),
erlang:element(3, Tuple),
erlang:element(4, Tuple),
erlang:element(5, Tuple),
erlang:element(6, Tuple),
erlang:element(7, Tuple),
Data}.
-spec replace_last9({JQT, JQU, JQV, JQW, JQX, JQY, JQZ, JRA, any()}, JRC) -> {JQT,
JQU,
JQV,
JQW,
JQX,
JQY,
JQZ,
JRA,
JRC}.
replace_last9(Tuple, Data) ->
{erlang:element(1, Tuple),
erlang:element(2, Tuple),
erlang:element(3, Tuple),
erlang:element(4, Tuple),
erlang:element(5, Tuple),
erlang:element(6, Tuple),
erlang:element(7, Tuple),
erlang:element(8, Tuple),
Data}.