class HasSessionID m where getSessionID :: m SessionID