17 lines
396 B
Text
17 lines
396 B
Text
|
# Demo provider public API
|
||
|
|
|
||
|
|
let contracts = import "contracts.ncl" in
|
||
|
|
let defaults = import "defaults.ncl" in
|
||
|
|
|
||
|
|
{
|
||
|
|
make_server = fun config => defaults.Server & config,
|
||
|
|
make_volume = fun config => defaults.Volume & config,
|
||
|
|
make_network = fun config => defaults.Network & config,
|
||
|
|
|
||
|
|
Schema = {
|
||
|
|
server: contracts.Server,
|
||
|
|
volume: contracts.Volume,
|
||
|
|
network: contracts.Network,
|
||
|
|
},
|
||
|
|
}
|