// .................................................. 
// Intermediate code:
FCT Lmain(REG t1,REG t4) =
{
t2 <- CALL LComputeFac(t1, t4)
CALL L_print(0, t2)
}

FCT LComputeFac(REG t1, REG t36) =
{CJUMP (t36<1) ? L2 : L3
L2:
t2 <- 1
JUMP L4 [L4]
L3:
t37 <- (t36*CALL LComputeFac(t1, (t36-1)))
t2 <- t37
JUMP L4 [L4]
L4:
}