HP3000-L Archives

February 2005, Week 4

HP3000-L@RAVEN.UTC.EDU
Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
Re: half an hour algorithm
From:
Lars Appel <[log in to unmask]>
Reply To:
Lars Appel <[log in to unmask]>
Date:
Wed, 23 Feb 2005 11:09:40 +0100
Content-Type:
text/plain
Parts/Attachments:
text/plain (20 lines) 
Paul Christidis wrote:

 > :setvar a SETVAR(b, 30+hpminute+(60*hphour))+SETVAR(newh,(b/60)mod 24)+SETVAR(newm,(b mod 60))

 > While variable 'a' is superfluous, the reduction of the number of
 > statements makes the single statement execute about 20% faster.


Funny enough, this seems to even work without the A variable...

  :# ![ SETVAR(b, 30+hpminute+(60*hphour))+SETVAR(newh,(b/60)mod 24)+SETVAR(newm,(b mod 60)) ]

Using the ![...] expression inside the # comment is even faster :-o


Lars.

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2