Packages

Various modules and helpers for working with Nimiq primitives in the Gleam programming language or as a CLI

Current section

Files

Jump to
nimiq_gleam src coin.erl
Raw

src/coin.erl

-module(coin).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([lunas_to_coins/1, coins_to_lunas/1]).
-export_type([coin/0]).
-type coin() :: {coin, integer()}.
-spec lunas_to_coins(coin()) -> float().
lunas_to_coins(Lunas) ->
case 100000.0 of
+0.0 -> +0.0;
-0.0 -> -0.0;
Gleam@denominator -> gleam@int:to_float(erlang:element(2, Lunas)) / Gleam@denominator
end.
-spec coins_to_lunas(float()) -> coin().
coins_to_lunas(Coins) ->
{coin, gleam@float:round(Coins * 100000.0)}.