diff options
-rw-r--r-- | src/rotatingsymmetry90.c | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/src/rotatingsymmetry90.c b/src/rotatingsymmetry90.c index e71c643..a923fc7 100644 --- a/src/rotatingsymmetry90.c +++ b/src/rotatingsymmetry90.c @@ -268,6 +268,21 @@ int BndRot90VI (cGH const * restrict const cctkGH, (table, sizeof tensortypealias, tensortypealias, "tensortypealias"); if (ierr == UTIL_ERROR_TABLE_NO_SUCH_KEY) { /* assume a scalar */ + if (numvars != 1) { + static int * restrict didwarn = 0; + if (! didwarn) { + didwarn = calloc (CCTK_NumGroups(), sizeof *didwarn); + } + if (! didwarn[gis[var]]) { + didwarn[gis[var]] = 1; + char * groupname = CCTK_GroupName(gis[var]); + assert (groupname); + CCTK_VWarn (2, __LINE__, __FILE__, CCTK_THORNSTRING, + "Group \"%s\" has no tensor type and contains more than one element -- treating these as \"scalar\"", + groupname); + free (groupname); + } + } strcpy (tensortypealias, "scalar"); } else if (ierr<0) { char * groupname = CCTK_GroupName(gis[var]); |