Par%xxxx

The par is structure type defined in 2D-DDCC program Declear type(MODPAR) :: PAR

The PAR has following variables defined by type (MODPAR)

TYPE MODPAR

       real(DP), DIMENSION(:), POINTER :: impurity
       real(DP), DIMENSION(:), POINTER :: xnc
       real(DP), DIMENSION(:), POINTER :: xnv

       real(DP), DIMENSION(:), POINTER :: xnvlh
       real(DP), DIMENSION(:), POINTER :: kappa
       real(DP), DIMENSION(:), POINTER :: heatC
       real(DP), DIMENSION(:), POINTER :: ni
       real(DP), DIMENSION(:), POINTER :: nisquare
       real(DP), DIMENSION(:), POINTER :: Gn
       real(DP), DIMENSION(:), POINTER :: Gp
       !real(DP), DIMENSION(:), POINTER :: expEt
       !real(DP), DIMENSION(:), POINTER :: niexpEt1
       !real(DP), DIMENSION(:), POINTER :: niexpEt2
       real(DP), DIMENSION(:,:), POINTER :: xy
       real(DP), DIMENSION(:,:,:), POINTER :: trixy
       real(DP), DIMENSION(:), POINTER :: trispacing
       real(DP), DIMENSION(:), POINTER :: dope
       real(DP), DIMENSION(:), POINTER :: ea
       real(DP), DIMENSION(:), POINTER :: mun
       real(DP), DIMENSION(:), POINTER :: mup
       real(DP), DIMENSION(:), POINTER :: taun
       real(DP), DIMENSION(:), POINTER :: taup
       real(DP), DIMENSION(:), POINTER :: trapNt
       real(DP), DIMENSION(:), POINTER :: trapEt
       real(DP), DIMENSION(:), POINTER :: trapdegenercy
       real(DP), DIMENSION(:), POINTER :: traptaun
       real(DP), DIMENSION(:), POINTER :: traptaup
       real(DP), DIMENSION(:), POINTER :: recombine
       real(DP), DIMENSION(:), POINTER :: augerC
       real(DP), DIMENSION(:), POINTER :: generation

       real(DP), DIMENSION(:), POINTER :: eg
       real(DP), DIMENSION(:,:), POINTER :: evprofile
       real(DP), DIMENSION(:,:,:), POINTER :: evprofileT
       real(DP), DIMENSION(:,:), POINTER :: di
       real(DP), DIMENSION(:), POINTER :: Ecoff
       real(DP), DIMENSION(:,:), POINTER :: efmass
       real(DP), DIMENSION(:,:), POINTER :: pe
       real(DP), DIMENSION(:,:), POINTER :: efmass
       real(DP), DIMENSION(:,:), POINTER :: pe
       real(DP), DIMENSION(:,:), POINTER :: alloyflucterm
       real(DP), DIMENSION(:), POINTER :: nsum,psum,radsum,generationsum,nonradsum,augersum,ndasum,Exsum,Exquenchsum,Exradsum
       real(DP)  :: filestepsize
       real(DP)  :: filestepsize2
       real(DP)  :: t    ! temperature
       real(DP)  :: vg
       real(DP)  :: vgstart
       real(DP)  :: vgstop
       real(DP)  :: vgstep
       real(DP)  :: vd
       real(DP)  :: vdfinal
       real(DP)  :: vdstep
       real(DP)  :: vs
       real(dp)  :: vb=0.0d0
       real(dp)  :: vref=0.0d0
       real(DP)  :: vshift
       real(DP)  :: phib
       real(DP)  :: dvstart
       real(DP)  :: dvstop
       real(DP)  :: dvinitial
       real(DP)  :: jd
       real(DP)  :: js
       real(DP)  :: jg
       real(DP)  :: jb
       real(DP)  :: jvbase
       real(DP) :: jvref
       real(DP)  :: jpb
       real(DP)  :: jpd
       real(DP)  :: jps
       real(DP)  :: jpg
       real(DP)  :: jpvbase
       real(DP)  :: jpvref
       real(DP)  :: heatbndistance
       real(DP)  :: heatsource
       real(DP)  :: heat1
       real(DP)  :: heat2
       real(DP)  :: heat3
       real(DP)  :: rd
       real(DP)  :: rs
       real(DP)  :: Vdefshift
       real(DP)  :: Vsefshift
       real(DP)  :: Vgefshift

       real(DP), DIMENSION(:), POINTER  :: evfileTemperature

       real(DP)  :: tstepsize
       real(DP)  :: initialtemp
       real(DP)  :: constvbsource
       real(DP)  :: constvbdrain
       real(DP)  :: constvbbody
       real(DP)  :: constvbbase
       real(DP)  :: constvbvref
       real(DP)  :: constvbgate
       integer(I4B) , DIMENSION(:), POINTER :: triperiodnum
       integer(I4B) , DIMENSION(:), POINTER :: triregiontype
       integer(I4B) , DIMENSION(:), POINTER :: gmshlinesurfnum ,gmshlinetype ,gmshsurfnum ,gmshsurftype ,gmshlinerecordmshline
       integer(I4B) , DIMENSION(:), POINTER :: triregiontype
       integer(I4B) , DIMENSION(:), POINTER :: gmshlinesurfnum ,gmshlinetype ,gmshsurfnum ,gmshsurftype ,gmshlinerecordmshline
       integer(I4B) , DIMENSION(:), POINTER :: alloyflucindex
       integer(I4B)  :: tstepnum
       integer(I4B) :: n
       integer(I4B) :: evfilenum
       integer(I4B) :: evint
       integer(I4B) :: evint2
       integer(I4B) :: filetype  ! 1 for nonuniform, 2 for uniform
       integer(I4B) :: meshtype
       integer(I4B) :: savenum
       integer(I4B) :: ntrinum
       integer(I4B) :: gmshlineBoundaryNo , gmshsurfBoundaryNo
       character(100)  :: inputmeshfile
       character(100)  :: inputmeshset
       character(100)  :: outfile
       character(100)  :: initialfile
       character(100)  :: dvfile
       character(100),DIMENSION(:),POINTER  :: evfileT
       character(100)  :: evfile
       character(100)  :: fermitable
   END TYPE MODPAR