home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / ADA / ADA_TUTR.ZIP / TOMORROW.DUM < prev    next >
Encoding:
Text File  |  1988-03-25  |  155 b   |  7 lines

  1. -- Dummy solution to Outside Assignment 3
  2. separate (NEXTDATE)
  3. function TOMORROW(TODAY : in DATE) return DATE is
  4. begin
  5.    return TODAY;
  6. end TOMORROW;
  7.