pkg/autodiff/autodiff_inadmode_set.F

C $Header: /u/gcmpack/MITgcm/pkg/autodiff/dummy_in_stepping.F,v 1.2 2003/10/09 04:19:19 edhill Exp $

#include "AUTODIFF_OPTIONS.h"

      subroutine autodiff_inadmode_set( myThid )
      IMPLICIT NONE
C     /==========================================================\
C     | SUBROUTINE autodiff_inadmode_set                         |
C     |==========================================================|
C     == Global variables ===

#include "SIZE.h"
#include "EEPARAMS.h"
#include "PARAMS.h"

C     == Routine arguments ==
C     myThid - Thread number for this instance of the routine.
      integer myThid


      end


1	C $Header: /u/gcmpack/MITgcm/pkg/autodiff/dummy_in_stepping.F,v 1.2 2003/10/09 04:19:19 edhill Exp $
2
3	#include "AUTODIFF_OPTIONS.h"
4
5	subroutine autodiff_inadmode_set( myThid )
6	IMPLICIT NONE
7	C /==========================================================\
8	C \| SUBROUTINE autodiff_inadmode_set \|
9	C \|==========================================================\|
10	C == Global variables ===
11
12	#include "SIZE.h"
13	#include "EEPARAMS.h"
14	#include "PARAMS.h"
15
16	C == Routine arguments ==
17	C myThid - Thread number for this instance of the routine.
18	integer myThid
19
20
21
22	end
23
24
25
26
27
28
29
30
31