rlim_cur function