diff --git a/src/afrikaans/ExtendAfr.gf b/src/afrikaans/ExtendAfr.gf
index 19dfe31b..5becbada 100644
--- a/src/afrikaans/ExtendAfr.gf
+++ b/src/afrikaans/ExtendAfr.gf
@@ -1,10 +1,16 @@
 concrete ExtendAfr of Extend =
-  CatAfr ** ExtendFunctor
+  CatAfr ** ExtendFunctor - [PassVPSlash,PassAgentVPSlash]
   with
     (Grammar = GrammarAfr) **
 
   open
-    ResAfr in {
+    ParadigmsAfr, ResAfr in {
+
+-- KA: guessed from PassV2 in Afrikaans and the equivalents in Dutch
+lin PassVPSlash vps = 
+      insertInf (vps.s.s ! VPerf) (predV word_V) ;
+    PassAgentVPSlash vps np = 
+      insertAdv (appPrep "door" np.s) (insertInf (vps.s.s ! VPerf) (predV word_V)) ;
 
 lin GivenName, MaleSurname, FemaleSurname = \n -> n ;
 lin FullName gn sn = {