/[lmdze]/trunk/phylmd/Interface_surf/calcul_fluxs.f
ViewVC logotype

Diff of /trunk/phylmd/Interface_surf/calcul_fluxs.f

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

revision 171 by guez, Tue Sep 29 19:48:59 2015 UTC revision 178 by guez, Fri Mar 11 18:47:26 2016 UTC
# Line 14  contains Line 14  contains
14    
15      ! L. Fairhead April 2000      ! L. Fairhead April 2000
16    
     USE abort_gcm_m, ONLY: abort_gcm  
17      USE fcttre, ONLY: dqsatl, dqsats, foede, foeew, qsatl, qsats, thermcep      USE fcttre, ONLY: dqsatl, dqsats, foede, foeew, qsatl, qsats, thermcep
     USE indicesol, ONLY: is_ter  
18      use nr_util, only: assert_eq      use nr_util, only: assert_eq
19      USE suphec_m, ONLY: rcpd, rd, retv, rkappa, rlstt, rlvtt, rtt      USE suphec_m, ONLY: rcpd, rd, retv, rlstt, rlvtt, rtt
20      USE yoethf_m, ONLY: r2es, r5ies, r5les, rvtmp2      USE yoethf_m, ONLY: r2es, r5ies, r5les, rvtmp2
21    
22      real, intent(IN):: dtime      real, intent(IN):: dtime
Legend:
Removed from v.171  
changed lines
  Added in v.178
  ViewVC Help
Powered by ViewVC 1.1.21