; list the parameters of the currently JOINed data file
;
; see also : LISTFILEC JOIN 

if ($c_joined == 0) then
  print "No currently JOINed file"
else

print "Currently JOINed file :"
print ("Filename     = " // $c_name)
print ("Dim          = " // $c_dim)
print ("Size F1      = " // $c_sizef1)
print ("Size F2      = " // $c_sizef2)
print ("Size F3      = " // $c_sizef3)
print ("Itype        = " // $c_type)
print ("1H Frequency = " // $c_freq)
print ("Freq F1      = " // $c_freq1)
print ("Freq F2      = " // $c_freq2)
print ("Freq F3      = " // $c_freq3)
print ("Specw F1     = " // $c_specwf1)
print ("Specw F2     = " // $c_specwf2)
print ("Specw F3     = " // $c_specwf3)
print ("Offset F1    = " // $c_offsf1)
print ("Offset F2    = " // $c_offsf2)
print ("Offset F3    = " // $c_offsf3)
print ("Max. Abs.    = " // $c_absmax)
endif
