Mercurial > public > mk2

comparison code_part1/OSTC_code_c_part2/p2_deco.c @ 185:ae3a83982ab2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
BUGFIX NDL blocked to 11' (bb #9)
author JeanDo
date Sun, 06 Feb 2011 20:03:48 +0100
parents 016c45a0caaf
children 57a654c199ae
comparison
equal deleted inserted replaced
184:016c45a0caaf 185:ae3a83982ab2
1383 char_O_nullzeit = 0; 1383 char_O_nullzeit = 0;
1384 for(loop = 1; loop <= 17; loop++) 1384 for(loop = 1; loop <= 17; loop++)
1385 { 1385 {
1386 backup_sim_pres_tissue(); 1386 backup_sim_pres_tissue();
1387 sim_tissue_10min(); 1387 sim_tissue_10min();
1388 char_O_nullzeit += 10;
1389 1388
1390 if (char_I_deco_model == 1) 1389 if (char_I_deco_model == 1)
1391 temp1 = GF_high * sim_pres_gtissue_diff + sim_pres_gtissue; 1390 temp1 = GF_high * sim_pres_gtissue_diff + sim_pres_gtissue;
1392 else 1391 else
1393 temp1 = sim_pres_gtissue_limit; 1392 temp1 = sim_pres_gtissue_limit;
1394 if (temp1 > temp_surface) // changed in v.102 , if guiding tissue can not be exposed to surface pressure immediately 1393 if (temp1 > temp_surface) // changed in v.102 , if guiding tissue can not be exposed to surface pressure immediately
1395 loop = 255; 1394 {
1395 restore_sim_pres_tissue();
1396 break;
1397 }
1398 // Validate once we know its good.
1399 char_O_nullzeit += 10;
1396 } 1400 }
1397
1398 if (loop == 255)
1399 {
1400 restore_sim_pres_tissue();
1401 char_O_nullzeit -= 10;
1402 } //if loop == 255
1403 1401
1404 if (char_O_nullzeit < 60) 1402 if (char_O_nullzeit < 60)
1405 { 1403 {
1406 for(loop=1; loop <= 10; loop++) 1404 for(loop=1; loop <= 10; loop++)
1407 { 1405 {
1408 sim_tissue_1min(); 1406 sim_tissue_1min();
1409 char_O_nullzeit = char_O_nullzeit + 1;
1410 if (char_I_deco_model == 1) 1407 if (char_I_deco_model == 1)
1411 temp1 = GF_high * sim_pres_gtissue_diff + sim_pres_gtissue; 1408 temp1 = GF_high * sim_pres_gtissue_diff + sim_pres_gtissue;
1412 else 1409 else
1413 temp1 = sim_pres_gtissue_limit; 1410 temp1 = sim_pres_gtissue_limit;
1414 if (temp1 > temp_surface) // changed in v.102 , if guiding tissue can not be exposed to surface pressure immediately 1411 if (temp1 > temp_surface) // changed in v.102 , if guiding tissue can not be exposed to surface pressure immediately
1415 loop = 255; 1412 break;
1413 char_O_nullzeit++;
1416 } 1414 }
1417 if (loop == 255) 1415 }
1418 char_O_nullzeit = char_O_nullzeit - 1; 1416 }
1419 } // if char_O_nullzeit < 60
1420 } //calc_nullzeit
1421 1417
1422 ////////////////////////////////////////////////////////////////////////////// 1418 //////////////////////////////////////////////////////////////////////////////
1423 // backup_sim_pres_tissue 1419 // backup_sim_pres_tissue
1424 // 1420 //
1425 void backup_sim_pres_tissue(void) 1421 void backup_sim_pres_tissue(void)