source: Sophya/trunk/SophyaExt/MinuitAdapt/minuitadaptF.f@ 3668

Last change on this file since 3668 was 2404, checked in by cmv, 22 years ago

Creation du module (MinuitAdapt) d'adaptation de MINUIT pour Sophya

cmv 11/06/2003
File size: 397 bytes
Line 
1*=======================================================
2 subroutine localmnpout(i,c,p,ep,b1,b2,ivar)
3c On surecrit mnpout_:
4c car le C/C++ n'arrive pas a recuperer correctement
5c la chaine de characteres "c" (dans certains cas core dump)
6 implicit none
7 integer i,ivar
8 real*8 p,ep,b1,b2
9 character *(256) c
10 call mnpout(i,c,p,ep,b1,b2,ivar)
11 return
12 end
Note: See TracBrowser for help on using the repository browser.