Making shared.R generic

delete these two lines, please.  it is fixed!