pkg/autodiff/dummy_in_dynamics.F

C $Header: /u/gcmpack/MITgcm/pkg/autodiff/dummy_in_dynamics.F,v 1.1 2011/02/26 00:41:20 heimbach Exp $
C $Name:  $

#include "AUTODIFF_OPTIONS.h"

CBOP
C     !ROUTINE: DUMMY_IN_DYNAMICS
C     !INTERFACE:
      SUBROUTINE DUMMY_IN_DYNAMICS( myTime, myIter, myThid )

C     !DESCRIPTION: \bv
C     *==========================================================*
C     | SUBROUTINE DUMMY_IN_DYNAMICS                             |
C     *==========================================================*
C     \ev

C     !USES:
      IMPLICIT NONE

C     == Global variables ===
#include "SIZE.h"
#include "EEPARAMS.h"
#include "PARAMS.h"

C     !INPUT/OUTPUT PARAMETERS:
C     myTime :: time counter for this thread
C     myIter :: iteration counter for this thread
C     myThid :: Thread number for this instance of the routine.
      _RL     myTime
      INTEGER myIter
      INTEGER myThid

C     !LOCAL VARIABLES:
CEOP

      RETURN
      END
1	C $Header: /u/gcmpack/MITgcm/pkg/autodiff/dummy_in_dynamics.F,v 1.1 2011/02/26 00:41:20 heimbach Exp $
2	C $Name: $
3
4	#include "AUTODIFF_OPTIONS.h"
5
6	CBOP
7	C !ROUTINE: DUMMY_IN_DYNAMICS
8	C !INTERFACE:
9	SUBROUTINE DUMMY_IN_DYNAMICS( myTime, myIter, myThid )
10
11	C !DESCRIPTION: \bv
12	C ==========================================================
13	C \| SUBROUTINE DUMMY_IN_DYNAMICS \|
14	C ==========================================================
15	C \ev
16
17	C !USES:
18	IMPLICIT NONE
19
20	C == Global variables ===
21	#include "SIZE.h"
22	#include "EEPARAMS.h"
23	#include "PARAMS.h"
24
25	C !INPUT/OUTPUT PARAMETERS:
26	C myTime :: time counter for this thread
27	C myIter :: iteration counter for this thread
28	C myThid :: Thread number for this instance of the routine.
29	_RL myTime
30	INTEGER myIter
31	INTEGER myThid
32
33	C !LOCAL VARIABLES:
34	CEOP
35
36	RETURN
37	END