changed pointer attribute to allocatable in p_vec and p_intvec

This commit is contained in:
Pratheek Shanthraj 2014-06-25 16:08:49 +00:00
parent 03d1bb6b8b
commit 57a865c886
1 changed files with 2 additions and 2 deletions

View File

@ -53,11 +53,11 @@ module prec
real(pReal), parameter, public :: tol_math_check = 1.0e-8_pReal !< tolerance for internal math self-checks (rotation) real(pReal), parameter, public :: tol_math_check = 1.0e-8_pReal !< tolerance for internal math self-checks (rotation)
type, public :: p_vec !< variable length datatype used for storage of state type, public :: p_vec !< variable length datatype used for storage of state
real(pReal), dimension(:), pointer :: p real(pReal), dimension(:), allocatable :: p
end type p_vec end type p_vec
type, public :: p_intvec type, public :: p_intvec
integer(pInt), dimension(:), pointer :: p integer(pInt), dimension(:), allocatable :: p
end type p_intvec end type p_intvec
#ifdef NEWSTATE #ifdef NEWSTATE