diff --git a/syntaxes/fortran_free-form.tmLanguage.json b/syntaxes/fortran_free-form.tmLanguage.json
index 4f6cb6b1..04da4681 100644
--- a/syntaxes/fortran_free-form.tmLanguage.json
+++ b/syntaxes/fortran_free-form.tmLanguage.json
@@ -1278,7 +1278,7 @@
 			"patterns": [
 				{
 					"name": "meta.block.select.fortran",
-					"begin": "(?i)\\b(select)",
+					"begin": "(?i)\\b(select\\s*case|select\\s*type)",
 					"beginCaptures": {
 						"1": {
 							"name": "keyword.control.select.fortran"