/[MITgcm]/MITgcm/pkg/exf/exf_filter_rs.F
ViewVC logotype

Diff of /MITgcm/pkg/exf/exf_filter_rs.F

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

revision 1.3 by dimitri, Sat Dec 28 10:11:11 2002 UTC revision 1.4 by dimitri, Tue Feb 18 05:33:54 2003 UTC
# Line 15  c Line 15  c
15  c     o Read a flux record for external forcing.  c     o Read a flux record for external forcing.
16  c  c
17  c     started: Ralf.Giering@FastOpt.de 24-Mai-2000  c     started: Ralf.Giering@FastOpt.de 24-Mai-2000
18  c     changed: menemenlis@jpl.nasa.gov 20-Dec-2002  c     mods for pkg/seaice: menemenlis@jpl.nasa.gov 20-Dec-2002
19  c  c
20  c     ==================================================================  c     ==================================================================
21  c     SUBROUTINE exf_filter_rs  c     SUBROUTINE exf_filter_rs
# Line 108  c         Set land points to zero Line 108  c         Set land points to zero
108        enddo        enddo
109    
110        ENDIF        ENDIF
111    c     END IF ( .NOT. useSEAICE )
112    
113        end        end
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22