--- np2/fdd/fddfile.c	2004/01/27 07:51:49	1.3
+++ np2/fdd/fddfile.c	2004/01/27 10:55:47	1.4
@@ -75,6 +75,9 @@ const char		*p;
 			(!milstr_cmp(p, str_d98)) || (!milstr_cmp(p, str_98d))) {
 			ftype = FTYPE_D88;
 		}
+		else if (!milstr_cmp(p, str_fdi)) {
+			ftype = FTYPE_FDI;
+		}
 		else {
 			ftype = FTYPE_BETA;
 		}
@@ -84,6 +87,9 @@ const char		*p;
 		case FTYPE_BETA:
 			return(fddxdf_set(fdd, fname, ro));
 
+		case FTYPE_FDI:
+			return(fddxdf_setfdi(fdd, fname, ro));
+
 		case FTYPE_D88:
 			return(fddd88_set(fdd, fname, ro));
 	}