yejet 发表于 2006-8-19 10:52

多个inp文件如何实现批处理

我喜欢用fortran
写成这样:

! nodedeform.f90
!
! FUNCTIONS:
!nodedeform - Entry point of console application.
!
!Example of displaying 'Hello World' at execution time.
!

!****************************************************************************
!
! PROGRAM: nodedeform
!
! PURPOSE: Entry point for 'Hello World' sample console application.
!
!****************************************************************************

program nodedeform
USE DFLIB
!implicit none
result = SYSTEMQQ ('abaqus job=3d05ctJ interactive')
result = SYSTEMQQ ('abaqus job=3d05ctJmodel-2 interactive')
!result = SYSTEMQQ ('abaqus job=test-1 interactive')
! result = SYSTEMQQ ('abaqus job=test-2 interactive')
!result = SYSTEMQQ ('abaqus job=test-3 interactive')
!result = SYSTEMQQ ('abaqus job=test-4 interactive')
!result = SYSTEMQQ ('abaqus job=test-5 interactive')
!result = SYSTEMQQ ('abaqus job=test-6 interactive')
!result = SYSTEMQQ ('abaqus job=test-7 interactive')
!result = SYSTEMQQ ('abaqus job=test-8 interactive')
end program nodedeform


来自:likuiming收集的资料
页: [1]
查看完整版本: 多个inp文件如何实现批处理