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

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

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

revision 1.27 by molod, Thu Oct 7 03:20:56 2004 UTC revision 1.28 by molod, Thu Oct 14 22:11:42 2004 UTC
# Line 115  c --------------- Line 115  c ---------------
115        _RL ptop        _RL ptop
116        logical lpnt        logical lpnt
117    
       _RL tempij(im,jm)  
   
118        istrip = im*jm        istrip = im*jm
119        npcs   = 1        npcs   = 1
120    
# Line 225  C =============== Line 223  C ===============
223       .    nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz,       .    nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz,
224       .    nlwcld,cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz,       .    nlwcld,cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz,
225       .              .false.,myid)       .              .false.,myid)
   
226        endif        endif
227    
228        return        return
Legend:
Removed from v.1.27  
changed lines
  Added in v.1.28
  ViewVC Help
Powered by ViewVC 1.1.22