adjust_pmat function

adjust_p