Changes between Version 2 and Version 3 of ticket/0664_TRA_TRP
- Timestamp:
- 2010-04-27T12:22:12+02:00 (14 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
ticket/0664_TRA_TRP
v2 v3 58 58 ! ! effective transport 59 59 DO jk = 1, jpkm1 60 #if defined key_trabbl_adv 60 #if defined key_trabbl_adv 61 61 ! ! eulerian + bbl transport 62 62 zun(:,:,jk) = e2u(:,:) * fse3u(:,:,jk) * ( un(:,:,jk) - u_bbl(:,:,jk) )