/[lmdze]/trunk/phylmd/cv_thermo.f
ViewVC logotype

Diff of /trunk/phylmd/cv_thermo.f

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

revision 190 by guez, Thu Apr 14 15:15:56 2016 UTC revision 196 by guez, Mon May 23 13:50:39 2016 UTC
# Line 1  Line 1 
1  module cv_thermo_m  module cv_thermo_m
2    
3    ! From LMDZ4/libf/phylmd/cvthermo.h, version 1.1.1.1 2004/05/19 12:53:09    ! From LMDZ4/libf/phylmd/cvthermo.h, version 1.1.1.1 2004/05/19 12:53:09
4    ! Thermodynamical constants for convectL    ! Thermodynamical constants for cv_driver
5    
6    implicit none    implicit none
7    
# Line 15  contains Line 15  contains
15    
16    SUBROUTINE cv_thermo    SUBROUTINE cv_thermo
17    
18      ! Set thermodynamical constants for convectL      ! Set thermodynamical constants for cv_driver
19    
20      use SUPHEC_M, only: rcpd, rcpv, rcw, rd, rg, rlvtt, rv      use SUPHEC_M, only: rcpd, rcpv, rcw, rd, rg, rlvtt, rv
21    
Legend:
Removed from v.190  
changed lines
  Added in v.196
  ViewVC Help
Powered by ViewVC 1.1.21