Skip to content

Commit 69b8da9

Browse files
committed
combining the velwd and limit into the wetdry namelist as per the current official adcirc version
1 parent 4fa64e5 commit 69b8da9

File tree

1 file changed

+22
-15
lines changed

1 file changed

+22
-15
lines changed

utilities/Make_f15.m

Lines changed: 22 additions & 15 deletions
Original file line numberDiff line numberDiff line change
@@ -59,7 +59,7 @@
5959
% https://wiki.adcirc.org/Supplemental_meteorological/wave/ice_parameters
6060
%
6161
% 'namelist' : cell/string list of namelists to add from the following:
62-
% {'met', 'dynamicWaterLevelCorrection', 'limit', 'velwd','swanoutput','nws8'}
62+
% {'met', 'dynamicWaterLevelCorrection', 'wetdry','swanoutput','nws8'}
6363
% https://wiki.adcirc.org/Fort.15_file_format#Namelists
6464
%
6565
% Outputs: 1) msh class obj with f15 struct populated
@@ -392,21 +392,28 @@
392392
obj.f15.controllist(ci).var(6).name = [obj.f15.controllist(ci).type 'SkipSnaps'];
393393
obj.f15.controllist(ci).var(6).val = 0;
394394
end
395-
if find(contains(namelists,'limit'),1)
395+
if find(contains(namelists,'wetdry'),1)
396396
ci = ci + 1;
397-
% limit control
398-
obj.f15.controllist(ci).type = 'limit';
399-
obj.f15.controllist(ci).var(1).name = 'slim';
400-
obj.f15.controllist(ci).var(1).val = 4e-4;
401-
obj.f15.controllist(ci).var(2).name = 'windlim';
402-
obj.f15.controllist(ci).var(2).val = true;
403-
end
404-
if find(contains(namelists,'velwd'),1)
405-
ci = ci + 1;
406-
% wetdry velocity control
407-
obj.f15.controllist(ci).type = 'velwd';
408-
obj.f15.controllist(ci).var(1).name = 'directvelWD';
409-
obj.f15.controllist(ci).var(1).val = true;
397+
% wetdry control
398+
obj.f15.controllist(ci).type = 'wetDry';
399+
obj.f15.controllist(ci).var(1).name = 'outputNodeCode';
400+
obj.f15.controllist(ci).var(1).val = false;
401+
obj.f15.controllist(ci).var(2).name = 'outputNOFF';
402+
obj.f15.controllist(ci).var(2).val = false;
403+
obj.f15.controllist(ci).var(3).name = 'noffActive';
404+
obj.f15.controllist(ci).var(3).val = true;
405+
obj.f15.controllist(ci).var(4).name = 'StatPartWetFix';
406+
obj.f15.controllist(ci).var(4).val = false;
407+
obj.f15.controllist(ci).var(5).name = 'How2FixStatPartWet';
408+
obj.f15.controllist(ci).var(5).val = 0;
409+
obj.f15.controllist(ci).var(6).name = 'slim';
410+
obj.f15.controllist(ci).var(6).val = 1e9;
411+
obj.f15.controllist(ci).var(7).name = 'windLim';
412+
obj.f15.controllist(ci).var(7).val = false;
413+
obj.f15.controllist(ci).var(8).name = 'directvelWD';
414+
obj.f15.controllist(ci).var(8).val = false;
415+
obj.f15.controllist(ci).var(9).name = 'useHF';
416+
obj.f15.controllist(ci).var(9).val = false;
410417
end
411418
if find(contains(namelists,'swanoutput'),1)
412419
% SWAN output

0 commit comments

Comments
 (0)