/[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 20 by guez, Wed Oct 15 16:19:57 2008 UTC trunk/phylmd/Mobidic/regr_pr_coefoz.f revision 82 by guez, Wed Mar 5 14:57:53 2014 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 numer_rec, only: assert      use netcdf, only: nf90_get_var
30        use netcdf95, only: nf95_inq_varid, handle_err
31        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 numer_rec, only: assert      use netcdf, only: nf90_get_var
106        use netcdf95, only: nf95_inq_varid, handle_err
107        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.20  
changed lines
  Added in v.82
  ViewVC Help
Powered by ViewVC 1.1.21