Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/examples/sum.c

    r6ba0659 rbd85400  
    1010// Created On       : Wed May 27 17:56:53 2015
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Tue Feb 16 23:49:31 2016
    13 // Update Count     : 189
     12// Last Modified On : Fri Feb  5 16:47:44 2016
     13// Update Count     : 139
    1414//
    1515
     
    3333
    3434// Required to satisfy sumable as char does not have addition.
    35 const char 0;
    36 char ?+?( char t1, char t2 ) { return (int)t1 + t2; }   // cast forces integer addition, otherwise recursion
    37 char ?+=?( char *t1, char t2 ) { *t1 = *t1 + t2; return *t1; }
    38 char ++?( char *t ) { *t += 1; return *t; }
    39 char ?++( char *t ) { char temp = *t; *t += 1; return temp; }
     35// const char 0;
     36// char ?+?( char op1, char op2 ) { return (int)op1 + op2; } // cast forces integer addition or recursion
     37// char ++?( char *op ) { *op += 1; return *op; }
     38// char ?++( char *op ) { char temp = *op; *op += 1; return temp; }
    4039
    4140int main( void ) {
    4241        const int low = 5, High = 15, size = High - low;
     42        ofstream *sout = ofstream_stdout();
     43#if 0
    4344
    44         char s = 0, a[size], v = low;
     45        char s = 0, a[size];
     46        char v = low;
    4547        for ( int i = 0; i < size; i += 1, v += 1 ) {
    4648                s += v;
    4749                a[i] = v;
    48         } // for
     50        }
    4951        sout | "sum from " | low | " to " | High | " is "
    5052                 | (int)sum( size, a ) | ", check " | (int)s | endl;
    5153
    52         int s = 0, a[size], v = low;
     54        int s = 0, a[size];
     55        int v = low;
    5356        for ( int i = 0; i < size; i += 1, v += 1 ) {
    5457                s += (int)v;
    5558                a[i] = (int)v;
    56         } // for
     59        }
    5760        sout | "sum from " | low | " to " | High | " is "
    5861                 | sum( size, (int *)a ) | ", check " | (int)s | endl;
    5962
    60         float s = 0.0, a[size], v = low / 10.0;
     63        float s = 0.0, a[size];
     64        float v = low / 10.0;
    6165        for ( int i = 0; i < size; i += 1, v += 0.1f ) {
    6266                s += (float)v;
    6367                a[i] = (float)v;
    64         } // for
     68        }
    6569        sout | "sum from " | low / 10.0 | " to " | High / 10.0 | " is "
    6670                 | sum( size, (float *)a ) | ", check " | (float)s | endl;
     71#endif
     72        double s = 0, a[size];
     73        double v = low / 10.0;
    6774
    68         double s = 0, a[size], v = low / 10.0;
    6975        for ( int i = 0; i < size; i += 1, v += 0.1 ) {
    7076                s += (double)v;
    7177                a[i] = (double)v;
    72         } // for
     78        }
    7379        sout | "sum from " | low / 10.0 | " to " | High / 10.0 | " is "
    7480                 | sum( size, (double *)a ) | ", check " | (double)s | endl;
    7581
    76         struct S { int i, j; } 0 = { 0, 0 }, 1 = { 1, 1 };
    77         S ?+?( S t1, S t2 ) { S s = { t1.i + t2.i, t1.j + t2.j }; return s; }
    78         S ?+=?( S *t1, S t2 ) { *t1 = *t1 + t2; return *t1; }
    79         S ++?( S *t ) { *t += 1; return *t; }
    80         S ?++( S *t ) { S temp = *t; *t += 1; return temp; }
    81         ofstream * ?|?( ofstream * os, S v ) { return os | v.i | ' ' | v.j; }
    82 
    83         S s = 0, a[size], v = { low, low };
    84         for ( int i = 0; i < size; i += 1, v += (S)1 ) {
    85                 s += (S)v;
    86                 a[i] = (S)v;
    87         } // for
    88         sout | "sum from " | low | " to " | High | " is "
    89                  | sum( size, (S *)a ) | ", check " | (S)s | endl;
     82        // struct S { int i, j; } sarr[size];
     83        // struct S 0 = { 0, 0 };
     84        // struct S 1 = { 1, 1 };
     85        // S ?+?( S t1, S t2 ) { S s = { t1.i + t1.j, t2.i + t2.j }; return s; }
     86        // S ?+=?( S *t1, S t2 ) { *t1 = *t1 + t2; return *t1; }
     87        // S ++?( S *t ) { *t += 1; return *t; }
     88        // S ?++( S *t ) { S temp = *t; *t += 1; return temp; }
     89        // sum( size, sarr );
    9090} // main
    9191
Note: See TracChangeset for help on using the changeset viewer.