Remove null columns in Power Query M Language with iteration

gistfile1.txt

 get_curr_cols = Table.ColumnNames (set_section_headers),
  
get_null_cols = List.Generate(
                                () =>   [counter = 0, x = get_curr_cols, result="False"] ,   
                                    each [counter] < List.Count([x]),                     
                                    each [counter=[counter]+1 ,
                                    x= get_curr_cols,
                                    result= if List.NonNullCount(Table.Column(set_section_headers, [x]{counter})) <= 0 then "True" else "False"
                                ], 
                                each [result] ),
null_pos = List.PositionOf(get_null_cols, "True", Occurrence.All),

null_col_names = List.Transform (null_pos, each get_curr_cols{_}),

clean_table = Table.RemoveColumns (set_section_headers, null_col_names),