source: codes/icosagcm/branches/SATURN_DYNAMICO/ICOSAGCM/src/math_const.f90 @ 268

Last change on this file since 268 was 221, checked in by ymipsl, 10 years ago

Creating temporary dynamico/lmdz/saturn branche

YM
File size: 142 bytes
Line 
1MODULE math_const
2  USE PREC
3 
4  REAL(rstd),PARAMETER :: Pi=acos(-1._rstd)
5  COMPLEX(cstd), PARAMETER :: Imag=(0,1)
6 
7END MODULE math_const
Note: See TracBrowser for help on using the repository browser.