Page 1 sur 1

Pause(expr)

Publié : jeu. avr. 05, 2018 5:32 pm
par compsystems
Hello, BP, an idea
please add to the Pause command or pause (new cmd) the option to print in 2D and then pause, just as the pause cmd ti68k calcs does.

Form 1 (std)

Code : Tout sélectionner

f0():={
        local x,y;
        assume(x,symbol);assume(y,symbol);
        autosimplify(nop);
        DispG; 
 
        printf( "Console, 2D printing" ); Pause;

        printf( "Expr1:" ); 
        printf( 'f(x):=x^3-2*x^2+1*x-1' ); Pause;
        printf( f(x):=x^3-2*x^2+1*x-1 ); Pause;
        printf( f(x) ); Pause;;
        
        printf( "Expr2:" ); 
        printf( 'x^3-2*x^2+1*x-1 | x=y' ) Pause;
        printf( x^3-2*x^2+1*x-1 | x=y ); Pause;
        printf( f(y) ); Pause;;
        
        printf( "Press any key to continue" ); 
        printf( "Expr3:" );
        printf( 'g(x):=1/(x+3)' ); Pause;
        printf( g(x):=1/(x+3) ); Pause;
        printf( g(x) ); Pause;

        printf( "Expr4:" );
        printf( 'f(g(x))' ); Pause;
        printf( f(g(x)) ); Pause;
    
        printf( "Expr5:" );        
        printf( 'g(f(x))' ); Pause;
        printf( g(f(x)) ); Pause;
              
        printf( "Expr6:");
        printf( (x^4-x^3-6*x^2+11*x-6)/x^6+(x^3-6*x^2+11*x-6 | x=y) );
}:;
In this way the number of instructions is simplified, a shorter code is displayed.

Form 2

Code : Tout sélectionner

f0():={
        local x,y;
        assume(x,symbol); assume(y,symbol);
        autosimplify(nop);
        DispG; 
 
        printf( "Console, 2D printing" ); 
        
        printf( "Expr1:" ); 
        pause( 'f(x):=x^3-2*x^2+1*x-1' ); 
        pause( f(x):=x^3-2*x^2+1*x-1 ); 
        pause( f(x) ); 
        
        printf( "Expr2:" ); 
        pause( 'x^3-2*x^2+1*x-1 | x=y' ) 
        pause( x^3-2*x^2+1*x-1 | x=y ); 
        pause( f(y) ); ;
        
        pause( "Press any key to continue" ); 
        pause( "Expr3:" );
        pause( 'g(x):=1/(x+3)' ); 
        pause( g(x):=1/(x+3) ); 
        pause( g(x) ); 
   
        printf( "Expr4:" );
        pause( 'f(g(x))' ); 
        pause( f(g(x)) ); 

        printf( "Expr5:" );        
        pause( 'g(f(x))' ); 
        pause( g(f(x)) ); 
         
        printf( "Expr6:");
        pause( (x^4-x^3-6*x^2+11*x-6)/x^6+(x^3-6*x^2+11*x-6 | x=y) );

}:;