
*# Begin block of Lumped mass
*include ..\include.src.bas\Lumped_Mass_for.bas
*# End block of Lumped mass
*#
*# Begin block of Velocity
*include ..\include.src.bas\Velocity_for_nodes.bas
*# End block of Velocity
*#
*# Begin block of Acceleration
*include ..\include.src.bas\Acceleration_for_nodes.bas
*# End block of Acceleration
*#
*If(IntvData(Ground_Accelerogram,real)==1 && ApplyInSubIncrement==1)
*# Begin block of Ground_accelerogram
*include ..\include.src.bas\Ground_accelerogram_load.bas
*# End block of Ground_accelerogram
*EndIf
 ;
      //	-> block of LumpedMass   - number of condition #*nLumpedMass
      //	-> block of Velocity     - number of condition #*nVel
      //	-> block of Acceleration - number of condition #*nAccel
