Hi Klaus,

(Friday December 11 1998 08:05) Klaus Meinhard to Marc Buffet about:
Daylight Saving ?

 KM>     set jan1next=%{at}date[01-01-%{at}eval[%_year + 1]]
 KM>     set march31=%{at}eval[%jan1next-276]
 KM>     set lsm=%{at}eval[%march31-%{at}dowi[%march31]+1]
 KM>     set oct31=%{at}eval[%jan1next-62]
 KM>     set lso=%{at}eval[%oct31-%{at}dowi[%oct31]+1]
 KM>     set TZUTX=%{at}if[%{at}date[%_date] ge %lsm .and. ...
 KM> ...%{at}date[%_date] le %lso,+0200,+0100]

At first I thought: "Why do you calculate %jan1next ??? You don't need
that date at all! Just calculate %March31 and add 214 to reach %Oct31
;-)))"

But I now realise that %jan1 gives one advantage: The local date-format
doesn't interfere, unless you're Japanese! And since the distance to %jan1
of THIS year isn't a constant (leap years), you took next year! Why didn't
you ever tell ME this? Doesn't my reputation mean ANYTHING to you? ;-))))

Prosperity and a long life,
    2:2449/236.51  PGPkey: 2048/1B2ACCED (by RRQ)
... If at first you don't succeed, have somebody else do it for you
--- 4Dos v6.01a ---