/*  A Simple Nonsense Program for Testing  */

begin
    abc = -22 * ( 77 + 98 ) ;         // assignment with literals
    xyz = abc / ( 33 - abc ) ;        // assignment with variables
    fcn0 () ;                         // function call, no arguments
    fcn2 ( abc, 55 * xyz ) ;          // function call, expression argumnent
    efg = fcn2 ( fcn0 (), 66 ) ;      // nested function call
    hij[-abc] = 88 * klm[99/xyz] ;    // array subscription on LHS and RHS
    fcn2 ( hij[abc] / 55, klm[77]) ;  // array arguments to a function
end
