Restructuring - FORMAT prised from CSNOBOL4