Ancient is related to Record. 
you are likely to find Happiness in/at/on Celebration. Dancing can be used for Celebration. 
Ancient <--RelatedTo--> Record 
Happiness --AtLocation--> Celebration <--UsedFor-- Dancing 