Merge pull request #1349 from mnlevy1981/mapping/runoff_metadata_bugfix

Update domain_b in nnsm map
ESMCI · Apr 14, 2017 · 1f4c4e9 · 1f4c4e9
2 parents 7664249 + 00d9e48
commit 1f4c4e9
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/tools/mapping/gen_mapping_files/runoff_to_ocn/src/main.F90 b/tools/mapping/gen_mapping_files/runoff_to_ocn/src/main.F90
@@ -208,6 +208,7 @@ PROGRAM main
    !--- create new map datatype to hold result of matrix-matrix multiply ---
    call map_dup(map_orig,map_new)
    map_new%title  = trim(title)
+   map_new%domain_b = trim(map_smooth%domain_b)
    call map_matMatMult(map_orig,map_new,map_smooth) ! mult(A,B,S): B=S*A
    call mapsort_sort(map_new)
    call map_check(map_new)