在Fortran中,預處理器指令以符號“#”開頭,與C和C++中的預處理器指令類似。以下是一些常用的Fortran預處理器指令及其用法:
#define PI 3.14159
#ifdef DEBUG
write(*,*) "Debugging information"
#endif
#ifndef PI
#define PI 3.14159
#endif
#if defined(PI)
write(*,*) "Value of PI is defined"
#endif
#ifdef DEBUG
write(*,*) "Debugging information"
#else
write(*,*) "No debugging information"
#endif
#ifdef DEBUG
write(*,*) "Debugging information"
#endif
需要注意的是,Fortran中的預處理器指令僅在編譯過程中起作用,不會出現在最終生成的可執行文件中。因此,預處理器指令主要用于在編譯時控制代碼的編譯和執行流程。