/[MITgcm]/MITgcm/eesupp/inc/DFILE.h
ViewVC logotype

Annotation of /MITgcm/eesupp/inc/DFILE.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.5 - (hide annotations) (download)
Sun Feb 4 14:38:41 2001 UTC (23 years, 2 months ago) by cnh
Branch: MAIN
CVS Tags: checkpoint46n_post, checkpoint51k_post, checkpoint47e_post, checkpoint57m_post, checkpoint52l_pre, ecco_c44_e19, hrcube4, hrcube5, checkpoint46l_post, checkpoint57g_pre, checkpoint46g_pre, checkpoint47c_post, release1_p13_pre, checkpoint50c_post, checkpoint57s_post, checkpoint58b_post, checkpoint57b_post, checkpoint46f_post, checkpoint52d_pre, checkpoint57g_post, checkpoint48e_post, checkpoint56b_post, checkpoint50g_post, checkpoint57y_post, checkpoint46b_post, checkpoint52j_pre, checkpoint43a-release1mods, checkpoint51o_pre, checkpoint44g_post, checkpoint54d_post, checkpoint48c_post, checkpoint54e_post, ecco_c50_e32, ecco_c50_e33, ecco_c50_e30, ecco_c50_e31, release1_p13, checkpoint40pre3, checkpoint40pre2, checkpoint40pre1, checkpoint51l_post, checkpoint40pre7, checkpoint40pre6, checkpoint48i_post, checkpoint57r_post, checkpoint40pre9, checkpoint40pre8, checkpoint46l_pre, checkpoint57d_post, checkpoint57i_post, checkpoint50d_pre, checkpoint52k_post, chkpt44d_post, checkpoint59, checkpoint58, checkpoint55, checkpoint54, checkpoint57, checkpoint56, checkpoint51, checkpoint53, checkpoint52, release1_p8, release1_p9, checkpoint50d_post, release1_p1, release1_p2, release1_p3, release1_p4, release1_p5, release1_p6, release1_p7, checkpoint58f_post, checkpoint52f_post, checkpoint57n_post, checkpoint58d_post, checkpoint58a_post, checkpoint50b_pre, checkpoint44e_pre, checkpoint57z_post, checkpoint54f_post, checkpoint51f_post, checkpoint62a, release1_b1, checkpoint48b_post, ecco_c51_e34d, ecco_c51_e34e, ecco_c51_e34f, ecco_c51_e34g, ecco_c51_e34a, ecco_c51_e34b, ecco_c51_e34c, checkpoint58y_post, checkpoint43, checkpoint51d_post, checkpoint48c_pre, checkpoint55a_post, checkpoint51t_post, checkpoint58t_post, checkpoint38, checkpoint51n_post, release1_chkpt44d_post, checkpoint55i_post, checkpoint57l_post, checkpoint52i_pre, checkpoint57h_post, hrcube_2, hrcube_3, checkpoint51s_post, checkpoint57t_post, checkpoint55c_post, checkpoint48d_pre, checkpoint51j_post, checkpoint47i_post, checkpoint52e_pre, checkpoint57v_post, checkpoint57f_post, checkpoint52e_post, checkpoint51n_pre, checkpoint47d_post, icebear5, icebear4, icebear3, icebear2, checkpoint53d_post, checkpoint46d_pre, checkpoint60, checkpoint61, checkpoint62, checkpoint57a_post, checkpoint48d_post, release1-branch_tutorials, checkpoint57h_pre, checkpoint57x_post, checkpoint48f_post, checkpoint45d_post, checkpoint52b_pre, checkpoint54b_post, checkpoint46j_pre, checkpoint58w_post, ecco_c50_e28, checkpoint51l_pre, checkpoint52m_post, checkpoint47d_pre, checkpoint57y_pre, chkpt44a_post, checkpoint55g_post, checkpoint44h_pre, checkpoint48h_post, checkpoint51q_post, checkpoint40pre4, ecco_c50_e29, checkpoint51b_pre, checkpoint46a_post, checkpoint47g_post, checkpoint52b_post, checkpoint52c_post, checkpoint46j_post, checkpoint51h_pre, checkpoint46k_post, checkpoint46b_pre, chkpt44c_pre, checkpoint58o_post, checkpoint52h_pre, checkpoint45a_post, checkpoint57c_post, checkpoint50f_post, checkpoint50a_post, checkpoint50f_pre, hrcube_1, checkpoint58p_post, checkpoint58q_post, checkpoint51m_post, checkpoint55d_post, checkpoint44e_post, ecco_c44_e18, ecco_c44_e17, ecco_c44_e16, release1_p12, checkpoint58e_post, release1_p10, release1_p11, release1_p16, release1_p17, release1_p14, release1_p15, pre38tag1, checkpoint58m_post, checkpoint47a_post, ecco_c50_e33a, checkpoint53c_post, checkpoint55d_pre, checkpoint57c_pre, checkpoint58r_post, checkpoint55j_post, branchpoint-genmake2, checkpoint54a_post, checkpoint46e_pre, checkpoint55h_post, checkpoint58n_post, checkpoint51r_post, checkpoint45b_post, checkpoint51i_post, checkpoint57e_post, release1-branch-end, c37_adj, release1_final_v1, checkpoint55b_post, checkpoint51b_post, release1_p12_pre, checkpoint46c_pre, checkpoint53a_post, checkpoint44f_post, checkpoint47b_post, checkpoint44b_post, checkpoint59q, checkpoint59p, checkpoint59r, checkpoint59e, checkpoint59d, checkpoint59g, checkpoint59f, checkpoint59a, checkpoint55f_post, checkpoint59c, checkpoint59b, checkpoint59m, checkpoint59l, checkpoint59o, checkpoint59n, checkpoint59i, checkpoint59h, checkpoint59k, ecco_c51_e34, checkpoint46h_pre, checkpoint52d_post, checkpoint53g_post, checkpoint46m_post, checkpoint57p_post, checkpint57u_post, checkpoint46a_pre, checkpoint50c_pre, checkpoint45c_post, checkpoint57q_post, mitgcm_mapl_00, ecco_ice2, ecco_ice1, checkpoint44h_post, pre38-close, eckpoint57e_pre, checkpoint46g_post, checkpoint51c_post, checkpoint58k_post, checkpoint39, checkpoint52a_pre, checkpoint37, checkpoint36, checkpoint35, checkpoint46i_post, checkpoint58v_post, checkpoint50h_post, checkpoint52i_post, checkpoint50e_pre, checkpoint50i_post, ecco_c44_e25, checkpoint51i_pre, checkpoint48a_post, checkpoint56a_post, checkpoint58l_post, checkpoint53f_post, checkpoint47j_post, checkpoint54a_pre, checkpoint53b_pre, branch-exfmods-tag, checkpoint40pre5, checkpoint57h_done, checkpoint52j_post, checkpoint47f_post, checkpoint50e_post, chkpt44a_pre, ecco_c44_e22, ecco_c44_e23, ecco_c44_e20, ecco_c44_e21, ecco_c44_e26, ecco_c44_e27, ecco_c44_e24, checkpoint57j_post, checkpoint57f_pre, checkpoint61f, checkpoint46c_post, checkpoint58g_post, ecco-branch-mod1, ecco-branch-mod2, ecco-branch-mod3, ecco-branch-mod4, ecco-branch-mod5, branch-netcdf, checkpoint52l_post, checkpoint58x_post, checkpoint61n, checkpoint52n_post, checkpoint46e_post, checkpoint59j, release1_beta1, checkpoint58h_post, checkpoint56c_post, checkpoint58j_post, checkpoint51e_post, checkpoint44b_pre, checkpoint42, checkpoint57a_pre, checkpoint40, checkpoint41, checkpoint46, checkpoint47, checkpoint44, checkpoint45, checkpoint48, checkpoint49, checkpoint57o_post, checkpoint46h_post, checkpoint51o_post, checkpoint61q, checkpoint50, checkpoint57k_post, checkpoint51f_pre, chkpt44c_post, checkpoint61z, checkpoint53b_post, checkpoint47h_post, checkpoint52a_post, checkpoint57w_post, checkpoint61e, checkpoint44f_pre, checkpoint58i_post, checkpoint51g_post, ecco_c52_e35, checkpoint46d_post, checkpoint50b_post, checkpoint58c_post, checkpoint58u_post, release1-branch_branchpoint, checkpoint52f_pre, checkpoint53d_pre, checkpoint58s_post, checkpoint55e_post, checkpoint61g, checkpoint61d, checkpoint54c_post, checkpoint61b, checkpoint61c, checkpoint61a, checkpoint51a_post, checkpoint61o, checkpoint61l, checkpoint61m, checkpoint61j, checkpoint61k, checkpoint61h, checkpoint61i, checkpoint61v, checkpoint61w, checkpoint61t, checkpoint61u, checkpoint61r, checkpoint61s, checkpoint61p, checkpoint51p_post, checkpoint48g_post, checkpoint61x, checkpoint61y, checkpoint51u_post
Branch point for: c24_e25_ice, branch-exfmods-curt, release1_coupled, release1_final, release1-branch, branch-genmake2, release1, branch-nonh, tg2-branch, ecco-branch, release1_50yr, netcdf-sm0, icebear, checkpoint51n_branch, pre38
Changes since 1.4: +2 -1 lines
File MIME type: text/plain
Made sure each .F and .h file had
the CVS keywords Header and Name at its start.
Most had header but very few currently have Name, so
lots of changes!

1 cnh 1.5 C $Header: /u/gcmpack/models/MITgcmUV/eesupp/inc/DFILE.h,v 1.4 2000/03/15 16:00:50 adcroft Exp $
2     C $Name: $
3 adcroft 1.4
4     #ifdef USE_DFILE
5    
6 cnh 1.1 C /==========================================================\
7     C | DFILE.h |
8     C |==========================================================|
9     C | Header file for binary dump file I/O structures. |
10     C \==========================================================/
11     C Compile time constants
12     C ioUnitsPerThread - Number of ioUnits allowed
13     C busyUnit - Status flag. Indicates whether unit
14     C freeUnit is open
15     C accessModeRO - Read-only v. read-write flag
16     C accessModeRW
17     C errorModeSTOP - Indicates action on I/O error
18     C errorModeCONT
19     INTEGER ioUnitsPerThread
20     PARAMETER ( ioUnitsPerThread = 1 )
21     INTEGER busyUnit
22     PARAMETER ( busyUnit = 0 )
23     INTEGER freeUnit
24     PARAMETER ( freeUnit = 1 )
25     INTEGER accessModeRO
26     PARAMETER ( accessModeRO = 0 )
27     INTEGER accessModeRW
28     PARAMETER ( accessModeRW = 1 )
29     INTEGER errorModeSTOP
30     PARAMETER ( errorModeSTOP = 0 )
31     INTEGER errorModeCONT
32     PARAMETER ( errorModeCONT = 1 )
33     INTEGER metaDataNotWritten
34     PARAMETER ( metaDataNotWritten = 0 )
35     INTEGER metaDataWritten
36     PARAMETER ( metaDataWritten = 1 )
37    
38     C mUnit - Fortran unit number for metafile
39     C dUnit - Fortran unit number for data
40     C unitStatus - Busy/Free status flag
41     C nameOfMFile - Name of metadata file used in I/O
42     C nameOfDFile - Name of data file used in I/O
43     C accessMode - Access mode that was set when this unit was opened.
44     C Access mode is either read-only or
45     C read-write.
46     C errorMode - Error mode that was set when this unit was opened.
47     C Error mode is either STOP on error which means the
48     C program halts or continue or error. For continue
49     C error the program usually tries to write an error
50     C message to stderr. Howeever, the most common cause for
51     C an IO error is a full disk in which case that
52     C error message may be lost!
53     C theAcessMode - The current acces mode. This will be the mode
54     C associated with a file that is opened.
55     C theErrorMode - The current error mode. This will be the mode
56     C associated with a file that is opened.
57     COMMON /DFILE_I/ mUnitNumber, dUnitNumber, unitStatus,
58     & accessMode, errorMode,
59     & theAccessMode, theErrorMode, metaDataStatus
60     INTEGER mUnitNumber(ioUnitsPerThread,MAX_NO_THREADS)
61     INTEGER dUnitNumber(ioUnitsPerThread,MAX_NO_THREADS)
62     INTEGER unitStatus (ioUnitsPerThread,MAX_NO_THREADS)
63     INTEGER accessMode (ioUnitsPerThread,MAX_NO_THREADS)
64     INTEGER errorMode (ioUnitsPerThread,MAX_NO_THREADS)
65     INTEGER metaDataStatus(ioUnitsPerThread,MAX_NO_THREADS)
66     INTEGER theAccessMode
67     INTEGER theErrorMode
68    
69     C nameOfMFile - Name of metadata file used in I/O
70     C nameOfDFile - Name of data file used in I/O
71     COMMON /DFILE_C/ nameOfMfile, nameOfDfile
72 cnh 1.3 CHARACTER*(MAX_LEN_FNAM)
73     & nameOfMfile(ioUnitsPerThread,MAX_NO_THREADS)
74     CHARACTER*(MAX_LEN_FNAM)
75     & nameOfDfile(ioUnitsPerThread,MAX_NO_THREADS)
76 cnh 1.1
77     C ioBuf_R4 - IO buffer for 32-bit floating point IO.
78     C Sized to fit anything up to a global domain 3d field.
79     C ( but without overlaps )
80     C ioBuf_R8 - IO buffer for 64-bit floating point IO.
81     C Sized to fit anything up to a global domain 3d field.
82     C ( but without overlaps )
83     COMMON /DFILE_R/
84     & ioBuf_R8, ioBuf_R4
85 cnh 1.2 Real*8 ioBuf_R8( sNx*nSx*nPx * sNy*nSy*nPy * Nr )
86     Real*4 ioBuf_R4( sNx*nSx*nPx * sNy*nSy*nPy * Nr )
87 cnh 1.1
88 adcroft 1.4 #endif /* USE_DFILE */

  ViewVC Help
Powered by ViewVC 1.1.22