type proc_statm = {
  1. page_size : int;
  2. size : int64;
  3. resident : int64;
  4. shared : int64;
  5. text : int64;
  6. lib : int64;
  7. data : int64;
  8. dt : int64;
}
type ps_stats = {
  1. page_size : int;
  2. mem : float;
  3. resident : int64;
}
type mem_stats =
  1. | Statm of proc_statm
  2. | Ps of ps_stats