From c3ab9a906ed6bfe5c4b3123632cea538882f8bc1 Mon Sep 17 00:00:00 2001 From: Jun Wang Date: Fri, 13 Nov 2020 08:30:59 -0600 Subject: [PATCH] remove duplicate read_data in fms_mod in external_ic.F90 --- tools/external_ic.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tools/external_ic.F90 b/tools/external_ic.F90 index 44f76c22e..ed2e7b37e 100644 --- a/tools/external_ic.F90 +++ b/tools/external_ic.F90 @@ -148,7 +148,7 @@ module external_ic_mod use external_sst_mod, only: i_sst, j_sst, sst_ncep use fms_mod, only: file_exist, read_data, field_exist, write_version_number use fms_mod, only: open_namelist_file, check_nml_error, close_file - use fms_mod, only: get_mosaic_tile_file, read_data, error_mesg + use fms_mod, only: get_mosaic_tile_file, error_mesg use fms_io_mod, only: get_tile_string, field_size, free_restart_type use fms_io_mod, only: restart_file_type, register_restart_field use fms_io_mod, only: save_restart, restore_state, set_filename_appendix, get_global_att_value