Die zweite Termin ist der 30.09.2019, ab 09:30, in MA 401. Bitte tragen Sie sich in die Liste in MA 523 bei Frau Kiefer-Hoeft ein (first come first serve).

use application "polytope";

use vars '$V1', '$V2', '$d1', '$d2', '$m1', '$m2', '$counter', '$V', '$P';

Matrizen, deren Zeilen die Ecken der jeweiligen Inputpolytope sind.

$V1 = $ARGV[0]->VERTICES;
$V2 = $ARGV[1]->VERTICES;

Ambientdimension der beiden Polytope

$d1 = scalar(@{$V1->row(0)}); #Länge einer Zeile von $V1
$d2 = scalar(@{$V2->row(0)});

Anzahl der Ecken der beiden Polytope

$m1 = scalar(@{$V1}); #Länge der Spalten von $V1
$m2 = scalar(@{$V2});

Initialisierte Eckenmatrix des Produkts

$V = new Matrix($m1*$m2, $d1+$d2-1);

Befuellen der Eckenmatrix

$counter = 0;
for(my $i=0; $i<$m1; $i++){
for(my $j=0; $j<$m2; $j++){

    # $vertex soll der Vektor (v,w), fuer je zwei Ecken v und w der Polytope, sein
    my $vertex = new Vector($d1+$d2-1);
    for(my $k=0; $k<$d1; $k++){
        $vertex->[$k]=($V1->row($i))->[$k]; #(i,k)-te Eintrag von $V1
    }
    for(my $k=1; $k<$d2; $k++){
        $vertex->[$d1-1+$k]=($V2->row($j))->[$k];
    }

    $V->row($counter) = $vertex;
    $counter++;
}

}

Das Produkt der Polytope

$P=new Polytope(VERTICES=>$V);
return $P;

Die erste Termin ist der 26.07.2019, ab 10:00, in MA 401. Bitte tragen Sie sich in die Liste in MA 523 bei Frau Kiefer ein (first come first serve).

Kleine Änderung…am Dienstag (30.04) findet um 16:05 eine Vorlesung (statt Übung) statt!

Die Übungen beginnen immer um 16:05!
Am Dienstag den

Die Übungen beginnen immer Dienstags um 16:05.
Nächsten Dienstag, 23.04.2019, findet in der Übung eine Vorlesung statt, und die ausgefallene Übung findet am Donnertag, 25.04.2019, zum Vorlesungstermin statt. Die Vorlesung am Mittwoch, 24.04.2019, muss leider ausfallen.

Ab sofort (15.04) finden die Tutorien statt:

Montag 12:00 – 14:00, MA 545
Mittwoch 10:00 – 12:00, MA 545
Freitag 14:00 – 16:00, MA 550