diff options
Diffstat (limited to 'Examples/EMScript/src/RegisterMoL.cc')
| -rw-r--r-- | Examples/EMScript/src/RegisterMoL.cc | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/Examples/EMScript/src/RegisterMoL.cc b/Examples/EMScript/src/RegisterMoL.cc new file mode 100644 index 0000000..1f1ea18 --- /dev/null +++ b/Examples/EMScript/src/RegisterMoL.cc @@ -0,0 +1,24 @@ +/* File produced by Kranc */ + +#include "cctk.h" +#include "cctk_Arguments.h" +#include "cctk_Parameters.h" + +extern "C" void EMScript_RegisterVars(CCTK_ARGUMENTS) +{ + DECLARE_CCTK_ARGUMENTS; + DECLARE_CCTK_PARAMETERS; + + CCTK_INT ierr = 0; + + /* Register all the evolved grid functions with MoL */ + ierr += MoLRegisterEvolved(CCTK_VarIndex("My_New_Implementation::B1"), CCTK_VarIndex("My_New_Implementation::B1rhs")); + ierr += MoLRegisterEvolved(CCTK_VarIndex("My_New_Implementation::B2"), CCTK_VarIndex("My_New_Implementation::B2rhs")); + ierr += MoLRegisterEvolved(CCTK_VarIndex("My_New_Implementation::B3"), CCTK_VarIndex("My_New_Implementation::B3rhs")); + ierr += MoLRegisterEvolved(CCTK_VarIndex("My_New_Implementation::El1"), CCTK_VarIndex("My_New_Implementation::El1rhs")); + ierr += MoLRegisterEvolved(CCTK_VarIndex("My_New_Implementation::El2"), CCTK_VarIndex("My_New_Implementation::El2rhs")); + ierr += MoLRegisterEvolved(CCTK_VarIndex("My_New_Implementation::El3"), CCTK_VarIndex("My_New_Implementation::El3rhs")); + + /* Register all the evolved Array functions with MoL */ + return; +} |