Fortran 90/95 and Computational Physics
Fortran 90/95 and Computational Physics
Fortran 90/95 and Computational Physics
- No tags were found...
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
Numeric Kind ParameterisationProgram test_kindImplicit noneReal :: a! selected_real_kind([p][,r]) p = precision, r = rangeInteger, parameter :: long = selected_real_kind(9,99)Real(long) :: ba = 1.7; b = 1.7_longPrint *, a,kind(a), precision(a), range(a)Print *, b,kind(b), precision(b), range(b)b = 1.7;b = 1.7D0;print *, bprint *,bEnd Program test_kind<strong>Fortran</strong> <strong>90</strong>/<strong>95</strong> <strong>and</strong> <strong>Computational</strong> <strong>Physics</strong> – p.11/22