00001 /** Function for setting an SCS number to zero 00002 @file zero_scs.c 00003 00004 @author Defour David David.Defour@ens-lyon.fr 00005 @author Florent de Dinechin Florent.de.Dinechin@ens-lyon.fr 00006 00007 This file is part of the SCS library. 00008 */ 00009 00010 /* 00011 Copyright (C) 2002 David Defour and Florent de Dinechin 00012 00013 This library is free software; you can redistribute it and/or 00014 modify it under the terms of the GNU Lesser General Public 00015 License as published by the Free Software Foundation; either 00016 version 2.1 of the License, or (at your option) any later version. 00017 00018 This library is distributed in the hope that it will be useful, 00019 but WITHOUT ANY WARRANTY; without even the implied warranty of 00020 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00021 Lesser General Public License for more details. 00022 00023 You should have received a copy of the GNU Lesser General Public 00024 License along with this library; if not, write to the Free Software 00025 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 00026 00027 */ 00028 00029 00030 #include "scs.h" 00031 #include "scs_private.h" 00032 00033 00034 /** Set a SCS number to zero. 00035 There should be a few simple functions in this library. 00036 */ 00037 00038 00039 00040 void inline scs_zero(scs_ptr result) { 00041 int i; 00042 00043 for(i=0; i<SCS_NB_WORDS; i++) 00044 R_HW[i] = 0; 00045 00046 R_EXP = 0; 00047 R_IND = 0; 00048 R_SGN = 1; 00049 } 00050 00051 00052