Function Rf_dimgets 

#[unsafe(no_mangle)]
pub extern "C" fn Rf_dimgets(x: Sexp, dim: Sexp) -> Sexp