EAMxx: fix bug in SCMInput

bartgol · bartgol · commit b8d85ef80301 · 2025-01-27T14:55:23.000-07:00
diff --git a/components/eamxx/src/share/io/scorpio_scm_input.cpp b/components/eamxx/src/share/io/scorpio_scm_input.cpp
@@ -126,7 +126,7 @@ void SCMInput::create_closest_col_info (double target_lat, double target_lon)
   m_comm.all_reduce(&min_dist_and_rank, 1, MPI_MINLOC);
 
   // Set local col idx to -1 for mpi ranks not containing minimum lat/lon distance
-  m_closest_col_info.mpi_rank = min_dist_and_rank.val;
+  m_closest_col_info.mpi_rank = min_dist_and_rank.idx;
   m_closest_col_info.col_lid  = my_rank==min_dist_and_rank.idx ? minloc.loc : -1;
 }
 

Original file line number	Diff line number	Diff line change
`@@ -126,7 +126,7 @@ void SCMInput::create_closest_col_info (double target_lat, double target_lon)`
`126`	`126`	`m_comm.all_reduce(&min_dist_and_rank, 1, MPI_MINLOC);`
`127`	`127`
`128`	`128`	`// Set local col idx to -1 for mpi ranks not containing minimum lat/lon distance`
`129`		`- m_closest_col_info.mpi_rank = min_dist_and_rank.val;`
	`129`	`+ m_closest_col_info.mpi_rank = min_dist_and_rank.idx;`
`130`	`130`	`m_closest_col_info.col_lid = my_rank==min_dist_and_rank.idx ? minloc.loc : -1;`
`131`	`131`	`}`
`132`	`132`