io_file_unit Function

  1. io.F90
  2. w90_io
  3. io_file_unit

public function io_file_unit()

Returns an unused unit number so we can later open a file on that unit.

Arguments

None

Return Value integer


Called by

proc~~io_file_unit~~CalledByGraph proc~io_file_unit io_file_unit proc~tran_read_htc tran_read_htC proc~tran_read_htc->proc~io_file_unit proc~kmesh_write kmesh_write proc~kmesh_write->proc~io_file_unit program~postw90 postw90 program~postw90->proc~io_file_unit proc~param_read param_read program~postw90->proc~param_read proc~pw90common_wanint_setup pw90common_wanint_setup program~postw90->proc~pw90common_wanint_setup proc~kmesh_get kmesh_get program~postw90->proc~kmesh_get proc~hamiltonian_write_tb hamiltonian_write_tb proc~hamiltonian_write_tb->proc~io_file_unit proc~param_in_file param_in_file proc~param_in_file->proc~io_file_unit proc~conv_write_chkpt conv_write_chkpt proc~conv_write_chkpt->proc~io_file_unit proc~tran_read_htxy tran_read_htXY proc~tran_read_htxy->proc~io_file_unit proc~k_path k_path proc~k_path->proc~io_file_unit proc~get_shc_r get_SHC_R proc~k_path->proc~get_shc_r proc~get_cc_r get_CC_R proc~k_path->proc~get_cc_r proc~get_bb_r get_BB_R proc~k_path->proc~get_bb_r proc~get_aa_r get_AA_R proc~k_path->proc~get_aa_r proc~get_ss_r get_SS_R proc~k_path->proc~get_ss_r proc~get_hh_r get_HH_R proc~k_path->proc~get_hh_r proc~berry_get_imfgh_klist berry_get_imfgh_klist proc~k_path->proc~berry_get_imfgh_klist proc~berry_get_shc_klist berry_get_shc_klist proc~k_path->proc~berry_get_shc_klist proc~berry_get_imf_klist berry_get_imf_klist proc~k_path->proc~berry_get_imf_klist proc~param_read->proc~io_file_unit proc~param_read->proc~param_in_file proc~tran_bulk tran_bulk proc~tran_bulk->proc~io_file_unit proc~tran_read_htx tran_read_htX proc~tran_bulk->proc~tran_read_htx proc~tran_read_htx->proc~io_file_unit proc~write_coords_file write_coords_file proc~write_coords_file->proc~io_file_unit proc~plot_u_matrices plot_u_matrices proc~plot_u_matrices->proc~io_file_unit proc~get_shc_r->proc~io_file_unit proc~get_cc_r->proc~io_file_unit proc~wannier_setup wannier_setup proc~wannier_setup->proc~io_file_unit proc~wannier_setup->proc~kmesh_write proc~wannier_setup->proc~param_read proc~tran_lcr_2c2_build_ham tran_lcr_2c2_build_ham proc~tran_lcr_2c2_build_ham->proc~io_file_unit proc~get_ff_r get_FF_R proc~get_ff_r->proc~io_file_unit proc~wannier_run wannier_run proc~wannier_run->proc~io_file_unit proc~wannier_run->proc~param_read proc~dis_main dis_main proc~wannier_run->proc~dis_main proc~param_write_chkpt param_write_chkpt proc~wannier_run->proc~param_write_chkpt proc~wann_main wann_main proc~wannier_run->proc~wann_main proc~plot_main plot_main proc~wannier_run->proc~plot_main proc~wann_main_gamma wann_main_gamma proc~wannier_run->proc~wann_main_gamma proc~wannier_run->proc~kmesh_get proc~tran_main tran_main proc~wannier_run->proc~tran_main proc~ws_write_vec ws_write_vec proc~ws_write_vec->proc~io_file_unit proc~pw90common_wanint_get_kpoint_file pw90common_wanint_get_kpoint_file proc~pw90common_wanint_get_kpoint_file->proc~io_file_unit proc~dis_main->proc~io_file_unit proc~k_slice k_slice proc~k_slice->proc~io_file_unit proc~k_slice->proc~get_shc_r proc~k_slice->proc~get_cc_r proc~k_slice->proc~get_bb_r proc~k_slice->proc~get_aa_r proc~k_slice->proc~get_ss_r proc~write_data_file write_data_file proc~k_slice->proc~write_data_file proc~k_slice->proc~get_hh_r proc~wham_get_eig_deleig wham_get_eig_deleig proc~k_slice->proc~wham_get_eig_deleig proc~k_slice->proc~berry_get_imfgh_klist proc~k_slice->proc~berry_get_shc_klist proc~k_slice->proc~berry_get_imf_klist proc~overlap_read overlap_read proc~overlap_read->proc~io_file_unit proc~param_read_chkpt param_read_chkpt proc~param_read_chkpt->proc~io_file_unit proc~dos_main dos_main proc~dos_main->proc~io_file_unit proc~dos_main->proc~get_ss_r proc~dos_main->proc~get_hh_r proc~dos_main->proc~wham_get_eig_deleig proc~param_write_chkpt->proc~io_file_unit proc~conv_write_spn_fmt conv_write_spn_fmt proc~conv_write_spn_fmt->proc~io_file_unit proc~wann_write_r2mn wann_write_r2mn proc~wann_write_r2mn->proc~io_file_unit proc~plot_fermi_surface plot_fermi_surface proc~plot_fermi_surface->proc~io_file_unit proc~pw90common_wanint_setup->proc~io_file_unit proc~tran_write_xyz tran_write_xyz proc~tran_write_xyz->proc~io_file_unit proc~conv_write_spn conv_write_spn proc~conv_write_spn->proc~io_file_unit proc~tran_find_integral_signatures tran_find_integral_signatures proc~tran_find_integral_signatures->proc~io_file_unit proc~sitesym_read sitesym_read proc~sitesym_read->proc~io_file_unit proc~overlap_rotate overlap_rotate proc~overlap_rotate->proc~io_file_unit program~w90chk2chk w90chk2chk program~w90chk2chk->proc~io_file_unit program~w90chk2chk->proc~conv_write_chkpt proc~conv_read_chkpt_fmt conv_read_chkpt_fmt program~w90chk2chk->proc~conv_read_chkpt_fmt proc~conv_write_chkpt_fmt conv_write_chkpt_fmt program~w90chk2chk->proc~conv_write_chkpt_fmt proc~conv_read_chkpt conv_read_chkpt program~w90chk2chk->proc~conv_read_chkpt proc~wann_main->proc~io_file_unit proc~get_bb_r->proc~io_file_unit proc~conv_read_chkpt_fmt->proc~io_file_unit proc~get_aa_r->proc~io_file_unit proc~conv_write_chkpt_fmt->proc~io_file_unit proc~get_ss_r->proc~io_file_unit proc~conv_read_spn conv_read_spn proc~conv_read_spn->proc~io_file_unit program~w90spn2spn w90spn2spn program~w90spn2spn->proc~io_file_unit program~w90spn2spn->proc~conv_write_spn_fmt program~w90spn2spn->proc~conv_write_spn program~w90spn2spn->proc~conv_read_spn proc~conv_read_spn_fmt conv_read_spn_fmt program~w90spn2spn->proc~conv_read_spn_fmt proc~write_data_file->proc~io_file_unit proc~wann_write_xyz wann_write_xyz proc~wann_write_xyz->proc~io_file_unit proc~calctdfanddos calcTDFandDOS proc~calctdfanddos->proc~io_file_unit proc~calctdfanddos->proc~get_ss_r proc~calctdfanddos->proc~get_hh_r proc~calctdfanddos->proc~wham_get_eig_deleig proc~get_hh_r->proc~io_file_unit proc~boltzwann_main boltzwann_main proc~boltzwann_main->proc~io_file_unit proc~boltzwann_main->proc~calctdfanddos proc~berry_main berry_main proc~berry_main->proc~io_file_unit proc~berry_main->proc~get_shc_r proc~berry_main->proc~get_cc_r proc~berry_main->proc~get_bb_r proc~berry_main->proc~get_aa_r proc~berry_main->proc~get_ss_r proc~berry_main->proc~get_hh_r proc~berry_get_kubo_k berry_get_kubo_k proc~berry_main->proc~berry_get_kubo_k proc~berry_main->proc~berry_get_imfgh_klist proc~berry_get_sc_klist berry_get_sc_klist proc~berry_main->proc~berry_get_sc_klist proc~berry_main->proc~berry_get_shc_klist proc~berry_main->proc~berry_get_imf_klist proc~plot_interpolate_bands plot_interpolate_bands proc~plot_interpolate_bands->proc~io_file_unit proc~hamiltonian_write_rmn hamiltonian_write_rmn proc~hamiltonian_write_rmn->proc~io_file_unit proc~wann_write_vdw_data wann_write_vdw_data proc~wann_write_vdw_data->proc~io_file_unit proc~hamiltonian_write_hr hamiltonian_write_hr proc~hamiltonian_write_hr->proc~io_file_unit proc~geninterp_main geninterp_main proc~geninterp_main->proc~io_file_unit proc~geninterp_main->proc~get_hh_r proc~kmesh_shell_from_file kmesh_shell_from_file proc~kmesh_shell_from_file->proc~io_file_unit proc~tran_get_ht tran_get_ht proc~tran_get_ht->proc~io_file_unit proc~tran_lcr tran_lcr proc~tran_lcr->proc~io_file_unit proc~tran_lcr->proc~tran_read_htc proc~tran_lcr->proc~tran_read_htxy proc~tran_lcr->proc~tran_read_htx program~wannier wannier program~wannier->proc~io_file_unit program~wannier->proc~param_read program~wannier->proc~dis_main program~wannier->proc~overlap_read program~wannier->proc~wann_main program~wannier->proc~plot_main program~wannier->proc~wann_main_gamma program~wannier->proc~tran_main proc~conv_read_chkpt->proc~io_file_unit proc~plot_wannier plot_wannier proc~plot_wannier->proc~io_file_unit proc~conv_read_spn_fmt->proc~io_file_unit proc~plot_bvec plot_bvec proc~plot_bvec->proc~io_file_unit proc~gyrotropic_outprint_tensor gyrotropic_outprint_tensor proc~gyrotropic_outprint_tensor->proc~io_file_unit proc~wham_get_eig_uu_hh_jjlist wham_get_eig_UU_HH_JJlist proc~wham_get_eig_uu_hh_jjlist->proc~get_hh_r proc~plot_main->proc~ws_write_vec proc~wann_main_gamma->proc~param_write_chkpt proc~gyrotropic_main gyrotropic_main proc~gyrotropic_main->proc~get_cc_r proc~gyrotropic_main->proc~get_bb_r proc~gyrotropic_main->proc~get_aa_r proc~gyrotropic_main->proc~get_ss_r proc~gyrotropic_main->proc~get_hh_r proc~gyrotropic_main->proc~gyrotropic_outprint_tensor proc~gyrotropic_get_k_list gyrotropic_get_k_list proc~gyrotropic_main->proc~gyrotropic_get_k_list proc~wham_get_eig_deleig->proc~get_hh_r proc~wham_get_eig_uu_hh_aa_sc_tb_conv wham_get_eig_UU_HH_AA_sc_TB_conv proc~wham_get_eig_uu_hh_aa_sc_tb_conv->proc~get_aa_r proc~wham_get_eig_uu_hh_aa_sc_tb_conv->proc~get_hh_r proc~wham_get_eig_uu_hh_aa_sc wham_get_eig_UU_HH_AA_sc proc~wham_get_eig_uu_hh_aa_sc->proc~get_hh_r proc~kmesh_get->proc~kmesh_shell_from_file proc~spin_get_moment spin_get_moment proc~spin_get_moment->proc~get_ss_r proc~spin_get_moment->proc~get_hh_r proc~tran_main->proc~tran_bulk proc~tran_main->proc~tran_lcr_2c2_build_ham proc~tran_main->proc~tran_find_integral_signatures proc~tran_main->proc~tran_get_ht proc~tran_main->proc~tran_lcr proc~berry_get_kubo_k->proc~wham_get_eig_deleig proc~berry_get_imfgh_klist->proc~wham_get_eig_uu_hh_jjlist proc~berry_get_sc_klist->proc~wham_get_eig_deleig proc~berry_get_sc_klist->proc~wham_get_eig_uu_hh_aa_sc_tb_conv proc~berry_get_sc_klist->proc~wham_get_eig_uu_hh_aa_sc proc~berry_get_shc_klist->proc~wham_get_eig_deleig proc~gyrotropic_get_k_list->proc~wham_get_eig_deleig proc~gyrotropic_get_k_list->proc~berry_get_imfgh_klist proc~gyrotropic_get_k_list->proc~berry_get_imf_klist proc~berry_get_imf_klist->proc~berry_get_imfgh_klist

Contents

Source Code

io_file_unit

Source Code

  function io_file_unit()
    !===========================================
    !
    !! Returns an unused unit number
    !! so we can later open a file on that unit.
    !
    !===========================================
    implicit none

    integer :: io_file_unit, unit
    logical :: file_open

    unit = 9
    file_open = .true.
    do while (file_open)
      unit = unit + 1
      inquire (unit, OPENED=file_open)
    end do

    io_file_unit = unit

    return
  end function io_file_unit