Running and Verifying the Inlet Case

Prerequisites

FVCOM requires compiling an executable file based on the case. If the inlet case is used, replace the make.inc file with the make.inc file of the Intel case (see Compilation and Installation). Modify the mod_cstms_vars.F and mod_sed_cstms.F files in the /path/to/FVCOM/FVCOM_source directory. Other steps are the same as those in Compilation and Installation.

Run the following command to modify the mod_cstms_vars.F file.

Open mod_cstms_vars.F.
```
vi mod_cstms_vars.F
```

Press i to enter the insert mode and modify the file as follows:

Before the modification:

494       (/       "bo_sd50"                                     &
529       (/        "mean grain diameter"                  &
563       character(len=80), dimension(34) :: bot_units = (" m","kg&
568       character(len=80), dimension(5) :: bed_snames = (/"bed_thick","bed_age","bed_por","bed_diff","bed_btcr"/)
569       character(len=80), dimension(5) :: bed_lnames = (/"bed layer thickness","bed layer age","bed layer porosity","bed layer bio-diffusivity","bed critical stress"/)
570       character(len=80), dimension(5) :: bed_units = (/"m","days","-","-","N/m2"/)

After the modification:

494       (/character(80):: "bo_sd50"                                     &
529       (/ character(80)::         "mean grain diameter"                  &
563       character(len=80), dimension(34) :: bot_units = (/character(80)::" m","kg&
568       character(len=80), dimension(5) :: bed_snames = (/character(80)::"|        (/"bed_thick","bed_age","bed_por","bed_diff","bed_btcr"/)
569       character(len=80), dimension(5) :: bed_lnames = (/character(80)::"bed layer thickness","bed layer age","bed layer porosity","bed layer bio-diffusivity","bed critical stress"/)
570       character(len=80), dimension(5) :: bed_units = (/character(80)::"m","days","-","-","N/m2"/)

Press Esc, type :wq!, and press Enter to save the file and exit.

Modify the mod_sed_cstms.F file.
1. Open mod_sed_cstms.F.
```
vi mod_sed_cstms.F
```
2. Press i to enter the insert mode and modify the file as follows:
  Before the modification:
```
5797     IF(BACKWARD_ADVECTION==.TRUE.)THEN
```
  After the modification:
```
5797     IF(BACKWARD_ADVECTION .EQV. .TRUE.)THEN
```
3. Press Esc, type :wq!, and press Enter to save the file and exit.

Procedure

Use PuTTY to log in to the server as the root user.
Run the following command to create a test directory and go to the test directory:
```
mkdir -p /path/to/FVCOM/test
cd /path/to/FVCOM/test
```
Run the following command to copy the test case to the current directory:
```
cp -r /path/to/FVCOM/FVCOM4.1/Examples/cohesive_bed/tidal_inlet/ ./
```
Run the following command to switch to the run directory:
```
cd ./tidal_inlet/run
```
Run the following command to edit the case input file:
1. Open the test case input file.
```
vi inlet_run.nml
```
2. Press i to enter the insert mode and add single quotation marks to none, inlet_nesting.nc, and inlet_nesting.nc.
```
NCNEST_NODE_FILES_WAVE  = 'none'
NESTING_FILE_NAME       = 'inlet_nesting.nc'
NESTING_FILE_NAME_WAVE  = 'inlet_nesting_wave.nc'
```
3. Press Esc, type :wq!, and press Enter to save the file and exit.

Run the following command to run the test:

time mpirun -np 96 --allow-run-as-root --bind-to core /path/to/FVCOM/FVCOM4.1/FVCOM_source/fvcom --casename=inlet

Example:

Parent topic: Running and Verifying FVCOM