/[lmdze]/trunk/Sources/dyn3d/caladvtrac.f
ViewVC logotype

Diff of /trunk/Sources/dyn3d/caladvtrac.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 44 by guez, Wed Apr 13 12:29:18 2011 UTC revision 64 by guez, Wed Aug 29 14:47:17 2012 UTC
# Line 51  contains Line 51  contains
51         CALL qminimum(q, 2, finmasse)         CALL qminimum(q, 2, finmasse)
52    
53         finmasse = masse         finmasse = masse
54         CALL filtreg(finmasse, jjm + 1, llm, -2, 2, .TRUE., 1)         CALL filtreg(finmasse, jjm + 1, llm, -2, 2, .TRUE.)
55    
56         ! Calcul de "dq" pour l'eau, pour le passer à la physique         ! Calcul de "dq" pour l'eau, pour le passer à la physique
57         dtvrtrac = iapp_tracvl * dtvr         dtvrtrac = iapp_tracvl * dtvr
Legend:
Removed from v.44  
changed lines
  Added in v.64
  ViewVC Help
Powered by ViewVC 1.1.21