blob: b2c29c11adda79aff75506c330db1fb16531fd12 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
! Module with various common variable.
! $Header$
#include "cctk.h"
module IsoSurface_mod
use EHFinder_Constants
CCTK_REAL,dimension(:),allocatable:: coord_x,coord_y,coord_z
CCTK_INT,dimension (:),allocatable::triangle_index
CCTK_INT,dimension(:),allocatable::resize_triangle_index
CCTK_REAL,dimension(:),allocatable::resize_coord_x,resize_coord_y,resize_coord_z
end module IsoSurface_mod
|