xref: /phasta/phSolver/compressible/tmr.f (revision 16223cb9c3f88b34f2cb94151b5cf5ffc1aac5e2) 
1      real*8 function tmr()
2
3      real*8 second
4
5c      tmr = second
6      tmr = 0
7
8      return
9      end
10
11
12