#include "param.h"#include "scalars.h"#include "compute_auxiliary_bounds.h"

Go to the source code of this file.
Functions/Subroutines | |
| !$Id A!Set periodic boundary | conditions (if any) for a three-dimensional!field A of RHO- |
| !$Id A!Set periodic boundary V or PSI type This file is designed to!generate five different by | redefining (via CPP) the!name of the subroutine exchange_2d_tile above and the starting!indices ISTART |
| JstrR for RHO type!as well as macro KSTART for the vertical RHO and W types See!also mounting file exchange F!implicit none real | A (GLOBAL_2D_ARRAY, KSTART:N) integer Istr |
Variables | |
| !$Id | __pad19__ |
| !$Id | v |
| !$Id | Iend |
| !$Id | Jstr |
| !$Id | Jend |
| !$Id A!Set periodic boundary | U |
| !$Id A!Set periodic boundary V or PSI type This file is designed to!generate five different | subroutines |
| IstrR for | V |
| IstrR for RHO type!and | JSTART = [Jstr for V-,PSI-type |
| JstrR for RHO type | below |
| JstrR for RHO type!as well as macro KSTART for the vertical RHO and W types See!also mounting file exchange F!implicit none real | i |
| JstrR for RHO type!as well as macro KSTART for the vertical RHO and W types See!also mounting file exchange F!implicit none real | j = Jstr |
| JstrR for RHO type ! as well as macro KSTART for the vertical RHO and W types See ! also mounting file exchange F ! implicit none real A | ( | GLOBAL_2D_ARRAY | , | |
| KSTART:N | ||||
| ) |
| ! $Id A ! Set periodic boundary conditions | ( | if | any | ) |
| ! $Id A ! Set periodic boundary V or PSI type This file is designed to ! generate five different by redefining | ( | via | CPP | ) |
| ! $Id __pad19__ |
Definition at line 2 of file exchange_3d_tile.h.
| JstrR for RHO type ! as well as macro KSTART for the vertical RHO and W types See ! also mounting file exchange F ! implicit none real i |
Definition at line 19 of file exchange_3d_tile.h.
| JstrR for RHO type ! as well as macro KSTART for the vertical RHO and W types See ! also mounting file exchange F ! implicit none real Iend |
Definition at line 2 of file exchange_3d_tile.h.
| CC CC CC ROUTINE trcini pisces h CC ************************CC CC mo INTEGER jpan CHARACTER *clname INTEGER numdep REAL denitide REAL jpj REAL zdate0 REAL zmaskt c INCLUDE netcdf inc integer irec C C Compute record length for direct access FILE C rdt rfact2 C C INITIALISE DUST INPUT FROM ATMOSPHERE C C bioname endif nrec_dust irec endif enddo mynode TRCINI_PISCES unable to find forcing in forcing netCDF A nrec_dust do Jend do Iend nrec_dust do Jend do Iend Jend do Iend jpk c do Jend c do Iend c jpk do Jend do Iend C DO jpjm1 C DO jpim1 C jpj DO jpi jpjm1 C DO jpim1 C jpk DO j = Jstr |
Definition at line 19 of file exchange_3d_tile.h.
| JstrR for RHO type ! as well as macro KSTART for the vertical RHO and W types See ! also mounting file exchange F ! implicit none real Jend |
Definition at line 2 of file exchange_3d_tile.h.
Definition at line 11 of file exchange_3d_tile.h.
| JstrR for RHO type ! as well as macro KSTART for the vertical RHO and W types See ! also mounting file exchange F ! implicit none real Jstr |
Definition at line 2 of file exchange_3d_tile.h.
| ! $Id A ! Set periodic boundary V or PSI type This file is designed to ! generate five different subroutines |
Definition at line 7 of file exchange_3d_tile.h.
Definition at line 7 of file exchange_3d_tile.h.
| IstrR for V |
Definition at line 10 of file exchange_3d_tile.h.
| ! $Id v |
Definition at line 2 of file exchange_3d_tile.h.
1.5.8