| Journal des modifications 1993 |
| Aliases | |
| DM | Daniel.Martin@univ-rennes1.fr |
| ODB | Olivier.de.Bayser |
4 Jan.
Odb |Couplag
| COUMAT correction boucle 123
| CALERI faute de frappe lignes 1 et 2
|Caltrm
| VNCALC NUKALE=2,3 termes valeurs nodales
|Lecdire
| LCTERM mise a jour
|Sdexplo
| MKTERM mise a jour
13 Jan.
Odb |Caltrm
| DSKBMO NUDOK au lieu de NVSTKB dans call prbmor
18 Jan.
Odb |Lecdire
| LCESSE xN au lieu XN dans le test
| LCTERM modif NUKALE cas Valnod et C.esse
|Sdexplo
| MKTERM modif NUKALE cas Valnod et C.esse
|Caltrm
| VNCALC modif NUKALE cas Valnod et C.esse
|Assembl
| ASMOPV modif: dicoto pour KSTART av boucle 8
19 Jan.
Odb |Syslin
| SYPREP mise a jour cas compactage PROFIL en dl
| FASV,GBCT,GCJ,GCS mise a jour '&PROFD'
|Assembl
| ASPLMO,ASPLPV modif NGNCOB(1) et RETURN ap boucle 8
20 Jan.
Odb |Integran
| SCAWVN R2=RNORME*RNORME + argument NDIM en plus
| WNWN argument NDIM en plus
|Calelem
| CALINT mise a jour CALL SCAWVN et WNWN et POIDS/ELTDIF et non *
| ELDIFF modif impressions
|Calgeo
| CALGEO,ADWNOR : IRPLOC.GT.0.AND.NDMDOM.LT.NDIM
|Assembl
| ASMAMO remplacement argt. ITTRMR par TYTRMR ...
| ASMTRM mise a jour
| ASVTRM variable LONTRM + IF(NUASSE.LT.0 ...
|Sdexplo
| DFTERM Format 20000,30000,42000,43000 + calcul NBITEM
28 Jan.
Odb |Assembl
| ASMBSK modif construction '&BMORS',NVSTOR
|Sdexplo
| PRBMOR correction boucle 5
| PRPROF MIN(10*NIVIMP,NBLIGN) et non MAX
|Couplag
| RELDIR,RELFRI,RELPRE passage en d.l. vectoriels
|Assembl
| MATVEC dimensionnement de bimorse
|Syslin
| SYPREP idem
2 Fev.
Odb |Caltrm
| VNATRI LGWORK =2 au minimum parite adrs. complexes
| VNQLTR precautions pour les adresses R ou C de $WORK$,1
8 Fev.
Odb |Caltrm
| VNCALC modif NUKALE=6 cas Valnod
| VNATRI correction sur LGWORK
|Lecdire
| LCTERM modif NUKALE=6 cas Valnod
|Sdexplo
| MKTERM modif NUKALE=6 cas Valnod
|Assembl
| MATVEC TBAR1 et non TBAR2 sur &BMORS seul + longueur &BMODL+TBAJST
|Couplag
| RELPRE TBRR1 sur &BMORS remonte de qcq lignes+ longueur &BMODL+TBAJST
|Syslin
| SYPREP calcul longueur &BMODL+TBAJST
16 Fev.
Odb |Sdexplo
| DFTERM recalcul IACOOR
22 Fev.
Odb |Alodyn
| ASSURC format I9 a la fin
24 Fev.
Odb |Integran
| TANGRA creation cas inconnue vectorielle
| SCAROT corrections sur IDER
| DIVDIV correction sur JTERM
| INTATR,INTGKL mise a jour noms integrands
|Calelem
| CALINT mise a jour nouvel integrand
|Calelem
| MDTERM destruction ... enfin !
| MKTERM modification de nom: '^n'
|Lecdire
| LCESSE modification de nom: '^n'
2 Mars
DM |Simplification des types de Valeurs Nodales qui deviennent
| 'F' valeur par defaut
| 'DF/DN' pour DERIVEE NORMALE
| 'TABF' pour FOURNI
| 'NF' pour produit simple par la normale
| 'N.F' pour produit scalaire par la normale
| 'N^F' pour produit vectoriel par la normale
| 'N^(N^F)' pour double produit vectoriel par la normale
| Les mots-cles DERIVEE NORMALE et FOURNI sont conserves
| pour compatibilite
|Utiliter
| INVANO creation : codage du type de VALNOD
| INCESS creation : codage du type de C.ESSE
|Lecdire
| LCVANO creation : analogue de LCESSE pour les VALNOD
|Caltrm
| VANATR creation : analogue de INTATR pour les VALNOD
| De plus les types de calculs sont systematiquement en MAJUSCULES
| ELFINI, C.ESSE, VALNOD, ELFLOC, etc.
| Ces nouveautes sont reportees dans
|Lecdire
| LCKDOM,LCTERM,LCESSE
| Librairie Sdexplo
| MKTERM,MKDOMK,PRSDTR
|Caltrm
| VNQLTR,VNATRI,VNCALC
|Utiliter
| TEXTT3 nouveaute produit vectoriel de vecteurs de type
| quelconque (introduit dans VNCALC)
| De plus dans VNCALC on ne transmet plus les tableaux
| VALEUR et VALEUC mais leurs adresses dans le super-tableau
3 Mars
Odb |Ef3d
| TE02FB corrections ...
DM |Sdexplo
| MKTERM correction d'une petite baise :
| INCESS(NMTYPE(MAX(1,NUEGAL-2):)) au cas ou NMTYPE='=g'!
11 Mars
Odb |Sdexplo
| PRTERM go to 100 au lieu return sec ...
|Syslin
| FAPREP modification NVSTFA pour eviter inflation
16 Mars
Odb |Sdexplo
| PRSDTR WRITE(IMPNUM,10010) dans le cas SOLUTI
19 Mars
Odb |Utiliter
R * TPTDAT,TPTADT,TPTDMT,TPTQAT Creation
20 Mars
DM |Specfct
| STCH01 NOUVEAUTE function de Struve a argument complexe
DM |Appl-houle3dc NOUVEAUTE
| Fonction de Green Houle a frequence complexe
| CCEXP1, GHOULE, GLAPLA, GREEN, IEXPE1, IEXPNU
DM |Util_sun
| I1MACH constantes entieres dependantes de la machine
| R1MACH constantes reelles dependantes de la machine
27 Mars
Odb |Efloc
| ELPLOC modification sur BETA
| INTEGR,INEXRE,INEXSE argument BETA en plus
1 Avr.
Odb |EF3d
| TE01FB,TE02AR,TE02CO,TE02FA,TE02FB corrections
2 Avr.
DM |Cdesse refonte complete (Bimorse etait completement FAUX)
| CDLINH devient CDMODL
| CDCONH devient CDMODC
| CBCONH est coupe en CDBLDC (colonnes Dirichlet triangle inferieur)
| et CDBUDC (colonnes Dirichlet triangle superieur)
| CBLINH est coupe en CDBLDL (lignes Dirichlet triangle inferieur)
| et CDBUDL (lignes Dirichlet triangle superieur)
| et CDBDD (second membre ligne Dirichlet)
| CDSCNH est coupe en CDSCDI (lignes Dirichlet) et CDSCND (colonnes)
| CDESSE est modifie en consequence et permet la prise en compte
| d'une matrice symetrique (cas courant!). ATTENTION
| a l'ordre d'elimination dans le cas non symetrique
DM |Lecdire
| LCASSE lecture de la directive ASSEMBLAGE
| LCDIRE modification subsequente
| LCESSE correction d'une petite baise :
| INCESS(TEXTE(MAX(1,NUEGAL-2):NCAR)) au cas ou TEXTE='u=g'!
| LCVANO creation des types de valeurs nodales
| LCTERM attributs de l'inconnue en colonne pour C.Esse
DM |Caldom
| NUMDOM il manquait TBRR1 de #GNEDO si on repasse sur le domaine
| (ajout de l'argument NUDOK)
| idem pour les tables de stockage
| CALKEF modifie en consequence,
| idem pour les tables de stockage :
| IF(NVSTKB/L/C.GT.0) devient IF(NVSTKB/L/C.NE.0)
| avant les CALL DSKBMO/MLI/MCO
DM |Caltrm
| VNCALC modification (cf.dessus)
| VNTBLG modification (cf.dessus) et nouvelles fonctionnalites
| VNATRI modification (cf.dessus)
| VNQLTR modification (cf.dessus) et bug corrige lorsque la
| fonction associee n'a pas de constante associee
| TRMDOM attributs de l'inconnue en COLONNE pour C.ESSE
| EFADRS correction FORMAT
DM |Morse
| N2DLMO,N2DLPR transferes de Sdexplo a Morse
DM |Utiliter
| INVANO codage des types de valeurs nodales
| INCESS codage des types de condition essentielle
| ASSIND decodage des types d'assemblage
| INDASS codage des types d'assemblage
| FACIND codage des types de factorisation
|Modeles : CREATION
| FCTRM, DFCTRM, GREEN pour le cas ou l'on n'en a pas besoin
|Syslin
| SOPREP bug corrige ELSE IF(NVNUML.NE.-99999.AND.CRESOL)
| remplace par ELSE IF(NVNUML.NE.-99999..NOT.IDMSCM)
13 Avr.
Odb |Caltrm
| SAVTRM corrections d'adresses a cause de PRTERM
15 Avr.
DM |Caltrm
| VNCALC, VNQLTR corrections ODB a Rennes
DM |Cordom
| CPTDOM (en cas de modification de la geometrie)
DM |Multmat
| PPLVC nouveau nom de PLVC (produit partiel)
| PLVC creation produit complet matrice pleine x vecteur
| BMVC creation produit matrice bimorse x vecteur
| report effectue dans MATVEC et COUVEC
| PRVC creation produit matrice profil x vecteur
DM |Couplag (mise a jour pour INDSYM)
| COUMAT, COUVEC, RELDIR, RELFRI, RELPRE, RLDGTR, RLBMTR
| CALERI, REPINT, RICAL
DM |Sdexplo
| SOTERM, CPTERM, ADTERM, CLTERM, ASMAKE introduction de INDASS
| (pour assemblage par directive)
DM |Calgeo
| CALGEO modification pour le cas ou la geometrie a changee
| ASCORN, ASNORM, UNNORM transfert des impressions dans CALGEO
DM |Assembl
| Changement de la structure $ASMBL et refonte totale
| Creation d'une directive d'ASSEMBLAGE et modification des structures
| $ASMBL qui deviennent standard, meme pour l'assemblage simple
| avec un increment egal a 1 et NBTRAC qui contient le type
| d'assemblage (egal a NUKALE pour le terme resultat)
| Nouvelle denomination ASMS.. creation du stockage
| ASMSTM nouveau nom de ASMBSK
| ASMSTP ASMLSK
| ASMSML ASMLML
| ASMSPL ASMLPL
| Nouvelle denomination ASMP.. creation des pointeurs
| ASMPTM nouveau nom de ASMOPT
| ASMPVM ASMOPV
| ASMPTD ASMDPT
| ASMPTP ASPLPT
| ASMPVP ASPLPV
| ASMPTG ASPDPT
| ASMTVG ASPDPV
| ASMATR nouveau nom de ASMAMO
| ASMOPL ASPLMO
| ASMCLI creation assemblage simple (par Combinaison LIneaire)
| ASMCPT creation assemblage par pointeurs (par Combinaison PoinTeurs)
| ASMNSY assemblage complementaires pour des matrices non symetriques
| ASCOOR test supplementaires de creation correcte
DM |Lecdire
| LCASSE et LCTERM modifications mineures
20 Avr.
DM |Cdesse
| CDMODL bug a l'edition de liens (AST, IST non declares)
30 Avr.
Odb |Modeles
| FCTRM,DFCTRM,GREEN modif du call baise
|Initial
| LCIMPR creation directive IMPRESSION PRINCIPALE
| INITIE mise a jour
|Redlib
| REDTIT correction NECAR=40+... et IMPPAL
|Utiliter
| PTITRE installation IMPPAL
|Lecdire
| LCESSE corrections: '#OMINC' pour call prnoms et non NOMINC
| + INCESS(TEXTE(MAX(1,NUEGAL-2):NUEGAL-1)) cf 2avril
|Sdexplo
| PRTERM double virgule dans le CALL de PRMABM
|Caltrm
| VNQLTR, VNCALC se passent PREFIX,NIVESP
| VNCALC MCVAL et MCVAL(R/C) inverse dans cas n^(n^f)
| VNCALC, VNTBLG mis a jour
|Couplag
| RELPRE NCHTRM argument en +
| RELFRI,RELDIR mise a jour + test symetries/stockage
|Assembl
| MATVEC tbrr1 sur NMSTOK mal place
| ne pas tuer BMODL quand BMORS n'existe pas ...
| ASNUME correction MCASMB+LGETRA et non MCASMB+1
10 Mai
DM | MODUMELI completement revu et s'appelle maintenant MOME
DM |Lecgeom
| LCGEOM decoupe en LCGEOM + LCGMAI pour que
| LCGMAI puisse etre directement appele par MOME
| ECGEOM,ECFORM,ECDESG,ECDESL,ECELEM,ECNOMD,ECDOMA nouveautes
| reciproque de LCxxxx : creation d'un fichier de maillage
| ECGEOM peut etre directement appele par MOME
DM |Initial
| INITIE decoupe en INITIE + INITIA pour que
INITIA puisse etre directement appele par MOME
| CREESD modifie pour ne creer que les structures de longueur initiale
| strictement positive
DM |Sdexplo
| DFTERM formats
| ECTERM mise a jour (pour creer une S.D. B)
| RKGEOM nouveaute mise a jour de #TERDO et $SDTRM pour recalculer
| tout ce qui depend des coordonnes
DM |Assembl et Librairie Sdexplo
| Transfert de ADTERM, AXTERM, CLTERM ,CPTERM, SOTERM
| de Sdexplo a Assembl
|Integran
| PRINTV rajout d'un argument de dimension
| DIVDIV,SCAROT,SCAWVN,SCAWW,TANGRA,WNWN mises a jour
| DIVDIV,SCAROT extension en 2D
| GRAWW,WGRAW,GRATWW,WGRATW,ROTBT0,DIVBT0,UV1122,UV33 creations
| DWW,GRAWW,WDW,WGRAW modifications a reprendre tel quel
| INTATR,INTGKL mises a jour
| PRINTV coef 1,2
OdB |Utiliter
| PROEXT correction du cas 2d
Odb |Calelem
| CALINT mise a jour pour les nouveaux integrands
11 Mai
Odb |Assembl
| ASMTRM LONTRM= .... - NEMOIN + calcul &BMODL
|Sdexplo
| PRTERM dans FORMAT I9 + impression &PROFD
| PRLIBM modification pour ecrire tout les coef. en d.l.
| DFTERM format 10002 T12 et T20 , et HNORM2/NBNEIN dans le write
15 Mai
Odb |Syslin
| FAPREP,FIPREP installation d.l. vectoriels
| FALDLA,FALDLT,FALLA,FALLT,FALU et FIMLU,FILU mis a jour
| GAUSMC adaptation a SYPREP et SOPREP et passage en d.l. vect
| SYPREP arguments ITYSYM en plus
| SOPREP arguments NBSCMB en plus + correction LGSOLU
| FASV,GBCT,GCJ,GCS mise a jour + correction NBDLLM=NBNELM*NCPINL
17 Mai
DM |Redlib
| Nouvelle directive utilitaire ECRITURE : changement du fichier
| d'impression principale
| (au lieu de la directive IMPRESSION PRINCIPALE mal placee !)
| REDOUT nouveaute (lecture du nom du fichier)
| REDLE (qui appelle REDOUT) modifier en consequence
DM |Lecgeom
| ECDOMA,ECGEOM correction des formats variables
| ECFORM,ECELEM modifs.
19 Mai
Odb |Caltrm
| VNQLTR modif NUVALE avant VNCALC si cond. ess.
24 Juin
Odb |Cdesse
| CDESSE reprise des argts. colonne au lieu ligne apres GETTRM
|Lecgeom
| LCGMAI avant l'appel RDELEM, TAZERO sur NGNEEL
2 Juil
DM |Assembl - nouveautes
| MATADJ adjointe d'une matrice
| MATRAN transposee d'une matrice
| ABTERM terme dont les coeff. sont les valeurs absolues d'un terme
| CJTERM copie du conjugue d'un terme
10 Juil
Odb |Assembl
| MATVEC IF(INDSTK.NE.INDSTO('PLEIN..') CALL TBRR1 et
| NBDLLM et non NBDLMM dans CALL PLVC
| distinction cas PLEIN-L et PLEIN
|Sdexplo
| PRTERM,PRMAPL mise a jour
|Utiliter
| INDSTO,STOIND mise a jour
11 Juil
Odb |Assembl
| ASMOMO correction IDBPTR avant CALL ASMPVM ............
| ASMPVM correction LGCUMS et non LGCUAS dans DIKLPL boucle 16
| ASMPVP idem + NBNCOB en argument d'entree
| ASMOPL mise a jour
13 Juil
Odb |Assembl
| ASMOPL correction IDBPTR avec NCFSSD
| ASMOMO idem
| ASMPVG,ASMPVP corrections
15 Juil
Odb |Syslin
| SYPREP corrections INDSYM(' ')
| FILU ITSYMP au lieu ITSYMM
9 Sep.
Odb |Integran
| TANDW creation pour calculer somme(div u)
| INTATR,INTGKL mise a jour
| PRINTV impression de l'integrand complet
|Assembl
| PSTERM TBAR.( ...MCINCO) et d.l. vectoriels
|Syslin
| SOPREP call tbrr sur NM2MMB apres CALL PRTERM
Odb |Caltrm
| PAVVEC DO 20 MCAUDL et non IAAUDL
14 Sep.
Odb |Integran
| WN creation pour calculer somme(u.n)
| NROTWW creation pour calculer somme(n^Rotu.v)
| NDIVWW creation pour calculer somme(divu (n.v))
| INTATR,INTGKL mise a jour
| SCAROT,DIVDIV,WNWN,SCAWVN modifications
Odb |Calelem
| CALINT mise a jour pour les nouveaux integrands
Odb |Assembl
| ASCOOR IF(NVNUME.LE.0) et non EQ
20 Sep.
Odb |Syslin
| GAUSMC ligne 112 une virgule en trop
22 Sep.
Odb |Lecgeom
| ECGEOM,ECDESG modification format FORMAN
Odb |Caldom
| NUMDOM LGGOLI=LGGNDO-LGGOCO+1 et non LGCOLI=NBNEXX*NBELDO+1
| NBNELI et non NBMELI dans 2ieme CALL RGNEDO
23 Sep.
Odb |Syslin
| FIPREP corrections remise en service FIMLU matrice Bimorse
| FASV MCENV=MCMATR+NBLIGN et non +NBL
Odb |Morse
| BM2BM creation
28 Sep.
Odb |Assembl
| ASVTRM CHANGD vire
| MATVEC NVCOOR=0 et non NVCOMA si matrice non carre ...
| ASCOOR &CORNE,NVCOOR tue si il est incomplet
|Syslin
| GCS,GCJ comme GBCT NMSTOK non tue a la fin si NCPILM.gt.1
| NMSTOP non tue a la fin si NCPILP.gt.1
29 Sep.
Odb |Utiliter
| WARNNG comme BAISE ...
|Sdexplo
| PRTRDO rajout d'une virgule FORMAT 10010
| ASMAKE tbcree asmbl '' interdit ,faire ' '
| MKTERM , et non ,, dans un GET ou PUTTRM
| PRBMOR IDB au lieu IBLIMP
Odb |Morse
| N2DLMO dans boucle 3, une ligne vide peut s'intercaller
| + KOLDEB,LGPLAG initialiser en cas de ligne vide ...
1 Oct.
OdB | *** Compilation sur cray ***
|Assembl
| DSMTRI integer ENMOIN
| ASMSTM double declaration de ERCODE
| ASMSTB idem
| ASMCLI emploi de ERCODE(1:1) avant BAISE
| ASMOMO tbar sur CHCSTE,1
| ASMNSY tue
| ASMNIV IGTNLI realigne sur colonne 72 ...
| VCTENS NVDUMC dans gettrm et non NDNUMC
|Sdexplo
| SDEKAM NBRESC*NBRESL au lieu de NBMATL
|Syslin
| FAPREP ITSYMA et non ITSYMMA
|Caltrm
| DSKMLH MCPLAJ remplace MCPLAG+4
|Cdesse
| CDMOVC MCMATR au lieu MCMATL
|Utiliter
| TTENST un retour chariot manquait ...
|Alodyn
| TBCREE emploi de RUMEUR*99 avant ENRUME
|Calgeo
| ADWNOR,CALGEO passage de NDMDOM en argument
|Calelem
| CALELB indication complete des pointeurs de KEL...(1:6)
| CALINT emploi de WORK*6 avant BAISE
|Cdesse
| RASREP adresse MCNEES,MCNORM,MCRLOC remplaces
| MCNEDO,MCNEDR,NCNORC,MCREPR
|Couplag
| RELLNU etiquette retour 1er LISUNI 3 au lieu de 1
| RICAL #OMTRM au lieu de #OMDOM au debut
|Integran
| DNW correction dans WRITE K, vire
|Multmat
| PLVC MCMATR et non MCPLEI
|Redlib
| REDLE GIORIT double declaree
4 Oct.
Odb |Caldom
| NUMDOM IST(MCGOCO)=LGGOCO+1
| et CALL TBAJST('#RGNDO',NUDOK,LGGOCO+LGGOLI-1)
6 Oct.
Odb |Caldom
| NUMDOM respect col 72 en ligne 225 CALL NUDLDO
| PRNOMD 1 blanc en - dans format 10000
Odb |Integran
| PRINTV arrangement de la matrice (NDIM,NBLIGN,NDIM,*)
| GRAWW,NDIVWW,NROTWW,SCAWVN,WGRAW,WNWN mise a jour
8 Oct.
Odb |Assembl
| ASMOMO rajout TBRR1 et TBSAVE sur NMSTOK,NVSTOB si existe deja
Odb |Caltrm
| PAVLBM installation de INCREM et MCDOEF pour se deplacer
| dans la ligne + CST au lieu RST boucle 400
| PAVUBM idem pour boucle 400
12 Oct.
Odb |Alodyn
| TBOPEN modification du format 140
|Integran
| DW,TANDW COFVAC dans le cas complex et non COFVAR ...
Odb |Alodyn
| STINIT,TAMPON modifications au sujet de l'age des buffers
13 Oct.
|Sdexplo
| KLUNIT NXTNUF=NXTNUF+1 vire apres etiquette 2 sinon
| risque de debordement si LASNUF atteint
Odb |Alodyn
| TBOPEN modification pour determiner IUNIT
10 Nov.
Odb |Syslin
| GAUSMC initialisation par TAZERO matrice decompactee
|Alodyn
| TBCREE modification des call BAISE 90 et 91.
Odb |Caldom
| NUMDOM rajout LGGOLI=LGGOLI-1 apres 2ieme RGNEDO
| et LGGOCO+LGGOLI pour le TBAJST (pas -1)
|Alodyn
| ASSURC modification du format 90001
20 Nov.
Odb |SDexplo
| KLDOMN complement de test INDEXC.LT.0.AND.INDEXL.LT.0
30 Nov.
Odb |Alodyn
| TBRECH,CPRSTR modif dans format T73 au lieu T80
| TAILTR modif format 10002
| TBCRSU message d'erreur en plus (format 10002) pour
| expliquer que ASSURC ne se termine pas par STOP ...
| + TBRR2 #GNEDO,NVNUL1,NVNUC1 avant les TBCRSU de compactage
5 Dec.
Odb |Alodyn
| TBCREE message d'erreur complete par NOM,NIVEAU
13 Dec.
Odb |Lecgeom
| LCGMAI initialisation de NCHDOM avant LCNOMD par SDEXDB
Odb |Integran
| W un blanc devant COFVAR
1) verifier le rangement "a la fortran" de toutes les matrices elememtaires
c'est a dire (NBLIGN,NBCOLO)
2) verifier les deplacements a l'assemblage "pavlbm" et compagnie
remarque les integran symetriques sont ranges dans l'autre sens
ca plantera quand on fera des interpolations mixtes ...