module Stypes where

newtype Socket  = So  Int deriving (Eq,Ord,Show,Read)
newtype LSocket = LSo Int deriving (Eq,Ord,Show,Read)
newtype Timer   = Ti  Int deriving (Eq,Ord,Show,Read)