/[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

trunk/dyn3d/exner_hyb.f revision 91 by guez, Wed Mar 26 17:18:58 2014 UTC trunk/Sources/dyn3d/exner_hyb.f revision 134 by guez, Wed Apr 29 15:47:56 2015 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.134

  ViewVC Help
Powered by ViewVC 1.1.21