Changeset 182 for codes/icosagcm/trunk
- Timestamp:
- 12/15/13 09:16:03 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/trunk/src/caldyn_gcm.f90
r181 r182 245 245 theta = f_theta(ind) 246 246 qu=f_qu(ind) 247 qv=f_qv(ind) 247 248 CALL compute_pvort(ps,u,theta_rhodz, mass,theta,qu,qv) 248 249 pk = f_pk(ind)
Note: See TracChangeset
for help on using the changeset viewer.