Go to the source code of this file.
|
subroutine | flux_p (psitok, rk, zk, nk) |
|
subroutine | flux_g (psitok, rk, zk, nk) |
|
subroutine | flux_r (psitok, ncequi) |
|
subroutine | numcel (rrk, zzk, icell, jcell) |
|
subroutine | f_flux (psitok, rk, zk, nk) |
|
real *8 function | blin_tr (tet0, ro0, |
|
real*8 function blin_tr |
( |
|
tet0, |
|
|
|
ro0 |
|
) |
| |
subroutine f_flux |
( |
real*8, dimension(*) |
psitok, |
|
|
real*8, dimension(*) |
rk, |
|
|
real*8, dimension(*) |
zk, |
|
|
|
nk |
|
) |
| |
subroutine flux_g |
( |
real*8, dimension(*) |
psitok, |
|
|
real*8, dimension(*) |
rk, |
|
|
real*8, dimension(*) |
zk, |
|
|
|
nk |
|
) |
| |
subroutine flux_p |
( |
real*8, dimension(*) |
psitok, |
|
|
real*8, dimension(*) |
rk, |
|
|
real*8, dimension(*) |
zk, |
|
|
|
nk |
|
) |
| |
subroutine flux_r |
( |
real*8, dimension(*) |
psitok, |
|
|
|
ncequi |
|
) |
| |
subroutine numcel |
( |
|
rrk, |
|
|
|
zzk, |
|
|
|
icell, |
|
|
|
jcell |
|
) |
| |