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