Learning Forum

[Erik Kostson]

Hi

Perhaps use restart option.

Example

end_time = arg1 ! WB parameters

step = arg2

substep = arg3

limpres = arg4

delta_t = end_time/step                                                ! time increment

save,model,db                                                                  ! (database saved for diagnosing purpose)

 

/solu

antype,4                                                                              ! transient analysis

autots,off                 ! User turned off automatic time stepping

timint,on

time,1e-5                                                                            ! a very small initial time

alls

solve

*do,i,1,step,1                                                    ! loop substep number

  fini

  /post1

  set,i                                                                     ! read ith step

  !do something here

  allsel,all

  fini

  parsav,all,my_par,txt                                    ! save paramters

 

  /solu

  antype,4,rest                                                   ! restart from last step

  timint,on

  autots,off                 ! User turned off automatic time stepping

  parres,new,my_par,txt                                 ! resume parameter

  time,i*delta_t

  nsubst,substep

  !do something here

  /solu

 

  alls

  solve

*enddo

Hope this helps

Erik