File |
Line number |
Procedure |
Code |
./pkg/ggl90/GGL90.h |
119 |
NO PROCEDURE |
_RL IDEMIX_tau_d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/ggl90/GGL90.h |
126 |
NO PROCEDURE |
COMMON /GGL90_IDEMIX_01/ IDEMIX_E,IDEMIX_V0,IDEMIX_tau_d |
./pkg/ggl90/ggl90_calc.F |
475 |
GGL90_CALC |
& (GGL90eps+IDEMIX_tau_d(i,j,k,bi,bj)*IDEMIX_E(i,j,k,bi,bj)**2) |
./pkg/ggl90/ggl90_calc.F |
523 |
GGL90_CALC |
& + IDEMIX_tau_d(i,j,k,bi,bj)*IDEMIX_E(i,j,k,bi,bj)**2 |
./pkg/ggl90/ggl90_idemix.F |
150 |
GGL90_IDEMIX |
IDEMIX_tau_d(i,j,k,bi,bj) = IDEMIX_mu0*fxb*fxc* |
./pkg/ggl90/ggl90_idemix.F |
369 |
GGL90_IDEMIX |
b3d(i,j,k) = 1. _d 0 + deltaTggl90*IDEMIX_tau_d(i,j,k,bi,bj) |
./pkg/ggl90/ggl90_idemix.F |
389 |
GGL90_IDEMIX |
b3d(i,j,k) = 1. _d 0 + deltaTggl90*IDEMIX_tau_d(i,j,k,bi,bj) |
./pkg/ggl90/ggl90_idemix.F |
397 |
GGL90_IDEMIX |
b3d(i,j,k) = 1. _d 0 + deltaTggl90*IDEMIX_tau_d(i,j,k,bi,bj) |
./pkg/ggl90/ggl90_idemix.F |
443 |
GGL90_IDEMIX |
& *IDEMIX_tau_d(i,j,k,bi,bj) |
./pkg/ggl90/ggl90_idemix.F |
454 |
GGL90_IDEMIX |
CALL DIAGNOSTICS_FILL( IDEMIX_tau_d ,'IDEMIX_t', |
./pkg/ggl90/ggl90_init_varia.F |
81 |
GGL90_INIT_VARIA |
IDEMIX_tau_d(I,J,K,bi,bj) = 0. _d 0 |