
  TYPE
    clt$lock_state = (clc$lock_clear, clc$lock_set, clc$lock_expired);

