****calcul
 ***mesh 
  **file disk_thick.geof
 ***resolution
  **sequence 1
   *time 1.
   *increment 20
   *iteration 10
   *ratio 0.01    
   *algorithm p1p2p3
  **automatic_time global 6
    *security  1.2
    *divergence  2. 10
    *first_dtime 0.01
 ***bc
  **impose_nodal_dof
    bottom U2 0.
    hub U1 0.
  **centrifugal
    ALL_ELEMENT (0.0 0.0) d2 10000. time
%***equation
% **mpc1 top U2
% **mpc1 bottom U2
 ***output
    **value_at_integration
 ***table
   **name tab
      *time  0.  1.
      *value 0.  1.
 ***material
   *this_file
   *integration theta_method_a 1. 1e-12 100
****return

***behavior gen_evp
 **elasticity isotropic
   young 205000.
   poisson 0.3
 **potential gen_evp ep
  *criterion hosford a 80.
  *isotropic constant
   R0 1000.
***coefficient
    masvol 8.08e-9
***return