Update utilities/Make_f15.m

- Fix for empty bd
CHLNDDEV · Dec 12, 2018 · d56dd72 · d56dd72
1 parent 978967e
commit d56dd72
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/utilities/Make_f15.m b/utilities/Make_f15.m
@@ -126,8 +126,10 @@
     % Normal flow external boundary condition (needs to be fixed)
     ibtype = [2 12 22 32 52] ;
     sm = 0 ;
-    for k = 1: length(ibtype)
-        sm = sm + sum(~(obj.bd.ibtype - ibtype(k))) ;
+    if ~isempty(obj.bd)
+        for k = 1: length(ibtype)
+            sm = sm + sum(~(obj.bd.ibtype - ibtype(k))) ;
+        end
     end
     if ( sm > 0 ) 
         f15dat.nffr = 0 ;