/[lmdze]/trunk/dyn3d/caldyn.f
ViewVC logotype

Diff of /trunk/dyn3d/caldyn.f

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

revision 12 by guez, Mon Jul 21 16:05:07 2008 UTC revision 23 by guez, Mon Dec 14 15:25:16 2009 UTC
# Line 117  c   ------------------------------------ Line 117  c   ------------------------------------
117    
118        IF( conser )  THEN        IF( conser )  THEN
119          CALL sortvarc          CALL sortvarc
120       $ ( itau,ucov,teta,ps,masse,pk,phis,vorpot,phi,bern,dp,time,vcov )       $ ( itau,ucov,teta,ps,masse,pk,phis,vorpot,phi,bern,dp,time)
121    
122        ENDIF        ENDIF
123    
Legend:
Removed from v.12  
changed lines
  Added in v.23
  ViewVC Help
Powered by ViewVC 1.1.21