# Process CIF (Combined_Input_Format) file to get ALIAS # Last change: Jul 31, 2001 # Result: s1|HD|123 BEGIN{OFS="|"; FS=" "; sn=0; Noteflag=0; } { if (substr($0,1,1)=="#") {$0=""}; # ignore comment lines if ($1=="Notes") {Noteflag=1} if ($1=="EndNotes") {Noteflag=0} if (($1=="System")&&(Noteflag==0)) sn=$2; if ($1=="Alias") print "s"sn,$2,$3" "$4" "$5" "$6" "$7 }