19 lines
330 B
Fortran
19 lines
330 B
Fortran
|
!
|
||
|
|
!=======================================================================
|
||
|
|
!
|
||
|
|
MODULE RELAXATION_TIME_DYNAMIC
|
||
|
|
!
|
||
|
|
USE ACCURACY_REAL
|
||
|
|
!
|
||
|
|
!
|
||
|
|
CONTAINS
|
||
|
|
!
|
||
|
|
!=======================================================================
|
||
|
|
!
|
||
|
|
FUNCTION TAIC_RT_D_3D()
|
||
|
|
!
|
||
|
|
!
|
||
|
|
END FUNCTION TAIC_RT_D_3D
|
||
|
|
!
|
||
|
|
END MODULE RELAXATION_TIME_DYNAMIC
|