#include "dimensions.h"
#include "paramet.h"
#include "comconst.h"
#include "comvert.h"
#include "comgeom.h"
#include "logic.h"
#include "ener.h"
Go to the source code of this file.
|
subroutine | advect (ucov, vcov, teta, w, massebx, masseby, du, dv, dteta) |
|
subroutine advect |
( |
real, dimension(ip1jmp1,llm) |
ucov, |
|
|
real, dimension(ip1jm,llm) |
vcov, |
|
|
real, dimension(ip1jmp1,llm) |
teta, |
|
|
real, dimension(ip1jmp1,llm) |
w, |
|
|
real, dimension(ip1jmp1,llm) |
massebx, |
|
|
real, dimension(ip1jm,llm) |
masseby, |
|
|
real, dimension(ip1jmp1,llm) |
du, |
|
|
real, dimension(ip1jm,llm) |
dv, |
|
|
real, dimension(ip1jmp1,llm) |
dteta |
|
) |
| |