May 15 2007 1:08:02.662 PM BIG_INTS Demonstrate the declaration and use of "big" integers in a FORTRAN90 program. TEST01 Use integers of the default type. HUGE() returns the largest value of the given type. HUGE(I1) = 9223372036854775807 RANGE provides the decimal exponent range. RANGE(I1) = 18 KIND returns the "kind" of a given integer. KIND(I1) = 8 TEST02 Use integers of KIND = 4. HUGE() returns the largest value of the given type. HUGE(I1) = 2147483647 RANGE provides the decimal exponent range. RANGE(I1) = 9 KIND returns the "kind" of a given integer. KIND(I1) = 4 TEST03 Use integers of KIND = 8. HUGE() returns the largest value of the given type. HUGE(I1) = 9223372036854775807 RANGE provides the decimal exponent range. RANGE(I1) = 18 KIND returns the "kind" of a given integer. KIND(I1) = 8 TEST04 Set KIND_VAL = SELECTED_INT_KIND ( 18 ) and declare I1 of type " integer ( KIND_VAL )" KIND_VAL = 8 HUGE() returns the largest value of the given type. HUGE(I1) = 9223372036854775807 RANGE provides the decimal exponent range. RANGE(I1) = 18 KIND returns the "kind" of a given integer. KIND(I1) = 8 BIG_INTS Normal end of execution. May 15 2007 1:08:02.662 PM