Help me to explain the F# Matrix transpose function

Question

There is a Matrix transpose function:

let rec transpose = function
    | (_::_)::_ as M -> List.map List.head M :: transpose (List.map Li         


        

Answer 1

This maps head over the lists to extract the first column and uses that to form the first row prepended to the result of transposing the remaining columns.