Add possibility to provide dimension to rtc_profile

mds/tdi/dicts/rtc_profile.fun

@@ -13,14 +13,16 @@ arguments:
      a time dependent profile in this form:
      - data shape is [profile points, times]
      - the first dimension is time
+  _d1 dimension array to be used in the build_signal expr.
 
 returns:
   a jScope plottable build_signal
   expression to plot the profile 
   with live update capability (ctrl-Y in jScope)
 */
-FUN PUBLIC rtc_profile(_s)
+FUN PUBLIC rtc_profile(_s, optional in _d1)
 {
-  /* Leave second dimension empty, MDSplus will return 0:size-1 when asked for it */
-  Return(build_param(build_signal(transpose(DATA(_s)), *, DIM_OF(_s), *),help_of(_s),1));
+  _d1 = present(_d1) ? _d1 : *;
+  if (ndims(_s) != 2) ABORT();
+  Return(make_param(make_signal(transpose(DATA(_s)), *, DIM_OF(_s), _d1),help_of(_s),1));
 }