$!
$! DES2_BUILD
$!
$ write sys$output ""
$ if( f$trnlnm( "cdsa_tempdir" ) .eqs. "" )
$ then
$    write sys$output "Please define the rooted logical """cdsa_tempdir""" to build this example."
$    exit
$ else
$    sho logical cdsa_tempdir
$ endif
$!
$ save_default_dir = f$environment( "DEFAULT" )
$ set default cdsa_tempdir:[des2]
$ on error then goto done
$ on control_y then goto done
$!
$ write sys$output ""
$!
$ if( p1 .nes. "" .and. p1 .eqs. "CLEAN" )
$ then
$    if( f$search( "*.obj" ) .nes. "" ) then delete *.obj;*
$    if( f$search( "*.lis" ) .nes. "" ) then delete *.lis;*
$    if( f$search( "*.map" ) .nes. "" ) then delete *.map;*
$    if( f$search( "*.exe" ) .nes. "" ) then delete *.exe;*
$    if( f$search( "*.esw" ) .nes. "" ) then delete *.esw;*
$ endif
$!
$ set verify
$ cc/list/prefix=all/include=cdsa_sysdir:[includes]/define=ISL_INCLUDED/warn=(disable=LONGEXTERN) des2.c
$ cc/list/prefix=all/include=cdsa_sysdir:[includes]/define=ISL_INCLUDED/warn=(disable=LONGEXTERN) do_des2.c
$ cc/list/prefix=all/include=([],cdsa_sysdir:[includes])/define=ISL_INCLUDED callouts.c
$ link/map/exe=des2.exe des2.opt/opt
$!
$ cc/list/include=cdsa_sysdir:[includes]/prefix=all install_des2.c
$ link/map/exe=install_des2.exe des2_ins.opt/opt
$!
$ done:
$ set default 'save_default_dir
$ set noverify
$ exit