Where is the he Society for the Encouragement of the Useful Arts, by a Scottish physicist, mathematician, astronomer, inventor, writer, historian of science and university principal, located?