added partial effect procedure