let pair_first p ~(var_count : int) =     function_call "pair-first" [       "pair", p ~var_count;     ]