north neighbout on fine grid corresponding to coarse grid point
ef[2*i-1+1, 2*j-1] = 0.5*(unc[i,j] + unc[i+1,j])