/* ** -*- C -*- ** ** ztans.c ** Made by Bruno JOFRET ** ** Started on Thu Dec 7 12:05:48 2006 jofret ** Last update Mon Jan 29 16:10:46 2007 jofret ** ** Copyright INRIA 2006 */ #ifndef STDC99 #include "doubleComplex.h" #else #include typedef double complex doubleComplex; #endif doubleComplex ztans(doubleComplex z) { /* FIXME: Dummy... */ return (DoubleComplex(0,1)); }