|
Last change
on this file was
5268,
checked in by abarral, 9 days ago
|
|
.f90 <-> .F90 depending on cpp key use
|
|
File size:
423 bytes
|
| Line | |
|---|
| 1 | MODULE iso_params_mod |
|---|
| 2 | |
|---|
| 3 | REAL, PARAMETER :: tnat_H216O = 1.0000, alpha_ideal_H216O = 1.000, & |
|---|
| 4 | tnat_H217O = 40.000e-6, alpha_ideal_H217O = 1.003, & |
|---|
| 5 | tnat_H218O = 2005.2e-6, alpha_ideal_H218O = 1.006, & |
|---|
| 6 | tnat_HDO = 155.76e-6, alpha_ideal_HDO = 1.010, & |
|---|
| 7 | tnat_HTO = 0.0000, alpha_ideal_HTO = 1.000 |
|---|
| 8 | |
|---|
| 9 | END MODULE iso_params_mod |
|---|
| 10 | |
|---|
Note: See
TracBrowser
for help on using the repository browser.
