Function sort

fn sort<'ob>(
    seq: &Rt<Slot<Gc<ListType<'_>>>>,
    predicate: &Rt<Slot<Gc<FunctionType<'_>>>>,
    env: &mut Rt<Env<'_>>,
    cx: &'ob mut Context<'_>,
) -> Result<Gc<ObjectType<'ob>>>