function en(x){
k=-22
while(Math.pow(10,k+=3)<=Math.abs(x)){}
s=" "+ trunc(x/Math.pow(10,k-2),3)+" "+dot+"10"+""+(k-2)+""
return s
}
function sn(x){
var s=""
k=-25
while(Math.pow(10,k++)<=Math.abs(x)){}
s=" "+ round(x/Math.pow(10,k-2),3)+" "+dot+"10"+""+(k-2)+""
return s
}
function hide(x,n){
vv=new Array(11);
var y=x/Math.pow(2,n);
for(var i=1;i<=10;i++){
vv[i]=sn(y*Math.pow(2,i));
}
return vv;
}
function hide2(x,n){
vv=new Array(11);
var y=x/Math.pow(2,n)*Math.pow(-1,n);
for(var i=1;i<=10;i++){
vv[i]=sn(y*Math.pow(2,i)*Math.pow(-1,i));
}
return vv;
}
function reale2(a,b){
return rnd()*(b-a)+a
}
function rnd(){return Math.random()}
var ichapter=0;
var isubchapter=0;
var isubsubchapter=0;
var itemize="itemize";
var enumerate="enumerate"
function gnLib(){
alert("gnLib is ON")
}
// abbreviazioni di comandi html
//
var _hr="
"+i*10)
for(var j=0;j<10;j++){
k=(i*10+j*1);
document.write(" | "+eval(simbols[k])+" "+simbols[k])
}
}
document.write("")
}
/////////////////////////////////////////////////////////////
function trunc(x,n){
eval("y=10E"+(n-1))
return parseInt(x*y)/y
}
function round(x,n){
eval("y=10E"+(n-1))
return Math.round(x*y)/y
}
// ******************************************************************************
function ww(){w(compattaABvC("","",arguments,""))}// stampa tutte le stringhe-argomenti passate
function wl(){w(l(arguments))}; // idem ma forzatamente in linea
function wlc(){w(lc(arguments))}; // idem ma centrata (utile per le frazioni)
//function w(x){document.writeln(x)} // stampa semplice
function w(x){document.writeln(tex(x))} //stampa con passaggio attraverso tex
function l(){return compattaABvC("")}
function lc(){return compattaABvC("")}
function pow(a,b){ return a+""+b+"" }
function sub(a,b){ return a+""+b+"" }
function toVett(){return arguments}
function compatta(x){var s="";for(var i=0;iv.length;i++){s+=B+v[i];}return s+C}
function bold(){return compattaABvC("","",arguments,"")}
function mat31(a,b,c){ // restituisce 3 dati incolonnati
return ""
}
function red(){return compattaABvC("","",arguments,"")}
function frac(num,den){ return mat31(num," ",den)} // frazione
function overline(x){
return ""
}
function printSet(){
document.write(". ")
for(var j=0;j<10;j++){document.write(" | "+j)}
for(var i=0;i<=25;i++){
document.write(" | "+i*10)
for(var j=0;j<10;j++){
k=(i*10+j*1);
document.write(" | "+eval(simbols[k])+" "+simbols[k])
}
}
document.write(" | ")
}
function intero(a,b){x=parseInt(Math.random()*(b-a)+a); return x;}
function scegli(a){return ' '+a[intero(0,a.length)]+' '}
function E(x){ return ' 10'+x+' '}
function mischia(v){ // scambia (lunghezza Vettore*4) volte coppie del vettore
l=v.length;
for(var i=1;i<=v.length*4;i++){
a=parseInt(Math.random()*l);
b=parseInt(Math.random()*l);
x=v[a];y=v[b];
v[b]=x;v[a]=y;
}
return v;
}
function drawimage(x,y,i) {
document.writeln('');
}
function fillRect(x0,y0,l,h){
if(l<0){l=-l;x0=x0-l;}
if(h<0){h=-h;y0=y0-h;}
x0=Math.floor(x0);y0=Math.floor(y0);
l=Math.ceil(l);h=Math.ceil(h);
for(var x=x0;x<=x0+l;x++){
for(var y=y0;y<=y0+h;y++){
document.write('.');
}
}
}
function fillOval(x,y,l,h){
rx=l/2;ry=h/2;
xc=x+rx;yc=y+ry
for(var xx=x+l;xx>=-x;xx--){
alpha=Math.acos((xx-x)/l)
drawLine(xc+rx*Math.cos(alpha),yc-ry*Math.sin(alpha),xc+rx*Math.cos(-alpha),yc-ry*Math.sin(-alpha));
}
}
function fillArc(x,y,l,h,alpha0,alpha1){
rx=l/2;ry=h/2;
xc=x+rx;yc=y+ry
da=Math.PI/180
for(var alpha=alpha0;alpha<=alpha1;alpha+=da){
drawLine(xc,yc,xc+rx*Math.cos(alpha+da),yc-ry*Math.sin(alpha+da));
}
}
function drawArc(x,y,l,h,alpha0,alpha1){
rx=l/2;ry=h/2;
xc=x+rx;yc=y+ry
da=Math.PI/360
for(var alpha=alpha0;alpha<=alpha1;alpha+=da){
drawLine(xc+rx*Math.cos(alpha),yc-ry*Math.sin(alpha),xc+rx*Math.cos(alpha+da),yc-ry*Math.sin(alpha+da));
}
}
function drawOval(x,y,l,h){
rx=l/2;ry=h/2;
xc=x+rx;yc=y+ry
da=Math.PI/360
for(var alpha=0;alpha<=6.29;alpha+=da){
drawLine(xc+rx*Math.cos(alpha),yc- ry*Math.sin(alpha),xc+rx*Math.cos(alpha+da),yc- ry*Math.sin(alpha+da));
}
}
function punto(x,y){ // By Nicco: Fa un puntino in coordinate x,y (Obsoleta)
w(' . ' );
}
function setPoint(x,y){ // By Nicco:Fa un puntino in coordinate x,y (In futuro restera' solo questa)
w(' . ' );
}
function tabulaFunzione(f,x0,x1,deltaX) { //By Gamba
document.writeln('');
document.writeln(''+'x'+' | '+f);
for(var x=x0;x<=x1;x+=deltaX){
document.writeln(' | '+x+' | '+eval (f));
}
document.writeln(' | ')
}
function setColor(c){
document.write('');
}
function drawRect(x0,y0,l,h){
x0=Math.floor(x0);y0=Math.floor(y0);
l=Math.ceil(l);h=Math.ceil(h);
drawLine(x0,y0,x0+l,y0);
drawLine(x0,y0,x0,y0+h);
drawLine(x0+l,y0+h,x0+l,y0);
drawLine(x0+l,y0+h,x0,y0+h);
}
function relativedrawRect(x0,y0,l,h){
x0=Math.floor(x0);y0=Math.floor(y0);
l=Math.ceil(l);h=Math.ceil(h);
relativedrawLine(x0,y0,x0+l,y0);
relativedrawLine(x0,y0,x0,y0+h);
relativedrawLine(x0+l,y0+h,x0+l,y0);
relativedrawLine(x0+l,y0+h,x0,y0+h);
}
function drawLine(x0,y0,x1,y1){
dx=x1-x0;dy=y1-y0;
if(y1>=y0){versoy=1}else{versoy=-1}
if(x1>=x0){versox=1}else{versox=-1}
npx=Math.abs(dx);npy=Math.abs(dy);
var i=0;
if( dx*dx >= dy*dy){ // tg <= 45 gradi
deY=dy/npx;
with(document){
while(i++<=npx){
write(
'.');
x0+=versox;y0+=deY
}
}
}
else{ // tg > 45 gradi
deX=dx/npy;
with(document){
while(i++<=npy){
write(
'.');
y0+=versoy;x0+=deX;
}
}
}
}
function relativedrawLine(x0,y0,x1,y1){
dx=x1-x0;dy=y1-y0;
if(y1>=y0){versoy=1}else{versoy=-1}
if(x1>=x0){versox=1}else{versox=-1}
npx=Math.abs(dx);npy=Math.abs(dy);
var i=0;
if( dx*dx >= dy*dy){ // tg <= 45 gradi
deY=dy/npx;
with(document){
while(i++<=npx){
write(
'.');
x0+=versox;y0+=deY
}
}
}
else{ // tg > 45 gradi
deX=dx/npy;
with(document){
while(i++<=npy){
write(
'.');
y0+=versoy;x0+=deX;
}
}
}
}
function interactive() {// By Nicco:Apre una finestra nella quale si possono lanciare istruzioni javascript (utile se si vogliono provare le nuove funzioni o se si vuol vedere lo stato delle variabili)
query=' ';
while (query !="exit"){
query=prompt('Fornire comando (exit per uscire)',"");
if(query!="exit")eval(query);
}
}
function drawString(s,x,y){
document.write(
''+s+'');
}
// ------------- Gestione Tabelle ------------------
function tabella() { w('') } // By Contotti: Apre un ambiente tabella
function nuovaRiga(){ w('') } // By Cordiano
function nuovoDato(x){ w(''+x) } // By Cordiano
function fineTabella(){ w(' | ') } // By Contotti
function intero(a,b){x=parseInt(Math.random()*(b-a)+a); return x;}
function scegli(a){return ' '+a[intero(0,a.length)]+' '}
function E(x){ return ' 10'+x+' '}
function mischia(v){ // scambia (lunghezza Vettore*4) volte coppie del vettore
l=v.length;
for(var i=1;i<=v.length*4;i++){
a=parseInt(Math.random()*l);
b=parseInt(Math.random()*l);
x=v[a];y=v[b];
v[b]=x;v[a]=y;
}
return v;
}
//------------------ Matematiche ------------------
function sum(a,b){return Number(Number(a)+Number(b))} // By Napolitano
function sin(x){return Math.sin(x)}
function cos(x){return Math.cos(x)}
function tan(x){return Math.tan(x)}
function listato(f){
w(''+f.toString()+'' );
}
function fillRect2(x,y,w,h,color){
document.write(
''
)
}
//COSTANTI:
var PIGRECO=Math.PI;
var PIGRECOMEZZI=(Math.PI)/2;
INFINITO =1/0;
// PARENTESI GRANDI **************
var atUP = fontChar("Symbol",230);var atMIDDLE = fontChar("Symbol",231);
var atBOTTOM = fontChar("Symbol",232);var ctUP = fontChar("Symbol",246);
var ctMIDDLE = fontChar("Symbol",247);var ctBOTTOM = fontChar("Symbol",248);
var atBig= mat31(atUP,atMIDDLE,atBOTTOM)
var atBigBig= mat31(atUP,atMIDDLE+" "+atMIDDLE+" "+atMIDDLE,atBOTTOM)
var ctBig= mat31(ctUP,ctMIDDLE,ctBOTTOM)
var ctBigBig= mat31(ctUP,ctMIDDLE+" "+cqMIDDLE+" "+ctMIDDLE,ctBOTTOM)
var aqUP = fontChar("Symbol",233);var aqMIDDLE = fontChar("Symbol",234);
var aqBOTTOM = fontChar("Symbol",235);var cqUP = fontChar("Symbol",249);
var cqMIDDLE = fontChar("Symbol",250);var cqBOTTOM = fontChar("Symbol",251);
var aqBig = mat31(aqUP,aqMIDDLE,aqBOTTOM)
var aqBigBig= mat31(aqUP,atMIDDLE+" "+atMIDDLE+" "+atMIDDLE,aqBOTTOM)
var cqBig = mat31(cqUP,cqMIDDLE,cqBOTTOM)
var cqBigBig= mat31(cqUP,cqMIDDLE+" "+cqMIDDLE+" "+cqMIDDLE,cqBOTTOM)
var agUP = fontChar("Symbol",236);var agMIDDLE = fontChar("Symbol",237);
var agBOTTOM = fontChar("Symbol",238);var cgUP = fontChar("Symbol",252);
var cgMIDDLE = fontChar("Symbol",253);var cgBOTTOM = fontChar("Symbol",254);
var agBig = mat31(agUP,agMIDDLE,agBOTTOM)
var agBigBig= mat31(agUP,bar+" "+agMIDDLE+" "+bar,agBOTTOM)
var cgBig = mat31(cgUP,cgMIDDLE,cgBOTTOM)
var cgBigBig= mat31(cgUP,bar+" "+cgMIDDLE+" "+bar,cgBOTTOM)
var intUP = fontChar("Symbol",243);var agMIDDLE = fontChar("Symbol",237);
var intOTTOM = fontChar("Symbol",244);var cgUP = fontChar("Symbol",252);
var intMIDDLE = fontChar("Symbol",245);var cgBOTTOM = fontChar("Symbol",254);
var intBig = mat31(agUP,agMIDDLE,agBOTTOM)
var intLittle = fontChar("Symbol",242);var agMIDDLE = fontChar("Symbol",237);
// **********************************************
function pow(a,b){ return a+""+b+"" }
// FUNZIONI A NUMERO DI ARGOMENTI VARIABILE
function toVett(){return arguments}
function compatta(x){var s="";for(var i=0;iv.length;i++){s+=B+v[i];}return s+C}// compatta tutti gli argomenti in una stringa
function bold(){return compattaABvC("","",arguments,"")} // compatta con prefisso, infisso e suffisso
function mat31(a,b,c){ // restituisce 3 dati incolonnati
return ""
}
function red(){return compattaABvC("","",arguments,"")}
function frac(num,den){ return mat31(num," ",den)} // frazione
function overline(x){
return ""
}
function tex(x){
while(x.match(/(!overline{)([^}]*)(})/)){x=x.replace(/(!overline{)([^}]*)(})/g,"")}
while(x.match(/(!frac{)([^}]*)(}{)([^}]*)(})/)){x=x.replace(/(!frac{)([^}]*)(}{)([^}]*)(})/g,"")}
while(x.match(/([^\^])(\^)(\{)(\w*)(\})/)!=null){x=x.replace(/([^\^])(\^)(\{)(\w*)(\})/,"$1$4")}//exp{}{}
while(x.match(/([^\^])(\^)(\w*)/)!=null) {x=x.replace(/([^\^])(\^)(\w*)/,"$1$3")}//exp 1 chr
while(x.match(/([^\_])(\_)(\{)(\w*)(\})/)!=null){x=x.replace(/([^\_])(\_)(\{)(\w+)(\})/,"$1$4")}//ped {}{}
while(x.match(/([^\_])(\_)(\w)([^\{])/)!=null){x=x.replace(/([^\_])(\_)(\w)([^\{])/,"$1 $3 $4")}// ped 1 chr
x=x.replace(/\/\//g," ");// "//" break line
x=x.replace(/!Abar/g,""+String.fromCharCode(256)+"");
x=x.replace(/!alpha/g,alpha);
x=x.replace(/!beta/g,beta);
x=x.replace(/!cap/g,cap);
x=x.replace(/!delta/g,delta);
x=x.replace(/!epsilon/g,epsilon);
x=x.replace(/!gamma/g,gamma);
x=x.replace(/!eta/g,eta);
x=x.replace(/!iota/g,iota);
x=x.replace(/!phi/g,phi);
x=x.replace(/!kappa/g,kappa);
x=x.replace(/!lambda/g,lambda);
x=x.replace(/!mu/g,mu);
x=x.replace(/!nu/g,nu);
x=x.replace(/!pi/g,pi);
x=x.replace(/!psi/g,psi);
x=x.replace(/!rho/g,rho);
x=x.replace(/!sigma/g,sigma);
x=x.replace(/!tau/g,tau);
x=x.replace(/!omega/g,omega);
// simboli matematici
x=x.replace(/!biimp/g,biimp);
x=x.replace(/!cup/g,cup);
x=x.replace(/!empty/g,empty);
x=x.replace(/!forall/g,forall);
x=x.replace(/!notinset/g,notinset);
x=x.replace(/!inset/g,inset);
x=x.replace(/!root/g,root);
x=x.replace(/!dot/g,dot);
return(x);
}
//
// _a, _b, ... , _z , _A, _B, ..., _Z autodefinite 'a','b', etc..., 'A','B', etc...
//
// fontChar(f,c): ritorna il carattere (c) del font (f)
//
////
//
//
//
////
//
//
// gnLib() : emette un alert che segnala l'attivazione della gnLib
//
// l(,,,):ritorna gli argomenti passati in una tabella-linea senza a-capo (bottom-aligned)
// lc(,,,):ritorna gli argomenti passati in una tabella-linea senza a-capo (centrati)
//
//
//
////
//
//
//
// simbols: vettore contenente i nomi da assegnare ai caratteri del font "symbol"
// trunc(x,n): tronca (o approssima?) x all'n-mo decimale dopo la virgola
// wl(,,,): stampa tutte le stringhe-argomenti passati forzatamente in linea (funziona?)
// wlc(,,,): stampa tutte le stringhe-argomenti passati forzatamente in linea e centrati (funziona?)
// ww(,,,): stampa tutte le stringhe-argomenti passati
// w(x):stampa la stringa x
//
//
//
//
//
// FUNZIONI GRAFICHE
// setColor(c);
// setPoint(x,y);drawLine(x0,y0,x1,y1);
// drawRect(x0,y0,l,h);fillRect(x0,y0,l,h){
// drawOval(x,y,l,h);fillOval(x,y,l,h)
// drawArc(x,y,l,h,alpha0,alpha1);fillArc(x,y,l,h,alpha0,alpha1)
// drawString(s,x,y);// drawimage(x,y,nomeFile)
// debug() ;listato(funzione); i1n(n,istr)
//
// tabulaFunzione(f,x0,x1,deltaX)
// tabella2x2(a1,a2,a3,a4)
// w(x);wln(x);nprompt
//
//
// tabella();nuovaRiga();nuovoDato(x);fineTabella()
// quadrato(x);cubo(x);quartaPotenza(x);
// radice(x)
// dimezza(x);doppio(x);triplo(x);quadruplo(x)
// somma(a,b)
// sin(x);cos(x);tan(x)
// sol(a,b,c)
|