diff --git a/library/RAN_Emulation.ttcnpp b/library/RAN_Emulation.ttcnpp
index a74b6de..d6d74e2 100644
--- a/library/RAN_Emulation.ttcnpp
+++ b/library/RAN_Emulation.ttcnpp
@@ -1229,5 +1229,28 @@
 	}
 }
 
+#ifdef RAN_EMULATION_RANAP
+/* expect a IuReleaseCommand; Confirm that; expect SCCP-level N-DISCONNET.ind */
+altstep as_iu_release_compl_disc(float t := 5.0) runs on RAN_ConnHdlr {
+	var RANAP_PDU ranap;
+	[] BSSAP.receive(tr_RANAP_IuReleaseCommand(?)) {
+		BSSAP.send(ts_RANAP_IuReleaseComplete);
+		alt {
+		[] BSSAP.receive(RAN_Conn_Prim:MSC_CONN_PRIM_DISC_IND) {
+			setverdict(pass);
+			}
+		[] BSSAP.receive {
+			setverdict(fail, "Unexpected RANAP while waiting for SCCP Release ");
+			mtc.stop;
+			}
+		}
+		}
+	[] BSSAP.receive(RANAP_PDU:?) -> value ranap{
+		setverdict(fail, "Unexpected RANAP while waiting for IuReleaseCommand", ranap);
+		mtc.stop;
+		}
+}
+#endif
+
 
 }