Nek5000
SEM for Incompressible NS
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Modules Pages
nekuse_mod.F90
Go to the documentation of this file.
1 
2 module nekuse
3  use kinds, only : dp
4  use size_m
5  implicit none
6 
7  real(DP) :: x, y, z, r, theta
8  real(DP) :: ux, uy, uz, un, u1, u2
9  real(DP) :: trx, try, trz, trn, tr1, tr2
10  real(DP) :: pa
11  real(DP) :: ffx, ffy, ffz
12  real(DP) :: temp, flux, hc, hrad, tinf, qvol
13  real(DP) :: udiff, utrans
14  real(DP) :: si2, si3, sigma
15  real(DP) :: turbk, turbe
16  real(DP) :: ps(ldimt)
17 
18  character(len=3) :: cbu
19 
20 end module nekuse
cleaned
Definition: nekuse_mod.F90:2
static double y[NR *NS *NT *N]
Definition: obbox_test.c:31
static double z[NR *NS *NT *N]
Definition: obbox_test.c:31