/* diodeh.f -- translated by f2c (version of 5 February 1993  1:37:14).
   You must link the resulting object file with the libraries:
	-lF77 -lI77 -lm -lc   (in that order)
*/

#include "f2c.h"

/* Subroutine */ int diodeh_(t0, v0, t1, v1, nv, dt, tstop)
doublereal *t0, *v0, *t1, *v1;
integer *nv;
doublereal *dt, *tstop;
{
/* DEFAULT HANDLE PROCEDURE FOR IODES. */
/* SCRATCH SPACE ALLOCATED - NONE. */
    /* Parameter adjustments */
    --v1;
    --v0;

    /* Function Body */
    return 0;
} /* diodeh_ */

