sig
  val xusr : Line.t -> bool
  val set_xusr : bool -> Line.t -> Line.t
  val wusr : Line.t -> bool
  val set_wusr : bool -> Line.t -> Line.t
  val rusr : Line.t -> bool
  val set_rusr : bool -> Line.t -> Line.t
  val xgrp : Line.t -> bool
  val set_xgrp : bool -> Line.t -> Line.t
  val wgrp : Line.t -> bool
  val set_wgrp : bool -> Line.t -> Line.t
  val rgrp : Line.t -> bool
  val set_rgrp : bool -> Line.t -> Line.t
  val xoth : Line.t -> bool
  val set_xoth : bool -> Line.t -> Line.t
  val woth : Line.t -> bool
  val set_woth : bool -> Line.t -> Line.t
  val roth : Line.t -> bool
  val set_roth : bool -> Line.t -> Line.t
  val suid : Line.t -> bool
  val set_suid : bool -> Line.t -> Line.t
  val sgid : Line.t -> bool
  val set_sgid : bool -> Line.t -> Line.t
  val sticky : Line.t -> bool
  val set_sticky : bool -> Line.t -> Line.t
  val bits : Line.t -> int
  val set_bits : int -> Line.t -> Line.t
  val create :
    xusr:bool ->
    wusr:bool ->
    rusr:bool ->
    xgrp:bool ->
    wgrp:bool ->
    rgrp:bool ->
    xoth:bool ->
    woth:bool ->
    roth:bool ->
    suid:bool -> sgid:bool -> sticky:bool -> bits:int -> Line.t -> Line.t
end