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

Diff of /trunk/dyn3d/exner_hyb.f

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

revision 91 by guez, Wed Mar 26 17:18:58 2014 UTC revision 107 by guez, Thu Sep 11 15:09:15 2014 UTC
# Line 64  contains Line 64  contains
64    
65      if (present(pkf)) then      if (present(pkf)) then
66         pkf = pk         pkf = pk
67         CALL filtreg(pkf, size(pkf, 2), llm, 2, 1, .TRUE.)         CALL filtreg(pkf, direct = .true., intensive = .true.)
68      end if      end if
69    
70    END SUBROUTINE exner_hyb    END SUBROUTINE exner_hyb
Legend:
Removed from v.91  
changed lines
  Added in v.107
  ViewVC Help
Powered by ViewVC 1.1.21