assert_file_exists Subroutine

  1. input.f90
  2. input
  3. assert_file_exists

subroutine assert_file_exists(path)

throw error if file does not exist this accomodates non-Fortran 2018 error stop with variable character

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: path

Called by

proc~~assert_file_exists~~CalledByGraph proc~assert_file_exists assert_file_exists proc~read_configfile read_configfile proc~read_configfile->proc~assert_file_exists interface~read_configfile read_configfile interface~read_configfile->proc~read_configfile program~magcalc MagCalc program~magcalc->interface~read_configfile program~gemini3d Gemini3D program~gemini3d->interface~read_configfile

Contents

None