Parent Directory | Revision Log | Revision Graph | Patch
revision 1.1 by mlosch, Thu Sep 2 09:11:54 2004 UTC | revision 1.2 by mlosch, Mon May 30 07:41:45 2005 UTC | |
---|---|---|
# | Line 65 C rhoK, rhoKm1 - Density below and a | Line 65 C rhoK, rhoKm1 - Density below and a |
65 | C epsilon - small number | C epsilon - small number |
66 | INTEGER I,J,Km1 | INTEGER I,J,Km1 |
67 | _RL p5 , p125 | _RL p5 , p125 |
68 | PARAMETER( p5=0.5, p125=0.125 ) | PARAMETER( p5=0.5D0, p125=0.125D0 ) |
69 | _RL tempu, tempv | _RL tempu, tempv |
70 | _RL epsilon | _RL epsilon |
71 | PARAMETER ( epsilon = 1.D-10 ) | PARAMETER ( epsilon = 1.D-10 ) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |