# coding: utf-8
from heapq import heappop, heappush,heapify

N,X,Y,Z=map(int,input().split())
A=list(map(int,input().split()))

H=[]

for i in range(N):
    heappush(H,-A[i])

flg=True

while H[0]<=0:
    M=heappop(H)
    if Z>0:
        num=max(1,min(Z,(-M)//10000))
        M+=10000*num
        Z-=num
        heappush(H,M)
    elif Y>0:
        num=max(1,min(Y,(-M)//5000))
        M+=5000*num
        Y-=num
        heappush(H,M)
    elif X>0:
        num=max(1,min(X,(-M)//1000))
        M+=1000*num
        X-=num
        heappush(H,M)
    elif M<=0:
        flg=False
        break
if flg:
    print("Yes")
else:
    print("No")