Final adjustments, format of verbose corrected and minor modifications
to the input case cylFlow.
This commit is contained in:
parent
fd42e0f3f9
commit
bf6caad56a
11 changed files with 189 additions and 117 deletions
|
|
@ -19,6 +19,7 @@ MODULE moduleInput
|
|||
CALL config%initialize()
|
||||
|
||||
!Loads the config file
|
||||
CALL verboseError('Loading input file...')
|
||||
CALL config%load(filename = inputFile)
|
||||
|
||||
!Reads reference parameters
|
||||
|
|
@ -40,12 +41,15 @@ MODULE moduleInput
|
|||
CALL readBoundary(config)
|
||||
|
||||
!Read Geometry
|
||||
CALL verboseError('Reading Geometry...')
|
||||
CALL readGeometry(config)
|
||||
|
||||
!Read injection of particles
|
||||
CALL verboseError('Reading Interactions between species...')
|
||||
CALL readInject(config)
|
||||
|
||||
!Read parallel parameters
|
||||
CALL verboseError('Reading Parallel configuration...')
|
||||
CALL readParallel(config)
|
||||
|
||||
END SUBROUTINE readConfig
|
||||
|
|
@ -196,7 +200,7 @@ MODULE moduleInput
|
|||
|
||||
!Set number of particles to 0 for init state
|
||||
!TODO: In a future, this should include the particles from init states
|
||||
n_part_old = 0
|
||||
nPartOld = 0
|
||||
|
||||
END SUBROUTINE readSpecies
|
||||
|
||||
|
|
@ -363,7 +367,7 @@ MODULE moduleInput
|
|||
|
||||
!Allocate array for injected particles
|
||||
IF (nPartInj > 0) THEN
|
||||
ALLOCATE(part_inj(1:nPartInj))
|
||||
ALLOCATE(partInj(1:nPartInj))
|
||||
|
||||
END IF
|
||||
|
||||
|
|
@ -390,6 +394,8 @@ MODULE moduleInput
|
|||
|
||||
END IF
|
||||
|
||||
CALL initParallel()
|
||||
|
||||
END SUBROUTINE readParallel
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue