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

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

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

revision 1.3 by molod, Mon Jun 7 20:26:43 2004 UTC revision 1.4 by molod, Mon Jun 7 21:36:45 2004 UTC
# Line 60  C Compute pressure profile to get methan Line 60  C Compute pressure profile to get methan
60         enddo         enddo
61         enddo         enddo
62    
63         call fizhi_init_chem(mythid,nozlats,nozlevs,ozlats,ozlevs,         call fizhi_init_chem(mythid,
64       . ozone,nwatlats,nwatlevs,watlats,watlevs,water,       .      nlatsoz,nlevsoz,ntimesoz,latsoz,levsoz,ozone,
65       . Nrphys,pressure,n20,methane,co2,cfc11,cfc12,cfc22)       .      nlatsq,nlevsq,ntimesq,latsq,levsq,stratq,
66         .      Nrphys,pressure,n20,methane,co2,cfc11,cfc12,cfc22)
67    
68         return         return
69         end         end
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22