| [604e76d] | 1 | #pragma once | 
|---|
|  | 2 |  | 
|---|
| [c9b3a41] | 3 | #include "iostream" | 
|---|
|  | 4 |  | 
|---|
| [604e76d] | 5 | forall(otype R, otype S) struct pair { | 
|---|
|  | 6 | R first; | 
|---|
|  | 7 | S second; | 
|---|
|  | 8 | }; | 
|---|
|  | 9 |  | 
|---|
|  | 10 | forall(otype R, otype S | 
|---|
|  | 11 | | { int ?==?(R, R); int ?<?(R, R); int ?<?(S, S); }) | 
|---|
|  | 12 | int ?<?(pair(R, S) p, pair(R, S) q); | 
|---|
|  | 13 |  | 
|---|
|  | 14 | forall(otype R, otype S | 
|---|
|  | 15 | | { int ?==?(R, R); int ?<?(R, R); int ?<=?(S, S); }) | 
|---|
|  | 16 | int ?<=?(pair(R, S) p, pair(R, S) q); | 
|---|
|  | 17 |  | 
|---|
|  | 18 | forall(otype R, otype S | { int ?==?(R, R); int ?==?(S, S); }) | 
|---|
|  | 19 | int ?==?(pair(R, S) p, pair(R, S) q); | 
|---|
|  | 20 |  | 
|---|
|  | 21 | forall(otype R, otype S | { int ?!=?(R, R); int ?!=?(S, S); }) | 
|---|
|  | 22 | int ?!=?(pair(R, S) p, pair(R, S) q); | 
|---|
|  | 23 |  | 
|---|
|  | 24 | forall(otype R, otype S | 
|---|
|  | 25 | | { int ?==?(R, R); int ?>?(R, R); int ?>?(S, S); }) | 
|---|
|  | 26 | int ?>?(pair(R, S) p, pair(R, S) q); | 
|---|
|  | 27 |  | 
|---|
|  | 28 | forall(otype R, otype S | 
|---|
|  | 29 | | { int ?==?(R, R); int ?>?(R, R); int ?>=?(S, S); }) | 
|---|
|  | 30 | int ?>=?(pair(R, S) p, pair(R, S) q); | 
|---|
| [c9b3a41] | 31 |  | 
|---|
| [79d4186] | 32 | // forall(otype R, otype S) | 
|---|
|  | 33 | // forall(dtype ostype | ostream( ostype ) | { ostype & ?|?( ostype &, R ); ostype & ?|?( ostype &, S ); }) | 
|---|
|  | 34 | // ostype & ?|?( ostype & os, pair(R, S) ); | 
|---|