DIAGNOSTICS ZONAUX

Version 3

Gérard Pellerin - CMC

Bernard Dugas - RPN

FÉVRIER 1994

Environnement Canada

INTRODUCTION

Ce document décrit un nouveau concept d'extraction de diagnostics dans les modèles numériques. Le calcul des moyennes se fait pendant l'intégration et les diagnotics sont écrits directement dans un fichier standard, éliminant de ce fait le traitement de conversion d'un fichier séquentiel à un fichier standard fait par la routine FESERI. Des clefs de controle ont été ajoutées et assurent la cohérence de l'extraction. De plus dans ce concept, les calculs de moyennes ne se limitent plus aux bandes de latitude, ils peuvent être par régions ou selon des zones prédéfinies avant l'intégration.

Les travaux de B.Reid et de R.Benoit pour l'extraction des diagnostics zonaux forment la base d'une revision de code qui a été rendue nécessaire suite à la conversion au nouvel ordinateur NEC. La routine d'extraction des variables n'a pas change de nom, ni d'arguments. Elle a cependant été réécrite en entier et est maintenant indépendante de l'extraction des diagnostics ponctuels.

UN NOUVEAU CONCEPT

La liste des variables à extraire est spécifiée à l'entrée du modèle, on a maintenu les deux listes séparées pour une variable de surface (DZNSRF) ou pour une de profil (DZNPRF). Ces listes sont lues par le programme d'entrée, de même que NPTEMPS qui spécifie le pas de temps pour l'écriture des diagnostics. On a introduit une nouvelle clef (MODE) pour déterminer si l'on veut conserver les moyennes (1), le carré des moyennes (2) ou les deux (3). Sauf pour cette dernière la mécanique de spécification et d'extraction demeure la même qu'auparavant.

Le sous-programme d'extraction des diagnostics (MZONXST) n'a pas changé de nom, ni d'arguments, par contre il a été réécrit en entier pour permettre une plus grande flexibilité dans la spécification des zones (pas seulement des bandes de latitude). Une variable qui est dans la liste d'extraction, sera moyennée ou échantillonnée au cours de l'intégration (selon une pondération qui dépend des zones) et stockée dans des vecteurs d'accumulation. Ces vecteurs sont écrits dans le fichier NOUTZON à chaque pas de temps, dans l'éventualité d'une reprise, mais ne sont sauvés que si le pas de temps correspond à la période spécifiée par NPTEMPS, i.e. sauvegarde aux 24 heures. Ce fichier contient aussi toutes les informations pertinentes au modèle (longueur du pas de temps, dimensions de la grille, nombre de niveaux, etc). C'est de cette table qu'est régie l'extraction des diagnostics. La définition des zones (bins) et les pondérations corespondantes (poids) seront aussi écrites au préalable dans ce fichier. De même, pour un modèle où il y a une rotation par rapport au méridien de Greenwhich, comme dans le modèle régional, les angles sont calculés pour l'extraction correcte des composantes de vent (MVZNXST). Aussi, une section de code à été introduite (MZONOPR) pour assurer une séquence correcte des extractions.

DIAGNOSTICS ZONAUX

Le calcul des moyennes zonales est fait sur des cercles de latitude selon des pondérations précalculées et stockées dans le fichier NOUTZON. Chaque noeud de la grille du modèle recoit pour le calcul des moyennes, une pondération égale à l'aire réelle de la bande de latitude. Le noeud est marqué (rang) pour indiquer son appartenance à une bande zonale donnée. Les calculs initiaux, faisant intervenir la grille du modèle ainsi que la largeur des bande zonales, sont effectués par des appels à des sous-programmes appartenant à la programmathèque dynamique. Les sous-programmes LATCAL, ZEFRPRT et ZONINIT sont spécifiques à ce type d'extraction par bandes.

Le problème principal pour les diagnostics zonaux dans le modèle régional, est l'approximation des cercles de latitude par des aires rectangulaires de la grille. Etant donnée la configuration variable de la grille, il faut choisir la largeur des bandes de facon à ce que le nombre de noeuds par bande soit suffisant pour obtenir une moyenne représentative du champ. Cette sélection est effectuée dans la routine LATCAL qui prend comme largeur de bande la plus grande distance entre deux noeuds. Les poids et rangs sont calculés dans ZEFRPRT. Une attention spéciale doit être portée lors de l'extraction des variables vectorielles. Pour le modèle spectral, chaque point de grille sur une même latitude (bande) recoit le même poids. Aussi, étant donné que ce modèle emploie les coordonnées géographiques, la rotation des vecteurs n'est pas un problème. Par contre pour le modèle regional, on tient compte de la rotation de la grille en définissant des angles de rotation pour chaque points de grille. Ce sont le sinus et le cosinus des angles qui sont écrits pour accélérer les extractions. L'initialisation des calculs pour les diagnostics se fait dans ZONINIT. C'est dans ce sous-programme qu'on appelle LATCAL et ZEFRPRT. Il y a aussi un équivalent de ZONINIT dans le modèle global, c'est dans ZONEPDS que sont calculés les poids et rangs de chaque point de grille.

DIAGNOSTICS PAR RÉGIONS

De la même facon que pour l'extraction par bande, il est possible de spécifier des zones associées à des régions, i.e. le continent versus les océans, région1 versus région2, etc. Le calcul des poids se fait dans ZEFRREG, où une région d'intérêt couvrant la portion de la grille uniforme a été définie. Ce genre d'extraction peut être intéressant pour une comparaison avec des diagnostics d'une région équivalente où la résolution aurait été augmentée, ou bien à une région où la grille est irrégulière par exemple.

LE FICHIER NOUTZON

Ce fichier contient tout ce qui concerne les diagnostics. Du type standard RPN, il doit contenir au départ sept enregistrements spécifiant ce qu'il faut pour l'extraction des diagnostics désirés et portes l'étiquette CONTROLE. Tout autre enregistrement porte l'étiquette MZONXST indiquant qu'il a été écrit par le sous-programme d'extraction. La variable "T/" contient la table d'information; le nombre d'extractions, le pas de temps, les dimensions de la grille du modèle, le nombre de zone, le mode pour les extractions, le paramètre de fin normale, etc. La variable "V/" contient la liste des variables à échantilloner, s'il s'agit d'une variable instantanée ou moyennée, sa position relative "/P" dans le vecteur d'accumulation pour le moyennage. Les variables "W/" et "B/" contiennent respectivement les poids et rangs de chaque point de grille. Ce sont les spécifications pour la définition des plages pour lesquelles on désire des diagnostics. Les variables "S/" et "C/" contiennent les sinus et cosinus de l'angle que l'axe horizontal de la grille fait avec le méridien de Greenwhich, ces champs sont requis pour l'extraction des champs vectoriels (MVZNXST), les composantes du vent par exemple. Le fichier peut aussi contenir les niveaux du modèle, et autre information pertinente à la définition des plages. Le fichier contiendra aussi les variables "1/" et "2/"; les vecteurs d'accumulation des moyennes, du carré des moyennes ou des deux. Il y aura autant d'enregistrements que de périodes désirées.

LE FICHIER ZONFILE

Une fois l'intégration terminée, le fichier des diagnostics doit être déballé pour extraire les moyennes zonales (bande ou zone), par variable extraite (TS,UU,QA,etc) et par période désirée (00a 12hrs, 12 a 24hrs, 00 a 24hrs,etc). Le programme DBZONO fait ce travail. Il produit le fichier ZONFILE qui est un fichier standard contenant les variables de surface ou de profil par périodes conforme à celui obtenu après l'exécution de FESERI antérieurement.

Les enregistrements qui contiennent plusieurs niveaux peuvent être visualisés avec un utilitaire d'affichage comme REC. Par ailleurs, le programme GRAPHZN à été concu spécialement pour l'affichage des diagnostics zonaux. Le progiciel ZONTOOL offre une variété de menu permettant de mettre en évidence différents aspects d'une intégration.

DBZONO

Nous donnons plus de détails concernant le déballeur des diagnostics; le programme DBZONO. Les accumulateurs sont écrits dans un fichier standard et dans un format qui permet le transfert d'un ordinateur comme le NEC à celui d'un serveur comme CIDSV08. Le programme s'exécute sur le serveur, il lit le fichier NOUTZON (blocs d'information pour l'ensemble des variables par périodes) et produit le fichier ZONFILE (par variable et par période). Le programme requiert le fichier des constantes et fait aussi une conversion d'unités pour certaines variables du modèle. Il ne contient que quelques sous-programmes, mais certains sont inclus dans la programmathèque de RPN (rmnxlib) et sont nécessaires pour son bon fonctionnement. Une quantité de données telle la table d'information et la liste des variables sera imprimé durant l'exécution du programme. Le déballeur se retrouve dans l'environnement. On l'excute de la facon suivante:

dbzono -ISZONAL noutzon -OMZONAL zonfile -ECHOZ oui

La clef ECHOZ activée permet d'imprimer plus d'information, entre autre la moyenne des zones par niveaux et la moyenne totale. Le programme GRAPHZN requiet des niveaux du modèle pour l'affichage graphique, c'est pourquoi cette information est véhiculée dans les fichiers depuis le début. Le fichier NOUTZON n'est plus requis après la création de ZONFILE.

GRAPHZN

Cet utilitaire, récemment converti par Y.Bourassa pour les serveurs, permet l'affichage graphique des diagnostics zonaux, avec une coordonnée autre que la coordonnée sigma pour la verticale. Ce logiciel affiche les variables par bande et par niveau, selon un menu de directives préétabli. Le fichier metacod qui en résulte peut être traduit pour une unité de sortie telle une imprimante laser. Il n'y a rien de nouveau ici, ce logiciel permet simplement de comparer les champs d'une expérience avec ceux d'une autre ou bien d'un modèle à un autre. Les traces dépendent en quelque sorte des directives spécifiées i.e. le choix d'un menu pour le progiciel ZONTOOL. Il peut y avoir beaucoup de graphiques selon le menu choisi.

SPÉCIFICATION À L'ENTRÉE DU MODÈLE

On doit spécifier quatre clefs pour obtenir des diagnostiques à partir d'une intération de modèle. Celles-ci sont lues dans le programme d'entrée du modèle et sont storées dans la table d'information du fichier noutzon. Il y a:

Ces deux clefs sont suivies d'une liste de variables ayant quatre caractères servant à définir les noms. La structure est la suivante:

Plusieurs appels à mzonxst sont insérés dans le code des programmathèques physique et dynamique. La liste des noms de variable est continuellement sollicité pour voir si les moyennes sont extraites ou non. Quand NPTEMPS=0, une clef de contrôle est activée au départ, cette clef impose une sortie sans sauvegarde. Cette clef sert aussi pour l'extraction ou non des variables vectorielles.

En exemple, dans la liste des variables de surface, '+VE.' indique que la variable VE sera accumulée sur NPTEMPS. Dans la liste des variables de profil, UU devra être immédiatement suivie de la variable VV, de même que dans l'extraction via un appel à MVZNXST. Le caractère de réserve pourrait servir éventuellement à spécifier qu'une variable a une dépendance à la coordonnée verticale ou autre, selon le besoin des usagers.

MZONOPR

Il convient d'élaborer d'avantage sur cette section qui constitue la portion contrôle pour l'extraction des diagnostics. Comme l'extraction se fait par variable, par tranche et par période donnée, indépendamment du modèle, des clefs de contrôle (1,2,3 ou 4) ont été introduites pour assurer la cohérence. Elles assurent que l'ordre est respecté, dans le cas contraire le modèle avorte avec un message pertinent qui indique quelle option doit être évoquée pour une marche normale d'exécution du modèle avec des diagnostics.

La première clef (+1) indique que le fichier doit être ouvert pour lire la table d'information, la liste des variables ou autres et allouer l'espace de travail requis pour le calcul des moyennes. La deuxième (+2) indique qu'il s'agit du début d'un pas de temps (lecture ou non des diagnostics dans le cas d'une reprise). La troisième (+3) indique qu'il s'agit du début d'une tranche verticale et la quatrième (+4) permet de spécifier le nombre de niveaux à extraire. Les mêmes clefs doivent être appelées dans l'ordre inverse, selon qu'il s'agisse de la fin d'une tranche (-3); les sommes sont effectuées pour celle-ci, de la fin d'un pas de temps (-2); les sommes et la table d'information sont écrites ou non, ou de la fin d'une intégration (-1); les mémoires sont désallouées et le fichier NOUTZON est fermé. Le numéro du fichier, le pas de temps et la tranche sont transmis via le deuxième argument de la routine avec le numéro approprié.

Le modèle peut aussi être intégré par tranches qui peuvent être plus courtes que la période spécifiée pour le moyennage. La table d'information contient un paramètre de contrôle qui en tient compte.

EXEMPLES

Cette section illustre différents aspects des diagnostics zonaux obtenus de quelques intégrations avec la clef NPTEMPS activée. Une fois l'intégration terminée, le fichier des diagnostics NOUTZON doit être transferé du super ordinateur à un serveur.

Tout d'abord, examinons le contenu du fichier obtenu pendant l'intégration. Le tableau I montre le contenu du fichier NOUTZON. Il y a 16 enregistrements dans le fichier,Le premier contient la table d'informations (T/) comprenant les variables pertinentes au système d'extraction. Les deux suivants contiennent la liste (V/) et la position respective (P/) de chaque variable dans le vecteur d'accumulation, les poids relatifs(W/) de chaque point de grille, les rangs (B/) son appartenance à chaque bins, le sinus (S/) et le cosinus (C/) de chaque point, qui correspondent à une rotation ou non de la grille. Les niveaux du modèle (S^) et la position des zones le long d'un méridien (L^) nécessaires au programme de graphisme. Notons que ces deux derniers portent l'étiquette de l'expérience tandis que les autres portent l'étiquette CONTROLE. Le fichier contient aussi les vecteurs d'accumulation (1/) par période de 12 heures et portent l'étiquette MZONXST.

Le travail du déballeur n'est pas très compliqué. Il s'agit de lire la table d'informations pour y extraire les dimensions pertinentes aux diagnostics, de lire la liste des variables, les vecteurs d'accumulations et de réécrire l'information par variables pour chaque période extraite du modèle dans le fichier ZONFILE. Le Tableau II montre le contenu du fichier pour une expérience du modele SEF. Il contient les enregistrements par variable pour des périodes de 12 heures. Chaque enregistrement porte l'étiquette de l'expérience SEFEXP33 et c'est ce fichier qui a servi à produire les graphiques de l'Appendice 1.

Examinons maintenant le contenu de la table d'informations pour une expérience du modèle régional obtenue de l'intégration d'un cas d'été débutant à 12Z le 23 juin 1993. Cette information sera imprimée lors de l'exécution du déballeur.

                  LITZON - TABLE DE CONTROLE
                  ==========================
                      NDELTAT=            30
                      DELTAT=            720
                      MODE=                3
                      NI=                225
                      NJ=                175
                      NK=                 25
                      NBIN=               15
                      SOMNK=             670
                      LATMIN=              0
                      ROT=                21

Il s'agit d'une intégration du modèle EFR, dont les dimensions de la grille sont 225 par 175 points avec un pas de temps de 720 secondes. Il y a 15 bandes de latitudes partant de l'équateur qui ont été extraites à tous les 30 pas, i.e. à tous les 6 heures. Les moyennes et le carré des moyennes ont été sauvés (MODE=3). Le programme lit ensuite la liste des variables qui est imprimée (Tableau III) ainsi que leurs positions respectives dans les vecteurs d'accummulations. Le chiffre dans la deuxième colonne indique s'il s'agit d'une variable moyennée (0) ou instantannée (1). La position relative dans les vecteurs d'accumulations est précalculée à l'entrée du modèle. Ce tableau est aussi imprimé lors de l'exécution de DBZONO.

Etant donné que ce fichier est du type standard, il est possible de visualiser certains champs à partir de l'application REC. Les Figures 1 et 2 suivantes montrent les champs S/ et C/ auquels sont superposées les bandes de latitudes, ces deux champs sont complémentaires. La Figure 3 montre le champ W/; le poid relatif de chaque point de grille. Notons que la grille est irrégulière d'où l'aspect bizarre de ce dernier. Le fichier noutzon contient aussi (Tableau 1V) les champs 1/ et 2/ pour 2 pas de temps différents;1, 30 i.e. 720*30/3600=6 heures. Il n'y a qu'un champ portant l'étiquette FJUI23F il contient les niveaux du modèle. Il ne sert pas pour l'extraction comme tel, mais il permet d'identifier le fichier car c'est le seul portant l'étiquette de l'expérience. Les variables échantillonnées au début le sont vraiment au premier pas de temps pour des raisons numériques.

Dans le fichier ZONFILE; chaque enregistrements contient une variable de surface ou de profil contenant les moyennes pour chaque bandes pour toutes les périodes spécifiées par NPTEMPS. L'heure zéro pour les variables (en réalité le premier pas) est nécessaire pour le calcul des tendances. Notons que les niveaux du modèle ont été recopiés du fichier NOUTZON, ces niveaux sont nécessaires pour l'affichage des variables de profil. Les caractéristiques du modèle apparaissent dans la définition des clefs IG1 à IG4. La compaction est à R24, i.e. il y a 24 bits stockées pour chaque valeur de nombre réel. Ce fichier est conforme à celui antérieurement obtenu de FESERI dans l'ancien système d'extraction.

COMMENTAIRES

La première version de MZONXST a été écrite par B.Dugas, selon la conception originale de M.Valin. Le code à été revisé plusieurs fois dans des intégrations du modèle régional avec la version 1.3 de la programmathèque dynamique et la version 2.3 de la programmathèque physique. Aucun changement n'a été requis pour fonctionner sur le super ordinateur NEC, toutefois d'autres modifications ont été apportées aux programmathèques pour parvenir aux différentes versions de la dynamique et de la physique. Le code a été testé en mode multitâche nécessitant aussi quelques modifications mineures.

REMERCIEMENTS

Les conseils judiceux de M.Valin ont été appréciés lors de la mise au point du code d'extraction, spécialement pour le mode multitâche.

REFERENCES

Lee,v., Mailhot,R.,Bilodeau,B. (1993): The Regional Finite Element (RFE) MODEL User's Manual - Version 1. RPN Internal Publication

Chartier Y.(1992): An introduction ot RPN standard files. Section Informatique RPN

Reid, B.(1989): Diagnostiques zonaux dans les modeles EFR et SEF. Document interne RPN

Benoit, R., Reid B, Bilodeau B. (1990): Diagnostics zonaux. Document interne CMC-RPN

Bourassa, Y. (1994) GRAPHZN - Guide de l'usager. Document interne RPN

TABLEAU I

1
   ********************************************************************************************
   *                                                                                          *
   *             VOIR                                                            3.4          *
   *                                                                                          *
   *                                                                                          *
   *          Fri Feb 25 14:25:36 1994                                                        *
   *                                                                                          *
   *          BEGIN  EXECUTION                                                                *
   *                                                                                          *
   ********************************************************************************************
 UNIT = 10 EST OUVERT  RANDOM    
1 FILE=noutzon                                                           TYPE=RANDOM        Fri Feb 25 1994  14:25:36     PAGE   1

      KEY#  ID    IP1   IP2  IP3   NI    NJ   NK  ETIQ.   DATE ORIG.   DEET    NPAS GR  IG1  IG2   IG3   IG4 DTY     SWA   LNG

        0-T/ +     0     0    0    14     1    1 CONTROLE 2021279121   1800       48 G    0    0     0     0 I32    1531    14
        1-V/ +     0     0    0   196     1    1 CONTROLE 2021279121   1800        0 G    0    0     0     0 C08    1561    49
        2-P/ +     0     0    0    48     1    1 CONTROLE 2021279121   1800        0 G    0    0     0     0 I32    1621    48
        3-W/ +     0     0    0   128    64    1 CONTROLE 2021279121   1800        0 G    0    0     0     0 R24    1681  6148

        4-S/ +     0     0    0   128    64    1 CONTROLE 2021279121   1800        0 G    0    0     0     0 R24    7831  6148
        5-C/ +     0     0    0   128    64    1 CONTROLE 2021279121   1800        0 G    0    0     0     0 R24   13981  6148
        6-B/ +     0     0    0   128    64    1 CONTROLE 2021279121   1800        0 G    0    0     0     0 I24   20131  6144
        7-S^ +     0     0    0    21     1    1 SEFEXP33 2021279121   1800        0 G    0    0     0     0 R24   26281    20

        8-L^ +     0     0    0    64     1    1 SEFEXP33 2021279121   1800        0 G    0    0     0     0 R24   26311    52
        9-1/ +     0     0    0    64   567    1 MZONXST  2021279121   1800        0 G    0    0     0     0 E32   26371 36288
       10-2/ +     0     0    0    64   567    1 MZONXST  2021279121   1800        0 G    0    0     0     0 E32   62671 36288
       11-1/ +     0     1    0    64   567    1 MZONXST  2021279121   1800        1 G    0    0     0     0 E32   98971 36288

       12-2/ +     0     1    0    64   567    1 MZONXST  2021279121   1800        1 G    0    0     0     0 E32  135271 36288
       13-1/ +     0    24    0    64   567    1 MZONXST  2021279121   1800       24 G    0    0     0     0 E32  171571 36288
       14-2/ +     0    24    0    64   567    1 MZONXST  2021279121   1800       24 G    0    0     0     0 E32  207871 36288
       15-1/ +     0    48    0    64   567    1 MZONXST  2021279121   1800       48 G    0    0     0     0 E32  244171 36288

       16-2/ +     0    48    0    64   567    1 MZONXST  2021279121   1800       48 G    0    0     0     0 E32  280471 36288


 STATISTIQUES

 DIMENSION DU DIRECTEUR DISQUE       100
 NOMBRE D ENTREES UTILISEES           17
 LONGUEUR DU FICHIER              316770 MOTS
 NOMBRE D ECRITURES                   21
 NOMBRE DE RE-ECRITURES                4
 NOMBRE D EFFACAGES                    4
 NOMBRE D EXTENSIONS                   0
 NOMBRE DE CORRECTIONS                 0

 ***************************************** 
 UNITE FORTRAN IUN=  10 EST FERME

   ********************************************************************************************
   *                                                                                          *
   *             VOIR                                                           O.K.          *
   *                                                                                          *
   *          Fri Feb 25 14:25:36 1994                                                        *
   *                                                                                          *
   *          END EXECUTION                                                                   *
   *                                                                                          *
   *          CP SECS =      0.010                                                            *
   *                                                                                          *
   ********************************************************************************************

TABLEAU II

1
   ********************************************************************************************
   *                                                                                          *
   *             VOIR                                                            3.4          *
   *                                                                                          *
   *                                                                                          *
   *          Wed Feb 23 09:03:38 1994                                                        *
   *                                                                                          *
   *          BEGIN  EXECUTION                                                                *
   *                                                                                          *
   ********************************************************************************************
 UNIT = 10 EST OUVERT  RANDOM    
1 FILE=zonfile                                                           TYPE=RANDOM        Wed Feb 23 1994  09:03:38     PAGE   1

      KEY#  ID    IP1   IP2  IP3   NI    NJ   NK  ETIQ.   DATE ORIG.   DEET    NPAS GR  IG1  IG2   IG3   IG4 DTY     SWA   LNG

        0-S^ Z     0     0    0    21     1    1 SEFEXP33 2021279121   1800        0 G    0    0     0     0 R24   57391    20
        1-SH Z     0     0    0    21     1    1 SEFEXP33 2021279121   1800        0 G    0    0     0     0 R24   57541    20
        2-L> Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        0 G    0    0     0     0 R24   57691    52
        3-TS Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   57991    52

        4-VE Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   58291    52
        5-SE Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   58591    52
        6-P0 Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   60811    52
        7-FS Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   64951    52

        8-FI Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   69091    52
        9-FW Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   73231    52
       10-FC Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   77371    52
       11-FV Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   81511    52

       12-FL Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2191    52
       13-FQ Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2251    52
       14-EI Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2311    52
       15-EV Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2371    52

       16-SI Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2431    52
       17-AP Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2491    52
       18-RR Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2551    52
       19-PR Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2611    52

       20-SN Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2671    52
       21-SR Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2731    52
       22-NT Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2791    52
       23-RN Z     0     0    0    64     1    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2851    52

       24-UU Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    2911  1012
       25-VV Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    3931  1012
       26-SS Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    4951  1012
       27-TT Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    5971  1012

       28-TF Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    6991  1012
       29-TA Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    8011  1012
       30-TI Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24    9031  1012
       31-T2 Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   10051  1012

       32-HU Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   11071  1012
       33-HR Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   12091  1012
       34-NU Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   13111  1012
       35-QF Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   14131  1012

       36-QA Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   15151  1012
       37-EN Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   16171  1012
       38-KM Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   17191  1012
       39-LM Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   18211  1012

       40-TU Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   19231  1012
       41-TV Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   20251  1012
       42-GU Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   21271  1012
       43-GV Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   22291  1012

       44-TK Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   23311  1012
       45-QK Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   24331  1012
       46-NS Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   25351  1012
       47-NC Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   26371  1012
1 FILE=zonfile                                                           TYPE=RANDOM        Wed Feb 23 1994  09:03:38     PAGE   2

      KEY#  ID    IP1   IP2  IP3   NI    NJ   NK  ETIQ.   DATE ORIG.   DEET    NPAS GR  IG1  IG2   IG3   IG4 DTY     SWA   LNG

       48-QL Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   27391  1012
       49-EP Z     1     0    0    64    21    1 SEFEXP33 2021279121   1800        1 G    1    0     0     0 R24   28411  1012
       50-TS Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29431    52
       51-VE Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29491    52

       52-SE Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29551    52
       53-P0 Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29611    52
       54-FS Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29671    52
       55-FI Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29731    52

       56-FW Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29791    52
       57-FC Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29851    52
       58-FV Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29911    52
       59-FL Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   29971    52

       60-FQ Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30031    52
       61-EI Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30091    52
       62-EV Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30151    52
       63-SI Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30211    52

       64-AP Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30271    52
       65-RR Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30331    52
       66-PR Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30391    52
       67-SN Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30451    52

       68-SR Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30511    52
       69-NT Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30571    52
       70-RN Z     0    12   24    64     1    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30631    52
       71-UU Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   30691  1012

       72-VV Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   31711  1012
       73-SS Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   32731  1012
       74-TT Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   33751  1012
       75-TF Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   34771  1012

       76-TA Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   35791  1012
       77-TI Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   36811  1012
       78-T2 Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   37831  1012
       79-HU Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   38851  1012

       80-HR Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   39871  1012
       81-NU Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   40891  1012
       82-QF Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   41911  1012
       83-QA Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   42931  1012

       84-EN Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   43951  1012
       85-KM Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   44971  1012
       86-LM Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   45991  1012
       87-TU Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   47011  1012

       88-TV Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   48031  1012
       89-GU Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   49051  1012
       90-GV Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   50071  1012
       91-TK Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   51091  1012

       92-QK Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   52111  1012
       93-NS Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   53131  1012
       94-NC Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   54151  1012
       95-QL Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   55171  1012
1 FILE=zonfile                                                           TYPE=RANDOM        Wed Feb 23 1994  09:03:38     PAGE   3

      KEY#  ID    IP1   IP2  IP3   NI    NJ   NK  ETIQ.   DATE ORIG.   DEET    NPAS GR  IG1  IG2   IG3   IG4 DTY     SWA   LNG

       96-EP Z     1    12   24    64    21    1 SEFEXP33 2021279121   1800       24 G    1    0     0     0 R24   56191  1012
       97-TS Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57211    52
       98-VE Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57271    52
       99-SE Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57331    52

      100-P0 Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57421    52
      101-FS Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57481    52
      102-FI Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57571    52
      103-FW Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57631    52

      104-FC Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57751    52
      105-FV Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57811    52
      106-FL Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57871    52
      107-FQ Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   57931    52

      108-EI Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58051    52
      109-EV Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58111    52
      110-SI Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58171    52
      111-AP Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58231    52

      112-RR Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58351    52
      113-PR Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58411    52
      114-SN Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58471    52
      115-SR Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58531    52

      116-NT Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58651    52
      117-RN Z     0    24   48    64     1    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58711    52
      118-UU Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   58771  1012
      119-VV Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   59791  1012

      120-SS Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   60871  1012
      121-TT Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   61891  1012
      122-TF Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   62911  1012
      123-TA Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   63931  1012

      124-TI Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   65011  1012
      125-T2 Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   66031  1012
      126-HU Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   67051  1012
      127-HR Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   68071  1012

      128-NU Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   69151  1012
      129-QF Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   70171  1012
      130-QA Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   71191  1012
      131-EN Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   72211  1012

      132-KM Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   73291  1012
      133-LM Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   74311  1012
      134-TU Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   75331  1012
      135-TV Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   76351  1012

      136-GU Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   77431  1012
      137-GV Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   78451  1012
      138-TK Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   79471  1012
      139-QK Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   80491  1012

      140-NS Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   81571  1012
      141-NC Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   82591  1012
      142-QL Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   83611  1012
      143-EP Z     1    24   48    64    21    1 SEFEXP33 2021279121   1800       48 G    1    0     0     0 R24   84631  1012


 STATISTIQUES

 DIMENSION DU DIRECTEUR DISQUE       144
 NOMBRE D ENTREES UTILISEES          144
 LONGUEUR DU FICHIER               85650 MOTS
 NOMBRE D ECRITURES                  144
 NOMBRE DE RE-ECRITURES                0
 NOMBRE D EFFACAGES                    0
 NOMBRE D EXTENSIONS                  12
 NOMBRE DE CORRECTIONS                 0

 ***************************************** 
 UNITE FORTRAN IUN=  10 EST FERME

   ********************************************************************************************
   *                                                                                          *
   *             VOIR                                                           O.K.          *
   *                                                                                          *
   *          Wed Feb 23 09:03:38 1994                                                        *
   *                                                                                          *
   *          END EXECUTION                                                                   *
   *                                                                                          *
   *          CP SECS =      0.130                                                            *
   *                                                                                          *
   ********************************************************************************************

TABLEAU III

LITZON - Liste des variables
=============================
 .TS.           1           2
 +SE.           0           3
 +P0.           0           4
 +FS.           0           5
 +FI.           0           6
 +FW.           0           7
 +FC.           0           8
 +FV.           0           9
 +FL.           0          10
 +FQ.           0          11
 +EI.           0          12
 +EV.           0          13
 +SI.           0          14
 +AP.           0          15
 +RR.           0          16
 +PR.           0          17
 +SN.           0          18
 +RC.           0          19
 +NT.           0          20
 +RN.           0          21
 .UU>           1          46
 .VV>           1          71
 .SS.           1          96
 .TT.           1         121
 .HU.           1         146
 +TA.           0         171
 +QA.           0         196
 +EP.           0         221
 +TK.           0         246
 +QK.           0         271
 .HR.           1         296
 +NU.           0         321
 +TI.           0         346
 +T2.           0         371
 +NS.           0         396
 +NC.           0         421
 +K2.           0         446
 +GU>           0         471
 +GV>           0         496
 +KM.           0         521
 +TU>           0         546
 +TV>           0         571
 +KT.           0         596
 +KQ.           0         621
 +QF.           0         646
 +TF.           0         671

TABLEAU IV

1
   ********************************************************************************************
   *                                                                                          *
   *             VOIR                                                            3.4          *
   *                                                                                          *
   *                                                                                          *
   *          Tue Mar  8 10:53:23 1994                                                        *
   *                                                                                          *
   *          BEGIN  EXECUTION                                                                *
   *                                                                                          *
   ********************************************************************************************
 UNIT = 10 EST OUVERT  RANDOM    
1 FILE=noutzon                                                           TYPE=RANDOM        Tue Mar  8 1994  10:53:23     PAGE   1

      KEY#  ID    IP1   IP2  IP3   NI    NJ   NK  ETIQ.   DATE ORIG.   DEET    NPAS GR  IG1  IG2   IG3   IG4 DTY     SWA   LNG

        0-T/ +     0     0    0    14     1    1 CONTROLE 4062393121   1200       36 X    0    0     0     0 I32    1531    14
        1-V/ +     0     0    0   192     1    1 CONTROLE 4062393121   1200        0 X    0    0     0     0 C08    1561    48
        2-P/ +     0     0    0    47     1    1 CONTROLE 4062393121   1200        0 X    0    0     0     0 I32    1621    47
        3-W/ +     0     0    0   125   101    1 CONTROLE 4062393121   1200        0 X    0    0     0     0 R24    1681  9473

        4-S/ +     0     0    0   125   101    1 CONTROLE 4062393121   1200        0 X    0    0     0     0 R24   11161  9473
        5-C/ +     0     0    0   125   101    1 CONTROLE 4062393121   1200        0 X    0    0     0     0 R24   20641  9473
        6-B/ +     0     0    0   125   101    1 CONTROLE 4062393121   1200        0 X    0    0     0     0 I24   30121  9469
        7-S^ +     0     0    0    25     1    1 FNECD07  4062393121   1200        0 X    0    0     0     0 R24   39601    23

        8-1/ +     0     1    0    14   670    1 MZONXST  4062393121   1200        1 X    0    0     0     0 E32   39631  9380
        9-2/ +     0     1    0    14   670    1 MZONXST  4062393121   1200        1 X    0    0     0     0 E32   49021  9380
       10-1/ +     0    12    0    14   670    1 MZONXST  4062393121   1200       12 X    0    0     0     0 E32   58411  9380
       11-2/ +     0    12    0    14   670    1 MZONXST  4062393121   1200       12 X    0    0     0     0 E32   67801  9380

       12-1/ +     0    24    0    14   670    1 MZONXST  4062393121   1200       24 X    0    0     0     0 E32   77191  9380
       13-2/ +     0    24    0    14   670    1 MZONXST  4062393121   1200       24 X    0    0     0     0 E32   86581  9380
       14-1/ +     0    36    0    14   670    1 MZONXST  4062393121   1200       36 X    0    0     0     0 E32   95971  9380
       15-2/ +     0    36    0    14   670    1 MZONXST  4062393121   1200       36 X    0    0     0     0 E32  105361  9380


 STATISTIQUES

 DIMENSION DU DIRECTEUR DISQUE       100
 NOMBRE D ENTREES UTILISEES           16
 LONGUEUR DU FICHIER              114750 MOTS
 NOMBRE D ECRITURES                   20
 NOMBRE DE RE-ECRITURES                4
 NOMBRE D EFFACAGES                    4
 NOMBRE D EXTENSIONS                   0
 NOMBRE DE CORRECTIONS                 0

 ***************************************** 
 UNITE FORTRAN IUN=  10 EST FERME

   ********************************************************************************************
   *                                                                                          *
   *             VOIR                                                           O.K.          *
   *                                                                                          *
   *          Tue Mar  8 10:53:23 1994                                                        *
   *                                                                                          *
   *          END EXECUTION                                                                   *
   *                                                                                          *
   *          CP SECS =      0.020                                                            *
   *                                                                                          *
   ********************************************************************************************

MAN PAGES

DBZONO

DBZONO(1)            UTILITAIRE RPN                 DBZONO(1)

NOM
    dbzono - Deballeur de diagnostics zonaux. Les vecteurs 
             d'accumulation ecrits durant l'integration sont
             separes par variables pour les bandes specifiees.

USAGE
    dbzono -ISZONAL noutzon -OMZONAL zonfile -ECHOZ non -DATE 

DESCRIPTION
    dbzono est un programme d'interface qui lit un fichier standard
    NOUTZON et produit le fichier ZONFILE. Celui-ci est requis pour
    le tracage de variables par bandes de latitude (GRAPHZN).

    Les arguments:

    -ISZONAL nom du fichier standard d'entree
    -OMZONAL nom du fichier standard de sortie
    -ECHOZ   des diagnostics sont imprimes ou non durant l'execution 
    -DATE    oprun/oui/non (facultatif)
    
    Le fichier standard noutzon n'est plus requis apres l'execution
    de dbzono. Toutes les informations requises pour les moyennes par
    variables et bandes de latitude sont ecrites dans zonfile.

    Quoiqu'il puisse traiter d'autre genre de moyenne(i.e. par regions)
    dbzono a ete concu specifiquement pour GRAPHZN.

CONTENU DE NOUTZON
    Une integration avec diagnostics zonaux aura produit un fichier 
    contenant des enregistrements de controle et des enregistrements
    d'extraction. A chaque NPTEMPS, une table d'information est remise
    a jour. Cette table contient les dimensions de la grille, le pas
    de temps, le nombre de bandes, le nombre de pas pour l'experience
    et une cle de controle requise pour une integration par clone.

    Le fichier contient aussi la liste des variables a extraire,
    les poids relatifs de chaque points de grille par rapport a la
    surface du domaine et son rang (sa position dans le vecteur 
    d'accumulation). Cette information est ecrite une fois seulement
    au debut de l'integration. De plus, des enregistrements contiennent
    les niveaux du modele et la position relative des bandes. Ces
    informations constituent les axes pour le logiciel de graphisme.

    Les accumulateurs dans lesquels les variables du modele sont
    moyennees ou echantilonnees sont ecrits dans un enregistrement dit
    d'extraction. Le carre des moyennes peut aussi etre calcule.
    Ces enregistrements seront sauves en meme temps.

CONTENU DE ZONFILE
    La moyenne pour chaque variable se fait sur des periodes specifiees
    et il peut y en avoir plusieurs selon la duree de l'integration.
    Par exemple, pour une integration de 48 heures on peut vouloir
    sauver les moyennes a toutes les 12 heures ou 24 heures.
    Le fichier de sortie contient donc ces moyennes pour chaques
    periodes. Les enregistrements qui contiennent plusieurs niveaux 
    peuvent etre visualiser avec REC. Ce fichier est conforme a ce qui
    est requis pour GRAPHZN, le trace des variables par bandes.

INFORMATION ADDITIONELLE
    Le deballeur peut manipuler un fichier provenant d'une integration
    sur MIPS (32 bits) ou sur NEC (64bits/32bits)  

    Le contenu du fichier NOUTZON est ecrit de sorte qu'il puisse etre
    lu a partir d'un serveur. La compaction est a 32 bits et la table
    d'information contient seulement des entiers. La liste des 
    variables est ecrite en format R4A. Les vecteurs d'accumulation 
    sont ecrits en format IEEE.

    Les routines requises: BSORT,DEBALZN,LITZON,OUTFLD,ZONFIN,WRITLZN
                           DIFUVD8,QQEXIT,R4STRG






EXEMPLES
    Lors de l'execution de DBZONO, le premier enregistrement qui est 
    lu est la table d'information. Cette table apparait comme suit:

    LITZON - table de controle
    ==========================
    NDELTAT=          24
     DELTAT=        1800
       MODE=           3
         NI=         128
         NJ=          64
         NK=          21
       NBIN=          64
      SOMNK=         107
     LATMIN=         -90
    ==========================

    Ces parametres ont ete prealablement definis avant l'integration.
    et ecrit dans un enregistrement de controle.
    On a sauve les diagnostics a tous les 24 pas de 1800 secondes, soit
    aux 12 heures. Les moyennes et le carre des moyennes sont sauves
    (MODE=3). Il y a 64 bandes de latitude et la position finale de la 
    derniere variable extraite est a 107 dans le vecteur d'accumulation
    Il y 128 par 64 points de grille dans l'horizontale et 21 niveauxi
    dans la verticale.

    La lecture des deux enregistrements suivant nous retourne les 
    niveaux et la position relative des bandes de latitude.
    Les niveaux intermediaires seront calcules s'il n'ont pas ete
    ecrit dans le fichier.

    Suite a la lecture de l'enregistrement de controle des variables,
    la liste des variables extraites sera ecrite de meme que les 
    proprietes de cette variable, i.e. s'il s'agit d'une variable
    echantillonee ou moyennee et sa position relative dans le vecteur
    d'accumulation.
  
    LITZON - liste des variables
    ============================
    .TS.           1           2
    +VE.           0           3
    .UU>           1          24
    .VV>           1          45
    .SS.           1          66
    .TT.           1          87
    .TT.           1         108
    ============================
     ETIKEX=    SEFEXP27

    Meme si la variable comporte 4 caracteres, seul les trois premiers
    sont utilises. La deuxieme colonne indique s'il s'agit d'une
    variable echantillonee(1) ou moyennee(0). Le caractere . ou
    + dans le nom de la variable indique la meme chose. La troisieme
    colonne indique s'il s'agit d'une tranche verticale ou non, c'est
    l'indicateur de position des niveaux verticaux correspondant a
    cette variable dans la tranche d'extraction.
    Il y a deux variables de plus dans la liste ou l'etiquette de
    l'experience a ete encodee. Dans l'exemple, l'etiquette indique
    qu'il s'agit d'une integration du modele globale.
 
    Avec ces informations, il est possible de lire les accumulateurs et
    de les scinder par variables pour chaque periode sauvegardee.

 
EXPLICATION ADDITIONELLE
    voir MZONOPR(1),MZONXST(2),MVZNXST(3) pour l'extraction des
    variables du modele.

INZONO

INZONO(1)             UTILITAIRES RPN                   INZONO(1)

NOM
    inzono - Routine d'emballage des diagnostics zonaux.
             Les enregistrements de controle sont precalcules

APPEL
     INZONO (POIDS, RANG, THETA, NDELTAT, DELTAT, MODE,
             DZNSRF, ZSURFAC, DZNPRF, ZPROFIL, LATMIN,
             ROT, IUN, S, ETIKX, IDAYO, NI, NJ, NK)

*ARGUMENTS
*   POIDS   - poids relatifs des points de grille pour extraction
*   RANG    - le numero de la bande pour position des accumulateurs
*   THETA   - angle de rotation de la grille p/r Greenwich
*   NDELTAT - nombre de pas de temps d'accumulations
*   DELTAT  - nombre de seconde entre chaque pas de temps
*   MODE    - sauve les moyennes, la somme des moyennes ou les deux
*   DZNSRF  - nombre de variables de surface
*   ZSURFAC - variables de surface demandees
*   DZNPRF  - nombre de variables de surface
*   ZPROFIL - variables de profil demandees
*   LATMIN  - plus grand cercle de latitude inscrit dans la grille
*   ROT     - l'angle que fait l'axe des X avec le meridien Greenwhich
*   IUN     - le numero du fichier standard ou l'on ecrit l'information
*   S       - les niveaux du modele
*   ETIKX   - l'etiket de l'experience
*   IDAYO   - le datestamp de l'experience
*   NI      - dimension horizontale de la grille du modele
*   NJ      - deuxieme dimension horizontale de la grille
*   NK      - nombre de niveaux du modele

NOTES
   Dans le modele global la tranche correspond a une bande de
   latitude complete. Dans le modele regional, la tranche correspond
   a la deuxieme dimension du plan horizontale de la grille, i.e. la
   direction Y, la troixieme etant la direction Z, i.e. les niveaux du
   modele. Une tranche verticale correspond au plan verticale dans la
   direction X de la grille.
   Les rangs assignes a chaque point de grille, assure l'appartenance
   a une region d'interet. Par exemple une bande de latitude pour les
   diagnostics zonaux.
   Les poids assignes a chaque point de grille accorde une importance
   relative du point dans la region definie. Ces vecteurs sont
   precalcules dans la routine ZEFRPRT pour le modele regional et
   ZONEPDS pour le modele global.


INFORMATIONS REQUISES POUR L'EXTRACTION
   Les enregistrements de CONTROLE contiennent des definitions propres
   a une extraction des diagnostics. Ces informations sont contenues
   dans des enregistrements predefinis avant l'integration d'un modele

   Les cles suivantes definissent ces enregistrements:

   T/ la table d'information: le nombre d'extractions, les dimensions 
      de la grille, le pas de temps, le nombre de bandes de latitude,
      l'angle de rotation si tel est le cas
   V/ la liste des variables a echantillonner ou a moyenner
   P/ la position relative des variables dans les accumulateurs
   W/ les poids respectifs de chaque points de grille
   B/ le rang i.e l'appartenance a une bande de latitude
   S/ les sinus de l'angle de rotation i.e. angle que fait l'axe des
      horizontale de la grille avec le meridien de Greenwhich
   C/ les cosinus de l'angle de rotation. Ces deux derniers sont requis
      pour l'extration des composantes vectorielles i.e. UU et VV
   L^ la position des poins de grille le long d'un meridien
      pour le modele SEF. Necessaire pour le logiciel de graphisme.
   S^ les niveaux sigmas. Necessaire pour le logiciel de graphisme.

DOCUMENTATION ADDITIONELLE 
   voir MZONOPR, MZONXST, MVZNXST, DBZONO.

MVZNXST

MVZNXST(3)             UTILITAIRES RPN                   MVZNXST(3)

NOM
    mvznxst - Routine d'extraction des composantes vectorielles des
              diagnostics zonaux.

APPEL
    MVZNXST ( X,Y,XNOM,YNOM,J,NDIM,FACF,ORD,xxxx)

ARGUMENTS 
    X,Y   - Composantes dans la direction X et Y du plan horizontal
    XNOM  - Chaine de deux caracteres. Variables a extraire ou non.
    YNOM  - Idem.  Peut aussi etre une tendance vectorielle.
    J     - Tranche a extraire
    NDIM  - Premiere dimension des composantes du vecteur X ou Y
    FACF  - Facteur multiplicatif a appliquer avant transfert
            dans les accumulateurs
    ORD   - Cle specifiant ce qui doit etre sauve
            (-1) tout le vecteur a sauve
            (0) extraction du niveau NK seulement 
            (K) extraction du K ieme niveau du modele
    xxxx  - ne sert plus

NOTES
   Dans le modele global la tranche correspond a une bande complete de
   latitude. Dans le modele regional, la tranche correspond
   a la deuxieme dimension du plan horizontal de la grille, i.e. la 
   direction Y, la troixieme etant la direction Z, i.e. les niveaux du
   modele. Une tranche verticale correspond au plan verticale dans la 
   direction X de la grille.
   Les rangs assignes a chaque point de grille, assure l'appartenance
   a une region d'interet, par exemple une bande de latitude pour les
   diagnostics zonaux. Le poid assigne a chaque point de grille accorde
   une importance relative au point dans la region definie.
   Ces vecteurs sont precalcules dans la routine ZEFRPRT pour le modele
   regional et ZONEPDS pour le modele global.
   Les enregistrements de controle sont definis dans la routine INZONO.

   L'extraction se fait une tranche a la fois. L'extraction correcte
   d'un vecteur a 3 dimensions est faite par la routine XST3D, qui elle
   meme appelle MZONXST.

   Une conversion d'unite peut etre effectuer via FAFC au moment de
   l'extraction des composantes.

   Pour minimiser le cout de l'extraction des composantes, il est
   important que les deux variables soient une a la suite de l'autre
   dans la liste des variables a extraire.

   L'extraction se fait une tranche a la fois. 

   Une conversion d'unite peut etre effectuer via FAFC au moment de
   l'extraction des composantes vectorielles.

   Le mode multitache est limite a quatre processeurs( maximum 4 )

DOCUMENTATION ADDITIONELLE 
   voir MZONOPR, MZONXST, DBZONO.

MZONOPR

MZONOPR(1)             UTILITAIRES RPN                   MZONOPR(1)

NOM
    mzonopr - Routine de controle pour l'extraction des
              diagnostics zonaux.

APPEL
    MZONOPR (OPR,VAL)

ARGUMENTS 
    OPR   - clef de changement de transition (+:debut ou -:fin)       
            (1) ouverture et fermeture du fichier noutzon
            (2) debut et fin d'un pas de temps
            (3) debut et fin d'une tranche a extraire
            (4) specification du nombre de niveau a extraire

    VAL   - Valeur associee avec la transition d'etat
            si |opr| = 1  l'unite d'entree/sortie (IUN)
            si |opr| = 2  le pas de temps en cours (KOUNT)
            si |opr| = 3  le numero de la tranche (J) 
            si |opr| = 4  le nombre de niveau  a extraire pour une
                          tranche verticale (KA)

NOTES
   La specification des cles est indispensable au bon fonctionnement
   de l'extraction des diagnostiques zonaux. Une variable d'etat
   est maintenue a jour tout au long de l'integration et un test de
   validite assure que l'ordre de transition est respectee.
   Par exemple, il importe d'ouvrir le fichier avant tout autre
   operation d'extraction. Une bonne marche requiert les transitions
   suivantes: +1 ouverture du fichier (IUN) et allocation memoire des 
   vecteurs d'accumulations et autres vecteurs de travail; +2 Debut
   d'une integration avec le passage d'un pas de temps approprie en
   deuxieme argument. +3 Debut d'une extraction avec le numero de la
   tranche en deuxieme argument; -3 indique la fin de l'extraction
   pour cette tranche.  Toutes les tranches doivent etre fermees avant
   la transition suivante. -2 indique que le pas de temps courant est
   termine. -1 indique que l'integration est terminee. Il y aura 
   ecriture des vecteurs d'accumulations, desallocation memoire des
   champs et fermeture du fichier (IUN).

REMARQUES    
   Il y a une certaine rigidite dans la procedure d'extraction qui 
   est necessaire pour economiser le temps de calcul (CPU).
   Quand le systeme d'extraction rencontre un etat innaproprie,
   l'integration du modele avorte immediatement avec un message
   d'erreur approprie. Les parametres de controle sont predefinis 
   et ecris dans la table d'information qui est mise a jour a chaque
   ecriture des accumulateurs. De meme, les variables que l'on veut
   extraire sont passees a la liste de comparaison qui est stockee
   dans un enregistrement de controle lu a l'ouverture du fichier.

   Une routine d'initialisation ZONINIT a ete ecrite pour les deux
   modeles. Tous les champs qui sont requis sont precalcules et stores
   a l'entre du modele.

   L'extraction se fait une tranche a la fois. L'extraction correcte
   d'un vecteur a trois dimensions est fait par la routine XST3D qui
   elle meme appelle la routine MZONXST.
  
   Le mode multitache est limite a quatre processeurs( maximum 4 )

DOCUMENTATION ADDITIONELLE 
   voir MZONXST, MVZNXST, DBZONO.

MZONXST

MZONXST(2)             UTILITAIRES RPN                   MZONXST(2)

NOM
    mzonxst - Routine d'extraction des diagnostics zonaux.

APPEL
    MZONXST (Z,NOM,J,NDIM,xxxx,FACF,ORD,xxxx)

ARGUMENTS 
    Z     - vecteur a extraire provenant du modele
    NOM   - Chaine de deux caracteres a extraire ou non. 
    J     - Tranche a extraire
    NDIM  - Premiere dimension du vecteur Z
    heure - heure de l'extraction, ne sert plus
    FACF  - Facteur multiplicatif a appliquer avant transfert
            dans les accumulateurs
    ORD   - Cle specifiant ce qui doit etre sauve
            (-1) tout le vecteur a sauve
            (0) un niveau seulement a sauve
            (K) extraction de KA niveaux du modele
    xxxx  - ne sert plus

NOTES
   Dans le modele global la tranche correspond a une bande complete de
   latitude. Dans le modele regional, la tranche correspond
   a la deuxieme dimension du plan horizontal de la grille, i.e. la 
   direction Y, la troixieme etant la direction Z, i.e. les niveaux du
   modele. Une tranche verticale correspond au plan verticale dans la 
   direction X de la grille.
   Les rangs assignes a chaque point de grille, assure l'appartenance
   a une region d'interet, par exemple une bande de latitude pour les
   diagnostics zonaux. Le poid assigne a chaque point de grille accorde
   une importance relative au point dans la region definie.
   Ces vecteurs sont precalcules dans la routine ZEFRPRT pour le modele
   regional et ZONEPDS pour le modele global.
   Les enregistrements de controle sont definis dans la routine INZONO.

   L'extraction se fait une tranche a la fois. L'extraction correcte
   d'un vecteur a 3 dimensions est faite par la routine XST3D, qui elle
   meme appelle MZONXST.
  
   Une conversion d'unite peut etre effectuer via FAFC au moment de
   l'extraction des composantes.

   Le mode multitache est limite a quatre processeurs( maximum 4 )

DOCUMENTATION ADDITIONELLE 
   voir MZONOPR, MVZNXST, DBZONO.