input_unit_exist Function

private function input_unit_exist(nml, exist)

Is a namelist already open?

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: nml
logical, intent(out) :: exist

Return Value integer


Called by

proc~~input_unit_exist~~CalledByGraph proc~input_unit_exist input_unit_exist proc~get_indexed_namelist_unit get_indexed_namelist_unit proc~get_indexed_namelist_unit->proc~input_unit_exist proc~read_guess_input read_guess_input proc~read_guess_input->proc~get_indexed_namelist_unit proc~read_in_params read_in_params proc~read_in_params->proc~get_indexed_namelist_unit proc~read_scan_input read_scan_input proc~read_scan_input->proc~get_indexed_namelist_unit program~plume plume program~plume->proc~read_guess_input program~plume->proc~read_in_params program~plume->proc~read_scan_input