Paste: bad stack declaration

Author: typemore
Mode: factor
Date: Fri, 20 Aug 2010 23:48:43
Plain Text | 
QUALIFIED-WITH: alien.c-types c

IN: sim

STRUCT: v3
  { x c:double }
  { y c:double }
  { z c:double } ;

TYPED:: v3d ( v1: v3  v2: v3 -- c: c:double )
    v1 x>> v2 x>> *
    v1 y>> v2 y>> *
    v1 z>> v2 z>> * + + ;

New Annotation

Summary:
Author:
Mode:
Body: