
  TYPE
    clt$pdt_changes = array [1 .. * ] of clt$pdt_change;

*copyc clt$pdt_change
