dealer north

((hcp(north)>=20)

&& (hcp(north)<=21)

&&shape(north, any 4333 + any 54xx + 3262 + 2263 + 2362 + 2236 + 3226 + 2326 - any 0xxx - any 1xxx)

&&hcp(south)>=6

&&hcp(south)<=13

&&shape(south, any 44xx + any 54xx + xx5x + xxx5))

or

((hcp(north)>=22)

&& (hcp(north)<=23)

&&shape(north, any 4333 + any 54xx + 3262 + 2263 + 2362 + 2236 + 3226 + 2326 - any 0xxx any 1xxx)

&&hcp(south)>=4

&&shape(south, any 44xx + any 54xx + xx5x + xxx5))

or

((hcp(north)>=24)

&&shape(north, any 4333 + any 54xx + 3262 + 2263 + 2362 + 2236 + 3226 + 2326 - any 0xxx - any 1xxx)

&&shape(south, any 44xx + any 54xx + xx5x + xxx5))

