ROMS
Loading...
Searching...
No Matches
prsgrd.F
Go to the documentation of this file.
1
#include "cppdefs.h"
2
#if defined NONLINEAR && defined SOLVE3D
3
!!
4
!!git $Id$
5
!!================================================= Hernan G. Arango ===
6
!! Copyright (c) 2002-2025 The ROMS Group !
7
!! Licensed under a MIT/X style license !
8
!! See License_ROMS.md !
9
!!======================================================================
10
!! !
11
!! This routine computes the baroclinic hydrostatic pressure gradient !
12
!! term. !
13
!! !
14
!!======================================================================
15
!!
16
# if defined PJ_GRADPQ4
17
# include "prsgrd44.h"
18
# elif defined PJ_GRADPQ2
19
# include "prsgrd42.h"
20
# elif defined PJ_GRADP
21
# include "prsgrd40.h"
22
# elif defined DJ_GRADPS
23
# include "prsgrd32.h"
24
# else
25
# include "prsgrd31.h"
26
# endif
27
#else
28
MODULE
prsgrd_mod
29
END MODULE
prsgrd_mod
30
#endif
prsgrd_mod
Definition
prsgrd31.h:1
ROMS
Nonlinear
prsgrd.F
Generated by
1.12.0