KL.obj function

Used in solnp() as the objective function to be minimized when Kullback--Leibler distance measure is chosen.