package main

import . "fmt"
import . "slices"
import . "os"
import bf "bufio"

func main() {
	rd:=bf.NewReader(Stdin)
	var n,s,t,k int
	Fscan(rd,&n,&s,&t,&k)
	a:=make([]int,n)
	for i:=range a {
		Fscan(rd,&a[i])
	}
	m:=Min(a)
	s--
	t--
	if a[s]+a[t]<=k {
		Println(1)
	} else if a[s]+m<=k&& a[t]+m<=k  {
		Println(2)
	} else {
		Println(-1)
	}
}