RTFLUX FILE DESCRIPTION

The following description of the RTFLUX format uses the standard CCCC form. These lines were copied from the CCCC-IV reference.

C***********************************************************************
C                   REVISED 11/30/76                                   -
C                                                                      -
CF           RTFLUX-IV                                                 -
CE           REGULAR TOTAL FLUXES                                      -
C                                                                      -
C***********************************************************************
C
C
C-----------------------------------------------------------------------
CR           FILE IDENTIFICATION                                       -
C                                                                      -
CL    HNAME,(HUSE(I),I=1,2),IVERS                                      -
C                                                                      -
CW    1+3*MULT                                                         -
C                                                                      -
CD    HNAME         HOLLERITH FILE NAME  - RTFLUX -  (A6)              -
CD    HUSE          HOLLERITH USER IDENTIFICATION    (A6)              -
CD    IVERS         FILE VERSION NUMBER                                -
CD    MULT          DOUBLE PRECISION PARAMETER                         -
CD                       1- A6 WORD IS SINGLE WORD                     -
CD                       2- A6 WORD IS DOUBLE PRECISION WORD           -
C                                                                      -
C-----------------------------------------------------------------------
C
C
C-----------------------------------------------------------------------
CR           SPECIFICATIONS   (1D RECORD)                              -
C                                                                      -
CL    NDIM,NGROUP,NINTI,NINTJ,NINTK,ITER,EFFK,POWER,NBLOK              -
C                                                                      -
CW    9=NUMBER OF WORDS                                                -
C                                                                      -
CD    NDIM        NUMBER OF DIMENSIONS                                 -
CD    NGROUP      NUMBER OF ENERGY GROUPS                              -
CD    NINTI       NUMBER OF FIRST DIMENSION FINE MESH INTERVALS        -
CD    NINTJ       NUMBER OF SECOND DIMENSION FINE MESH INTERVALS       -
CD                NINTJ.EQ.1 IF NDIM.EQ.1                              -
CD    NINTK       NUMBER OF THIRD DIMENSION INTERVALS                  -
CD                NINTK.EQ.1 IF NDIM.LE.2                              -
CD    ITER        OUTER ITERATION NUMBER AT WHICH FLUX WAS WRITTEN     -
CD    EFFK        EFFECTIVE MULTIPLICATION FACTOR                      -
CD    POWER       POWER IN WATTS TO WHICH FLUX IS NORMALIZED           -
CD    NBLOK       DATA BLOCKING FACTOR                                 -
CD                   IF NDIM.EQ.1, THE GROUP VARIABLE IS BLOCKED       -
CD                    INTO NBLOK BLOCKS (SEE 2D RECORD BELOW)          -
CD                   IF NDIM.GE.2, THE 2ND DIMENSION VARIABLE IS       -
CD                    BLOCKED INTO NBLOK BLOCKS (SEE 3D RECORD)        -
C                                                                      -
C-----------------------------------------------------------------------
C
C
C-----------------------------------------------------------------------
CR          ONE DIMENSIONAL REGULAR TOTAL FLUX  (2D RECORD)            -
C                                                                      -
CC          PRESENT IF NDIM.EQ.1                                       -
C                                                                      -
CL    ((FREG(I,J),I=1,NINTI),J=JL,JU)----SEE STRUCTURE BELOW----       -
C                                                                      -
CW    NINTI*(JU-JL+1)=NUMBER OF WORDS                                  -
C                                                                      -
C     DO 1 M=1,NBLOK                                                   -
C   1 READ(N) *LIST AS ABOVE*                                          -
C                                                                      -
CC         WITH M AS THE BLOCK INDEX, JL=(M-1)*((NGROUP-1)/NBLOK+1)+1  -
CC         AND JU=MIN0(NGROUP,JUP) WHERE JUP=M*((NGROUP-1)/NBLOK+1)    -
C                                                                      -
CD    FREG(I,J)   ONE DIMENSIONAL REGULAR TOTAL FLUX                   -
CD                BY INTERVAL AND GROUP                                -
C                                                                      -
C-----------------------------------------------------------------------
C
C
C-----------------------------------------------------------------------
CR          MULI-DIMENSIONAL REGULAR TOTAL FLUX  (3D RECORD)           -
C                                                                      -
CC          PRESENT IF NDIM.GE.2                                       -
C                                                                      -
CL    ((FREG(I,J),I=1,NINTI),J=JL,JU)----SEE STRUCTURE BELOW----       -
C                                                                      -
CW    NINTI*(JU-JL+1)=NUMBER OF WORDS                                  -
C                                                                      -
C     DO 1 L=1,NGROUP                                                  -
C     DO 1 M=1,NINTK                                                   -
C     DO 1 M=1,NBLOK                                                   -
C   1 READ(N) *LIST AS ABOVE*                                          -
C                                                                      -
CC         WITH M AS THE BLOCK INDEX, JL=(M-1)*((NINTJ-1)/NBLOK+1)+1   -
CC         AND JU=MIN0(NINTJ,JUP) WHERE JUP=M*((NINTJ-1)/NBLOK+1)      -
C                                                                      -
CD    FREG(I,J)   MULTI-DIMENSIONAL REGULAR TOTAL FLUX                 -
CD                BY INTERVAL AND GROUP                                -
C                                                                      -
C-----------------------------------------------------------------------

TRANSX HyperText Manual
TRANSX HyperText Help Package
T-2 Nuclear Information Service