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

added nreg to limit number of Jacobi regularizations

This commit is contained in:
Philip Eisenlohr 2007-04-10 11:22:06 +00:00
parent 84eeddc6ba
commit 35266bd513
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
trunk/prec.f90
View File

@ -10,8 +10,10 @@
! *** Numerical parameters ***
! *** How frequently the jacobian is recalculated ***
integer (pInt), parameter :: ijaco = 5_pInt
! *** Maximum number of internal cutbacks in time step ***
integer(pInt), parameter :: ncut=7_pInt
! *** Maximum number of internal cutbacks in time step ***
integer(pInt), parameter :: ncut=7_pInt
! *** Maximum number of regularization attempts for Jacobi inversion ***
integer(pInt), parameter :: nreg=1_pInt
! *** Perturbation of strain array for numerical calculation of FEM Jacobi matrix ***
real(pReal), parameter :: pert_e=1.0e-5_pReal
! *** Maximum number of iterations in outer (statevariables) loop ***