#include "dimensions.h"
#include "paramet.h"
#include "comconst.h"
#include "comgeom.h"
#include "serre.h"
Go to the source code of this file.
|
subroutine | addfi_loc (pdt, leapf, forward, pucov, pvcov, pteta, pq, pps, pdufi, pdvfi, pdhfi, pdqfi, pdpfi) |
|
subroutine addfi_loc |
( |
real, intent(in) |
pdt, |
|
|
logical, intent(in) |
leapf, |
|
|
logical, intent(in) |
forward, |
|
|
real, dimension(ijb_u:ije_u,llm), intent(inout) |
pucov, |
|
|
real, dimension(ijb_v:ije_v,llm), intent(inout) |
pvcov, |
|
|
real, dimension(ijb_u:ije_u,llm), intent(inout) |
pteta, |
|
|
real, dimension(ijb_u:ije_u,llm,nqtot), intent(inout) |
pq, |
|
|
real, dimension(ijb_u:ije_u), intent(inout) |
pps, |
|
|
real, dimension(ijb_u:ije_u,llm), intent(in) |
pdufi, |
|
|
real, dimension(ijb_v:ije_v,llm), intent(in) |
pdvfi, |
|
|
real, dimension(ijb_u:ije_u,llm), intent(in) |
pdhfi, |
|
|
real, dimension(ijb_u:ije_u,llm,nqtot), intent(in) |
pdqfi, |
|
|
real, dimension(ijb_u:ije_u), intent(in) |
pdpfi |
|
) |
| |