R/cross.prod.R

Defines functions `cross.prod`

`cross.prod` <-
function( B,  A)
  {
    c=list()
    c$x = (B$y*A$z) - (A$y*B$z);
    c$y = (A$x*B$z) - (B$x*A$z);
    c$z = (B$x*A$y) - (A$x*B$y);
    return (c);
  }

Try the RFOC package in your browser

Any scripts or data that you put into this service are public.

RFOC documentation built on Sept. 8, 2023, 6:12 p.m.