From fc6c61471f285463f9e3ef28413789b2e8a70d4c Mon Sep 17 00:00:00 2001 From: Luv Sharma Date: Tue, 14 Oct 2014 00:33:38 +0000 Subject: [PATCH] pvec still used in FEZoo --- code/prec.f90 | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/code/prec.f90 b/code/prec.f90 index 9f571c9e3..2a79b239b 100644 --- a/code/prec.f90 +++ b/code/prec.f90 @@ -49,7 +49,10 @@ module prec integer, parameter, public :: pLongInt = 8 !< integer representation 64 bit (was selected_int_kind(12), number with at least up to +- 1e12) real(pReal), parameter, public :: tol_math_check = 1.0e-8_pReal !< tolerance for internal math self-checks (rotation) - type, public :: p_intvec + type, public :: p_vec !< variable length datatype used for storage of state + real(pReal), dimension(:), allocatable :: p + end type p_vec +type, public :: p_intvec integer(pInt), dimension(:), allocatable :: p end type p_intvec