6.91 How to nest Map inside Map?

see http://mathematica.stackexchange.com/questions/15480/how-do-i-designate-arguments-in-a-nested-map

From about url by Halirutan:

Map[Function[p2, Map[Function[p1, f[p1, p2]], list1]], list2]