let f_sizeof = function
  | Float16 -> 16
  | Float32 -> 32
  | Float64 -> 64
  | Float96 -> 96
  | Float128 -> 128