#set the absolute error bound for the solution variables

array set $Base {Abs.Error {Double 1.0e2}}

#set the loop energy parameters
array set $Base {mu {Double 7.55e11}};  #shear modulus dyne/cm^2
array set $Base {b {Double 3.84e-8}};   #mag. of Burgers vec. cm
array set $Base {ohm {Double 2.0e-23}}; #atomic volume of Si 2.0e-23
array set $Base {kerg {Double 1.38062e-16}};#erg/K
array set $Base {nu {Double 0.27}} ;    #Poisson's ratio 
array set $Base {NumericalIntegralSpacing {Double 7.0}} ;#must be integer

#Defects interact w/ Loops
array set $Base {DefectsGrow {String Int}}
array set $Base {DefectsShrink {String Vac}}

#Coupled Loop Equations
array set $Base {CpEqnRp {String Rp}}
array set $Base {CpEqnSoR {String SoR}}
array set $Base {CpEqnDall {String Dall}}
array set $Base {311 {String C311}}
#311 unfault ratio
array set $Base {K311 {Double 1.0e-3}}

#Nucleation on / off ?
array set $Base {NoNucleation {Boolean 1}}

#Stress parameters
array set $Base {IsStrain {Boolean 1}}
array set $Base {LatticeContr {Double -0.015}}

#equation procedure
array set $Base {EquationProc {String LoopBulkNall}}

array set $Base {InitProc {String DefectInit}}

return


