add Menclose(R<Rbh) and VelBHs outut