This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: Problem with Selected_Real_Kind


On Thursday 06 August 2009 23:54:03 RadSurfer wrote:
> 6   real, parameter :: DP=selected_real_kind(9,99)
integer, parameter :: dp = selected_real_kind(9,99)

> 7   real (kind(dp)) :: u,v,w;
real(dp) :: u, v, w

> 11 write(*,*) 3.1415_(kind(dp))
write(*,*) 3.1415_dp

Didn't test, but it should work with the changes above :)

	Daniel


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]