Fortran中的模板元编程可以通过使用宏和预处理器来实现。下面是一个简单的示例，演示如何在Fortran中使用模板元编程：

! 定义一个宏，用于计算两个数的和#define ADD(a, b) a + bprogram template_metaprogrammingimplicit noneinteger :: result! 使用宏计算两个数的和result = ADD(3, 5)print *, 'The result is: ', resultend program template_metaprogramming

在这个示例中，我们定义了一个名为ADD的宏，用于计算两个数的和。在程序中，我们使用ADD宏来计算3和5的和，并将结果打印出来。通过使用宏和预处理器，我们可以实现在Fortran中的模板元编程功能。