new subtype

diff --git a/tests/62-any-OK.asn1 b/tests/62-any-OK.asn1
index 7c9991b..34d7e24 100644
--- a/tests/62-any-OK.asn1
+++ b/tests/62-any-OK.asn1
@@ -11,10 +11,24 @@
 	DEFINITIONS IMPLICIT TAGS ::=
 BEGIN
 
-	T ::= SEQUENCE {
+	T ::= CHOICE {
+		s1 T1,
+		s2 T2
+	}
+
+	T1 ::= SEQUENCE {
 		i	INTEGER OPTIONAL,
 		any	[1] ANY,	-- Converted into [1] EXPLICIT ANY
 		...
 	}
 
+	T2 ::= [16] SEQUENCE {
+			m1  [0] NumericString,
+			m2  [1] BOOLEAN,
+			m3  [3] SEQUENCE OF NumericString,
+			o4  [4] BOOLEAN OPTIONAL,
+			o5  [5] BOOLEAN OPTIONAL,
+			o6  [6] BOOLEAN OPTIONAL
+	}
+
 END
diff --git a/tests/62-any-OK.asn1.-EF b/tests/62-any-OK.asn1.-EF
index 76549a6..22a64bb 100644
--- a/tests/62-any-OK.asn1.-EF
+++ b/tests/62-any-OK.asn1.-EF
@@ -4,10 +4,24 @@
 DEFINITIONS IMPLICIT TAGS ::=
 BEGIN
 
-T ::= SEQUENCE {
+T ::= CHOICE {
+    s1	 T1,
+    s2	 T2
+}
+
+T1 ::= SEQUENCE {
     i	 INTEGER OPTIONAL,
     any	 [1] EXPLICIT ANY,
     ...
 }
 
+T2 ::= [16] IMPLICIT SEQUENCE {
+    m1	 [0] IMPLICIT NumericString,
+    m2	 [1] IMPLICIT BOOLEAN,
+    m3	 [3] IMPLICIT SEQUENCE OF NumericString,
+    o4	 [4] IMPLICIT BOOLEAN OPTIONAL,
+    o5	 [5] IMPLICIT BOOLEAN OPTIONAL,
+    o6	 [6] IMPLICIT BOOLEAN OPTIONAL
+}
+
 END