C DEFDAT SOURCE PV 88/03/23 15:52:44 C DATE NE PAS MODIFIER SVP CE SOUS PROGRAMMME C -INC CCOPTIO DATVER=' Thu 12 Dec 2019' if(icp.eq.0) WRITE (IOIMP,10) DATVER(1:50) 10 FORMAT (/,' ****** PPP CAST3M ****** VERSION DU',A50,/) if(icp.ne.0) WRITE (IOIMP,20) icp,DATVER(1:50) CALL VERDAT(1576181701 ) END
© Cast3M 2003 - Tous droits réservés.
Mentions légales