Changeset aad4ca4 in git for Singular/svd/blas.h


Ignore:
Timestamp:
Dec 6, 2017, 7:05:25 PM (6 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
06b3e84d21e073249ada6d3b863bb3b8ce91d3be
Parents:
3803c6a39fad57f9a8e12942b2928c215504e027
Message:
format: Warn -> WarnS, trailing spaces
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/svd/blas.h

    r3803c6 raad4ca4  
    400400        if( !trans )
    401401        {
    402            
     402
    403403            //
    404404            // y := alpha*A*x + beta*y;
     
    410410            ap::ap_error::make_assertion(j2-j1==ix2-ix1);
    411411            ap::ap_error::make_assertion(i2-i1==iy2-iy1);
    412            
     412
    413413            //
    414414            // beta*y
     
    425425                ap::vmul(y.getvector(iy1, iy2), beta);
    426426            }
    427            
     427
    428428            //
    429429            // alpha*A*x
     
    437437        else
    438438        {
    439            
     439
    440440            //
    441441            // y := alpha*A'*x + beta*y;
     
    447447            ap::ap_error::make_assertion(i2-i1==ix2-ix1);
    448448            ap::ap_error::make_assertion(j2-j1==iy2-iy1);
    449            
     449
    450450            //
    451451            // beta*y
     
    462462                ap::vmul(y.getvector(iy1, iy2), beta);
    463463            }
    464            
     464
    465465            //
    466466            // alpha*A'*x
     
    538538
    539539
    540        
     540
    541541        //
    542542        // Setup
     
    569569        crows = arows;
    570570        ccols = bcols;
    571        
     571
    572572        //
    573573        // Test WORK
     
    578578        work(1) = 0;
    579579        work(i) = 0;
    580        
     580
    581581        //
    582582        // Prepare C
     
    599599            }
    600600        }
    601        
     601
    602602        //
    603603        // A*B
     
    616616            return;
    617617        }
    618        
     618
    619619        //
    620620        // A*B'
     
    647647            }
    648648        }
    649        
     649
    650650        //
    651651        // A'*B
     
    664664            return;
    665665        }
    666        
     666
    667667        //
    668668        // A'*B'
Note: See TracChangeset for help on using the changeset viewer.