let bed file =     fun ~var_count ->       function_call "bed" ["path", file ~var_count]