Mercurial > hg > octave-lyh
diff liboctave/dSparse.cc @ 11518:141b3fb5cef7
style fixes
| author | John W. Eaton <jwe@octave.org> |
|---|---|
| date | Thu, 13 Jan 2011 16:52:30 -0500 |
| parents | 7c573eb981eb |
| children | fd0a3ac60b0e |
line wrap: on
line diff
--- a/liboctave/dSparse.cc +++ b/liboctave/dSparse.cc @@ -73,61 +73,76 @@ octave_idx_type*, octave_idx_type&); F77_RET_T - F77_FUNC (dgbtrs, DGBTRS) (F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, - const octave_idx_type&, const octave_idx_type&, const octave_idx_type&, + F77_FUNC (dgbtrs, DGBTRS) (F77_CONST_CHAR_ARG_DECL, + const octave_idx_type&, const octave_idx_type&, + const octave_idx_type&, const octave_idx_type&, const double*, const octave_idx_type&, - const octave_idx_type*, double*, const octave_idx_type&, octave_idx_type& + const octave_idx_type*, double*, + const octave_idx_type&, octave_idx_type& F77_CHAR_ARG_LEN_DECL); F77_RET_T - F77_FUNC (dgbcon, DGBCON) (F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, - const octave_idx_type&, const octave_idx_type&, double*, - const octave_idx_type&, const octave_idx_type*, const double&, - double&, double*, octave_idx_type*, octave_idx_type& + F77_FUNC (dgbcon, DGBCON) (F77_CONST_CHAR_ARG_DECL, + const octave_idx_type&, const octave_idx_type&, + const octave_idx_type&, double*, + const octave_idx_type&, const octave_idx_type*, + const double&, double&, double*, + octave_idx_type*, octave_idx_type& F77_CHAR_ARG_LEN_DECL); F77_RET_T - F77_FUNC (dpbtrf, DPBTRF) (F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, - const octave_idx_type&, double*, const octave_idx_type&, octave_idx_type& - F77_CHAR_ARG_LEN_DECL); - - F77_RET_T - F77_FUNC (dpbtrs, DPBTRS) (F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, - const octave_idx_type&, const octave_idx_type&, double*, const octave_idx_type&, + F77_FUNC (dpbtrf, DPBTRF) (F77_CONST_CHAR_ARG_DECL, + const octave_idx_type&, const octave_idx_type&, double*, const octave_idx_type&, octave_idx_type& F77_CHAR_ARG_LEN_DECL); F77_RET_T - F77_FUNC (dpbcon, DPBCON) (F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, - const octave_idx_type&, double*, const octave_idx_type&, - const double&, double&, double*, octave_idx_type*, octave_idx_type& + F77_FUNC (dpbtrs, DPBTRS) (F77_CONST_CHAR_ARG_DECL, + const octave_idx_type&, const octave_idx_type&, + const octave_idx_type&, double*, + const octave_idx_type&, double*, + const octave_idx_type&, octave_idx_type& F77_CHAR_ARG_LEN_DECL); - F77_RET_T - F77_FUNC (dptsv, DPTSV) (const octave_idx_type&, const octave_idx_type&, double*, double*, - double*, const octave_idx_type&, octave_idx_type&); F77_RET_T - F77_FUNC (dgtsv, DGTSV) (const octave_idx_type&, const octave_idx_type&, double*, double*, - double*, double*, const octave_idx_type&, octave_idx_type&); + F77_FUNC (dpbcon, DPBCON) (F77_CONST_CHAR_ARG_DECL, + const octave_idx_type&, const octave_idx_type&, + double*, const octave_idx_type&, + const double&, double&, double*, + octave_idx_type*, octave_idx_type& + F77_CHAR_ARG_LEN_DECL); + F77_RET_T + F77_FUNC (dptsv, DPTSV) (const octave_idx_type&, const octave_idx_type&, + double*, double*, double*, const octave_idx_type&, + octave_idx_type&); F77_RET_T - F77_FUNC (dgttrf, DGTTRF) (const octave_idx_type&, double*, double*, double*, double*, - octave_idx_type*, octave_idx_type&); + F77_FUNC (dgtsv, DGTSV) (const octave_idx_type&, const octave_idx_type&, + double*, double*, double*, double*, + const octave_idx_type&, octave_idx_type&); F77_RET_T - F77_FUNC (dgttrs, DGTTRS) (F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, - const octave_idx_type&, const double*, const double*, - const double*, const double*, const octave_idx_type*, + F77_FUNC (dgttrf, DGTTRF) (const octave_idx_type&, double*, double*, + double*, double*, octave_idx_type*, + octave_idx_type&); + + F77_RET_T + F77_FUNC (dgttrs, DGTTRS) (F77_CONST_CHAR_ARG_DECL, + const octave_idx_type&, const octave_idx_type&, + const double*, const double*, const double*, + const double*, const octave_idx_type*, double *, const octave_idx_type&, octave_idx_type& F77_CHAR_ARG_LEN_DECL); F77_RET_T - F77_FUNC (zptsv, ZPTSV) (const octave_idx_type&, const octave_idx_type&, double*, Complex*, - Complex*, const octave_idx_type&, octave_idx_type&); + F77_FUNC (zptsv, ZPTSV) (const octave_idx_type&, const octave_idx_type&, + double*, Complex*, Complex*, const octave_idx_type&, + octave_idx_type&); F77_RET_T - F77_FUNC (zgtsv, ZGTSV) (const octave_idx_type&, const octave_idx_type&, Complex*, Complex*, - Complex*, Complex*, const octave_idx_type&, octave_idx_type&); + F77_FUNC (zgtsv, ZGTSV) (const octave_idx_type&, const octave_idx_type&, + Complex*, Complex*, Complex*, Complex*, + const octave_idx_type&, octave_idx_type&); }