
  TYPE
    jmt$time_increment = record
      case specified: boolean of
      = TRUE =
        time_increment: pmt$time_increment,
      = FALSE =
        ,
      casend,
    recend;

*copyc pmt$time_increment
