| 
            Last change
 on this file since 2774 was             2403, checked in by cmv, 22 years ago           | 
        
        
          
            
Creation du module de code source de MINUIT (CERNLIB) extrait par CMV 
 
cmv 11/06/2003 
 
 
 
           | 
        
        
          | 
            File size:
            423 bytes
           | 
        
      
      
| Line |   | 
|---|
| 1 | *
 | 
|---|
| 2 | * $Id: old506.F,v 1.1.1.1 2003-06-11 14:18:32 cmv Exp $
 | 
|---|
| 3 | *
 | 
|---|
| 4 | * $Log: not supported by cvs2svn $
 | 
|---|
| 5 | * Revision 1.1.1.1  1996/03/07 14:31:33  mclareni
 | 
|---|
| 6 | * Minuit
 | 
|---|
| 7 | *
 | 
|---|
| 8 | *
 | 
|---|
| 9 | #include "sys/CERNLIB_machine.h"
 | 
|---|
| 10 | #include "_minuit/pilot.h"
 | 
|---|
| 11 | #if defined(CERNLIB_NEVER)
 | 
|---|
| 12 |       SUBROUTINE MINNEW
 | 
|---|
| 13 | C
 | 
|---|
| 14 |       ENTRY MINTS
 | 
|---|
| 15 |       ENTRY MINTL
 | 
|---|
| 16 |       ENTRY MINTSD
 | 
|---|
| 17 |       ENTRY MINTLD
 | 
|---|
| 18 | C
 | 
|---|
| 19 |       EXTERNAL FCN
 | 
|---|
| 20 | C
 | 
|---|
| 21 |       CALL MINUIT(FCN,0)
 | 
|---|
| 22 |       RETURN
 | 
|---|
| 23 |       END
 | 
|---|
| 24 | #endif
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.