| 1 | #pragma once | 
|---|
| 2 |  | 
|---|
| 3 | #include "iostream" | 
|---|
| 4 |  | 
|---|
| 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); | 
|---|
| 31 |  | 
|---|
| 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) ); | 
|---|