Add graph references
This commit is contained in:
+64
@@ -0,0 +1,64 @@
|
||||
/* -- translated by f2c (version 20240504).
|
||||
You must link the resulting object file with libf2c:
|
||||
on Microsoft Windows system, link with libf2c.lib;
|
||||
on Linux or Unix systems, link with .../path/to/libf2c.a -lm
|
||||
or, if you install libf2c.a in a standard place, with -lf2c -lm
|
||||
-- in that order, at the end of the command line, as in
|
||||
cc *.o -lf2c -lm
|
||||
Source for libf2c is in /netlib/f2c/libf2c.zip, e.g.,
|
||||
|
||||
http://www.netlib.org/f2c/libf2c.zip
|
||||
*/
|
||||
|
||||
#include "f2c.h"
|
||||
|
||||
|
||||
/* \SCCS Information: @(#)
|
||||
FILE: stats.F SID: 2.1 DATE OF SID: 4/19/96 RELEASE: 2
|
||||
%---------------------------------------------%
|
||||
| Initialize statistic and timing information |
|
||||
| for symmetric Arnoldi code. |
|
||||
%---------------------------------------------%
|
||||
Subroutine */ int igraphdstats_(void)
|
||||
{
|
||||
integer nbx=0, nopx=0;
|
||||
real trvec=0, tmvbx=0, tgetv0=0, tsaup2=0;
|
||||
integer nitref=0;
|
||||
real titref=0, tseigt=0, tsaupd=0, tsaitr=0, tsgets=0, tsapps=0;
|
||||
integer nrorth=0;
|
||||
real tsconv=0;
|
||||
integer nrstrt=0;
|
||||
real tmvopx=0;
|
||||
|
||||
/* %--------------------------------%
|
||||
| See stat.doc for documentation |
|
||||
%--------------------------------%
|
||||
%-----------------------%
|
||||
| Executable Statements |
|
||||
%-----------------------% */
|
||||
nopx = 0;
|
||||
nbx = 0;
|
||||
nrorth = 0;
|
||||
nitref = 0;
|
||||
nrstrt = 0;
|
||||
tsaupd = 0.f;
|
||||
tsaup2 = 0.f;
|
||||
tsaitr = 0.f;
|
||||
tseigt = 0.f;
|
||||
tsgets = 0.f;
|
||||
tsapps = 0.f;
|
||||
tsconv = 0.f;
|
||||
titref = 0.f;
|
||||
tgetv0 = 0.f;
|
||||
trvec = 0.f;
|
||||
/* %----------------------------------------------------%
|
||||
| User time including reverse communication overhead |
|
||||
%----------------------------------------------------% */
|
||||
tmvopx = 0.f;
|
||||
tmvbx = 0.f;
|
||||
return 0;
|
||||
|
||||
/* End of dstats */
|
||||
|
||||
} /* igraphdstats_ */
|
||||
|
||||
Reference in New Issue
Block a user