Name

---

      UPCASE1

Purpose

---

      Capitalize first letter in string.

Category

---

Calling Sequence

---

      out = upcase1(in)

Inputs

---

      in = Input text string. in

Keyword Parameters

---

Outputs

---

      out = Output text string. out

Common Blocks

---

Notes

---

Modification History

---

      R. Sterner, 1995 Jun 26
      R. Sterner, 2010 May 23 --- Converted arrays from () to [].
  Copyright (C) 1995, 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.