← Back to branch summary

~ubuntu-branches/ubuntu/gutsy/plotutils/gutsy

« back to all changes in this revision

Viewing changes to ode/eu.c

  • Committer: Bazaar Package Importer
  • Author(s): Floris Bruynooghe
  • Date: 2007-05-10 19:48:54 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20070510194854-mrr3lgwzpxd8hovo
Tags: 2.5-2
Upload to unstable.

Show diffs side-by-side

added added

removed removed

Lines of Context:
ode/eu.c
 
1
/* This file is part of the GNU plotutils package. */
 
2
 
 
3
/*
 
4
 * Copyright (C) 1982-1994, Nicholas B. Tufillaro.  All rights reserved.
 
5
 *
 
6
 * GNU enhancements Copyright (C) 1996, 1997, 2005, Free Software
 
7
 * Foundation, Inc.
 
8
 */
 
9
 
1
10
#include "sys-defines.h"
2
11
#include "ode.h"
3
12
#include "extern.h"
4
13
 
5
14
/*
6
15
 * Euler's method: quick and dirty.
7
 
 * Copyright Nicholas B. Tufillaro, 1982-1994. All rights reserved.
8
 
 * GNU enhancements copyright (C) 1996-1997 Free Software Foundation, Inc.
9
16
 */
10
17
 
11
18
void
12
 
#ifdef _HAVE_PROTOS
13
19
eu (void)
14
 
#else
15
 
eu ()
16
 
#endif
17
20
{
18
21
  double t;
19
22
  
36
39
 * if tstart == tstop, i.e., step nowhere, then just print current values
37
40
 */
38
41
void
39
 
#ifdef _HAVE_PROTOS
40
42
trivial (void)
41
 
#else
42
 
trivial ()
43
 
#endif
44
43
{
45
44
  symtab->sy_value = symtab->sy_val[0] = tstart;
46
45
  field();