XProfan

Français

p.specht

Gestion de la mémoire dreidimensionaler Matrizen:

XProfan (V. 11.2a) funktioniert avec qui "Am-Stück"-Gestion de la mémoire seulement pour statisch deklarierte Listen et pour Matrizen avec de vorneherein definierter Taille. ensuite mais peut sich sûrement zugreifen, si on qui Indexverwaltung (et den Speicherbedarf pour un Einzelelement) richtig einsetzt.

Pour une plus tard Umsetzung dans Assembler en supplément qui nachstehende kleine Studie.

Kompilieren Marque Séparation

Titre de la fenêtre "Studie: grenier- et Zugriffsorganisation"+\
"auf dreidimensionale Matrizen (a.k.a. Tensoren)"
Cls:randomize
'Speicherbedarf eines Einzelwertes (XProfan):
var SB&=8'Double precision Floatingpoint: 8 Byte
'Stellenzahlen
var xm&=2
var ym&=2
var zm&=2
declare x&,y&,z&, M![xm&-1,ym&-1,zm&-1]
M![]=&index'rnd()
imprimer
imprimer "Händisch pour M[x,y,z]:"
imprimer M![0,0,0],M![0,0,1],"    ",M![0,1,0],M![0,1,1]
imprimer M![1,0,0],M![1,0,1],"    ",M![1,1,0],M![1,1,1]
imprimer
imprimer "Vereinfacher x-Komponentenaufruf:"
imprimer M![0]
imprimer M![1]
imprimer
imprimer "Linear programmierter Aufruf:"

Whileloop 0,zm&-1:z&=&Boucle

    Whileloop 0,ym&-1:y&=&Boucle

        whileloop 0,xm&-1:x&=&Boucle

            imprimer float( addr(M![0]),SB&*(x& * ym&*zm& + y& *zm& + z&)),
            Endwhile:imprimer "    ";
            Endwhile:imprimer
            Endwhile:imprimer
            waitinput