#include "perms.h"

                                                                //      1  %begin
#line 1 "64.imp"
int main(int argc, char **argv) {
  __label__ _imp_endofblock;
  _imp_initialise(argc, argv);
                                                                //      2    %routine zero(%integer i)
_imp_current_line = 2; _imp_current_file = "64.imp";
#line 2 "64.imp"
void ZERO( int I )
#line 2 "64.imp"
{
  __label__ _imp_endofblock;
                                                                //      3      ! This is actually a Robertson pass1 bug: if (&i != &0) ...
                                                                //      4      ! == should not be allowed against simple integers
                                                                //      5      %if i==0 %start
_imp_current_line = 5; _imp_current_file = "64.imp";
#line 5 "64.imp"
if (((&I) != (&0))) goto L_0002;
                                                                //      6      %finish
_imp_current_line = 6; _imp_current_file = "64.imp";
#line 6 "64.imp"
L_0002:;
                                                                //      7    %end
_imp_current_line = 7; _imp_current_file = "64.imp";
#line 7 "64.imp"
return;
_imp_endofblock: ;
} // End of block ZERO at level 2
                                                                //      8  
                                                                //      9    zero(1)
_imp_current_line = 9; _imp_current_file = "64.imp";
#line 9 "64.imp"
ZERO(1);
                                                                //     10  
                                                                //     11  %endofprogram
_imp_current_line = 11; _imp_current_file = "64.imp";
#line 11 "64.imp"
return 0;
_imp_endofblock: ;
} // End of block _imp_main at level 1
#line 11 "64.imp"
// End of file
// COMPILE WITH: gcc12 -DVALGRIND_AVAILABLE -UPARM_OPT -DPARM_UNASS -DPARM_CHECK -O -g -ftrivial-auto-var-init=pattern -fmerge-constants -fno-strict-aliasing -Wall -Wno-unused-but-set-variable -Wno-unused-variable -Wno-unused-label -Wno-unused-function -Wno-maybe-uninitialized -Wno-uninitialized -frecord-gcc-switches -fsanitize=undefined -fsanitize=float-divide-by-zero -fsanitize-undefined-trap-on-error -fsanitize=float-cast-overflow -fno-sanitize-recover=all -fstack-protector -Wno-frame-address -fno-omit-frame-pointer -Wno-return-type -Wno-comment -ftrapv -ggdb3 -gdwarf-4 -I. -I.. -c -o 64.o 64.c -lm