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

check for LFC only if there is any slip activity at all; also increased safety factor from 1.2 to 1.5

This commit is contained in:
Christoph Kords 2011-11-09 09:55:39 +00:00
parent 7033e84fc7
commit 6dc8a4d530
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
code/constitutive_nonlocal.f90
View File

@ -1702,7 +1702,7 @@ forall (s = 1:ns, t = 1:4, rhoSgl(s,t+4) * v(s,t) < 0.0_pReal) &
!****************************************************************************
!*** check CFL condition for flux
if (any(1.2_pReal * abs(v) * timestep > mesh_ipVolume(ip,el) / maxval(mesh_ipArea(:,ip,el)))) then ! safety factor 1.2 (we use the reference volume and are for simplicity here)
if (any(abs(gdot) > 0.0_pReal .and. 1.5_pReal * v * timestep > mesh_ipVolume(ip,el) / maxval(mesh_ipArea(:,ip,el)))) then ! safety factor 1.5 (we use the reference volume and are for simplicity here)
#ifndef _OPENMP
if (debug_verbosity > 6) then
write(6,*) '<< CONST >> CFL condition not fullfilled'