Changeset 4292
- Timestamp:
- Oct 4, 2022, 2:51:22 PM (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/dyn1d/1DUTILS.h
r4046 r4292 1708 1708 1709 1709 ! 1710 print *,'dtime, tau ',dtime,tau1711 print *, 'u_targ',u_targ1712 print *, 'v_targ',v_targ1713 print *,'zonal velocity ',u1714 print *,'meridional velocity ',v1710 !print *,'dtime, tau ',dtime,tau 1711 !print *, 'u_targ',u_targ 1712 !print *, 'v_targ',v_targ 1713 !print *,'zonal velocity ',u 1714 !print *,'meridional velocity ',v 1715 1715 DO k = 1,klev 1716 1716 DO i = 1,klon … … 1721 1721 d_v(i,k) = d_v(i,k) + 1./tau*(v_targ(i,k)-v(i,k)) 1722 1722 ! 1723 1724 1723 ! print *,' k,u,d_u,v,d_v ', & 1724 ! k,u(i,k),d_u(i,k),v(i,k),d_v(i,k) 1725 1725 ! ENDIF 1726 1726 !
Note: See TracChangeset
for help on using the changeset viewer.