next up previous
Next: diffuse.F Up: The Proudman Oceanographic Laboratory Previous: convectUB.F

Subsections


diagnoseT.F


subroutine diagnoseT

Description

Does a 'After'-'Before' diagnosis of the terms in the temperature equation. This is the 1D version. dTdt(nterm,ioutpt,n-2) stores the changes in temperature at each level for ioutpt time series locations at each of nterm stages in the calculation . inew = 1 for before, 0 for after. On the hour, after the last term the change in temperature dTdtis outputted.

Subroutine Arguments

iNew before or after
iterm which term in the equation is to be recorded

Local variables

nterm Number of stages in the calculation (fixed at 4)
icg,jcg global indices
i,j,k local indices
itimt,ntimt,it timing

Global variables changed

dTdt

Logical units

251...251+ioutput a separate file for each time series point

Order of Things

  1. zero dTdt when first called
  2. if before subtracted tmp from dTdt at the correct locations
  3. if after subtracted tmp from dTdt at the correct locations
  4. output summed changes and reset dTdt

Calls

none

Called By

b3drun
baroc

Options - Logical

none

Options - Compiler

none

Known Issues

none


subroutine diagnoseTD

Description

Does a 'After'-'Before' diagnosis of the terms in the temperature equation using subroutine before_after_diagnosis. This is the 3D version. vab_stor(variable,stage,k,i,j) stores the changes in temperature at all points at each of stage in the calculation. . inew = 1 for before, 0 for after. Everyday, after the last term the change in temperature vab_storis outputted.

Subroutine Arguments

iNew before or after
iterm which term in the equation is to be recorded

Local variables

nterm Number of stages in the calculation (fixed at 4)
i,j,k local indices
itimt,ntimt timing
first

Global variables changed

vab_stor

Logical units

59

Order of Things

  1. zero vab_stor when first called
  2. calls before_after_diagnosis
  3. output summed changes and reset vab_stor

Calls

before_after_diagnosis

Called By

b3drun
baroc

Options - Logical

none

Options - Compiler

none

Known Issues

Same code is used for similar calculation in ERSEM model; they cannot be used together.


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