OneSwitchLab.hs

import Nettle.Netkit.LabUtil
import Nettle.IPv4.IPAddress

lab :: LabConfig
lab = LabConfig { switches = [sw], 
                  controllerServerPort = 2525, 
                  hosts                = [(host 1, Interface 0 (ipAddress 11 1 1 5)) @@ sw # port 1, 
                                          (host 2, Interface 0 (ipAddress 11 1 2 5)) @@ sw # port 2 ], 
                  links                = []
                }
    where sw = switch 1