From 8edeeaf2135acf428990ba8098db641bc8ff4ad7 Mon Sep 17 00:00:00 2001
From: Philip Eisenlohr <eisenlohr@egr.msu.edu>
Date: Fri, 3 Aug 2018 19:39:14 -0400
Subject: [PATCH] renaming of p_vec and friends to names based on "group"

---
 src/material.f90                 | 10 +++++-----
 src/prec.f90                     |  8 ++++----
 src/vacancyflux_cahnhilliard.f90 |  4 ++--
 3 files changed, 11 insertions(+), 11 deletions(-)

diff --git a/src/material.f90 b/src/material.f90
index d71fbb37a..c2c52aaa6 100644
--- a/src/material.f90
+++ b/src/material.f90
@@ -16,8 +16,8 @@ module material
    tSourceState, &
    tHomogMapping, &
    tPhaseMapping, &
-   p_vec, &
-   p_intvec
+   group_scalar, &
+   group_int
 
  implicit none
  private
@@ -268,7 +268,7 @@ module material
    porosityMapping, &                                                                               !< mapping for porosity state/fields
    hydrogenfluxMapping                                                                              !< mapping for hydrogen conc state/fields
 
- type(p_vec),         allocatable, dimension(:), public :: &
+ type(group_scalar),  allocatable, dimension(:), public :: &
    temperature, &                                                                                   !< temperature field
    damage, &                                                                                        !< damage field
    vacancyConc, &                                                                                   !< vacancy conc field
@@ -1120,8 +1120,8 @@ subroutine material_populateGrains
                   phaseID,textureID,dGrains,myNgrains,myNorientations,myNconstituents, &
                   grain,constituentGrain,ipGrain,symExtension, ip
  real(pReal) :: deviation,extreme,rnd
- integer(pInt),  dimension (:,:),   allocatable :: Nelems                                           ! counts number of elements in homog, micro array
- type(p_intvec), dimension (:,:), allocatable :: elemsOfHomogMicro                                  ! lists element number in homog, micro array
+ integer(pInt),         dimension (:,:), allocatable :: Nelems                                           ! counts number of elements in homog, micro array
+ type(group_int), dimension (:,:), allocatable :: elemsOfHomogMicro                                ! lists element number in homog, micro array
 
  myDebug = debug_level(debug_material)
 
diff --git a/src/prec.f90 b/src/prec.f90
index 2cdc533b6..f5b41b873 100644
--- a/src/prec.f90
+++ b/src/prec.f90
@@ -28,13 +28,13 @@ module prec
 
  integer(pInt), allocatable, dimension(:) :: realloc_lhs_test
  
- type, public :: p_vec                                                                              !< variable length datatype used for storage of state
+ type, public :: group_scalar                                                                       !< variable length datatype used for storage of state
    real(pReal), dimension(:), pointer :: p
- end type p_vec
+ end type group_scalar
 
- type, public :: p_intvec
+ type, public :: group_int
    integer(pInt), dimension(:), pointer :: p
- end type p_intvec
+ end type group_int
 
 !http://stackoverflow.com/questions/3948210/can-i-have-a-pointer-to-an-item-in-an-allocatable-array
  type, public :: tState
diff --git a/src/vacancyflux_cahnhilliard.f90 b/src/vacancyflux_cahnhilliard.f90
index cde2cb233..96fd50d64 100644
--- a/src/vacancyflux_cahnhilliard.f90
+++ b/src/vacancyflux_cahnhilliard.f90
@@ -7,7 +7,7 @@ module vacancyflux_cahnhilliard
  use prec, only: &
    pReal, &
    pInt, &
-   p_vec
+   group_scalar
 
  implicit none
  private
@@ -26,7 +26,7 @@ module vacancyflux_cahnhilliard
  real(pReal),                         dimension(:),           allocatable,        private :: &
    vacancyflux_cahnhilliard_flucAmplitude
 
- type(p_vec),                         dimension(:),           allocatable,        private :: &
+ type(group_scalar),                  dimension(:),           allocatable,        private :: &
    vacancyflux_cahnhilliard_thermalFluc
 
  real(pReal),                                                 parameter,           private :: &