#include "dimensions.h"
#include "paramet.h"
#include "comconst.h"
#include "comdissnew.h"
#include "comvert.h"
#include "comgeom.h"
#include "logic.h"
#include "temps.h"
#include "ener.h"
#include "description.h"
#include "serre.h"
#include "iniprint.h"
#include "academic.h"
Go to the source code of this file.
|
subroutine | leapfrog_loc (ucov0, vcov0, teta0, ps0, masse0, phis0, q0, time_0) |
|
subroutine leapfrog_loc |
( |
real, dimension(ijb_u:ije_u,llm), intent(in) |
ucov0, |
|
|
real, dimension(ijb_v:ije_v,llm), intent(in) |
vcov0, |
|
|
real, dimension(ijb_u:ije_u,llm), intent(in) |
teta0, |
|
|
real, dimension(ijb_u:ije_u), intent(in) |
ps0, |
|
|
real, dimension(ijb_u:ije_u,llm), intent(in) |
masse0, |
|
|
real, dimension(ijb_u:ije_u), intent(in) |
phis0, |
|
|
real, dimension(ijb_u:ije_u,llm,nqtot), intent(in) |
q0, |
|
|
real, intent(in) |
time_0 |
|
) |
| |