/* fdtdgen.h: header file containing macro definitions used by *      numerous functions. * * Copyright (C) 2004 John B. Schneider * ********************************************************************* * This program is free software; you can redistribute it and/or     * * modify it under the terms of the GNU General Public License       * * as published by the Free Software Foundation (FSF) version 2      * * of the License.                                                   * *                                                                   * * This program is distributed in the hope that it will be useful,   * * but WITHOUT ANY WARRANTY; without even the implied warranty of    * * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the     * * GNU General Public License for more details.                      * *                                                                   * * You should have received a copy of the GNU General Public License * * along with this program; if not, write to the Free Software       * * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA         * * 02111-1307, USA.  You may also visit the FSF web site at          * * www.fsf.org.  The license under which this software is publish    * * is available from www.fsf.org/copyleft/gpl.html or                * * www.fsf.org/copyleft/gpl.txt.                                     * ********************************************************************* *//********** 2- and 3-D array indexing macros. ************/#define INDEX_3D(I,J,K,NX,NY,NZ) (((I)*(NY)+(J))*(NZ)+(K))#define INDEX_2D(I,J,NX,NY) ((I)*(NY)+(J))/********* 1-, 2-, and 3-D allocation macros. ************/#define ALLOC_3D(name,nx,ny,nz,type) { \ name = (type *)calloc((nx)*(ny)*(nz),sizeof(type)); \ if (!name) { perror("ALLOC_3D"); \              fprintf(stderr,"Allocation failed for " #name "\n"); \              exit(-1); \             }; \ }#define ALLOC_2D(name,nx,ny,type) { \ name = (type *)calloc((nx)*(ny),sizeof(type)); \ if (!name) { perror("ALLOC_2D"); \              fprintf(stderr,"Allocation failed for " #name "\n"); \              exit(-1); \             }; \ }#define ALLOC_1D(name,nx,type) { \ name = (type *)calloc(nx,sizeof(type)); \ if (!name) { perror("ALLOC_1D"); \              fprintf(stderr,"Allocation failed for " #name "\n"); \              exit(-1); \             }; \ }/* Same as above but allows a string to be given as first argument.  This * is useful is you want to specify some other bit of info -- such as the * the function name -- when making the call. */#define ALLOC_1D_STRING(string,name,nx,type) {	\ name = (type *)calloc(nx,sizeof(type)); \ if (!name) { perror("ALLOC_1D_STRING"); \              fprintf(stderr,#string \                 "  Allocation failed for " #name ".  Terminating...");\              exit(-1); \             }; \ }