--- a/code_part1/OSTC_code_c_part2/p2_deco.c	Mon Jun 23 17:29:59 2014 +0200
+++ b/code_part1/OSTC_code_c_part2/p2_deco.c	Sun Jun 29 15:13:32 2014 +0200
@@ -91,6 +91,7 @@
 // 2013/10/22: [mH]  Remove CF55 stuff
 // 2013/12/21: [jDG] Fix CNS calculation in decoplan w/o marked gas switch
 // 2014/06/16: [jDG] Fix Helium diluant. Fix volumes with many travel mix.
+// 2014/06/29: [mH] Compute int_O_ceiling
 //
 // TODO:
 //  + Allow to abort MD2 calculation (have to restart next time).
@@ -1040,6 +1041,12 @@
     calc_hauptroutine_update_tissues();
     calc_gradient_factor();
 
+    // Fill int_O_ceiling if ceiling is below the surface
+    if ((calc_lead_tissue_limit-pres_surface)>0)
+        int_O_ceiling = (short)((calc_lead_tissue_limit-pres_surface)*1000);
+    else
+        int_O_ceiling = 0;
+
     // toggle between calculation for nullzeit (bottom time),
     //                deco stops
     //                and more deco stops (continue)