Fix signatures of external functions in the f2c-generated C sources
This commit is contained in:
@@ -637,12 +637,12 @@ doublereal dlange_(char *norm, integer *m, integer *n, doublereal *a, integer
|
||||
|
||||
/* Local variables */
|
||||
doublereal temp;
|
||||
extern /* Subroutine */ int dcombssq_(doublereal *, doublereal *);
|
||||
extern /* Subroutine */ void dcombssq_(doublereal *, doublereal *);
|
||||
integer i__, j;
|
||||
extern logical lsame_(char *, char *);
|
||||
doublereal value;
|
||||
extern logical disnan_(doublereal *);
|
||||
extern /* Subroutine */ int dlassq_(integer *, doublereal *, integer *,
|
||||
extern /* Subroutine */ void dlassq_(integer *, doublereal *, integer *,
|
||||
doublereal *, doublereal *);
|
||||
doublereal colssq[2], sum, ssq[2];
|
||||
|
||||
|
||||
Reference in New Issue
Block a user