Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.1.2.2 by dimitri, Sun May 4 01:29:48 2003 UTC | revision 1.1.2.3 by dimitri, Sun May 4 23:19:18 2003 UTC | |
|---|---|---|
| # | Line 174 C | Line 174 C |
| 174 | ALPHA = sol_cfc(TMP1,TMP2,11) | ALPHA = sol_cfc(TMP1,TMP2,11) |
| 175 | CSAT = ALPHA * PCFC * patm(i,j,bi,bj) | CSAT = ALPHA * PCFC * patm(i,j,bi,bj) |
| 176 | TMP1 = KW * ( CSAT - Tr1(i,j,1,bi,bj) ) | TMP1 = KW * ( CSAT - Tr1(i,j,1,bi,bj) ) |
| 177 | gTr1(i,j,1,bi,bj) = gTr1(i,j,1,bi,bj) + | surfaceTendencyTr1(i,j,bi,bj) = |
| 178 | & TMP1 * recip_drF(1) * recip_hFacC(i,j,1,bi,bj) | & TMP1 * recip_drF(1) * recip_hFacC(i,j,1,bi,bj) |
| 179 | ENDDO | ENDDO |
| 180 | ENDDO | ENDDO |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |