Zhiming Chen and Xinye Yue,
Numerical homogenization of well singularities in the flow
transport through heterogeneous porous media,
Multiscale Modeling and Simulation: A SIAM Interdisciplinary Journal
1 (2003), 260-303.
The code for periodic media:
periodic.zip.
The code for random media:
random.zip.
Numerical examples:
examples.pdf.