diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2009-11-02 15:48:06 -0500 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2009-11-02 15:48:06 -0500 |
| commit | 72664fd130cf983bc2d3cbc0aacd6776625a71b1 (patch) | |
| tree | e891f485d240c659d16bcaa8843d8e4d1911c055 /demo/more/bid.urs | |
| parent | 7491cad2aabb379a0d6b2bb5234634c183b3dba2 (diff) | |
Start of Decision
Diffstat (limited to 'demo/more/bid.urs')
| -rw-r--r-- | demo/more/bid.urs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/demo/more/bid.urs b/demo/more/bid.urs index f731f9ba..1504c1b7 100644 --- a/demo/more/bid.urs +++ b/demo/more/bid.urs @@ -1,3 +1,7 @@ +con fields :: Type -> Type -> {Type} + functor Make (M : Conference.INPUT) : Conference.OUTPUT where con paper = M.paper where con userId = M.userId where con paperId = M.paperId + where con yourPaperTables = [Assignment + = fields M.userId M.paperId] |