/[lmdze]/trunk/Sources/phylmd/Mobidic/regr_pr_av.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/Mobidic/regr_pr_av.f

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

trunk/libf/phylmd/Mobidic/regr_pr_coefoz.f90 revision 36 by guez, Thu Dec 2 17:11:04 2010 UTC trunk/phylmd/Mobidic/regr_pr_coefoz.f90 revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC
# Line 25  contains Line 25  contains
25    
26      use dimens_m, only: iim, jjm, llm      use dimens_m, only: iim, jjm, llm
27      use dimphy, only: klon      use dimphy, only: klon
     use netcdf95, only: nf95_inq_varid, handle_err  
     use netcdf, only: nf90_get_var  
28      use grid_change, only: dyn_phy      use grid_change, only: dyn_phy
29        use netcdf, only: nf90_get_var
30        use netcdf95, only: nf95_inq_varid, handle_err
31      use nr_util, only: assert      use nr_util, only: assert
32        use numer_rec_95, only: regr1_step_av
33      use press_coefoz_m, only: press_in_edg      use press_coefoz_m, only: press_in_edg
     use regr1_step_av_m, only: regr1_step_av  
34      use pressure_var, only: p3d      use pressure_var, only: p3d
35    
36      integer, intent(in):: ncid ! NetCDF ID of the file      integer, intent(in):: ncid ! NetCDF ID of the file
# Line 101  contains Line 101  contains
101    
102      use dimens_m, only: iim, jjm, llm      use dimens_m, only: iim, jjm, llm
103      use dimphy, only: klon      use dimphy, only: klon
     use netcdf95, only: nf95_inq_varid, handle_err  
     use netcdf, only: nf90_get_var  
104      use grid_change, only: dyn_phy      use grid_change, only: dyn_phy
105        use netcdf, only: nf90_get_var
106        use netcdf95, only: nf95_inq_varid, handle_err
107      use nr_util, only: assert      use nr_util, only: assert
108        use numer_rec_95, only: regr1_lint
109      use press_coefoz_m, only: plev      use press_coefoz_m, only: plev
     use regr1_lint_m, only: regr1_lint  
110      use pressure_var, only: pls      use pressure_var, only: pls
111    
112      integer, intent(in):: ncid ! NetCDF ID of the file      integer, intent(in):: ncid ! NetCDF ID of the file

Legend:
Removed from v.36  
changed lines
  Added in v.76

  ViewVC Help
Powered by ViewVC 1.1.21