366
}
367
if (UN > UNmax){
368
UNmax=UN;
369
ZN=Z;
370
return 1;
371
}
372
if ((UN <= UNmax)&& (UI>UNmax)){
373
sum=sum+DW*DZ;
374
ZI=Z;
375
return 1;
376
}
377
378
if ((UI<=UNmax) && (counter>=2)){
379
return 0;
380
}
381
return 1;
382
}
383
384
385 void Trigidice::errors(){
386
WF=0;
387
UI=0;
388
ZN=0;
389
ZI=1;
390
VI=0;
391
}
392
393
394 void Trigidice::once(){
395
WF=WD;
396
PHI = PHIB;
397
iteration = 1;
398
do{
399
counter = 0;
400
PHI = PHIB;
401
sum = 0;
402
GLOBAL();
403
do {
404
counter++;
405
PROFILE();
406
} while ( check());
407
} while ( prec());
408
}
409
410
411
412 int Trigidice::pressdiff(){
413
414
415
if ( fabs(UIorg-UI) <= P(precision))
416
{
417
return 0;
418
}
419
else{
25