Commercial+Plugin 源代码

function C = GAminus(M,N) %GAminus(M,N): subtract two multivectors. % %See also gable. % GABLE, Copyright (c) 1999, University of…

function GAview(A) % GAview(A): call view(A) on all subplots % %See also gable, view. % GABLE, Copyright (c) 1999, University of …

function r=join(a,b) %join(a,b): return the smallest common superspace of a and b % %See also gable. % GABLE, Copyright (c) 1999,…

function b = GAisa(G,t) % GAisa(G,t): Return 1 if G is of type t, 0 otherwise % %See also gable. % GABLE, Copyright (c) 1999, Uni…

function r=meet(a,b) %meet(a,b) - return the largest common subspace of a and b % %See also gable. % GABLE, Copyright (c) 1999, U…

function C = GAproduct(M,N) %GAproduct(M,N): Take the geometric product of two multivectors. % %See also gable. % GABLE, Copyrigh…

function C = inverse(m) %inverse(m): Computes the inverse of a multivector. % %See also gable. % GABLE, Copyright (c) 1999, Unive…

function A = GAZ(B) % GAZ(B): Set to zeros any element of the multivector B less than 1e-15 % %See also gable, gazv, blade, grade…

function h=GAtitle(s,c) % %See also gable. % GABLE, Copyright (c) 1999, University of Amsterdam % Copying, use and development fo…

function drawall(S) %drawall(S): Draw the geometric relationships created by geoall % %See also gable. % GABLE, Copyright (c) 199…