01 LBL "DOCAS" ; Simple program to use CAS 02 SF 25 ; Set flag 25 to ignore errors 03 "CASOUT" 04 PURFL ; Delete CASOUT if it exists 05 CF 25 ; Clear flag 25 to restore errors 06 "CASIN,CASOUT" ; Specify CAS input and output files 07 I41CXED ; Open CAS input file with text editor 08 CAS ; Execute CAS after text editor finishes 09 "CASOUT" 10 I41CXED ; View CAS output with text editor 11 END