| Symbol | Description | Uses |
| cpen | 5 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/fizhi_moist.F | 1052 | MOISTIO |
cldras = min( max( cldras_lw(i,j,L)*cldras_mem,cpen(i,j,L)), |
| ./pkg/fizhi/fizhi_moist.F | 1075 | MOISTIO |
cldras = min( max(cldras_sw(i,j,L)*cldras_mem, cpen(i,j,L)), |
| ./pkg/fizhi/fizhi_moist.F | 716 | MOISTIO |
call PASTE ( clboth, cpen ,istrip,im*jm,lm,nn ) |
| ./pkg/fizhi/fizhi_moist.F | 783 | MOISTIO |
call BACK2GRD ( cpen(1,1,L),pblindex, cpen(1,1,L) ,im*jm) |