avoid confusion with config module
This commit is contained in:
parent
78431783ba
commit
2bd216ab3a
|
@ -107,7 +107,7 @@ program DAMASK_grid
|
||||||
external :: &
|
external :: &
|
||||||
quit
|
quit
|
||||||
type(tDict), pointer :: &
|
type(tDict), pointer :: &
|
||||||
config_load, &
|
load, &
|
||||||
num_solver, &
|
num_solver, &
|
||||||
num_grid, &
|
num_grid, &
|
||||||
load_step, &
|
load_step, &
|
||||||
|
@ -157,8 +157,8 @@ program DAMASK_grid
|
||||||
end if
|
end if
|
||||||
|
|
||||||
call parallelization_bcast_str(fileContent)
|
call parallelization_bcast_str(fileContent)
|
||||||
config_load => YAML_parse_str_asDict(fileContent) !ToDo: misleading prefix (overlaps with entities from config module)
|
load => YAML_parse_str_asDict(fileContent)
|
||||||
solver => config_load%get_dict('solver')
|
solver => load%get_dict('solver')
|
||||||
|
|
||||||
!--------------------------------------------------------------------------------------------------
|
!--------------------------------------------------------------------------------------------------
|
||||||
! assign mechanics solver depending on selected type
|
! assign mechanics solver depending on selected type
|
||||||
|
@ -212,7 +212,7 @@ program DAMASK_grid
|
||||||
|
|
||||||
|
|
||||||
!--------------------------------------------------------------------------------------------------
|
!--------------------------------------------------------------------------------------------------
|
||||||
load_steps => config_load%get_list('loadstep')
|
load_steps => load%get_list('loadstep')
|
||||||
allocate(loadCases(load_steps%length)) ! array of load cases
|
allocate(loadCases(load_steps%length)) ! array of load cases
|
||||||
|
|
||||||
do l = 1, load_steps%length
|
do l = 1, load_steps%length
|
||||||
|
|
Loading…
Reference in New Issue