let nte_table_of_ts_blk_txt (doc_settings : t_doc_settings) (cref_table : t_cref_table) (path : t_path) (nte_table : t_nte_table) (blk_txt : ts_blk_txt) : t_nte_table = match blk_txt with |Cs_blk_txt txt_units -> nte_table_of_ts_txt_units doc_settings cref_table path nte_table txt_units