#include <perms.h>

                                                                //      1  %system %integer %fn %spec  getloadavg (%long %real %array %name   loadavg, %integer   nelem)
#line 1 "regression-run-tmp/systest.imp"
extern int getloadavg( double /*arrayname*/*LOADAVG, int NELEM );
                                                                //      2  
                                                                //      3  %begin
#line 3 "regression-run-tmp/systest.imp"
int main(int argc, char **argv) {
  _imp_initialise(argc, argv);
                                                                //      4    %integer rc
#line 4 "regression-run-tmp/systest.imp"
int RC;
                                                                //      5    %long %real %array LA(0:2)
#line 5 "regression-run-tmp/systest.imp"
double LA[3];
                                                                //      6    rc = getloadavg (LA, 3)
#line 6 "regression-run-tmp/systest.imp"
RC = getloadavg(&LA[-(0)], 3);
                                                                //      7    print string("Load average:  1 min: ")
#line 7 "regression-run-tmp/systest.imp"
_imp_PRINTSTRING(_imp_str_literal("Load average:  1 min: "));
                                                                //      8    print(LA(0), 4, 4)
#line 8 "regression-run-tmp/systest.imp"
_imp_PRINT(LA[0], 4, 4);
                                                                //      9    print string("  5 mins: ")
#line 9 "regression-run-tmp/systest.imp"
_imp_PRINTSTRING(_imp_str_literal("  5 mins: "));
                                                                //     10    print(LA(1), 4, 4)
#line 10 "regression-run-tmp/systest.imp"
_imp_PRINT(LA[1], 4, 4);
                                                                //     11    print string("  15 mins: ")
#line 11 "regression-run-tmp/systest.imp"
_imp_PRINTSTRING(_imp_str_literal("  15 mins: "));
                                                                //     12    print(LA(2), 4, 4)
#line 12 "regression-run-tmp/systest.imp"
_imp_PRINT(LA[2], 4, 4);
                                                                //     13    newline
#line 13 "regression-run-tmp/systest.imp"
_imp_NEWLINE();
                                                                //     14  %endofprogram
#line 14 "regression-run-tmp/systest.imp"
/* Remove %on %event handler here if present for this block */
return 0;
} // End of block _imp_main at level 1
#line 14 "regression-run-tmp/systest.imp"
// End of file