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

polishing

This commit is contained in:
Martin Diehl 2022-10-25 23:18:22 +02:00
parent ff3e08531e
commit 28ea09050d
2 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
examples/config/phase/mechanical/plastic/dislotwin_TWIP-TRIP.yaml
View File

@ -33,7 +33,7 @@ h_sl-sl: [0.122, 0.122, 0.625, 0.07, 0.137, 0.137, 0.122]
# Twin # Twin
N_tw: [12] N_tw: [12]
b_tw: [1.47e-10] # a/sqrt(6) b_tw: [1.47e-10] # a_cF/sqrt(6)
L_tw: 1.91e-7 # 1300 *b_tw L_tw: 1.91e-7 # 1300 *b_tw
i_tw: 10.0 i_tw: 10.0
t_tw: [5.0e-8] t_tw: [5.0e-8]
@ -44,7 +44,7 @@ h_sl-tw: [1.0, 1.0, 1.0]
# Transformation # Transformation
N_tr: [12] N_tr: [12]
b_tr: [1.47e-10] # a/sqrt(6) b_tr: [1.47e-10] # a_cF/sqrt(6)
L_tr: 2.21e-7 # 1500 *b_tr L_tr: 2.21e-7 # 1500 *b_tr
i_tr: 10.0 # adjusted i_tr: 10.0 # adjusted
t_tr: [1.0e-7] t_tr: [1.0e-7]

4
src/phase_mechanical_plastic_dislotwin.f90
View File

@ -371,6 +371,10 @@ module function plastic_dislotwin_init() result(myPlasticity)
if (prm%fccTwinTransNucleation .and. size(prm%N_tr) /= 1) extmsg = trim(extmsg)//' N_tr: nucleation' if (prm%fccTwinTransNucleation .and. size(prm%N_tr) /= 1) extmsg = trim(extmsg)//' N_tr: nucleation'
end if slipAndTransActive end if slipAndTransActive
twinAndTransActive: if (prm%sum_N_tw * prm%sum_N_tr > 0) then
if (dNeq(prm%b_tw(1),prm%b_tr(1))) extmsg = trim(extmsg)//' b_tw != b_tr'
end if twinAndTransActive
!-------------------------------------------------------------------------------------------------- !--------------------------------------------------------------------------------------------------
! allocate state arrays ! allocate state arrays
Nmembers = count(material_phaseID == ph) Nmembers = count(material_phaseID == ph)