1 /* This software was developed by Bruce Hendrickson and Robert Leland   *
2  * at Sandia National Laboratories under US Department of Energy        *
3  * contract DE-AC04-76DP00789 and is copyrighted by Sandia Corporation. */
4 
5 
6 /* Switchable timer routine  */
lanc_seconds()7 double    lanc_seconds()
8 {
9     extern int LANCZOS_TIME; /* perform detailed timing on Lanczos_SO? */
10     double seconds();
11 
12     if (LANCZOS_TIME) {
13 	return(seconds());
14     }
15     else {
16 	return(0);
17     }
18 }
19