Thin -- A Horizontal Compression

> S := matrix( 2, 2, [ [ 0.75, 0 ],
[ 0, 1 ] ] );

[Maple Math]

> Nt := evalm( S &* N );

[Maple Math]

> pointplot( Nt, opts, title="Horizontal Compression" );

>