00001 /* 00002 ** (c) 1996-2000 The Regents of the University of California (through 00003 ** E.O. Lawrence Berkeley National Laboratory), subject to approval by 00004 ** the U.S. Department of Energy. Your use of this software is under 00005 ** license -- the license agreement is attached and included in the 00006 ** directory as license.txt or you may contact Berkeley Lab's Technology 00007 ** Transfer Department at TTD@lbl.gov. NOTICE OF U.S. GOVERNMENT RIGHTS. 00008 ** The Software was developed under funding from the U.S. Government 00009 ** which consequently retains certain rights as follows: the 00010 ** U.S. Government has been granted for itself and others acting on its 00011 ** behalf a paid-up, nonexclusive, irrevocable, worldwide license in the 00012 ** Software to reproduce, prepare derivative works, and perform publicly 00013 ** and display publicly. Beginning five (5) years after the date 00014 ** permission to assert copyright is obtained from the U.S. Department of 00015 ** Energy, and subject to any subsequent five (5) year renewals, the 00016 ** U.S. Government is granted for itself and others acting on its behalf 00017 ** a paid-up, nonexclusive, irrevocable, worldwide license in the 00018 ** Software to reproduce, prepare derivative works, distribute copies to 00019 ** the public, perform publicly and display publicly, and to permit 00020 ** others to do so. 00021 */ 00022 00023 #ifndef BL_SPACE_F_H 00024 #define BL_SPACE_F_H 00025 00026 /* 00027 ** $Id: SPACE_F.H,v 1.6 2001/07/17 23:02:27 lijewski Exp $ 00028 */ 00029 00030 #include <SPACE.H> 00031 00032 #ifdef BL_LANG_FORT 00033 # if (BL_SPACEDIM == 1) 00034 00054 # define DIM_V(lo,hi) lo(1):hi(1) 00055 # elif (BL_SPACEDIM == 2) 00056 # define DIM_V(lo,hi) lo(1):hi(1),lo(2):hi(2) 00057 # elif (BL_SPACEDIM == 3) 00058 # define DIM_V(lo,hi) lo(1):hi(1),lo(2):hi(2),lo(3):hi(3) 00059 # endif 00060 #endif 00061 00062 #endif /*BL_SPACE_F_H*/