val defaultMinimum = 3600
val nodeIps = [("deleuze", "69.90.123.67"), ("hopper", "69.90.123.74"), ("fritz", "69.90.123.75"), ("navajos", "69.90.123.70"), ("bog", "69.90.123.72"), ("outpost", "151.236.216.192")]
-val defaultNode = "deleuze"
+val defaultNode = "fritz"
val masterNode = "deleuze"
val slaveNodes = ["outpost"]
val defaultDomain = "hcoop.net"
-val dispatcher = "deleuze.hcoop.net"
+val dispatcher = defaultNode ^ ".hcoop.net"
val dispatcherPort = 1234
val slavePort = 1235
val queueSize = 5
val keyDir = "/afs/hcoop.net/common/etc/domtool/keys"
val serialDir = "/afs/hcoop.net/common/etc/domtool/serials"
-val dispatcherName = "deleuze"
+val dispatcherName = defaultNode
fun domtoolDir user =
case user of