A novel OpenSees element for single curved surface sliding isolators