| 
    XGCa
    
   | 
 
Functions/Subroutines | |
| subroutine | init_seeds (i1, i2, i3) | 
| real(dp) function | taus88 () | 
| subroutine | init_seeds_ext (sv) | 
| real(dp) function | taus88_ext (sv) | 
Variables | |
| integer, parameter | dp = SELECTED_REAL_KIND(14, 60) | 
| integer, save | s1 = 1234 | 
| integer, save | s2 = -4567 | 
| integer, save | s3 = 7890 | 
| subroutine ecuyer_random::init_seeds | ( | integer, intent(in) | i1, | 
| integer, intent(in) | i2, | ||
| integer, intent(in) | i3 | ||
| ) | 

| subroutine ecuyer_random::init_seeds_ext | ( | integer, dimension(3), intent(inout) | sv | ) | 

| real (dp) function ecuyer_random::taus88 | 

| real (dp) function ecuyer_random::taus88_ext | ( | integer, dimension(3), intent(inout) | sv | ) | 

| integer, parameter ecuyer_random::dp = SELECTED_REAL_KIND(14, 60) | 
| integer, save ecuyer_random::s1 = 1234 | 
| integer, save ecuyer_random::s2 = -4567 | 
| integer, save ecuyer_random::s3 = 7890 |