remove Fortran code to make species classification data

jarioksa · Oct 19, 2019 · 7e8b69b · 7e8b69b
1 parent 043095b
commit 7e8b69b
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 172 deletions.
diff --git a/src/init.c b/src/init.c
@@ -15,9 +15,6 @@ extern void F77_NAME(class)(void *, void *, void *, void *, void *, void *,
 			    void *, void *, void *, void *, void *, void *,
 			    void *, void *, void *, void *, void *, void *,
 			    void *, void *, void *, void *);
-extern void F77_NAME(makejdat)(void *, void *, void *, void *, void *, void *,
-			       void *, void *, void *, void *, void *, void *,
-			       void *);
 extern void F77_NAME(revspec)(void *, void *, void *, void *, void *, void *,
 			      void *, void *, void *);
 
@@ -33,7 +30,6 @@ static const R_CMethodDef CCalls[] = {
 static const R_FortranMethodDef FortranCalls[] = {
     {"pseudo", (DL_FUNC) &F77_NAME(pseudo), 13},
     {"class", (DL_FUNC) &F77_NAME(class), 40},
-    {"makejdat", (DL_FUNC) &F77_NAME(makejdat), 13},
     {"revspec", (DL_FUNC) &F77_NAME(revspec), 9},
     {NULL, NULL, 0}
 };

diff --git a/src/makejdat.f b/src/makejdat.f