Current section

Files

Jump to
blah src blah@time.erl
Raw

src/blah@time.erl

-module(blah@time).
-compile([no_auto_import, nowarn_unused_vars]).
-export([in_interval/2, symmetric/1, past/2, future/2]).
-spec in_interval(birl@time:date_time(), birl@time:date_time()) -> birl@time:date_time().
in_interval(From, To) ->
Unix_from = birl@time:to_unix(From),
Unix_to = birl@time:to_unix(To),
_pipe = gleam@int:random(Unix_from, Unix_to),
birl@time:from_unix(_pipe).
-spec symmetric(birl@duration:duration()) -> birl@time:date_time().
symmetric(Distance) ->
Now = birl@time:now(),
Unix_from = begin
_pipe = Now,
_pipe@1 = birl@time:subtract(_pipe, Distance),
birl@time:to_unix(_pipe@1)
end,
Unix_to = begin
_pipe@2 = Now,
_pipe@3 = birl@time:add(_pipe@2, Distance),
birl@time:to_unix(_pipe@3)
end,
_pipe@4 = gleam@int:random(Unix_from, Unix_to),
birl@time:from_unix(_pipe@4).
-spec past(birl@duration:duration(), birl@duration:duration()) -> birl@time:date_time().
past(Min_distance, Max_distance) ->
Now = birl@time:now(),
Unix_from = begin
_pipe = Now,
_pipe@1 = birl@time:subtract(_pipe, Max_distance),
birl@time:to_unix(_pipe@1)
end,
Unix_to = begin
_pipe@2 = Now,
_pipe@3 = birl@time:subtract(_pipe@2, Min_distance),
birl@time:to_unix(_pipe@3)
end,
_pipe@4 = gleam@int:random(Unix_from, Unix_to),
birl@time:from_unix(_pipe@4).
-spec future(birl@duration:duration(), birl@duration:duration()) -> birl@time:date_time().
future(Min_distance, Max_distance) ->
Now = birl@time:now(),
Unix_from = begin
_pipe = Now,
_pipe@1 = birl@time:add(_pipe, Min_distance),
birl@time:to_unix(_pipe@1)
end,
Unix_to = begin
_pipe@2 = Now,
_pipe@3 = birl@time:add(_pipe@2, Max_distance),
birl@time:to_unix(_pipe@3)
end,
_pipe@4 = gleam@int:random(Unix_from, Unix_to),
birl@time:from_unix(_pipe@4).