Update Calc_f13.m

adding advection_state
CHLNDDEV · Mar 17, 2020 · c5b9438 · c5b9438
1 parent b2d23d9
commit c5b9438
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/utilities/Calc_f13.m b/utilities/Calc_f13.m
@@ -11,6 +11,7 @@
 %              'Mn' ('mannings_n_at_sea_floor')
 %              'Ss' ('surface_submergence_state')
 %              'Re' ('initial_river_elevation')
+%              'Ad' ('advection_state')
 %
 %            3) then either: 
 %              'inpoly' followed by...
@@ -47,6 +48,9 @@
 elseif strcmpi(attribute,'Re')
     attrname = 'initial_river_elevation';
     default_val = 0;
+elseif strcmpi(attribute,'Ad')
+    attrname = 'advection_state';
+    default_val = -999;
 else
     error(['Attribute ' attribute ' not currently supported'])
 end