Télécharger dstats.eso

Retour à la liste

Numérotation des lignes :

  1. C DSTATS SOURCE BP208322 15/10/13 21:15:56 8670
  2. c
  3. c\SCCS Information: @(#)
  4. c FILE: stats.F SID: 2.1 DATE OF SID: 4/19/96 RELEASE: 2
  5. c %---------------------------------------------%
  6. c | Initialize statistic and timing information |
  7. c | for symmetric Arnoldi code. |
  8. c %---------------------------------------------%
  9.  
  10. subroutine dstats
  11.  
  12. c %--------------------------------%
  13. c | See stat.doc for documentation |
  14. c %--------------------------------%
  15.  
  16. c %-----------------------%
  17. c | Executable Statements |
  18. c %-----------------------%
  19.  
  20. nopx = 0
  21. nbx = 0
  22. nrorth = 0
  23. nitref = 0
  24. nrstrt = 0
  25.  
  26. tsaupd = 0.0D+0
  27. tsaup2 = 0.0D+0
  28. tsaitr = 0.0D+0
  29. tseigt = 0.0D+0
  30. tsgets = 0.0D+0
  31. tsapps = 0.0D+0
  32. tsconv = 0.0D+0
  33. titref = 0.0D+0
  34. tgetv0 = 0.0D+0
  35. trvec = 0.0D+0
  36.  
  37. c %----------------------------------------------------%
  38. c | User time including reverse communication overhead |
  39. c %----------------------------------------------------%
  40. tmvopx = 0.0D+0
  41. tmvbx = 0.0D+0
  42.  
  43. return
  44. c
  45. c End of dstats
  46. c
  47. end
  48.  
  49.  

© Cast3M 2003 - Tous droits réservés.
Mentions légales