planck.F | [SRC] [CPP] [JOB] [SCAN] |
SOURCES / FUNCTIONS | SEQCODE/FUNCTIONS [=] |
1 | include(dom.inc) 2 | 3 | FUNCTION planck(temp) 4 | 5 | IMPLICIT NONE 6 | 7 | include 'dom_constants.h' 8 | 9 | DOM_REAL, INTENT(IN) :: temp 10 | DOM_REAL :: planck, T4 11 | 12 | T4 = temp*temp*temp*temp 13 | planck = sigma*T4/pi 14 | 15 | END FUNCTION planck
emissiv.F | [SEQCODE/MODEL] | - 14 - 24 - 31 |
emissiv.F | [SOURCES/MODEL] | - 32 - 52 - 62 |
fsck_case.F | [SEQCODE/MODEL] | - 20 |
fsck_case.F | [SOURCES/MODEL] | - 37 |
fulldomasium.f90 | [SEQCODE/FULLDOMASIUM] | - 1467 - 1491 - 1496 - 1510 - 1514 - 2229 |
Makefile | [TOOLS/RAY] | - 62 |
Makefile | [SEQCODE] | - 59 |
Makefile | [SOURCES] | - 88 |
Makefile | [TOOLS/TABFSCK] | - 59 |
planck.F | [SEQCODE/FUNCTIONS] | - 10 - 12 |
planck.F | [SOURCES/FUNCTIONS] | - 10 - 13 |
ray.F | [TOOLS/RAY/SRC] | - 23 - 250 - 256 - 345 - 390 - 392 - 393 |
slave.F | [SOURCES/MAIN/SLAVE] | - 454 |
tabfsck.F | [TOOLS/TABFSCK/SRC] | - 23 - 109 |
tab_case.F | [SOURCES/MODEL] | - 35 |
tab_case.F | [TOOLS/RAY/SRC] | - 27 |
wsgg_case.F | [SEQCODE/MODEL] | - 13 - 70 |
wsgg_case.F | [SOURCES/MODEL] | - 37 |