assert_directory_exists Module Procedure

module procedure assert_directory_exists module subroutine assert_directory_exists(path)

throw error if directory 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_directory_exists~~CalledByGraph proc~assert_directory_exists assert_directory_exists interface~assert_directory_exists assert_directory_exists interface~assert_directory_exists->proc~assert_directory_exists proc~read_configfile read_configfile proc~read_configfile->interface~assert_directory_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