;+ ; NAME: ; rt_depsln ; PURPOSE: (one line) ; return normalized derivative of epsln ; DESCRIPTION: ; ; CATEGORY: ; RT ; CALLING SEQUENCE: ; ep = rt_depsln(t,ntot,a10,p10,d,m) ; INPUTS: ; t - temperature (K). May be an array. ; ntot - total number density (cm^-3). May be an array. ; a10 - einstein A coefficient. s^-1 ; p10 - V-T transition probability. Unitless. ; d - collision diameter. cm ; m - reduced mass. g ; OPTIONAL INPUT PARAMETERS: ; none ; KEYWORD INPUT PARAMETERS: ; none ; KEYWORD OUTPUT PARAMETERS: ; none ; OUTPUTS: ; ; COMMON BLOCKS: ; SIDE EFFECTS: ; RESTRICTIONS: ; None ; PROCEDURE: ; ; ; MODIFICATION HISTORY: ; Written 2004 May 16, Leslie Young SwRI ; Modified from depsln.f, Roger Yelle ;- function rt_depsln, t,ntot,a10,p10,d,m nz = n_elements(t) return, replicate(0.5d, nz) end