source:
NEMO/branches/2021/dev_r14116_HPC-10_mcastril_Mixed_Precision_implementation/src/OCE/single_precision_substitute.h90
@
15540
Last change on this file since 15540 was 15540, checked in by sparonuz, 3 years ago | |
---|---|
File size: 147 bytes |
Line | |
---|---|
1 | |
2 | #if defined key_single |
3 | # define CASTSP(x) REAL(x,sp) |
4 | # define CASTDP(x) REAL(x,dp) |
5 | #else |
6 | # define CASTSP(x) x |
7 | # define CASTDP(x) x |
8 | #endif |
Note: See TracBrowser
for help on using the repository browser.