Télécharger dstatn.eso

Retour à la liste

Numérotation des lignes :

  1. C DSTATN SOURCE BP208322 15/10/13 21:15:56 8670
  2. c
  3. c %---------------------------------------------%
  4. c | Initialize statistic and timing information |
  5. c | for nonsymmetric Arnoldi code. |
  6. c %---------------------------------------------%
  7. c
  8. c\Author
  9. c Danny Sorensen Phuong Vu
  10. c Richard Lehoucq CRPC / Rice University
  11. c Dept. of Computational & Houston, Texas
  12. c Applied Mathematics
  13. c Rice University
  14. c Houston, Texas
  15. c
  16. c\SCCS Information: @(#)
  17. c FILE: statn.F SID: 2.4 DATE OF SID: 4/20/96 RELEASE: 2
  18. c
  19. subroutine dstatn
  20. c
  21. c %--------------------------------%
  22. c | See stat.doc for documentation |
  23. c %--------------------------------%
  24. c
  25. c
  26. c %-----------------------%
  27. c | Executable Statements |
  28. c %-----------------------%
  29. c
  30. nopx = 0
  31. nbx = 0
  32. nrorth = 0
  33. nitref = 0
  34. nrstrt = 0
  35. c
  36. tnaupd = 0.0D+0
  37. tnaup2 = 0.0D+0
  38. tnaitr = 0.0D+0
  39. tneigh = 0.0D+0
  40. tngets = 0.0D+0
  41. tnapps = 0.0D+0
  42. tnconv = 0.0D+0
  43. titref = 0.0D+0
  44. tgetv0 = 0.0D+0
  45. trvec = 0.0D+0
  46. c
  47. c %----------------------------------------------------%
  48. c | User time including reverse communication overhead |
  49. c %----------------------------------------------------%
  50. c
  51. tmvopx = 0.0D+0
  52. tmvbx = 0.0D+0
  53. c
  54. return
  55. c
  56. c
  57. c %---------------%
  58. c | End of dstatn |
  59. c %---------------%
  60. c
  61. end
  62.  
  63.  

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