mo_gas_optics_util_string Module

Routines for handling strings:

  • convert to lower case
  • does a string exist within an array of strings?
  • what is the location of a string with an array?

Contents


Functions

public pure function lower_case(input_string) result(output_string)

Convert stringo to lower case

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: input_string

Return Value character(len=len)

public pure function string_in_array(string, array)

Is string somewhere in array?

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: string
character(len=*), intent(in), dimension(:):: array

Return Value logical

public pure function string_loc_in_array(string, array)

what is the location of a string in an array

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: string
character(len=*), intent(in), dimension(:):: array

Return Value integer