how to calculate which day of the week for a given date code example

Example: get day from date algo

dow(m,d,y){y-=m<3;return(y+y/4-y/100+y/400+"-bed=pen+mad."[m]+d)%7;}