subroutine cycleB1
use libraryCycleB
end subroutine