#set the interstitial model information

#time dependent injection from the surface
array set $Base {time.inj {Boolean 0}}
    #this should be a formula that depends on time in some way, and is the
    #injection rate # / cm2-s
    array set $Base {injection {Double 0.0}}

#scaling velocity to use - used by both growth and surface recombination
array set $Base {Scale {Double {[Arrhenius 4.7e-2 2.0]}}}

#the very short time, no diffusion, surface concentration
array set $Base {Inj {Double {[Arrhenius 5.56e-3 -0.784]}}}

#surface recombination velocity
array set $Base {recomb {Boolean 1}}
    array set $Base {KinkSite {Double {[Arrhenius 0.186 -3.19]}}}
    array set $Base {Ksurf {Double 0.0}}
    array set $Base {Ksurf2 {Double {
	[pdbGetDouble Si I D0] * [pdbGetDouble Si_Ox I KinkSite] * 
	[pdbGetDouble Si I Capture] * [Arrhenius 8.0e-23 -1.5]
    }}}
    array set $Base {Krat {Double 0.0}}
    array set $Base {Kpow {Double 0.0}}

#growth rate dependent injection
array set $Base {growth.inj {Boolean 1}}
    array set $Base {vmole {Double 5e22}}
    array set $Base {Gpow {Double 0.0}}
    #this is dependent on the surface recombination rate - try 
    array set $Base {theta {Double 0.0}}

#support for Dunham model
array set $Base {segregation {Boolean 0}}
    array set $Base {Seg {Double 1.0}}
    array set $Base {Trn {Double 0.0}}

return { time.inj injection Scale Inj KinkSite Ksurf Ksurf2 Krat Kpow vmole Gpow  theta segregation Seg Trn }
