secs.f (revision 16223cb9c3f88b34f2cb94151b5cf5ffc1aac5e2) - OpenGrok cross reference for /phasta/phSolver/compressible/secs.f

1      real*8 function secs(t)
2
3      real t
4
5      secs = 0.0
6
7      return
8      end
9