let mhc_alleles =     function     | `Names sl ->       input_value "mhc_alleles" [         "inline", (String.concat ", " sl)       ]     | `File p ->       fun ~var_count ->         function_call "mhc_alleles" [           "file", p ~var_count;         ]