Should CANT-SEE-MUCH have a case for UNDER-WATER?

[eriktorbjorn]

>LOOK
Underwater

Suspended particles of muck swirl in the beam of the lantern. It's impossible to
see more than a few feet.

>EXAMINE SURFACE
Little can be seen from where you're standing.

You can't hold your breath much longer.

I would think that I was swimming, not standing. I think the message is printed by this routine:

<ROUTINE CANT-SEE-MUCH ()
         <TELL "Little can be seen from where you're ">
         <COND (<HERE? IN-ORBIT ON-SAT ON-BIRD>
                <TELL "float">)
               (<HERE? IN-SKY>
                <TELL "fall">)
               (T
                <TELL "stand">)>
         <TELL "ing." CR>
         <RTRUE>>

So it would be trivial to add a case for UNDER-WATER, if we really want to.