/[lmdze]/trunk/phylmd/radepsi.f90
ViewVC logotype

Diff of /trunk/phylmd/radepsi.f90

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

trunk/phylmd/radepsi.f revision 82 by guez, Wed Mar 5 14:57:53 2014 UTC trunk/phylmd/radepsi.f90 revision 328 by guez, Thu Jun 13 14:40:06 2019 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.82  
changed lines
  Added in v.328
  ViewVC Help
Powered by ViewVC 1.1.21