home *** CD-ROM | disk | FTP | other *** search
/ The Complete Encyclopedia of Games 3 / GAMES1000V3_d2.iso / card / cardws17 / inc / function.cdh < prev    next >
Text File  |  1994-01-08  |  449b  |  19 lines
  1. #ifndef cwsfunction
  2. #define cwsfunction
  3.  
  4. {****fonction minimum}
  5. function min(a, b : integer): integer is
  6.   if a<b then return a else return b;
  7.  
  8. {****fonction maximum}
  9. function max(a, b : integer): integer is
  10.   if a<b then return b else return a;
  11.  
  12. //-------------------------------------------  
  13.   
  14. {****valeur a ajouter a une carte pour la tourner du cote as}
  15. function CSide(as : card):integer is
  16.   return as * decksize;
  17.  
  18. #endif  
  19.