diff --git a/Source/LK1/L1A/LOADB.f90 b/Source/LK1/L1A/LOADB.f90
index 4865d718..67f35ccb 100644
--- a/Source/LK1/L1A/LOADB.f90
+++ b/Source/LK1/L1A/LOADB.f90
@@ -1174,6 +1174,12 @@ SUBROUTINE READ_BDF_LINE(IN1, IOCHK, LINE)
          TRIM_LINE = TRIM(LINE)
       ENDDO
 
+      ! Skip capitalizing OUTPUT4 and PARTN, which are executive control commands
+      ! because matrix names like "KRRcb" in their fields are case sensitive.
+      IF ((LINE(1: 7) == 'OUTPUT4') .OR. (LINE(1: 5) == 'PARTN'  )) THEN
+         RETURN
+      ENDIF
+
       DO I = 1,256
           ! remove $
           IF (LINE(I:I) == '$') THEN