model/inc/FFT_DXML_SUPPORT.h

C $Header: $

#include "CPP_OPTIONS.h"

C     /==========================================================\
C     | o FFT_DXML_SUPPORT.h                                     |
C     | DXML library secific FFT supporting data structures      |
C     |==========================================================|
C     | DXML is Digital/Compaq's scientific subroutine library.  |
C     | This header file requires the DXMLDEF.FOR header that is |
C     | part of that library.                                    |
C     \==========================================================/
#ifdef INCLUDE_DXML_FFT

C     Standard data structures for Digital/Compaq's DXML scientfic library
#include "DXMLDEF.FOR"

C     Data structures used in application.
      COMMON / DXML_FFT_SUPPORT / dxml_dfft_struct
      RECORD /dxml_d_fft_structure/ dxml_dfft_struct( nSx*nSy )

#endif /* INCLUDE_DXML_FFT */
1	C $Header: $
2
3	#include "CPP_OPTIONS.h"
4
5	C /==========================================================\
6	C \| o FFT_DXML_SUPPORT.h \|
7	C \| DXML library secific FFT supporting data structures \|
8	C \|==========================================================\|
9	C \| DXML is Digital/Compaq's scientific subroutine library. \|
10	C \| This header file requires the DXMLDEF.FOR header that is \|
11	C \| part of that library. \|
12	C \==========================================================/
13	#ifdef INCLUDE_DXML_FFT
14
15	C Standard data structures for Digital/Compaq's DXML scientfic library
16	#include "DXMLDEF.FOR"
17
18	C Data structures used in application.
19	COMMON / DXML_FFT_SUPPORT / dxml_dfft_struct
20	RECORD /dxml_d_fft_structure/ dxml_dfft_struct( nSx*nSy )
21
22	#endif /* INCLUDE_DXML_FFT */