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

copy and paste error

This commit is contained in:
Martin Diehl 2021-01-09 17:19:48 +01:00
parent 910cc60e78
commit 209d59534a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/constitutive_thermal_dissipation.f90
View File

@ -37,7 +37,7 @@ module function source_thermal_dissipation_init(source_length) result(mySources)
src src
integer :: Ninstances,sourceOffset,Nconstituents,p integer :: Ninstances,sourceOffset,Nconstituents,p
print'(/,a)', ' <<<+- thermal_externalheat init -+>>>' print'(/,a)', ' <<<+- thermal_dissipation init -+>>>'
mySources = thermal_active('dissipation',source_length) mySources = thermal_active('dissipation',source_length)