Parent Directory
|
Revision Log
|
Revision Graph
|
Patch
revision 1.10 by stephd, Fri Dec 16 21:07:53 2005 UTC | revision 1.11 by stephd, Tue Sep 12 19:58:02 2006 UTC | |
---|---|---|
# | Line 140 C first correct pCO2at for surface atmos | Line 140 C first correct pCO2at for surface atmos |
140 | & AtmosP(i,j,bi,bj)*AtmospCO2(i,j,bi,bj) | & AtmosP(i,j,bi,bj)*AtmospCO2(i,j,bi,bj) |
141 | c find exchange coefficient | c find exchange coefficient |
142 | c account for schmidt number and and varible piston velocity | c account for schmidt number and and varible piston velocity |
143 | pisvel(i,j,bi,bj) =0.337*wind(i,j,bi,bj)**2/3.6d5 | |
144 | Kwexch(i,j) = | Kwexch(i,j) = |
145 | & pisvel(i,j,bi,bj) | & pisvel(i,j,bi,bj) |
146 | & / sqrt(SchmidtNoDIC(i,j)/660.0) | & / sqrt(SchmidtNoDIC(i,j)/660.0) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |