/* Implement factorial without a main proc */

proc fact( num )
{
    if( num < 1 )
        return 1;
    else
        return num * fact( num - 1 );
}

class mainClass {
    public proc create( num )
    {
        say( "fact( ", num, " ) = ", fact( num ), "\n" );
    }
}

mainClass mainobj(7);