RosettaCodeData/Task/Factorial/Peylang/factorial.peylang

-- calculate factorial

chiz a = 5;
chiz n = 1;

ta a >= 2
{
    n *= a;
    a -= 1;
}

chaap n;