#include <perms.h>
// Edinburgh IMP77 Compiler - Version 8.4
//
// 1 %begin
int main(int argc, char **argv) { /*%begin*/
_imp_initialise(argc, argv);
// 2 %integer i, j, k
int I;
int J;
int K;
// 3 %real a, b, c
float A;
float B;
float C;
// 4
// 5 i = j \\ k
I = _imp_IEXP(J, K);
// 6 i = j // k
I = ((long)J / (long)K);
// 7 i = j << k
I = J << K;
// 8 i = j >> k
I = (unsigned int)J >> K;
// 9
// 10 a = b^i
A = _imp_REXP(B, I);
// 11
// 12 %endofprogram
_imp_stop(0);
return 0;
end_0:;
}