functor Make (M : Conference.INPUT) : Conference.OUTPUT where con userId = M.userId
                                                        where con paperId = M.paperId