pro form_feed,lun ;+ ; routine write a form feed (ascii 12) to file connected to LUN ; useage form_feed,lun ; input ; lun unit number ;- printf,lun,f='(a)',string("14b) end