Index

Rundeck: P1SoM40

Created: Fri May 10 03:30:18 EDT 2024

stbdra

Module:

File: OSTRAITS.f

Summary: STBDRA exerts a bottom drag on the lowest layer and a side drag on each layer of each strait. Also reduces along strait gradients
Author : Gary Russell
Version:

---

Declaration:

subroutine stbdra

Variables:

seconds_per_day : used from timeconstants_mod

lmo : used from ocean

dts : used from ocean

nmst : used from straits

lmst : used from straits

must : used from straits

mmst : used from straits

wist : used from straits

dist : used from straits

sxmst : used from straits

gxmst : used from straits

bdragx : real*8, parameter

Initial Value = 1

sdragx : real*8, parameter

Initial Value = 1d-1

reduce : real*8, parameter

Initial Value = 1./(SECONDS_PER_DAY*20.)

n : integer

l : integer