removing some unused code and cleaning up
This commit is contained in:
parent
6411d36633
commit
eecb78665c
|
@ -77,11 +77,6 @@ LIBRARIES +=-liomp5
|
|||
endif
|
||||
endif
|
||||
|
||||
#newstate
|
||||
ifeq "$(STATE)" "NEWH"
|
||||
INCLUDE_DIRS +=-DNEWSTATE
|
||||
endif
|
||||
|
||||
ifdef STANDARD_CHECK
|
||||
STANDARD_CHECK_ifort =$(STANDARD_CHECK)
|
||||
STANDARD_CHECK_gfortran =$(STANDARD_CHECK)
|
||||
|
|
|
@ -1254,7 +1254,7 @@ subroutine lattice_init
|
|||
lattice_VacancyDiffusion33(3,3,section) = IO_floatValue(line,positions,2_pInt)
|
||||
case ('vacancy_mobility')
|
||||
lattice_VacancyMobility(section) = IO_floatValue(line,positions,2_pInt)
|
||||
case ('equilibrium_vacancy_concentration')
|
||||
case ('vacancy_eqcv')
|
||||
lattice_equilibriumVacancyConcentration(section) = IO_floatValue(line,positions,2_pInt)
|
||||
end select
|
||||
endif
|
||||
|
|
|
@ -339,7 +339,10 @@ subroutine vacancy_generation_microstructure(Tstar_v, temperature, damage, subdt
|
|||
|
||||
vacancyState(phase)%state(1,constituent) = &
|
||||
vacancyState(phase)%subState0(1,constituent) + &
|
||||
subdt*vacancy_generation_freq(instance)*exp(-energyBarrier/(kB*Temperature))
|
||||
subdt* &
|
||||
damage*damage* &
|
||||
vacancy_generation_freq(instance)* &
|
||||
exp(-stressBarrier/(vacancy_generation_kBCoeff(instance)*temperature))
|
||||
|
||||
end subroutine vacancy_generation_microstructure
|
||||
|
||||
|
|
Loading…
Reference in New Issue