[ncl-talk] Is there a where statement for this?

[Barry Lynn]

Hello:

I am wondering if there is someway to speed up a loop like this.

         do i_pod = 1,n_pod-1

         do i_sr  = 1,n_sr-1

          if (dcsi(i_pod,i_sr).eq.700)then

           pod_7(i_val) = tofloat(i_pod)*.001

           sr_7(i_val) = tofloat(i_sr)*.001

           i_val = i_val + 1

          end if

         end do

         end do

-- 
Barry H. Lynn, Ph.D
Senior Associate Scientist, Lecturer,
The Institute of the Earth Science,
The Hebrew University of Jerusalem,
Givat Ram, Jerusalem 91904, Israel
Tel: 972 547 231 170
Fax: (972)-25662581

C.E.O, Weather It Is, LTD
Weather and Climate Focus
http://weather-it-is.com
Jerusalem, Israel
Local: 02 930 9525
Cell: 054 7 231 170
Int-IS: x972 2 930 9525
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mailman.ucar.edu/pipermail/ncl-talk/attachments/20190906/00ca9410/attachment.html>