/[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 207 by guez, Thu Sep 1 10:30:53 2016 UTC revision 214 by guez, Wed Mar 22 13:40:27 2017 UTC
# Line 12  contains Line 12  contains
12      ! Cette routine calcule les flux en h et q à l'interface et une      ! Cette routine calcule les flux en h et q à l'interface et une
13      ! température de surface.      ! température de surface.
14    
15      ! L. Fairhead April 2000      ! L. Fairhead, April 2000
16    
17      USE fcttre, ONLY: dqsatl, dqsats, foede, foeew, qsatl, qsats      USE fcttre, ONLY: dqsatl, dqsats, foede, foeew, qsatl, qsats
18      use nr_util, only: assert_eq      use nr_util, only: assert_eq
Legend:
Removed from v.207  
changed lines
  Added in v.214
  ViewVC Help
Powered by ViewVC 1.1.21