next up previous
Next: b3drun.F Up: The Proudman Oceanographic Laboratory Previous: b3dgrid.F

Subsections


b3dinit.F


subroutine b3dinit

Description

Inializes physics variables on the 3D grid to default values then calls warmst to overwrite these if using values from a previously checkpointed run.

Subroutine Arguments

ierr error flag

Local variables

i,j,k local indices
tagzet,tagh,tagwe,tagwn tags
ubs,vbs depth mena currents
ibg snake array index
icg, jcg global indices

Global variables changed

ub, vb, ur, vr, uo, vo, om, w
h, hu, zet, dzdt
aa, ak, qsq, csq, fb, gb, st

Logical units

none

Order of Things

  1. calls bset and uvzset to set initial scalars and velocities
  2. calculates initial depth mean and depth varying currents
  3. calculates initial water depths
  4. initialises diffusivities,. adevection and friction parameters
  5. inilialises spm sub-model
  6. initialise pressure for compressibility term
  7. calls warmst to read in checkpointed fields and overwrite these values
  8. initialises any external code
  9. find initial surface and river fluxes
  10. initialises tide input routine
  11. Set boundary proximity masks for ppm advection.
  12. Initialise values for turbulent energy routine.
  13. Initialise particle tracking.

Calls

bset
uvzset
b3ddbg
Exch3DS Exch3DR
cbfset
spminit
bcalcinit
warmst
bcalc
external_init
metset
heatin
pointmet
heatin
strset0
heatin0
fwin
tideset tideset_longform
advset
lagrange_init

Called By

b3drun

Options - Logical

lspm using spm submodel
lpgrad using interpolated horizontal pressure gradient
compress using compressability
lwarmst reading in checkpoint data
rivers river inputs
read_tidecon reading tidal consistuents
longbcform use old b.c. format around all boundaries
lzbar using tide generating forces
rimix using Richardson Number dependent mixing scheme
part_tracking using lagrangian partical tracker

Options - Compiler

SCOORD
DEBUG

Known Issues


next up previous
Next: b3drun.F Up: The Proudman Oceanographic Laboratory Previous: b3dgrid.F
The AMMP Project 2005-04-20