block left fill

aa1024 · Apr 15, 2018 · 41966a2 · 41966a2
1 parent 52aae11
commit 41966a2
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/libs/str.q b/libs/str.q
@@ -51,6 +51,14 @@ sfl:{neg[x]$string y}
 /@returns String right padded with space
 sfr:{x$string y}
 
+/@function sflb @desc Space fill from left for list of strings 
+/   @param int
+/   @param String
+/@returns String left padded with space
+sflb:{sfl[max count each string x] each x}
+
+
+
 /@function zfl @desc zero fill
 /   @param int
 /   @param String