13.07.2015 Views

Fortran 90/95 and Computational Physics

Fortran 90/95 and Computational Physics

Fortran 90/95 and Computational Physics

SHOW MORE
SHOW LESS
  • 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

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!