JGonzalez/fpakc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Renaming the generic 'non-analogue' scheme for 'weighting' scheme.

Browse source
This commit is contained in:
Jorge Gonzalez 2020-12-13 17:04:52 +01:00
commit f151f3cd0e
5 changed files with 30 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/modules/moduleInput.f90
View file

@ -114,7 +114,7 @@ MODULE moduleInput
LOGICAL:: found
CHARACTER(:), ALLOCATABLE:: object
REAL(8):: time !simulation time in [t]
CHARACTER(:), ALLOCATABLE:: pusherType, EMType, NAType
CHARACTER(:), ALLOCATABLE:: pusherType, EMType, WSType
INTEGER:: nTau, nSolver
INTEGER:: i
CHARACTER(2):: iString
@ -168,8 +168,8 @@ MODULE moduleInput
END SELECT
!Gest the non-analogue scheme
CALL config%get(object // '.NAScheme', NAType, found)
CALL solver%initNA(NAType)
CALL config%get(object // '.WeightingScheme', WSType, found)
CALL solver%initWS(WSType)
!Makes tau non-dimensional
@ -278,7 +278,7 @@ MODULE moduleInput
nPartOld = 0
!Initialize the lock for the non-analogue (NA) list of particles
CALL OMP_INIT_LOCK(lockNAScheme)
CALL OMP_INIT_LOCK(lockWScheme)
END SUBROUTINE readSpecies