vecd.sa

 
---------------------------> Sather 1.1 source file <--------------------------
-- Copyright (C) 1995, International Computer Science Institute
-- $Id: lined-vecd.sa.gen.html,v 1.1 2005/03/07 14:58:02 schmoo Exp $
--
-- COPYRIGHT NOTICE: This code is provided WITHOUT ANY WARRANTY
-- and is subject to the terms of the SATHER LIBRARY GENERAL PUBLIC
-- LICENSE contained in the file: Sather/Doc/License of the
-- Sather distribution. The license is also available from ICSI,
-- 1947 Center St., Suite 600, Berkeley CA 94704, USA.


class VECD < $VEC{FLTD,VECD,FLTD} 
class VECD < $VEC{FLTD,VECD,FLTD} is

   include VEC_LENGTH_MIXIN{FLTD,SAME};

   const element_zero:FLTD := 0.0d;
   const element_one:FLTD := 1.0d;   
   const length_zero:FLTD := 0.0d;
   const length_one:FLTD := 1.0d;   
end;