Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/tests/rational.c

    r561f730 r39c5ea3  
    1010// Created On       : Mon Mar 28 08:43:12 2016
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Sun May 14 18:10:28 2017
    13 // Update Count     : 57
     12// Last Modified On : Tue May  2 22:11:05 2017
     13// Update Count     : 41
    1414//
    1515
     16#include <limits>
    1617#include <rational>
    17 #include <limits>
    18 #include <stdlib>
    1918#include <fstream>
    20 
    21 // UNNECESSARY, FIX ME
    22 void ?{}( int * this ) { *this = 0; }
    23 void ?{}( int * this, zero_t ) { *this = 0; }
    24 void ?{}( int * this, one_t ) { *this = 1; }
    2519
    2620int main() {
    2721        sout | "constructor" | endl;
    28         Rational(int) a = { 3 }, b = { 4 }, c;
     22        Rational a = { 3 }, b = { 4 }, c;
    2923        sout | a | b | c | endl;
    30 
    31         a = (Rational(int)){ 4, 8 };
    32         b = (Rational(int)){ 5, 7 };
     24        a = (Rational){ 4, 8 };
     25        b = (Rational){ 5, 7 };
    3326        sout | a | b | endl;
    34         a = (Rational(int)){ -2, -3 };
    35         b = (Rational(int)){ 3, -2 };
     27        a = (Rational){ -2, -3 };
     28        b = (Rational){ 3, -2 };
    3629        sout | a | b | endl;
    37         a = (Rational(int)){ -2, 3 };
    38         b = (Rational(int)){ 3, 2 };
     30        a = (Rational){ -2, 3 };
     31        b = (Rational){ 3, 2 };
    3932        sout | a | b | endl;
    4033
    4134        sout | "logical" | endl;
    42         a = (Rational(int)){ -2 };
    43         b = (Rational(int)){ -3, 2 };
     35        a = (Rational){ -2 };
     36        b = (Rational){ -3, 2 };
    4437        sout | a | b | endl;
    4538//      sout | a == 1 | endl; // FIX ME
     
    5750        sout | a / b | endl;
    5851
    59 //      sout | "conversion" | endl;
    60 //      a = (Rational(int)){ 3, 4 };
    61 //      sout | widen( a ) | endl;
    62 //      a = (Rational(int)){ 1, 7 };
    63 //      sout | widen( a ) | endl;
    64 //      a = (Rational(int)){ 355, 113 };
    65 //      sout | widen( a ) | endl;
    66 //      sout | narrow( 0.75, 4 ) | endl;
    67 //      sout | narrow( 0.14285714285714, 16 ) | endl;
    68 //      sout | narrow( 3.14159265358979, 256 ) | endl;
     52        sout | "conversion" | endl;
     53        a = (Rational){ 3, 4 };
     54        sout | widen( a ) | endl;
     55        a = (Rational){ 1, 7 };
     56        sout | widen( a ) | endl;
     57        a = (Rational){ 355, 113 };
     58        sout | widen( a ) | endl;
     59        sout | narrow( 0.75, 4 ) | endl;
     60        sout | narrow( 0.14285714285714, 16 ) | endl;
     61        sout | narrow( 3.14159265358979, 256 ) | endl;
    6962
    7063        sout | "decompose" | endl;
    71         int n, d;
     64        RationalImpl n, d;
    7265//      [n, d] = a;
    7366//      sout | a | n | d | endl;
    7467
    7568        sout | "more tests" | endl;
    76         Rational(int) x = { 1, 2 }, y = { 2 };
     69        Rational x = { 1, 2 }, y = { 2 };
    7770        sout | x - y | endl;
    7871        sout | x > y | endl;
     
    8073        sout | y | denominator( y, -2 ) | y | endl;
    8174
    82         Rational(int) z = { 0, 5 };
     75        Rational z = { 0, 5 };
    8376        sout | z | endl;
    8477
    8578        sout | x | numerator( x, 0 ) | x | endl;
    8679
    87         x = (Rational(int)){ 1, MAX } + (Rational(int)){ 1, MAX };
     80        x = (Rational){ 1, MAX } + (Rational){ 1, MAX };
    8881        sout | x | endl;
    89         x = (Rational(int)){ 3, MAX } + (Rational(int)){ 2, MAX };
     82        x = (Rational){ 3, MAX } + (Rational){ 2, MAX };
    9083        sout | x | endl;
    9184
Note: See TracChangeset for help on using the changeset viewer.