Name

---

      WHICHWRD

Purpose

---

      Find which word is a given string is in.

Category

---

Calling Sequence

---

      n = whichwrd( txt, sub)

Inputs

---

      txt = text string to examinei (scalar). in
      sub = substring to search for (scalar). in

Keyword Parameters

---

Keywords

---

        DELIMITER=del Word delimiter character (def=white space).
        OCCUR=occ Which occurance of sub to use (def=first).

Outputs

---

      n = Word number where found (-1=not there). out

Common Blocks

---

Notes

---

Modification History

---

      R. Sterner, 2001 Sep 25
  Copyright (C) 2001, Johns Hopkins University/Applied Physics Laboratory
  This software may be used, copied, or redistributed as long as it is not
  sold and this copyright notice is reproduced on each copy made. This
  routine is provided as is without any express or implied warranties
  whatsoever. Other limitations apply as described in the file disclaimer.txt.