/[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.2 by adcroft, Wed Jul 28 16:23:08 1999 UTC revision 1.3 by adcroft, Fri Jul 30 15:43:00 1999 UTC
# Line 43  C     output arguments Line 43  C     output arguments
43    
44  C     === Local variables ===  C     === Local variables ===
45        _RS facz        _RS facz
46        REAL  rfac(nwtype),a1(nwtype),a2(nwtype)        _RS rfac(nwtype),a1(nwtype),a2(nwtype)
47        INTEGER i        INTEGER i
48  C  C
49  C     Jerlov water type :  I       IA      IB      II      III  C     Jerlov water type :  I       IA      IB      II      III

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

  ViewVC Help
Powered by ViewVC 1.1.22