removed possible (but not-working) output of schmid_factor_shearband from dislotwin

This commit is contained in:
Martin Diehl 2013-02-14 08:53:17 +00:00
parent 5b269bc635
commit 77c0b32af9
2 changed files with 3 additions and 9 deletions

View File

@ -402,7 +402,6 @@ plasticity dislotwin
#(output) threshold_stress_twin
#(output) shear_rate_shearband
#(output) resolved_stress_shearband
#(output) schmid_factor_shearband
#(output) sb_eigenvalues
#(output) sb_eigenvectors

View File

@ -539,8 +539,6 @@ do i = 1_pInt,maxNinstance
'shear_rate_shearband' &
)
mySize = 6_pInt
case('schmid_factor_shearband')
mySize = 6_pInt
case('sb_eigenvalues')
mySize = 3_pInt
case('sb_eigenvectors')
@ -1505,13 +1503,10 @@ do o = 1_pInt,phase_Noutput(material_phase(g,ip,el))
enddo; enddo
c = c + ns
case ('resolved_stress_shearband')
do j = 1_pInt,6_pInt ! loop over all shearband families
do j = 1_pInt,6_pInt ! loop over all shearband families
constitutive_dislotwin_postResults(c+j) = dot_product(Tstar_v, constitutive_dislotwin_sbSv(1:6,j,g,ip,el))
enddo
c = c + 6_pInt
case ('schmid_factor_shearband') !ToDo: j has no value!!!!!!
constitutive_dislotwin_postResults(c+1_pInt:c+6_pInt) = constitutive_dislotwin_sbSv(1:6,j,g,ip,el)
c = c + 6_pInt
enddo
c = c + 6_pInt
case ('shear_rate_shearband')
do j = 1_pInt,6_pInt ! loop over all shearband families
!* Resolved shear stress on shearband system