| 1 | 1/1 | 返回列表 |
| 查看: 692 | 回復(fù): 0 | |||
| 【懸賞金幣】回答本帖問(wèn)題,作者izaye將贈(zèng)送您 10 個(gè)金幣 | |||
izaye新蟲 (初入文壇)
|
[求助]
關(guān)于abaqus子程序中精度的問(wèn)題?
|
||
|
大家能不能幫忙看一我這個(gè)abaqus里的vuamp子程序的精度是否正確,如果不正確的話該如何聲明變量?純新手,這兩天查資料查的很多概念都蒙圈了,求大佬幫忙 SUBROUTINE VUAMP( * ampName, time, ampValueOld, dt, nprops, props, nSvars, * svars, lFlagsInfo, nSensor, sensorValues, sensorNames, * jSensorLookUpTable, * AmpValueNew, * lFlagsDefine, * AmpDerivative, AmpSecDerivative, AmpIncIntegral) INCLUDE 'VABA_PARAM.INC' C time indices parameter (iStepTime = 1, * iTotalTime = 2, * nTime = 2) C flags passed in for information parameter (iInitialization = 1, * iRegularInc = 2, * ikStep = 3, * nFlagsInfo = 3) C optional flags to be defined parameter (iComputeDeriv = 1, * iComputeSecDeriv = 2, * iComputeInteg = 3, * iStopAnalysis = 4, * iConcludeStep = 5, * nFlagsDefine = 5) dimension time(nTime), lFlagsInfo(nFlagsInfo), * lFlagsDefine(nFlagsDefine), * sensorValues(nSensor), * props(nprops), * sVars(nSvars) character*80 sensorNames(nSensor) character*80 ampName dimension jSensorLookUpTable(*) tim=time(iStepTime) if (ampName(1:6).EQ.'sinsin') then r=mod(tim,5.76) if(r.LE.0.25) then ampValueNew=1000000+7580*sind(8*pi*tim) else ampValueNew=0 end if end if return end |
| 1 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 工科0856專碩化學(xué)工程269能調(diào)劑嗎 +9 | 我想讀研11 2026-03-10 | 9/450 |
|
|---|---|---|---|---|
|
[考研] 274環(huán)境工程求調(diào)劑 +8 | 扶柳盈江 2026-03-05 | 9/450 |
|
|
[考研] 泣血叩求調(diào)劑恩,愿以丹心報(bào)師恩 +5 | Iuruoh 2026-03-11 | 5/250 |
|
|
[考研] 290求調(diào)劑 +3 | 柯淮然 2026-03-10 | 8/400 |
|
|
[考研] 081200計(jì)算機(jī)科學(xué)與技術(shù)數(shù)一英一306求調(diào)劑 +3 | intankt 2026-03-08 | 3/150 |
|
|
[考研] 083000環(huán)境科學(xué)與工程調(diào)劑 +8 | mingmingry 2026-03-09 | 9/450 |
|
|
[考研] 化工0817調(diào)劑 +8 | 燦若星晨 2026-03-10 | 8/400 |
|
|
[考研] 278求調(diào)劑 +8 | Gale1314 2026-03-06 | 8/400 |
|
|
[考研] 求調(diào)劑 一志愿蘇州大學(xué),0856化工323分 | 本科應(yīng)化 | 有專利/競(jìng)賽/科研助手經(jīng)歷 | +7 | 橙子cyx 2026-03-06 | 9/450 |
|
|
[考研] 考研一志愿長(zhǎng)安大學(xué)材料與化工309分請(qǐng)求調(diào)劑 +6 | dtdxzxx 2026-03-06 | 8/400 |
|
|
[考研] 320求調(diào)劑 +4 | 魏zy 2026-03-08 | 4/200 |
|
|
[考研] 307求調(diào)劑 +3 | 辛仁豆腐 2026-03-08 | 5/250 |
|
|
[考研] 一志愿211 材料與化工 280求調(diào)劑 +3 | Sanity蔣 2026-03-08 | 3/150 |
|
|
[考研] 0701-322 求調(diào)劑 +3 | jiliuxian 2026-03-06 | 8/400 |
|
|
[考研] 288求調(diào)劑085600材料與化工 +13 | Daunrin 2026-03-07 | 15/750 |
|
|
[考研] 334求調(diào)劑 +8 | Trying] 2026-03-06 | 8/400 |
|
|
[考研] 一志愿鄭大071000分?jǐn)?shù)282求調(diào)劑 +3 | 研研顏 2026-03-05 | 7/350 |
|
|
[考研] 第一志愿上海大學(xué),專業(yè)化學(xué)工程與技術(shù),總分288,求調(diào)劑 +3 | 1829197082 2026-03-07 | 3/150 |
|
|
[考研] 308求調(diào)劑 +7 | 倘若起風(fēng)了呢 2026-03-05 | 9/450 |
|
|
[考研] 材料與化工304求B區(qū)調(diào)劑 +4 | 邱gl 2026-03-06 | 4/200 |
|