/[lmdze]/trunk/Sources/phylmd/radepsi.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/radepsi.f

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

trunk/phylmd/radepsi.f90 revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC trunk/Sources/phylmd/radepsi.f revision 220 by guez, Tue Apr 4 14:52:21 2017 UTC
# Line 1  Line 1 
1  module radepsi  module radepsi
2    
3    ! From phylmd/radepsi.h, version 1.1.1.1 2004/05/19 12:53:08    ! From phylmd/radepsi.h, version 1.1.1.1, 2004/05/19 12:53:08
4    
5    implicit none    implicit none
6    
7    double precision, parameter:: ZEELOG = 1.D-07    double precision, parameter:: ZEELOG = 1.D-07
8    ! (1.d-10 (not good for 32-bit machines))    ! (1d-10 (not good for 32-bit machines))
9    
10    double precision, parameter:: ZEPSC  = 1.D-20    double precision, parameter:: ZEPSC  = 1.D-20
11    double precision, parameter:: ZEPSCO = 1.D-10    double precision, parameter:: ZEPSCO = 1.D-10
# Line 15  module radepsi Line 15  module radepsi
15    double precision, parameter:: ZEPSEC = 1.0d-12    double precision, parameter:: ZEPSEC = 1.0d-12
16    double precision, parameter:: ZEPSCR = 1.0d-10    double precision, parameter:: ZEPSCR = 1.0d-10
17    
   double precision, parameter:: REPSCT=1.0E-10  
   
18  end module radepsi  end module radepsi
Legend:
Removed from v.76  
changed lines
  Added in v.220
  ViewVC Help
Powered by ViewVC 1.1.21