home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / CLISP-2.LHA / CLISP960530-fa.lha / timezone.fas < prev    next >
Encoding:
CLISP byte-compiled Lisp program  |  1996-06-17  |  5.2 KB  |  99 lines
  1. (SYSTEM::VERSION '(SYSTEM::CLISP2 13. LISP:T 130695.))
  2. #Y(#:TOP-LEVEL-FORM-1 #13Y(00 00 00 00 00 01 D8 37 02 30 E3 19 01) "SYSTEM")
  3. #Y(#:TOP-LEVEL-FORM-2 #12Y(00 00 00 00 00 01 D8 30 5D C4 19 01)
  4.    (SPECIAL *DEFAULT-TIME-ZONE*) *DEFAULT-TIME-ZONE*
  5.   )
  6. #Y(#:TOP-LEVEL-FORM-3 #12Y(00 00 00 00 00 01 D8 30 5D C4 19 01)
  7.    (SPECIAL *DEFAULT-DST-CHECK*) *DEFAULT-DST-CHECK*
  8.   )
  9. #Y(#:TOP-LEVEL-FORM-4
  10.    #166Y(00 00 00 00 00 01 00 2A 02 AA 2B 00 01 0B 00 00 AA 2B 01 01 0B 00 01
  11.          9B 2A 12 AA 2B 02 01 0B 00 00 AA 2B 03 01 0B 00 01 AA 2B 04 01 0B 00
  12.          02 AA 2B 05 01 0B 00 03 AA 2B 06 01 0B 00 04 AA 2B 07 01 0B 00 05 AA
  13.          2B 08 01 0B 00 06 AA 2B 09 01 0B 00 07 AA 2B 0A 01 0B 00 08 AA 2B 0B
  14.          01 0B 00 09 AA 2B 0C 01 0B 00 0A AA 2B 0D 01 0B 00 0B AA 2B 0E 01 0B
  15.          00 0C AA 2B 0F 01 0B 00 0D AA 2B 10 01 0B 00 0E AA 2B 11 01 0B 00 0F
  16.          AA 2B 12 01 0B 00 10 AA 2B 13 01 0B 00 11 06 00 0F 33 41 02 15 0F 14
  17.          15 0F 15 19 03
  18.         )
  19.    #Y(US-MICHIGAN-DST-P
  20.       #23Y(00 03 00 00 00 04 D9 AE DA 8F 02 31 07 AD AD AD C6 33 19 04 00 19 04
  21.           )
  22.       NIL 1968. 1972.
  23.       #1=#Y(US-DST-P
  24.             #66Y(00 03 00 00 00 04 AC D8 90 01 32 11 84 03 AC AE 6E 01 96 05 6E
  25.                  01 72 01 36 81 01 36 02 DA AE DB 32 02 31 1E 1B DC AD 72 02 37
  26.                  AC 72 02 35 DD DE B0 32 02 35 5E 14 93 00 AC 94 02 32 02 31 19
  27.                  06 19 04
  28.                 )
  29.             306. UTAG 1967. 2020. 24.
  30.             #((1442. . 5808.) (1394. . 5760.) (1370. . 5736.) (1346. . 5712.)
  31.               (1322. . 5856.) (1442. . 5808.) (1418. . 5784.) (-1294. . 5760.)
  32.               (-142. . 5736.) (1322. . 5856.) (1298. . 5832.) (1442. . 5808.)
  33.               (1418. . 5784.) (1370. . 5736.) (1346. . 5712.) (1322. . 5856.)
  34.               (1298. . 5832.) (1418. . 5784.) (1394. . 5760.) (1370. . 5736.)
  35.               (842. . 5712.) (794. . 5832.) (770. . 5808.) (746. . 5784.)
  36.               (890. . 5760.) (842. . 5712.) (818. . 5856.) (794. . 5832.)
  37.               (770. . 5808.) (890. . 5760.) (866. . 5736.) (842. . 5712.)
  38.               (818. . 5856.) (770. . 5808.) (746. . 5784.) (890. . 5760.)
  39.               (866. . 5736.) (818. . 5856.) (794. . 5832.) (770. . 5808.)
  40.               (746. . 5784.) (866. . 5736.) (842. . 5712.) (818. . 5856.)
  41.               (794. . 5832.) (746. . 5784.) (890. . 5760.) (866. . 5736.)
  42.               (842. . 5712.) (794. . 5832.) (770. . 5808.) (746. . 5784.)
  43.               (890. . 5760.) (842. . 5712.)
  44.              )
  45.             -1967.
  46.      )     )
  47.    #Y(US-PACIFIC-NEW-DST-P
  48.       #67Y(00 03 00 00 00 04 D9 AE DA 32 02 31 1E 33 AD DB 90 01 32 07 AD DC 71
  49.            B8 8D 92 07 AD AD AD CB 33 19 04 DD AD 72 02 37 AC 72 02 35 DE DF B0
  50.            72 02 35 DC 32 01 38 5E 14 93 00 AC 94 02 32 02 31 19 06 19 04
  51.           )
  52.       NIL 1967. 2020. 1992. 4. 24.
  53.       #((842. . 6048.) (890. . 6096.) (770. . 6144.) (818. . 6024.)
  54.         (866. . 6072.) (746. . 6120.) (794. . 6168.) (842. . 6048.)
  55.        )
  56.       -1992. #1#
  57.      )
  58.    #Y(GMT #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL 0.
  59.       #2=#Y(NO-DST-P #9Y(00 03 00 00 00 04 00 19 04))
  60.      )
  61.    #Y(GMT+0 #12Y(00 00 00 00 00 01 07 00 01 33 19 01) NIL)
  62.    #Y(GMT+1 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -1. #2#)
  63.    #Y(GMT+2 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -2. #2#)
  64.    #Y(GMT+3 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -3. #2#)
  65.    #Y(GMT+4 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -4. #2#)
  66.    #Y(GMT+5 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -5. #2#)
  67.    #Y(GMT+6 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -6. #2#)
  68.    #Y(GMT+7 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -7. #2#)
  69.    #Y(GMT+8 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -8. #2#)
  70.    #Y(GMT+9 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -9. #2#)
  71.    #Y(GMT+10 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -10. #2#)
  72.    #Y(GMT+11 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -11. #2#)
  73.    #Y(GMT+12 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -12. #2#)
  74.    #Y(GMT+13 #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -13. #2#)
  75.    #Y(MET #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL -1.
  76.       #Y(MID-EUROPE-DST-P
  77.          #43Y(00 03 00 00 00 04 D8 AE D9 32 02 31 1E 1B DA AD 72 02 37 AC 72 02
  78.               35 DB DC B0 32 02 35 5E 14 93 00 AC 94 02 32 02 31 19 06 19 04
  79.              )
  80.          1980. 2020. 24.
  81.          #((698. . 5065.) (674. . 5041.) (650. . 5017.) (626. . 4993.)
  82.            (578. . 5113.) (722. . 5089.) (698. . 5065.) (674. . 5041.)
  83.            (626. . 4993.) (602. . 4969.) (578. . 5113.) (722. . 5089.)
  84.            (674. . 5041.) (650. . 5017.) (626. . 4993.) (602. . 4969.)
  85.            (722. . 5761.) (698. . 5737.) (674. . 5713.) (650. . 5857.)
  86.            (602. . 5809.) (578. . 5785.) (722. . 5761.) (698. . 5737.)
  87.            (650. . 5857.) (626. . 5833.) (602. . 5809.) (578. . 5785.)
  88.            (698. . 5737.) (674. . 5713.) (650. . 5857.) (626. . 5833.)
  89.            (578. . 5785.) (722. . 5761.) (698. . 5737.) (674. . 5713.)
  90.            (626. . 5833.) (602. . 5809.) (578. . 5785.) (722. . 5761.)
  91.            (674. . 5713.)
  92.           )
  93.          -1980.
  94.      )  )
  95.    #Y(US-EASTERN #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL 5. #1#)
  96.    #Y(US-MOUNTAIN #12Y(00 00 00 00 00 01 D9 DA 3F 02 19 01) NIL 7. #1#)
  97.    *DEFAULT-DST-CHECK* *DEFAULT-TIME-ZONE*
  98.   )
  99.