Voir Egalement $ZOOM/Help/Users/Proc/Easy_printing_facilities PROC $ZOOM/Help/Users/Zinit/ZDL/Zdl.html ZINIT mercredi 07/07/1993 ===================(Al1) De Zinit, on peut définir des niveaux de diagnostics, vérifs et print_out, en affectant des valeurs entières au tableau: OZPLVL(12). (Cependant, le mot 6 gère les fichiers pour viZu) La valeur nulle supprime les print ou vérif. ( le méta signe "*" indique un ET logique avec d'autres symboles, ) OZPLVL( ): =: (D):=Default (=0 supprime toute sortie dans la rubrique.) 1 Structure info =1 (D) tree.hlp =2 interfaces * ZPRINT(LFm) =3 Cl et Tr Cx * ZPRINT(LCl/Tr) routines concernees: ( DOPLUG, OW2PAW, OSK2HP ) 2 Processeurs (Géré par Users) =1 (D) =any exemple: in Zinit OZPLVL(2)=3; ( Print out level 3) in Processors : IF ZPrint_lvl(k,LCl/Tr)<...> remplace le IF ZPRINT(L..)<> il génère IF ZPRINT.and.k.ge.OZPLVL(2) <> 3 in D_loop =1 (D) Sorties à TOL ok * MxDeep * ZPRINT(LFM) =2 all-along Loop infos id ( OUPEQ, ZOOM ) note : *Mxdeep * Zprint(LFM) signifie que l'on demande un niveau de sorties qui sera effectue pour les familles de profondeur .le. Mxdeep, que l'on aura demande d'imprimer dans zinit et pour les pas de temps pour lesquels on a ZPRINT = .TRUE. 4 Step_Advance (Mx_only) =1 Scatter plot only =2 (D) Full Mx * MxDeep * ZPRINT(LFM) ( MOVUP, ZOOM ) 5 Sortie console (ou ..._batch.err) =1 (D) Step end =2 fin D_loop =3 some more, for very long jobs. ( ZOOM ) 6 Sorties pour viZu =-1 Supprime tout =0 ne supprime que la CDFile Si positif ou nul: >>>>>>(en développement le 16/05/94) =1[modulo10] Héra Mx only(not implemented) ( => 1 ne supprime que la MXMX ) =2 (D) MXMX full =...+10 MZMX = [MXMX]-1 (pour post-traitement à la Bianco) =...+100 MDMX(MXMX à la sortie du D_Loop) ( OPSCMX,OEQU,MOVUP,DZSPMX ) 7 Vérif info et mémoire =1 Un DZVeri par step et DZSTORE au premier step et final =2 (D) DZVeri at end of EOLMAX DZStore after Zinit =3 some more DZSTORE (Very long jobs) =9 Debug option: some more DZVERI (in ZOOM,OICLTR) (even if not.ZPRINT.) ( OUPEQ, MOVUP, ZOOM ) 8 Matrix infos =1 (D)Tridiag message * MxDeep&ZPRINT(LFM) =2 Conditionnement (not implemented) ( ORES ) 9 Choix d'une version de Ker =1 (D)Version proxima =2 Version futura (F_ et V_ entries). Tr bit flags. ( not implemented ) ( ONCO, ONUMA, OTRDA, OCMX, OF2MXT ) 10 Futura Clubbered Cx Bug Long Test =1 Test print =2 Debugger as it is ( not implemented ) ( OCIC, OFRAME, OIXFAD, ONTRIX ) $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$ Les OZPLVL(11-12) sont réservées aux programmeurs du noyau. =1 (D) $$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ OZPLVL(11) : Tests de gestion des pivots dans ogaus/moxequ/ludcomp : 1 : defaut 2 : print index de gestion des permutations de lignes 3 : print des matrices 4 : call LUDCOM in lieu of LUDCMR avec gestion pivots des nicénéidés 5 : comme 4 mais moins de print 6 : sans print OZPLVL(12) : Deck ONFIC < LTRB=0; if OZPLVL(12).eq.99 < Print_Cl_Id(LCL); > IF OZPLVL(12).eq.99 "TEST" Deck OA2CDX if OZPLVL(12).eq.33 .and. istep.eq.1 Deck LOG_BOOK <<<>>>Test ::> OZPLVL(12).eq.33 fait un dzsnap pour istep.eq.2; ADDITIONS ========= vendredi 29/04/1994: MDMX option. mercredi 11/12/1996: 10 DeClubbering level BUGS ==== SUGGESTIONS =========== Prière de signer et dater.