/[lmdze]/trunk/phylmd/CV3_routines/cv3_param.f
ViewVC logotype

Diff of /trunk/phylmd/CV3_routines/cv3_param.f

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

revision 82 by guez, Wed Mar 5 14:57:53 2014 UTC revision 97 by guez, Fri Apr 25 14:58:31 2014 UTC
# Line 1  Line 1 
1  module cv3_param_m  module cv3_param_m
2    
3    ! From LMDZ4/libf/phylmd/cvparam3.h, version 1.1.1.1 2004/05/19 12:53:09    ! From LMDZ4/libf/phylmd/cvparam3.h, version 1.1.1.1, 2004/05/19 12:53:09
4    
5    ! Parameters for iflag_con=3:    ! Parameters for iflag_con = 3:
6    ! - microphysical parameters    ! - microphysical parameters
7    ! - parameters that control the rate of approach to quasi-equilibrium    ! - parameters that control the rate of approach to quasi-equilibrium
8    
# Line 42  contains Line 42  contains
42    
43    SUBROUTINE cv3_param(nd, delt)    SUBROUTINE cv3_param(nd, delt)
44    
45      ! From LMDZ4/libf/phylmd/cv3_routines.F, version 1.5 2005/07/11 15:20:02      ! From LMDZ4/libf/phylmd/cv3_routines.F, version 1.5, 2005/07/11 15:20:02
46    
47      ! Set parameters for iflag_con = 3      ! Set parameters for iflag_con = 3
48    
# Line 55  contains Line 55  contains
55    
56      noff = 1      noff = 1
57      minorig = 1      minorig = 1
58      nl=nd-noff      nl = nd - noff
59      nlp=nl+1      nlp=nl+1
60      nlm=nl-1      nlm=nl-1
61    
Legend:
Removed from v.82  
changed lines
  Added in v.97
  ViewVC Help
Powered by ViewVC 1.1.21