A direct method of calculating bottom orbital velocity under waves