Mercurial > octave-nkf
diff liboctave/fCmplxAEPBAL.cc @ 11518:141b3fb5cef7
style fixes
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 13 Jan 2011 16:52:30 -0500 |
parents | 07ebe522dac2 |
children | fd0a3ac60b0e |
line wrap: on
line diff
--- a/liboctave/fCmplxAEPBAL.cc Thu Jan 13 22:51:09 2011 +0100 +++ b/liboctave/fCmplxAEPBAL.cc Thu Jan 13 16:52:30 2011 -0500 @@ -35,18 +35,21 @@ extern "C" { F77_RET_T - F77_FUNC (cgebal, CGEBAL) (F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, - FloatComplex*, const octave_idx_type&, - octave_idx_type&, octave_idx_type&, float*, - octave_idx_type& F77_CHAR_ARG_LEN_DECL); + F77_FUNC (cgebal, CGEBAL) (F77_CONST_CHAR_ARG_DECL, + const octave_idx_type&, FloatComplex*, + const octave_idx_type&, octave_idx_type&, + octave_idx_type&, float*, octave_idx_type& + F77_CHAR_ARG_LEN_DECL); F77_RET_T - F77_FUNC (cgebak, CGEBAK) (F77_CONST_CHAR_ARG_DECL, F77_CONST_CHAR_ARG_DECL, + F77_FUNC (cgebak, CGEBAK) (F77_CONST_CHAR_ARG_DECL, + F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, const octave_idx_type&, const octave_idx_type&, const float*, const octave_idx_type&, FloatComplex*, const octave_idx_type&, octave_idx_type& - F77_CHAR_ARG_LEN_DECL F77_CHAR_ARG_LEN_DECL); + F77_CHAR_ARG_LEN_DECL + F77_CHAR_ARG_LEN_DECL); } FloatComplexAEPBALANCE::FloatComplexAEPBALANCE (const FloatComplexMatrix& a,