223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

impoved naming

This commit is contained in:
Martin Diehl 2022-12-08 16:57:26 +01:00
parent 7b986f6f77
commit cca5d6d495
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PRIVATE

@ -1 +1 @@
Subproject commit 599d5accf4f5249257972cef997e8078e857c5a1 Subproject commit e9254133c1e9ea3855a4fd17078d4c6f7d8728b1

4
examples/config/phase/thermal/source/externalheat_ramp-and-hold.yaml
View File

@ -1,4 +1,4 @@
type: externalheat type: externalheat
f_T: [1, 1, 0, 0] f: [1, 1, 0, 0]
t_n: [0, 500, 500.001, 1000] t: [0, 500, 500.001, 1000]

2
src/phase_thermal_externalheat.f90
View File

@ -60,7 +60,7 @@ module function externalheat_init(source_length) result(mySources)
associate(prm => param(ph)) associate(prm => param(ph))
src => sources%get_dict(so) src => sources%get_dict(so)
prm%f = table(src,'t_n','f_T') prm%f = table(src,'t','f')
Nmembers = count(material_phaseID == ph) Nmembers = count(material_phaseID == ph)
call phase_allocateState(thermalState(ph)%p(so),Nmembers,1,1,0) call phase_allocateState(thermalState(ph)%p(so),Nmembers,1,1,0)