How to detect if the current major mode is derived from prog-mode

Question

I want to write a function that invokes one of 2 functions, depending on whether the current major mode is a prog-mode. How do I detect if the current major mode is a prog-mode?

Answer 1

(if (derived-mode-p 'prog-mode) ...)