Changeset 1050


Ignore:
Timestamp:
Jul 24, 2003, 11:19:29 AM (17 years ago)
Author:
luba
Message:
  • tests for long arithmetic
Location:
to-imperative/trunk/samples/Arithm
Files:
8 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/samples/Arithm/div.out

    r842 r1050  
    1 11
     1-2
     21
     3-1
     4-1
     51
     61073741824
     7966
     80
     9-1
     101000000000057489047
  • to-imperative/trunk/samples/Arithm/div.rf

    r593 r1050  
    22
    33Main =
    4   {
    5     <PrintLN <Div 22 2>>;
     4  { 
     5    <PrintLN <Div -22 11>>,
     6    <PrintLN <Div -2147483647 -2147483647>>,
     7    <PrintLN <Div 2147483647 -2147483647>>,
     8    <PrintLN <Div -2147483647 2147483647>>,
     9    <PrintLN <Div 2147483647 2147483647>>,
     10
     11    <PrintLN <Div 2147483648 2>>,
     12    <PrintLN <Div 2147483648 2222222>>,
     13    <PrintLN <Div 22345 -2147483648>>,
     14    <PrintLN <Div -2147483649 2147483648>>,
     15    <PrintLN <Div -2147483648123456789078654321 -2147483648>>;
     16
    617  };
    718
  • to-imperative/trunk/samples/Arithm/mult.out

    r842 r1050  
    11-44
     22147483647
     3-2147483647
     4-2147483647
     52147483647
     621474836480
     7-23622320128
     8-21474836480
     923622320128
     1029081234961
     1110732779499
     12-34881890054
     136977900131202
     144611686018427387904
     15-4611686018427387904
     16-4611686018427387904
     174611686018427387904
  • to-imperative/trunk/samples/Arithm/mult.rf

    r593 r1050  
    33Main =
    44  {
    5     <PrintLN <"*" 22 -2>>;
     5    <PrintLN <"*" 22 -2>>,
     6    <PrintLN <"*" 2147483647 1>>,
     7    <PrintLN <"*" 2147483647 -1>>,
     8    <PrintLN <"*" -2147483647 1>>,
     9    <PrintLN <"*" -2147483647 -1>>,
     10
     11    <PrintLN <"*" 2147483648 10>>,
     12    <PrintLN <"*" 2147483648 -11>>,
     13    <PrintLN <"*" -10 2147483648>>,
     14    <PrintLN <"*" -11 -2147483648>>,
     15
     16    <PrintLN <"*" 614189 47349>>,
     17    <PrintLN <"*" -456889  -23491>>,
     18    <PrintLN <"*" -582598 59873>>,
     19    <PrintLN <"*" -998998 -6984899>>,
     20
     21    <PrintLN <"*" 2147483648 2147483648>>,
     22    <PrintLN <"*" 2147483648 -2147483648>>,
     23    <PrintLN <"*" -2147483648 2147483648>>,
     24    <PrintLN <"*" -2147483648 -2147483648>>;
     25
    626  };
    727
  • to-imperative/trunk/samples/Arithm/rem.out

    r842 r1050  
    1 1
     1-1
     20
     30
     40
     50
     60
     7817196
     822345
     9-1
     10-1
  • to-imperative/trunk/samples/Arithm/rem.rf

    r593 r1050  
    22
    33Main =
    4   {
    5     <PrintLN <Rem 3 2>>;
     4  { 
     5    <PrintLN <Rem -23 -11>>,
     6    <PrintLN <Rem -2147483647 -2147483647>>,
     7    <PrintLN <Rem 2147483647 -2147483647>>,
     8    <PrintLN <Rem -2147483647 2147483647>>,
     9    <PrintLN <Rem 2147483647 2147483647>>,
     10
     11    <PrintLN <Rem 2147483648 2>>,
     12    <PrintLN <Rem 2147483648 2222222>>,
     13    <PrintLN <Rem 22345 -2147483648>>,
     14    <PrintLN <Rem -2147483649 2147483648>>,
     15    <PrintLN <Rem -21474836481234567890786543 -2>>;
     16
    617  };
    718
  • to-imperative/trunk/samples/Arithm/sub.out

    r842 r1050  
     1-8
     24294967294
    130
    2 -8
    3 7
     4-4294967294
     50
     62147483646
     72147483648
     8-2147483648
     9-2147483646
     10-21474836475
     1121474836508
     1221474836465
     1321474836487
     1442949672942
     152147483626314528096
     16-2147483669264201038
     172147483626314528096
  • to-imperative/trunk/samples/Arithm/sub.rf

    r593 r1050  
    33Main =
    44  {
    5     <PrintLN <"-" 3 3>>,
    65    <PrintLN <"-" 2 10>>,
    7     <PrintLN <"-" 14 7>>;
     6    <PrintLN <"-" 2147483647 -2147483647>>,
     7    <PrintLN <"-" 2147483647 2147483647>>,
     8    <PrintLN <"-" -2147483647 2147483647>>,
     9    <PrintLN <"-" -2147483647 -2147483647>>,
     10    <PrintLN <"-" 2147483647 1>>,
     11    <PrintLN <"-" 2147483647 -1>>,
     12    <PrintLN <"-" -2147483647 1>>,
     13    <PrintLN <"-" -2147483647 -1>>,
     14
     15    <PrintLN <"-" -21474836476 -1>>,
     16    <PrintLN <"-" 32 -21474836476>>,
     17    <PrintLN <"-" 21474836476 11>>,
     18    <PrintLN <"-" 21474836476 -11>>,
     19   
     20    <PrintLN <"-" 21474836471 -21474836471>>,
     21    <PrintLN <"-" 2147483647789364567 21474836471>>,
     22    <PrintLN <"-" -2147483647789364567 21474836471>>,
     23    <PrintLN <"-" -21474836471 -2147483647789364567>>;
     24         
    825  };
    926
Note: See TracChangeset for help on using the changeset viewer.