- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Compiling the following code gives me an error message
integer, private, parameter :: I8 = selected_int_kind( 18 )
integer(I8), private, SAVE :: &
& RN_MULT = 5_I8**19, &
& RN_ADD = 0_I8, &
& RN_STRIDE = 152917, &
& RN_SEED0 = 5_I8**19, &
& RN_MOD = 2_I8**48, &
& RN_MASK = 2_I8**48 - 1_I8, &
& RN_PERIOD = 2_I8**46
** ERROR **
The INTEGER(KIND=4) value is out-of-range.
INTEGER(I8), private, SAVE :: RN_MULT = 5_I8**18
What is it thinking is KIND=4 in that variable declaration. I get an error for each declaration. Thanks.
integer, private, parameter :: I8 = selected_int_kind( 18 )
integer(I8), private, SAVE :: &
& RN_MULT = 5_I8**19, &
& RN_ADD = 0_I8, &
& RN_STRIDE = 152917, &
& RN_SEED0 = 5_I8**19, &
& RN_MOD = 2_I8**48, &
& RN_MASK = 2_I8**48 - 1_I8, &
& RN_PERIOD = 2_I8**46
** ERROR **
The INTEGER(KIND=4) value is out-of-range.
INTEGER(I8), private, SAVE :: RN_MULT = 5_I8**18
What is it thinking is KIND=4 in that variable declaration. I get an error for each declaration. Thanks.
Link Copied
1 Reply
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Looks like a bug to me. Please report it to Premier Support.

Reply
Topic Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page