Fix typo in state_structure_mod.f90

Co-authored-by: Helen Kershaw <[email protected]>
NCAR · Jan 9, 2025 · 23c8d84 · 23c8d84
1 parent 87e21ba
commit 23c8d84
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/assimilation_code/modules/io/state_structure_mod.f90 b/assimilation_code/modules/io/state_structure_mod.f90
@@ -383,7 +383,7 @@ function add_domain_from_state_type(info_file, vars) result(dom_id)
 integer :: ivar
 
 ! add to domains
-call assert_below_max_num_domains('add_domain_from_file')
+call assert_below_max_num_domains('add_domain_from_state_type')
 state%num_domains = state%num_domains + 1
 !>@todo dom_id should be a handle.
 dom_id = state%num_domains