설명

기고자: Lutz Westermann, 2012년 10월

소형 모델 유형 :포트란

카테고리 : 무료 슬롯 사이트 API 라이브러리

메인 파일 : Fex1.gms

$title 'GDX를 읽고 쓰기 위한 전문가 수준의 Fortran API 테스트' (FEX1,SEQ=9)

$onText
기고자: Lutz Westermann, 2012년 10월
$offText

$set srcRoot %무료 슬롯 사이트sysdir%apifiles%system.dirsep%Fortran%system.dirsep%
$set srcRootC %무료 슬롯 사이트sysdir%apifiles%system.dirsep%C%system.dirsep%

$ifThen %system.filesys% == UNIX
$ 설정되지 않은 경우 COMPILER $set COMPILER GNU
$else
$ 설정되지 않은 경우 COMPILER $set COMPILER INTEL
$endIf

$ifThen %COMPILER% == GNU
$ 세트 FCOMP gfortran
$ CCOMP gcc 설정
$ 세트 LIB ar ruv
$ 세트 LIBOP
$ 세트 LIBEX a
$ 세트 OBJEX o
$ SYMSTY -DAPIWRAP_LCASE_DECOR 설정
$ ifThen %system.filesys% == UNIX
$ OUT 설정 -oxp_example1
$ 플래그 설정 -ldl
$ LDFLAGS 설정 -lpthread
$ 다른
$ OUT 설정 -oxp_example1.exe
$ 플래그 설정
$ 세트 LDFLAGS 
$ endIf
$elseIf %COMPILER% == INTEL
$ FCOMP ifort 설정
$ CCOMP cl 설정
$ LIB lib 설정
$ LIBOP 설정 -아웃:
$ LIBEX lib 설정
$ OBJEX 객체를 설정합니다.
$ 플래그 설정
$ 세트 SYMSTY -DAPIWRAP_LCASE_NODECOR
$ OUT 설정 -Fexp_example1.exe
$ 세트 LDFLAGS 
$else
$ 중단 알 수 없는 컴파일러: %COMPILER%
$endIf

$call rm -rf Demanddata.gdx

$call %FCOMP% -c "%srcRoot%api%system.dirsep%gdxf9def.f90" %FLAGS%
$if errorlevel 1 $abort 'gdxf9def.f90 컴파일 문제'
$call %CCOMP% %SYMSTY% -c "%srcRoot%api%system.dirsep%gdxf9glu.c" -I"%srcRootC%api" -I"%srcRoot%api" %FLAGS%
$if errorlevel 1 $abort 'gdxf9glu.c 컴파일 문제'
$call %LIB% %LIBOP%gdxf90lib.%LIBEX% gdxf9def.%OBJEX% gdxf9glu.%OBJEX%
$if errorlevel 1 $abort 'lib 파일 생성 중 문제 발생'
$call %FCOMP% -c "%srcRoot%api%system.dirsep%gamsglobals_mod.f90" "%srcRoot%xp_example1.f90" %FLAGS%
$if errorlevel 1 $abort 'xp_example1.f90 컴파일 문제'
$call %FCOMP% %OUT% gamsglobals_mod.%OBJEX% xp_example1.%OBJEX% gdxf90lib.%LIBEX% %FLAGS% %LDFLAGS%
$if errorlevel 1 $abort '연결 중 문제 발생'
$call .%system.dirsep%xp_example1 "%무료 슬롯 사이트sysdir%."
$if errorlevel 1 $abort 'GDX 파일을 쓰는 xp_example1 실행 중 문제 발생'
$call gdxdiffdemanddata.gdxdemandwant.gdx
$if errorlevel 1 $abort '수요 데이터가 예상과 다릅니다.'
$call .%system.dirsep%xp_example1 "%무료 슬롯 사이트sysdir%." trnsport.gdx
$if errorlevel 1 $abort 'GDX 파일을 읽는 xp_example1 실행 문제'