Tests/testcomm9/param1.comm

   1
   2 DEBUT()
   3 TEMP_MOY=50.
   4 coef0 = 1.E-3
   5
   6 A0=DEFI_FONCTION(      NOM_PARA='TEMP',
   7                             PROL_DROITE='EXCLU',
   8                             PROL_GAUCHE='EXCLU',
   9                                    VALE=(
  10           20.            ,14.7            *coef0,
  11           50.            ,15.2            *coef0,
  12           100.           ,15.8            *coef0,
  13           150.           ,16.7            *coef0,
  14           200.           ,17.2            *coef0,
  15           250.           ,18.             *coef0,
  16           300.           ,18.6            *coef0,
  17           350.           ,19.3            *coef0,
  18           400.           ,20.             *coef0,
  19           450.           ,20.5            *coef0,
  20           500.           ,21.1            *coef0,
  21           550.           ,21.7            *coef0,
  22           600.           ,22.2            *coef0,
  23           650.           ,22.7            *coef0,
  24           700.           ,23.2            *coef0,
  25           750.           ,23.7            *coef0,
  26           800.           ,24.1            *coef0,
  27           950.           ,26.67           *coef0,
  28           1150.          ,29.24           *coef0,
  29           1370.          ,32.06           *coef0,
  30           ))
  31
  32 DEFI_MATERIAU(  ELAS=_F( RHO = 1.E08,
  33                          NU = 0.3,
  34                          E = A0(TEMP_MOY)))
  35
  36 FIN()