12 lines
240 B
Text
12 lines
240 B
Text
|
let Address
|
||
|
|
: Type
|
||
|
|
= { address : Text, prefixLength : Natural }
|
||
|
|
|
||
|
|
let address
|
||
|
|
: Text -> Natural -> Address
|
||
|
|
= \(address : Text) ->
|
||
|
|
\(prefixLength : Natural) ->
|
||
|
|
{ address, prefixLength }
|
||
|
|
|
||
|
|
in { Address, address }
|