hm_select_option_by_name.F File Reference

#include "implicit_f.inc"

Go to the source code of this file.

Functions/Subroutines
subroutine	hm_select_option_by_name (entity_type, name_param, sub_index)

Function/Subroutine Documentation

hm_select_option_by_name()

subroutine hm_select_option_by_name	(	character*50, intent(in)	entity_type,
		character*50, intent(in)	name_param,
		integer, intent(in)	sub_index )

Definition at line 30 of file hm_select_option_by_name.F.

C-----------------------------------------------
C   ROUTINE DESCRIPTION :
C   ===================
C   SELECT OPTION BY NAME
C-----------------------------------------------
C   DUMMY ARGUMENTS DESCRIPTION:
C   =================== 
C
C     NAME               DESCRIPTION                         
C
C     ENTITY_TYPE        KEYWORD SELECT
C     NAME_PARAM         NAME OF THE OPTION TO SELECT
C     SUB_INDEX          SUBMODEL INDEX OF THE OPTION TO SELECT
C============================================================================
C   M o d u l e s
C-----------------------------------------------
      USE message_mod       
      USE submodel_mod
C-----------------------------------------------
C   I m p l i c i t   T y p e s
C-----------------------------------------------
#include      "implicit_f.inc"
C-----------------------------------------------
C   D u m m y   A r g u m e n t s
C-----------------------------------------------
C INPUT ARGUMENTS
      CHARACTER*50,INTENT(IN)::ENTITY_TYPE,NAME_PARAM
      INTEGER,INTENT(IN)::SUB_INDEX
C=======================================================================
      CALL cpp_select_option_by_name(entity_type(1:len_trim(entity_type)),len_trim(entity_type),
     .                                name_param(1:len_trim(name_param)),len_trim(name_param),sub_index ) 
      RETURN
C