대기과학지

이번 포스팅은 정말 오랜만에 포트란입니다 WRF 결과물인 netCDF 파일을 읽고 격자들 전체의 평균 값을 구하는 코드를 해보겠습니다 전체 코드입니다 1 PROGRAM net1 2 use netcdf 3 4 IMPLICIT NONE 5 6 CHARACTER(len = 256) :: fi 7 REAL, ALLOCATABLE :: T2(:,:,:) 8 9 INTEGER :: dx, dy 10 INTEGER :: ncid, varid 11 INTEGER :: start(3), count(3) 12 13 14 fi = "wrfout_d01_2016-10-06_00.nc" 15 dx = 209 16 dy = 209 17 18 call check(nf90_open(fi, NF90_NOWRITE, ncid), "op..

이번 포스팅은 WPS를 설치해보겠습니다 설치에 앞서 이번 포스팅은 꽤 의미 있는 포스팅입니다 제 블로그에 100번째 글로 올라가는 포스팅입니다 몇 개 안쓴거 같지만 벌써 100번째라는게 놀랍네요 ㅠㅠ 앞으로도 대학원을 가서도 열심히 남겨보겠습니다! cd $HOME/WRF/Downloads wget -c https://github.com/wrf-model/WPS/archive/v4.1.tar.gz tar -xvzf v4.1.tar.gz -C $HOME/WRF cd $HOME/WRF/WPS-4.1 ./configure #3 ./compile WPS도 코드는 간단합니다 다 넘어가고 역시 configure부터 보겠습니다 Will use NETCDF in dir: /home/lsh/WRF/Library Using..