using better measure (norm) of phase contrast for preconditioning

2012-05-07 08:12:13 +00:00 · 2012-05-07 08:12:13 +00:00 · bdc46a8828
parent c2954a2b33
commit bdc46a8828
1 changed files with 1 additions and 1 deletions
--- a/code/DAMASK_spectral.f90
+++ b/code/DAMASK_spectral.f90
@ -760,7 +760,7 @@ C_ref = C * wgt
                              temperature(i,j,k),timeinc,ielem,1_pInt,sigma,dsde, &
                              P_real(i,j,k,1:3,1:3),dPdF)
           CPFEM_mode = 2_pInt
-           phase_cont(i,j,k) = maxval(dPdF)/maxval(C_ref)
+           phase_cont(i,j,k) = sqrt(sum(dPdF*dPdF)/sum(C_ref*C_ref))
           C = C + dPdF
         enddo; enddo; enddo
         call debug_info()