; do spectrum synthesis for two different densities, assuming SP_WGRID
; contains wavelength grid bin boundaries.

io_ww=sp_wgrid

delvar,linespec_linstr		; makes linespec re-read emissivity DB
!EDENS=1.e10
@linespec.par
linespec_ne10=varsmooth(linespec_spec,5.,type='beta=1.8')

delvar,linespec_linstr
!EDENS=1.e13
@linespec.par
linespec_ne13=varsmooth(linespec_spec,5.,type='beta=1.8')
