added function currentdd to jfreels.R