/[MITgcm]/MITgcm/model/src/swfrac.F
ViewVC logotype

Diff of /MITgcm/model/src/swfrac.F

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

revision 1.1 by adcroft, Tue May 18 18:01:13 1999 UTC revision 1.2 by adcroft, Wed Jul 28 16:23:08 1999 UTC
# Line 2  C  /u/gcmpack/models/MITgcmUV/model/src/ Line 2  C  /u/gcmpack/models/MITgcmUV/model/src/
2    
3  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
4    
5    #ifdef ALLOW_KPP
6  C I.Fukumori 8/24/98  C I.Fukumori 8/24/98
7  CStartOfInterface  CStartOfInterface
8        SUBROUTINE SWFRAC(        SUBROUTINE SWFRAC(
# Line 64  C Line 65  C
65    
66        RETURN        RETURN
67        END        END
68    #endif
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22