C DEFDAT SOURCE PV 88/03/23 15:52:44 C DATE NE PAS MODIFIER SVP CE SOUS PROGRAMMME C -INC PPARAM -INC CCOPTIO DATVER=' Thu 14 Jan 2021' 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(1610655307 ) END
© Cast3M 2003 - Tous droits réservés.
Mentions légales