let cpt_mk_var = ref 0