source: codes/icosagcm/devel/src/base/math_const.f90 @ 883

Last change on this file since 883 was 883, checked in by dubos, 5 years ago

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