# Mangled inter-procedural interfaces in afc9

```
--- a/lib/afc9.f90
+++ b/lib/afc9.f90
@@ -1,8 +1,8 @@
 subroutine afc9(c3a,npts,fsample,a,syncpk)

-  parameter (NZ2=1512)
-  complex c3a(0:NZ2-1)
-  complex c3(0:NZ2-1)
+  parameter (NZ2=1512,NZ3=1360)
+  complex c3a(0:NZ3-1)
+  complex c3(0:NZ3-1)
   real a(3),deltaa(3)

```

_______________________________________________
wsjt-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/wsjt-devel

Reply via email to