Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.1 by jmc, Tue Mar 6 16:31:04 2001 UTC | revision 1.2 by adcroft, Tue May 29 14:01:36 2001 UTC | |
|---|---|---|
| # | Line 17 C recip_Bo = 1/Bo_surf | Line 17 C recip_Bo = 1/Bo_surf |
| 17 | _RL Bo_surf(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | _RL Bo_surf(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
| 18 | _RL recip_Bo(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | _RL recip_Bo(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
| 19 | ||
| 20 | C-- COMMON /SURF_INDEX/ Common block for surface related index | |
| 21 | C k_surf - vertical index of the surface tracer cell | |
| 22 | COMMON /SURF_INDEX/ k_surf | |
| 23 | INTEGER k_surf(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |