A discrete vector potential model for unsteady incompressible viscous flows