is there a "pick" for refinements?

[lismoreboy]

Hi. 

Can the following two lines be reduced to one?

; word speeds is a list of 24 integer speeds 1/hour
extracthour: func [t] [t/hour]
read/custom url reduce [ 'post join "S=" pick speeds (extracthour now/time + 1) ]

I can't figure out a native expression to "pick" the hour out of now/time.

Ideas? Thanks.

David

[Sunanda]

first now/time

or

pick now/time 1