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
deri_kappa.F | [SOURCES/SCHEMES] | - 19 - 31 |
emissiv.F | [SEQCODE/MODEL] | - 14 - 24 - 31 |
emissiv.F | [SOURCES/MODEL] | - 30 - 50 - 60 |
fsck_case.F | [SEQCODE/MODEL] | - 32 |
fsck_case.F | [SOURCES/MODEL] | - 40 |
fsk_case.F | [SEQCODE/MODEL] | - 20 |
fsk_case.F | [SOURCES/MODEL] | - 35 |
fulldomasium.f90 | [SEQCODE/FULLDOMASIUM] | - 1467 - 1491 - 1496 - 1510 - 1514 - 2229 |
Makefile | [TOOLS/RAY] | - 62 |
Makefile | [SEQCODE] | - 59 |
Makefile | [SOURCES] | - 87 |
Makefile | [TOOLS/TABFSK] | - 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] | - 502 |
tabfsk.F | [TOOLS/TABFSK/SRC] | - 23 - 142 |
tab_case.F | [TOOLS/RAY/SRC] | - 27 |
tfsck_case.F | [SOURCES/MODEL] | - 36 |
tfsk_case.F | [SOURCES/MODEL] | - 34 |
wsgg_case.F | [SEQCODE/MODEL] | - 13 - 70 |
wsgg_case.F | [SOURCES/MODEL] | - 37 |