Function Upper

comp/read_ansys.cpp:32–36

  }

  static string Upper (string s)
  {
    for (auto & c : s) c = toupper((unsigned char)c);
    return s;
  }

  // collapse internal whitespace to single blanks (for keyword matching)
  static string CollapseWS (const string & s)