Data commit

Task/Department-numbers/MAD/department-numbers.mad

@@ -0,0 +1,10 @@
+           NORMAL MODE IS INTEGER
+           PRINT COMMENT $ POLICE  SANITATION  FIRE$
+           THROUGH LOOP, FOR P=2, 2, P.G.7
+           THROUGH LOOP, FOR S=1, 1, S.G.7
+           THROUGH LOOP, FOR F=1, 1, F.G.7
+           WHENEVER P.E.S .OR. P.E.F .OR. S.E.F, TRANSFER TO LOOP
+           WHENEVER P+S+F .E. 12, PRINT FORMAT OCC, P, S, F
+LOOP       CONTINUE
+           VECTOR VALUES OCC = $I6,S2,I10,S2,I4*$
+           END OF PROGRAM