Ignore:
Timestamp:
Jan 19, 2016 11:48:55 AM (7 years ago)
Author:
srkline
Message:

adding the function for the basic metropolis algorithm.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/XOP_Dev/MonteCarlo/MonteCarlo.r

    r815 r974  
    44        0x01, 0x00, final, 0x00, 0,                             /* version bytes and country integer */ 
    55        "1.00", 
    6         "1.00, © 1993 WaveMetrics, Inc., all rights reserved." 
     6        "1.00, ï¿œ 1993 WaveMetrics, Inc., all rights reserved." 
    77}; 
    88 
     
    155155                        NT_FP64,                                                // stop index 
    156156                }, 
    157                  
     157         
     158                "MetropolisX",          /* function name */ 
     159                F_UTIL | F_THREADSAFE | F_EXTERNAL,                                     /* function category == UTILITY */ 
     160                NT_FP64,                                                        /* return value type */                  
     161                { 
     162                        NT_FP64 + WAVE_TYPE,                    // UofR 
     163                        NT_FP64 + WAVE_TYPE,                    // XYZ waves 
     164                        NT_FP64 + WAVE_TYPE, 
     165                        NT_FP64 + WAVE_TYPE, 
     166                        NT_FP64 + WAVE_TYPE,                    // energy wave 
     167                        NT_FP64,                                                // radius 
     168                        NT_FP64,                                                // tVox 
     169                        NT_FP64,                                                // nVox 
     170                        NT_FP64,                                                // nIterations 
     171                        NT_FP64,                                                // gCount 
     172                }, 
    158173        } 
    159174}; 
Note: See TracChangeset for help on using the changeset viewer.