/[MITgcm]/MITgcm/pkg/fizhi/fizhi_moist.F
ViewVC logotype

Diff of /MITgcm/pkg/fizhi/fizhi_moist.F

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

revision 1.16 by molod, Tue Aug 10 15:13:47 2004 UTC revision 1.17 by molod, Thu Aug 12 15:21:22 2004 UTC
# Line 1186  C Line 1186  C
1186         ENDIF         ENDIF
1187         IB = IC(NC)         IB = IC(NC)
1188    
        print *,' Calling cloud for cloud ',nc,' det at ',ic(nc)  
   
1189  c Initialize Cloud Fraction Array  c Initialize Cloud Fraction Array
1190  c -------------------------------  c -------------------------------
1191        do i = 1,lenc        do i = 1,lenc
Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17
  ViewVC Help
Powered by ViewVC 1.1.22