Initialize 64-bit integer variables with 64-bit real values

Help
8

@fortran4r ,

As suggested upthread, you are likely to satisfy your conveniences here with mnemonics:

   ..
   integer, parameter :: I8 = selected_int_kind( r=10 )
   ..
   integer(I8), parameter :: TEN = 10_i8
   ..
   integer(I8) :: x
   ..
   x = 3*TEN**9

Given what you write re: risk, you may want to consider staying away from hard-wired values such as 8 for integer kind.