--- trunk/Sources/phylmd/Radlwsw/lw.f	2015/05/22 23:13:19	138
+++ trunk/Sources/phylmd/Radlwsw/lw.f	2015/05/26 17:46:03	139
@@ -93,7 +93,7 @@
              ZOZ(i, k) = POZON(i, k)*PDP(i, k) * MD/RMO3
           ENDDO
        ENDDO
-       CALL LWU(PAER, PDP, PPMB, PPSOL, ZOZ, PTAVE, PVIEW, PWV, ZABCU)
+       CALL LWU(PAER, PDP, PPMB, ZOZ, PTAVE, PVIEW, PWV, ZABCU)
        CALL LWBV(ILIM, PDP, PDT0, PEMIS, PPMB, PTL, PTAVE, ZABCU, &
             ZFLUC, ZBINT, ZBSUI, ZCTS, ZCNTRB)
        itaplw0 = 0