bts: Send DM_REL_REQ to L1 when closing logical channel

Change-Id: I0c0bb52b4de20dfd2d4ea8d0045ea63d84686ac5
diff --git a/bts/BTS_Tests.ttcn b/bts/BTS_Tests.ttcn
index 80500f2..8d789bd 100644
--- a/bts/BTS_Tests.ttcn
+++ b/bts/BTS_Tests.ttcn
@@ -957,6 +957,7 @@
 		}
 	}
 	f_rsl_chan_deact();
+	f_L1CTL_DM_REL_REQ(L1CTL, g_chan_nr);
 }
 testcase TC_meas_res_sign_tchf() runs on test_CT {
 	var ConnHdlr vc_conn;
diff --git a/library/L1CTL_PortType.ttcn b/library/L1CTL_PortType.ttcn
index ba47414..231ebe3 100644
--- a/library/L1CTL_PortType.ttcn
+++ b/library/L1CTL_PortType.ttcn
@@ -161,6 +161,11 @@
 		pt.send(ts_L1CTL_DM_EST_REQ({ false, imm_ass.chan_desc.arfcn }, imm_ass.chan_desc.chan_nr, imm_ass.chan_desc.tsc));
 	}
 
+	/* Send DM_REL_REQ from parameters derived from IMM ASS */
+	function f_L1CTL_DM_REL_REQ(L1CTL_PT pt, RslChannelNr chan_nr) {
+		pt.send(ts_L1CTL_DM_REL_REQ(chan_nr));
+	}
+
 	function f_L1CTL_RESET(L1CTL_PT pt, L1ctlResetType res_type := L1CTL_RES_T_FULL) {
 		timer T := 2.0;
 		pt.send(t_L1ctlResetReq(res_type));