Changeset 24 for trunk/src/com_mod.f90
- Timestamp:
- May 23, 2014, 11:48:41 AM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/com_mod.f90
r20 r24 340 340 real :: qvh(0:nxmax-1,0:nymax-1,nuvzmax,2) 341 341 real :: pplev(0:nxmax-1,0:nymax-1,nuvzmax,2) 342 !scavenging NIK, PS343 342 integer(kind=1) :: clouds(0:nxmax-1,0:nymax-1,nzmax,2) 344 343 integer :: cloudsh(0:nxmax-1,0:nymax-1,2) 345 integer icloudbot(0:nxmax-1,0:nymax-1,2)346 integer icloudthck(0:nxmax-1,0:nymax-1,2)347 344 348 345 … … 359 356 ! rainout conv/lsp dominated 2/3 360 357 ! washout conv/lsp dominated 4/5 361 ! PS 2013362 !c icloudbot (m) cloud bottom height363 !c icloudthck (m) cloud thickness364 358 365 359 ! pplev for the GFS version
Note: See TracChangeset
for help on using the changeset viewer.