check_before_table_read Subroutine

private subroutine check_before_table_read(filename, table_size)

checks that lookup tables exist and are the correct size before attempting to read them

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: filename
integer, intent(in) :: table_size

Called by

proc~~check_before_table_read~~CalledByGraph proc~check_before_table_read check_before_table_read proc~read_table_ccn read_table_ccn proc~read_table_ccn->proc~check_before_table_read proc~read_table_freezewater read_table_freezewater proc~read_table_freezewater->proc~check_before_table_read proc~read_table_qr_acr_qg read_table_qr_acr_qg proc~read_table_qr_acr_qg->proc~check_before_table_read proc~read_table_qr_acr_qs read_table_qr_acr_qs proc~read_table_qr_acr_qs->proc~check_before_table_read proc~tempo_init tempo_init proc~tempo_init->proc~read_table_ccn proc~tempo_init->proc~read_table_freezewater proc~tempo_init->proc~read_table_qr_acr_qg proc~tempo_init->proc~read_table_qr_acr_qs proc~test_tempo_init test_tempo_init proc~test_tempo_init->proc~tempo_init program~run_tempo_tests run_tempo_tests program~run_tempo_tests->proc~test_tempo_init