untested version done

untested version of codes finished
-included curr_status var. in all elements & subelements & xelements
-included curr status var. update algorithm, from ig point sdv(2)%i(1)
to basic elem curr_status, then to sub elem curr_status, then to xelem
curr_status, which is then used in the failure criterion partition.