Mercurial > octave-nkf

comparison liboctave/dRowVector.cc @ 11518:141b3fb5cef7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
style fixes
author John W. Eaton <jwe@octave.org>
date Thu, 13 Jan 2011 16:52:30 -0500
parents a0728e81ed25
children fd0a3ac60b0e
comparison
equal deleted inserted replaced
11517:da8e32c99969 11518:141b3fb5cef7
40 40
41 extern "C" 41 extern "C"
42 { 42 {
43 F77_RET_T 43 F77_RET_T
44 F77_FUNC (dgemv, DGEMV) (F77_CONST_CHAR_ARG_DECL, 44 F77_FUNC (dgemv, DGEMV) (F77_CONST_CHAR_ARG_DECL,
45 const octave_idx_type&, const octave_idx_type&, const double&, 45 const octave_idx_type&, const octave_idx_type&,
46 const double*, const octave_idx_type&, const double*, 46 const double&, const double*,
47 const octave_idx_type&, const double&, double*, const octave_idx_type& 47 const octave_idx_type&, const double*,
48 const octave_idx_type&, const double&,
49 double*, const octave_idx_type&
48 F77_CHAR_ARG_LEN_DECL); 50 F77_CHAR_ARG_LEN_DECL);
49 F77_RET_T 51 F77_RET_T
50 F77_FUNC (xddot, XDDOT) (const octave_idx_type&, const double*, const octave_idx_type&, 52 F77_FUNC (xddot, XDDOT) (const octave_idx_type&, const double*,
51 const double*, const octave_idx_type&, double&); 53 const octave_idx_type&, const double*,
54 const octave_idx_type&, double&);
52 } 55 }
53 56
54 // Row Vector class. 57 // Row Vector class.
55 58
56 bool 59 bool