Fully transitioned to correct %face.

include/jets/q.h

@@ -165,7 +165,6 @@
     u3_noun u3qf_core(u3_noun, u3_noun);
     u3_noun u3qf_cube(u3_noun, u3_noun);
     u3_noun u3qf_face(u3_noun, u3_noun);
-    u3_noun u3qf_fuss(u3_noun, u3_noun);
     u3_noun u3qf_fine(u3_noun, u3_noun, u3_noun);
     u3_noun u3qf_fitz(u3_noun, u3_noun);
     u3_noun u3qf_flan(u3_noun, u3_noun);

include/jets/w.h

@@ -195,7 +195,6 @@
     u3_noun u3wf_core(u3_noun);
     u3_noun u3wf_cube(u3_noun);
     u3_noun u3wf_face(u3_noun);
-    u3_noun u3wf_fuss(u3_noun);
     u3_noun u3wf_fine(u3_noun);
     u3_noun u3wf_fitz(u3_noun);
     u3_noun u3wf_flan(u3_noun);

jets/f/face.c

@@ -1,4 +1,4 @@
-/* j/6/fuss.c
+/* j/6/face.c
 **
 */
 #include "all.h"
@@ -29,27 +29,3 @@
     }
   }
 
-/* functions
-*/
-  u3_noun
-  u3qf_fuss(u3_noun sag,
-            u3_noun tip)
-  {
-    if ( c3__void == tip ) {
-      return c3__void;
-    }
-    else return u3nt(c3__face,
-                     u3k(sag),
-                     u3k(tip));
-  }
-  u3_noun
-  u3wf_fuss(u3_noun cor)
-  {
-    u3_noun sag, tip;
-
-    if ( c3n == u3r_mean(cor, u3x_sam_2, &sag, u3x_sam_3, &tip, 0) ) {
-      return u3m_bail(c3__fail);
-    } else {
-      return u3qf_fuss(sag, tip);
-    }
-  }

jets/f/type.c

@@ -32,9 +32,6 @@
     case c3__face: u3x_cell(u3t(sut), &p_sut, &q_sut);
     {
     }
-    case c3__fuss: u3x_cell(u3t(sut), &p_sut, &q_sut);
-    {
-    }
     case c3__fork: p_sut = u3t(sut);
     {
     }

jets/f/ut_burn.c

@@ -113,7 +113,6 @@
           return ret;
         }
       }
-      case c3__fuss:
       case c3__face: u3x_cell(u3t(sut), &p_sut, &q_sut);
       {
         return _burn_in(van, q_sut, gil);

jets/f/ut_crop.c

@@ -150,14 +150,6 @@
         u3z(foz);
         return ret;
       }
-      case c3__fuss: u3x_cell(u3t(sut), &p_sut, &q_sut);
-      {
-        u3_noun foz = _crop_dext(van, q_sut, ref, bix);
-        u3_noun ret = u3qf_fuss(p_sut, foz);
-
-        u3z(foz);
-        return ret;
-      }
       case c3__fork: p_sut = u3t(sut);
       {
         u3_noun yed = u3qdi_tap(p_sut, u3_nul);
@@ -204,7 +196,6 @@
       default: return u3m_bail(c3__fail);
 
       case c3__core:
-      case c3__fuss:
       case c3__face: u3x_cell(u3t(ref), &p_ref, &q_ref);
       {
         return _crop_dext(van, sut, q_ref, bix);

jets/f/ut_find.c

@@ -617,7 +617,6 @@
         // fprintf(stderr, "core\r\n");
         return _find_buck_core(van, sut, way, p_heg, q_heg, axe, lon, gil);
       }
-      case c3__fuss:
       case c3__face:
       {
         // fprintf(stderr, "face\r\n");

jets/f/ut_fish.c

@@ -92,7 +92,6 @@
       case c3__core: {
         return u3nc(0, 0);
       }
-      case c3__fuss:
       case c3__face: {
         if ( (c3n == u3r_trel(sut, 0, &p_sut, &q_sut)) ) {
           return u3m_bail(c3__fail);

jets/f/ut_fuse.c

@@ -132,14 +132,6 @@
         u3z(vot);
         return ret;
       }
-      case c3__fuss: u3x_cell(u3t(sut), &p_sut, &q_sut);
-      {
-        u3_noun vot = _fuse_in(van, q_sut, ref, bix);
-        u3_noun ret = u3qf_fuss(p_sut, vot);
-
-        u3z(vot);
-        return ret;
-      }
       case c3__fork: p_sut = u3t(sut);
       {
         u3_noun yed = u3qdi_tap(p_sut, u3_nul);

jets/f/ut_nest.c

@@ -246,7 +246,6 @@
           else return _nest_sint(van, sut, tel, ref, seg, reg, gil);
         }
       }
-      case c3__fuss:
       case c3__face: {
         if ( (c3n == u3r_trel(sut, 0, &p_sut, &q_sut)) ) {
           return u3m_bail(c3__fail);
@@ -410,7 +409,6 @@
           u3z(gam);
           return hiv;
         }
-        case c3__fuss:
         case c3__face: {
           if ( c3n == u3r_trel(ref, 0, &p_ref, &q_ref) ) {
             return u3m_bail(c3__fail);

jets/f/ut_peek.c

@@ -105,7 +105,6 @@
           return pro;
         }
       }
-      case c3__fuss:
       case c3__face: {
         if ( (c3n == u3r_trel(sut, 0, &p_sut, &q_sut)) ) {
           return u3m_bail(c3__fail);

jets/f/ut_repo.c

@@ -34,7 +34,6 @@
           return u3nt(c3__cell, c3__noun, u3k(p_sut));
         }
       }
-      case c3__fuss:
       case c3__face: {
         if ( c3n == u3r_cell(u3t(sut), &p_sut, &q_sut)) {
           return u3m_bail(c3__fail);