bugfix for calling gvlst2 in supot.F