/Users/huttone/Devel/sedflux-new/sedflux/trunk/ew/quake/earthquake.c

Go to the documentation of this file.
00001 //---
00002 //
00003 // This file is part of sedflux.
00004 //
00005 // sedflux is free software; you can redistribute it and/or modify
00006 // it under the terms of the GNU General Public License as published by
00007 // the Free Software Foundation; either version 2 of the License, or
00008 // (at your option) any later version.
00009 //
00010 // sedflux is distributed in the hope that it will be useful,
00011 // but WITHOUT ANY WARRANTY; without even the implied warranty of
00012 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00013 // GNU General Public License for more details.
00014 //
00015 // You should have received a copy of the GNU General Public License
00016 // along with sedflux; if not, write to the Free Software
00017 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
00018 //
00019 //---
00020 
00021 #include <stdio.h>
00022 #include <utils/eh_rand.h>
00023 
00035 double earthquake(double a,double dt)
00036 {
00037    double acceleration;
00038    static long seed=124232;
00039 
00040 //   acceleration = powdev(a,&seed);
00041    acceleration = eh_maxpowdev(a,dt,&seed);
00042    return acceleration;
00043 }
00044 

Generated on Fri Jan 4 18:04:15 2008 for sedflux by  doxygen 1.5.2