Symbol Description Uses
tx1 6



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1312 RAS
       tx1(i) = cmb2pa *  (prs(i,ib+1) - prs(i,ib))/(grav*dt)
./pkg/fizhi/fizhi_moist.F 1316 RAS
       tx1(i) = rhfrac(i)*rknob * cmass(i,ib) / tx1(i)
./pkg/fizhi/fizhi_moist.F 1317 RAS
       if(cmass(i,K).gt.0.) clf(i,ib) = clf(i,ib) + tx1(i)
./pkg/fizhi/fizhi_moist.F 1379 RAS
         tx1(i)   = 100*(prs(i,L+1)-prs(i,L))/grav
./pkg/fizhi/fizhi_moist.F 1380 RAS
         cln(i,L) = min(1600*rains(i,L)/tx1(i),rasmax )