*** empty log message ***

psblas3-type-indexed
Salvatore Filippone 15 years ago
parent 802546ceb3
commit 22876a972f

@ -31,7 +31,10 @@
!!$ !!$
module psb_const_mod module psb_const_mod
! This should be integer(8), and normally different from default integer. ! This is the default integer
integer, parameter :: ndig=8
integer, parameter :: psb_int_k_ = selected_int_kind(ndig)
! This is an 8-byte integer, and normally different from default integer.
integer, parameter :: longndig=12 integer, parameter :: longndig=12
integer, parameter :: psb_long_int_k_ = selected_int_kind(longndig) integer, parameter :: psb_long_int_k_ = selected_int_kind(longndig)
! !

Loading…
Cancel
Save