let check_business_date year week dow = bool_of_sv (call ~fn:"Date::Calc::check_business_date" [sv_of_int year; sv_of_int week; sv_of_int dow])