pdaf-works.diff

diff --git a/Applications/CLI/ogs.cpp b/Applications/CLI/ogs.cpp
index 209d72cc9..dbde5058a 100644
--- a/Applications/CLI/ogs.cpp
+++ b/Applications/CLI/ogs.cpp
@@ -101,6 +101,11 @@ int main(int argc, char* argv[])
                                                "LOG_LEVEL");
     cmd.add(log_level_arg);

+#ifdef OGS_USE_PDAF
+    int a = 5;
+    c_init_parallel_pdaf(&a, &a);
+#endif
+
     TCLAP::SwitchArg nonfatal_arg("",
                                   "config-warnings-nonfatal",
                                   "warnings from parsing the configuration "
@@ -149,11 +154,6 @@ int main(int argc, char* argv[])
     (void)guard;
 #endif

-#ifdef OGS_USE_PDAF
-    int a = 5;
-    c_init_parallel_pdaf(&a, &a);
-#endif
-
     BaseLib::RunTime run_time;

     {
diff --git a/Applications/CLI/pdaf.f90 b/Applications/CLI/pdaf.f90
index 42c52d380..8820468ed 100644
--- a/Applications/CLI/pdaf.f90
+++ b/Applications/CLI/pdaf.f90
@@ -11,7 +11,8 @@ contains
 subroutine c_init_parallel_pdaf(dim_ens, screen) bind(c)
   integer(c_int), intent(in) :: dim_ens, screen

-  call init_parallel_pdaf(dim_ens, screen)
+  write(*,*) "PDAF here"
+  !call init_parallel_pdaf(dim_ens, screen)

 end subroutine c_init_parallel_pdaf