Parent Directory | Revision Log | Patch
trunk/phylmd/Radlwsw/lw.f90 revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC | trunk/Sources/phylmd/Radlwsw/lw.f revision 139 by guez, Tue May 26 17:46:03 2015 UTC | |
---|---|---|
# | Line 93 contains | Line 93 contains |
93 | ZOZ(i, k) = POZON(i, k)*PDP(i, k) * MD/RMO3 | ZOZ(i, k) = POZON(i, k)*PDP(i, k) * MD/RMO3 |
94 | ENDDO | ENDDO |
95 | ENDDO | ENDDO |
96 | CALL LWU(PAER, PDP, PPMB, PPSOL, ZOZ, PTAVE, PVIEW, PWV, ZABCU) | CALL LWU(PAER, PDP, PPMB, ZOZ, PTAVE, PVIEW, PWV, ZABCU) |
97 | CALL LWBV(ILIM, PDP, PDT0, PEMIS, PPMB, PTL, PTAVE, ZABCU, & | CALL LWBV(ILIM, PDP, PDT0, PEMIS, PPMB, PTL, PTAVE, ZABCU, & |
98 | ZFLUC, ZBINT, ZBSUI, ZCTS, ZCNTRB) | ZFLUC, ZBINT, ZBSUI, ZCTS, ZCNTRB) |
99 | itaplw0 = 0 | itaplw0 = 0 |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |